Ich versteh die Welt nicht mehr. Ich versuche über ein Dropdownfeld eine SQL-Datenbank auszulesen und es will mir nicht gelingen. Ich kann keine zwei Textfelder anzeigen lassen.
Mein Quelltext für das select-Feld sieht folgendermaßen aus:
<select name="select">
<%
While (NOT rsImage.EOF)
%>
<option value="<%=(rsImage.Fields.Item("filename").Value)%>"><%=(rsImage.Fields.Item("description").Value)%></option>
<%
rsImage.MoveNext()
Wend
If (rsImage.CursorType > 0) Then
rsImage.MoveFirst
Else
rsImage.Requery
End If
%>
</select>
Dabei steht "filename" für zB bild.jpg und "description" für die Beschreibung, welche angezeigt werden soll. Eingetragen soll dann der Wert aus filename werden.
Ich hoffe, es kann mir jemand helfen. Ich bin schon am verzweifeln. Die Verbindung zur Datenbank sieht folgendermaßen aus:
<%
Dim rsImage
Dim rsImage_numRows
Set rsImage = Server.CreateObject("ADODB.Recordset")
rsImage.ActiveConnection = MM_connHge_STRING
rsImage.Source = "SELECT * FROM hge.images"
rsImage.CursorType = 0
rsImage.CursorLocation = 2
rsImage.LockType = 1
rsImage.Open()
rsImage_numRows = 0
%>
Vielen Dank für eure Hilfe.
Mein Quelltext für das select-Feld sieht folgendermaßen aus:
<select name="select">
<%
While (NOT rsImage.EOF)
%>
<option value="<%=(rsImage.Fields.Item("filename").Value)%>"><%=(rsImage.Fields.Item("description").Value)%></option>
<%
rsImage.MoveNext()
Wend
If (rsImage.CursorType > 0) Then
rsImage.MoveFirst
Else
rsImage.Requery
End If
%>
</select>
Dabei steht "filename" für zB bild.jpg und "description" für die Beschreibung, welche angezeigt werden soll. Eingetragen soll dann der Wert aus filename werden.
Ich hoffe, es kann mir jemand helfen. Ich bin schon am verzweifeln. Die Verbindung zur Datenbank sieht folgendermaßen aus:
<%
Dim rsImage
Dim rsImage_numRows
Set rsImage = Server.CreateObject("ADODB.Recordset")
rsImage.ActiveConnection = MM_connHge_STRING
rsImage.Source = "SELECT * FROM hge.images"
rsImage.CursorType = 0
rsImage.CursorLocation = 2
rsImage.LockType = 1
rsImage.Open()
rsImage_numRows = 0
%>
Vielen Dank für eure Hilfe.