>
> danke f�r die Erkl�rung....
>
> >Dim myData
> >myData = getData()
> >writeData(myData)
> >
> >Function getData()
> >getData = "some DB Data"
> >End Function
> >
> >Sub writeData(theData)
> >Response.write theData
> >End sub
>
> nur kurz noch zum Verst�ndnis:
> darf getData (oder genauer
> "some DB Data") auch ein Array sein?
Ja.
>
> w�rde also
>
> Dim myArr()
> myArr() = getData()
> writeData(myArr)
>
> Function getData()
> StrSQL = "...."
> Set rs = Conn.Execute(StrSQL)
> ArrData() = rs.getrows
> getData = ArrData()
> End Function
>
> Sub writeData(theArr())
> theArr()-Operationen
> End Sub
>
> funktionieren?
>
> Gruss
>
> Alex
Fast... Und bitte lokale Variablen auch immer deklarieren und "Option
Explicit" benutzen
Dim myArr
myArr = getData()
writeData(myArr)
Function getData()
dim strSQL,rs,arrData
StrSQL = "...."
Set rs = Conn.Execute(StrSQL)
ArrData = rs.getrows
getData = ArrData
End Function
Sub writeData(theArr)
'theArr-Operationen
End Sub
Claudius
| [aspdedatabase] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdedatabase/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdedatabase.asp