> 
> 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

Antwort per Email an