16. september 2004 - 15:35
Der er
6 kommentarer og 1 løsning
Hvordan indsætter jeg data i ComboBox
Hej Hvordan indsætter jeg data fra en Access database ind i en ComboBox??? Det her virker ikke: Dim ADO_Connection Dim rsPicture Dim SQL_STRING set ADO_Connection = server.Createobject("ADODB.Connection") ADO_Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../../cgi-data/db.mdb") set rsPicture= server.Createobject("ADODB.Recordset") SQL_STRING= "SELECT * FROM images" rsPicture.open SQL_String, ADO_Connection do until rsPicture.EOF url.addnew rsPicture("name") rsPicture.movenext loop
Annonceindlæg tema
Offentlig digitalisering
Fra effektivisering til digital suverænitet. Hvordan skaber det offentlige en digital fremtid med AI, sikkerhed og kontrol i centrum?
16. september 2004 - 15:37
#1
Det skal jo lige siges at det er dropdownboxen der hedder "url"!
16. september 2004 - 15:41
#2
Det er ikke Visual Basic jo... Det gøres i forbindelse med en selectbox (html) <select name"url"> <% dit loop %> <option value="<% en værdi %>">et navn</option> <% slut loop %> </select>
16. september 2004 - 15:42
#3
Nej det ved jeg godt... men jeg kunne jo lige prøve! :)
Slettet bruger
16. september 2004 - 15:45
#4
Jeg ville prøve med denne... <% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("../../../cgi-data/db.mdb") SQL = "SELECT * FROM images" Set rsPicture = Conn.Execute(SQL) Response.Write "<select NAME='url' STYLE='WIDTH:200px;'>" Do While Not rsPicture.EOF Response.Write "<option value='" & rsPicture("images") & "'>" & rsPicture("images") & "</option>" rsPicture.MoveNext Loop Response.Write "</select>" %>
16. september 2004 - 15:46
#5
Noget i stil med dette: <% Dim ADO_Connection Dim rsPicture Dim SQL_STRING set ADO_Connection = server.Createobject("ADODB.Connection") ADO_Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../../../cgi-data/db.mdb") set rsPicture= server.Createobject("ADODB.Recordset") SQL_STRING= "SELECT * FROM images" rsPicture.open SQL_String, ADO_Connection %> <select name"url"> <% Do Until rsPicture.EOF %> <option value="<% rsPictures("name") %>">et navn</option> <% loop %> </select>
16. september 2004 - 15:48
#6
Møj.. nu kan min side ikke vises!
16. september 2004 - 15:52
#7
Ups.. kom til at sætte den forkert ind.... :) Takker!
Kurser inden for grundlæggende programmering