20. november 2003 - 22:30Der er
8 kommentarer og 1 løsning
expected end of statement
hej, håber der er nogen der kan hjælpe, jeg får fejlen, expected end of statement, når jeg prøver på at køre det her, meningen med det er at få vist tabelnavne i datasen vist i en selectbox
<% set cat = server.createobject("adox.catalog") cat.ActiveConnection = conn For Each tbl In cat.Tables If tbl.Type = "TABLE" Then response.write "<select name='ID'><option value=" & tbl.Name next & "</option></select>"
Else Response.Write("Der er ingen tabeller") End If
Hvorfor er der ikke flere, der lykkes med Agentic AI? Fordi de mangler at håndtere mellemregningerne fra POC til storskalaløsning.
Slettet bruger
20. november 2003 - 22:32#1
Du skal huske at stoppe din for med en next:
<% set cat = server.createobject("adox.catalog") cat.ActiveConnection = conn For Each tbl In cat.Tables If tbl.Type = "TABLE" Then response.write "<select name='ID'><option value=" & tbl.Name next & "</option></select>" Else Response.Write("Der er ingen tabeller") End If Next conn.Close
når jeg kører det her, kommer der, 3 selectboxe og nogle gange hvor der står, jDer er ingen tabeller :/ <% set cat = server.createobject("adox.catalog") cat.ActiveConnection = conn For Each tbl In cat.Tables If tbl.Type = "TABLE" Then response.write "<select name='ID'><option value=" & tbl.Name & "</option></select>" Else Response.Write("Der er ingen tabeller") End If Next conn.Close
%>
Synes godt om
Slettet bruger
20. november 2003 - 22:40#3
Ja du laver jo en select-box for hver table type der findes og hvis du har 3 af dem i din tabel eller hvad det er du henter så er det jo rigtigt nok.
Synes godt om
Slettet bruger
20. november 2003 - 22:44#4
Du skal lave noget lignende det her <% set cat = server.createobject("adox.catalog") cat.ActiveConnection = conn response.write "<select name='ID'>" For Each tbl In cat.Tables If tbl.Type = "TABLE" Then response.write "<option value=" & tbl.Name & "</option>" Else 'Denne er kommenteret ud da der eller vil stå Der er ingen tabeller i select boxen 'Response.Write("Der er ingen tabeller") End If Next </select> conn.Close
%>
Synes godt om
Slettet bruger
20. november 2003 - 22:46#5
Ups rettelse: <% set cat = server.createobject("adox.catalog") cat.ActiveConnection = conn response.write "<select name='ID'>" For Each tbl In cat.Tables If tbl.Type = "TABLE" Then response.write "<option value=" & tbl.Name & "</option>" Else 'Denne er kommenteret ud da der eller vil stå Der er ingen tabeller i select boxen 'Response.Write("Der er ingen tabeller") End If Next Response.Write "/select>" conn.Close
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
