Rs subbar

Varför kan man inte öppna en db koppling och skapa ett recordset för att sedan använda dem i en sub?

Exempel:

set hej = Server.CreateObject("ADODB.Connection")... och allt det där
Set rs = hej.execute("Öppna för guds skull!")

och sedan

Sub hejIgen
 a = rs("ytterligare_ett_hej")
End Sub

Har testat att dimma rs globalt men det verkar ju inte heller funktionera. :q

------------------
Peter D

Har du dimmat a utanför subben?

cya,
PatrikB

------------------
*så kan det gå när inte haspen är på*

Nej, a är bara ett exempel...

Jag använder response.write rs("rs") inne i subben

originalkoden innehåller en massa grötig html emellan.

------------------
Peter D

[Redigerat av Pace den 02 aug 2001]

ligger subben på samma sida som rs connection?

Samma asp sida menar du? Japp.

------------------
Peter D

Glömde tillägga att jag får detta felmed:

Item cannot be found in the collection corresponding to the requested name or ordinal.

------------------
Peter D

du har inte stänkgt rs eller hej innan du kör subben?

Nej, inget sånt.

------------------
Peter D

Hur ser den riktiga koden ut?

Okej, hold on, så ska jag slänga in den... (utan den grötiga html:n)

------------------
Peter D

strSql = "SELECT Members.M_Name,Members.M_ICQ, Members.Member_id, Topics.T_date, Topics.T_subject, Topics.T_Message, Topics.T_Originator, Topics.Topic_ID "
		strSql = strSql & "FROM Members INNER JOIN Topics ON Members.Member_id = Topics.T_Originator "
		strSql = strSql & "where topics.topic_id = " &  Request.QueryString("topic_id") 
	
set rs = my_conn.Execute (strSql)

	
If rs.Eof or rs.Bof then
Response.Write "<TR><TD COLSPAN=5>Inga inlägg funna</TD></TR>" & vbCrLF

Else
Call displayTopic()

Så här ser displayTopic ut:

Sub displayTopic()

Response.Write "<TR>" & vbCrLf
Response.Write "<TD BGCOLOR='" & CColor & "' VALIGN=""top"">" & _
"<FONT COLOR='" & FormFontColor & "' FACE='" & DefaultFontFace & "' SIZE=2>" & _
rs("M_name") & userTitle & "</FONT></TD>" & vbCrLf
Response.Write "<TD BGCOLOR='" & CColor & "'  VALIGN='top' ><FONT COLOR=gray FACE='" & DefaultFontFace & "' SIZE=1 COLOR=gray>Postat " &  day(rs("R_Posted")) & " " & monthname(month(rs("R_Posted"))) & " " & year(rs("R_Posted")) & " " & hour(rs("R_Posted")) & ":" & Minute(rs("R_Posted")) & "</FONT>" & vbCrLf
Response.Write "  <A HREF=""Javascript:openWindow('profile.asp?action=display&username=" & server.URLEncode(rs("M_name")) & "')""><IMG SRC='profile.gif' ALT='Visa profil' BORDER=0 ALIGN='absmiddle' HSPACE=6></A>" & vbCrLf
Response.Write "  <A HREF='mail.asp?id=" & rs("R_posted_by") & "'><IMG SRC='email.gif' ALT='Skicka e-mail till användaren' BORDER=0 ALIGN='absmiddle' HSPACE=6></A>" & vbCrLf

Response.Write "  <A HREF='post.asp?method=edit&reply_id=" & Rs("Reply_ID") & "&auth=" & server.URLEncode(rs("R_posted_by")) & "&forum_title=" & server.URLEncode(Request.QueryString("forum_title")) & "&topic_title=" & server.Urlencode(Request.QueryString("topic_title")) & "&forum_id=" & Request.QueryString("forum_id") & "&topic_id=" & Request.QueryString("topic_id") &"'><IMG SRC='edit.gif' ALT='Redigera inlägg' BORDER=0 ALIGN='absmiddle' HSPACE=6></A>" & vbCrLf

Response.Write "<HR NOSHADE SIZE=1><FONT COLOR='" & ForumFontColor & "' FACE='" & DefaultFontFace & "' SIZE=2>" &  formatStr(rs("R_Message")) & "</FONT><P> </TD>" & vbCrLf
Response.Write "</TR>" & vbCrLf

End Sub

[r] Öhh... fan vad grötigt det blev här... det är i alla fall bara Response.Write som skriver ut Recordseten, så ni behöver inte stirra er blinda!

------------------
Peter D

[Redigerat av Pace den 02 aug 2001]

Är alla rs("FieldName") rättstavade?

cya,
Patrikb

------------------
*så kan det gå när inte haspen är på*

Japp, inga som helst fel där. Felet uppstod enbart när jag flyttade skiten från modulnivå in i en sub.

------------------
Peter D

dimma rs utanför subbarna

Ja, det har jag ju gjort.

------------------
Peter D

Jag har ingen aning om vad som kan vara fel, men jag tror jag överger detta och försöker gå en omväg runt detta problem. :(

Tack för hjälpen i alla fall. :)

------------------
Peter D

Du kan ju inte använda rs("R_posted_by") m.fl eftersom du inte plockar ut dem i SELECT-satsen.

Ah! emission! Fattar inte hur du orkade kolla igenom allt! :f Tackar tackar!

Hur som helst, hur gör jag nu för att få in detta i SQL satsen...

[r] Det är alltså i en tabell som heter "Reply"
------------------
Peter D

[Redigerat av Pace den 02 aug 2001]