Har ett problem som jag skulle vilja ha hjälp med.
Har gjort en adressbok. och vill ha en sökfunktion i den. Hur får man den att fungera. Har skrivit följande kod..(aspkoden)
<%
If Request.Form("sokord") <> "" Then

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("adressbok_thomas.mdb"))


Response.Write "Din sökning på <b>" & Request.Form("sokord") & "</b> gav följande resultat.<br>" & vbCrLf

SQL = "SELECT * FROM adressbok_thomas WHERE Fornamn LIKE '%"&Request.Form("sokord")&"%'"
SET RS = Con.Execute(SQL)
If RS.EOF Then
Response.Write "<b>Inga träffar!</b>"
Else
While Not RS.EOF
Response.Write "<b>ID: </b>" & RS("ID") & "<b> - Text i kolumnen: </b>" & RS("Fornamn") & "&nbsp;" & RS("Efternamn") & "<br>" & vbCrLf
RS.MoveNext
Wend
End If

RS.Close
Set RS = Nothing
End If
%>

Får upp följande fel kod....

Körningsfel i Microsoft VBScript fel '800a01a8'

Objekt krävs.: ''

sok.asp, rad 23 och på rad 23 står följande...
SET RS = Con.Execute(SQL)

Databasens namn är... adressbok_thomas...tabellens namn är... adressbok_thomas och Kolumnens namn är Fornamn...
Vad är felet...har ägnat hela dag åt det här men kommer ingen vart...

Häls
Thomas

Du har skrivit Con istället för Connect som du namngav kopplingen.

/Johan

Tack...det fungera änteligen....men inte som jag trodde. hur skriver man om man vill att alla värden i kolumnen ska skrivas ut..Fornamn Efternamn Adress osv..
Thomas

Skrivs inte förnamn och efternamn ut nu?

/Johan

Tackar på för hand Johan för din hjälp.


Helt rätt förnamn och efternamn skrivs ut men hur gör man för att hela raden skrivs ut. Förnamn,efternamn,adress,telefon osv....

Du får lägga till dem på denna raden:
Response.Write "ID: " & RS("ID") & " - Text i kolumnen: " & RS("Fornamn") & "&nbsp;" & RS("Efternamn") & "&nbsp;" & RS("Adress") & "<br>" & vbCrLf

Alternativt kan du göra såhär för att skriva ut alla kolumnerna:

For Each Falt in RS.Fields
Response.Write Falt & "&nbsp;"
Next
Rsponse.Write "<br>" & vbCrLf

/Johan

Tack JohanD
Det funkar bra
Thomas