- Ja, nu virkede det sku... og dog...
- Nu modtager jeg følgende:
SELECT * FROM Tabel1 WHERE Kunstner LIKE '%s%' AND Titel LIKE
'%s%' ORDER BY Kunster
Microsoft OLE DB Provider for ODBC Drivers error '80040e10'
[Microsoft][ODBC Microsoft Access Driver] Too few parameters.
Expected 1.
- ved følgende kode (jeg ved godt at det er meget, men jeg er
virkelig på den!!)
<body>
<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("\moller06\db\db1.mdb")
Conn.Open DSN
dim str_field,strSQL
str_field = Trim(request.querystring("textfield"))
' SQL forespørgsel
strSQL = "SELECT * FROM Tabel1 WHERE "
strSQL = strSQL & "Kunstner LIKE '%" & str_field & "%' AND "
strSQL = strSQL & "Titel LIKE '%" & str_field & "%' "
strSQL = strSQL & "ORDER BY Kunster"
Response.Write strSQL
' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)
' Gennemløb Recordset (rs) med en løkke
Do
' Udskriv værdien af kolonnen Fornavn
Response.Write rs("Kunstner") & "<br>"
' Gå til næste Record i rs
rs.MoveNext
' Fortsæt indtil rs er gennemløbet (EOF = End Of File)
Loop While Not rs.EOF
' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
%>
</body>
--
Dette indlæg er sendt fra
http://www.html.dk
* Søg og læs i de danske nyhedsgrupper om webdesign
* Tutorials og artikler om webdesign på dansk