15. april 2002 - 12:40Der er
22 kommentarer og 1 løsning
Problem med asp
Jeg har et problem med asp og søger hurtiget et svar!
Ved kørelse af min asp kode får jeg følgende besked:
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.
Min kode ser således ud:
<%
If Varegruppe = "" then response.Write("Skriv venligst hvad du vil søge på") else end if
Set Conn = Server.CreateObject("ADODB.Connection") Set Rs = Server.CreateObject("ADODB.Recordset") 'Modify and use this connection if your database is in your database directory 'Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=db.mdb" Conn.Open "DBQ=" & Server.Mappath("db.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"
SQL = "SELECT Varenummer, Produkt, Udsalgspris, Bemærkning, Varegruppe FROM Produkter WHERE (Varegruppe = '" & Varegruppe & "')"
rs.Open SQL, Conn
For x = 1 to 10 If rs.eof then Exit For Else ImageURL = rs("ImageURL") ImageURL = "<img src='" & ImageURL & "'>"
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
If Varegruppe = "" then response.Write("Skriv venligst hvad du vil søge på") else end if
Set Conn = Server.CreateObject("ADODB.Connection") Set Rs = Server.CreateObject("ADODB.Recordset") 'Modify and use this connection if your database is in your database directory 'Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=db.mdb" Conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db.mdb") SQL = "SELECT Varenummer, Produkt, Udsalgspris, Bemærkning, Varegruppe FROM Produkter WHERE Varegruppe = '" & Varegruppe & "'
rs.Open SQL, Conn
For x = 1 to 10 If rs.eof then Exit For Else ImageURL = rs("ImageURL") ImageURL = "<img src='" & ImageURL & "'>"
Selve koden bruge i sammenhæng med nogle varegrupper ... man har altså en side hvor man har varegrupperne listet og når man trykker på den åbner siden med den kode jeg har sendt ... den åbner altså bare linket der hedder: index.asp?ram ... foreksempel!
If Varegruppe = "" then response.Write("Skriv venligst hvad du vil søge på") else end if
Set Conn = Server.CreateObject("ADODB.Connection") Set Rs = Server.CreateObject("ADODB.Recordset") 'Modify and use this connection if your database is in your database directory 'Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=scidata.mdb" Conn.Open "DBQ=" & Server.Mappath("scidata.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"
SQL = "SELECT Varegruppe.Varegruppe, Produkter.Produkt, Produkter.Udsalgspris, Produkter.Bemærkning FROM Produkter INNER JOIN Varegruppe ON Produkter.varegruppe = Varegruppe.VaregruppeId ORDER BY Produkter.Varegruppe, Produkter.Produkt, Produkter.Udsalgspris, Produkter.Bemærkning WHERE Varegruppe = " & request.querystring("Varegruppe") rs.Open SQL, Conn
For x = 1 to 10 If rs.eof then Exit For Else %>
Får jeg følgende besked:
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'Produkter.Bemærkning WHERE Varegruppe = 12
SQL = "SELECT Varegruppe.Varegruppe, Produkter.Produkt, Produkter.Udsalgspris, Produkter.Bemærkning FROM Produkter INNER JOIN Varegruppe ON Produkter.varegruppe = Varegruppe.VaregruppeId WHERE Produkter.Varegruppe = " & request.querystring("Varegruppe") rs.Open SQL, Conn
Det virker fint nok når man bruger items.asp?Varegruppe=1 eller et hvilket som helst andet tal ... men hvordan kan jeg ændre så den accepter items.asp?Varegruppe=Is ... ???
Tak for hjælpen kimiwan ... det hjalp mig til at finde en mådet at løse det på som du jo kan se!
Synes godt om
Ny brugerNybegynder
Din løsning...
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.