Hej alle. Nu da jeg sidder og leger med asp.NET er jeg stødt ind i mit
første problem. Jeg har følgende kode:
<%@Import Namespace="System.Data"%>
<!--#Include File="../../includes/conn.aspx"-->
<script language="VB" runat="server">
Sub MakeSubs(SubID As Integer)
Dim sqlSub As SqlCommand = New SqlCommand("SELECT * FROM [tblMenu] WHERE
[SubID] = " & SubID, Conn)
Dim rsSub As SqlDataReader = sqlSub.ExecuteReader()
Do While rsSub.Read
Response.Write("<b>" & rsSub("Title") & "</b>")
Loop
End Sub
</script>
<table border="0" cellpadding="0" cellspacing="0" height="490">
<tr>
<td style="border-bottom: 2px solid #000000" valign="top">
<br>
<%
Dim sql As SqlCommand = New SqlCommand("SELECT * FROM [tblMenu] WHERE
[SubID] = 0", Conn)
Dim rs As SqlDataReader = sql.ExecuteReader()
Do While rs.Read
Response.Write("<img src='images/menu/" & rs("Image") & "' width='130'
height='35'><br><br>")
MakeSubs(rs("MenuID"))
Loop
%>
</td>
</tr>
</table>
<!--#Include File="../../includes/connend.aspx"-->
Koden skulle gerne udskrive alle menuemner der har SubID = 0, og så de
undermenuemner til disse. Problemet opstår i min MakeSubs funktion, som
klager over at Conn ikke er erklæret (Det sker kun i MakeSubs funktionen,
den anden kode virker fint). Hvis jeg sender Conn med som en parameter
klager den over at der kun kan være en datareader tilsluttet min Conn ad
gangen... Hvad gør jeg? :)
Mvh Mark