Hallo andreas,
>Ein Function gibt einen Wert zur�ck
>
>Function mal(a,b)
> mal = a * b
>End function
Heisst das ich kann folgendes machen:
function getData
.
stringSQL = "select * from Tabelle"
objRS.Open strSQL, objConn
getData = objRS
end function
habe ich dann den ganzen datensatz in getData?
objRS("News_ID").Value whare dann GetData("News_ID").Value ??????
mfg,
Roni
-----Original Message-----
From: Andreas Rudischhauser (N) [mailto:[EMAIL PROTECTED]]
Sent: Thursday, January 24, 2002 11:52 AM
To: ASP Diskussionsliste fuer Anfaenger
Subject: [aspdebeginners] AW: recordset
Zu a) bitte den Code
Zu b)
Ein Function gibt einen Wert zur�ckk
Function mal(a,b)
mal = a * b
End function
-----Urspr�ngliche Nachricht-----
Von: Roni Schuetz [mailto:[EMAIL PROTECTED]]
Gesendet: Donnerstag, 24. Januar 2002 10:39
An: ASP Diskussionsliste fuer Anfaenger
Betreff: [aspdebeginners] recordset
hallo,
was mache ich falsch;
wenn ich in einer funktion eine recordset aufrufe und aus der funktion
raus
die daten ausgebe und before die funktion zu ende ist, moechte ich das
record schliesen aber ich erhalte die einen fehlermeldung, dass ich kein
record schliessen kann weil keins offen ist????
Meine zweite frage ist, was spielt das fuer eine rolle, ob ich eine
function
oder ein sub benutzte?
mfg,
danke roni
bsp. fuer eine solche funktion:
function GetAllNewsHeader()
' Set and open the connection
set objConn = CreateObject("ADODB.Connection")
set objRS = CreateObject ("ADODB.Recordset")
objConn.ConnectionString = strConnect
objConn.Open
' select all activated news headers only
strSQL = "..........."
' execute the connetion
objRS.Open strSQLGetAllUsersWithBlocked, objConn
Response.Write ("<option value='select' selected>Please select
one . .
.</option>" & vbCrLf )
' write all users in the select
while not objRS.EOF
Response.Write ( "<option value='" &
objRS("News_ID").Value & _
"'>" &
objRS("News_Header").Value & "</option>" & vbCrLf)
objRS.MoveNext()
wend
'release the RecordSet and connection
objRS.Close () <------ hier erhalte ich einen fehler
objConn.Close ()
SET objRS = NOTHING
SET objConn = NOTHING
end function
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [EMAIL PROTECTED] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
