Connection til MS Access DB fejler

Det bliver meget svært at hjælpe ud fra kun connection strenge. Det ville være mere aktuelt at få oplyst hvad din tabel og kolonne navne hedder.


Det du skal havde lavet er en SQL sætningen som denne:

'Henter søgeordet fra formen
strKeyword = Request.Form("Keyword")

' Opbygger en dynamisk SQL streng
strSQL = "SELECT ID, Navn, Adresse, Bynavn, Beskrivelse FROM Kunder WHERE"
strSQL = strSQL & " (Navn LIKE '" & strKeyword & "')"
strSQL = strSQL & " OR (Adresse LIKE '" & strKeyword & "')"
strSQL = strSQL & " OR (Bynavn LIKE '" & strKeyword & "')"
strSQL = strSQL & " OR (Beskrivelse LIKE '" & strKeyword & "')"


Først kan du rette tabel navnet til den tabel du vil søge i.
Det er: FROM Kunder  -->  FROM dit_tabel_navn

Dernæst kan du for letheds skyld rette:
SELECT ID, Navn, Adresse, Bynavn, Beskrivelse  --->  SELECT *

Så skal du havde rette where delen til, her er der 4 kolonne der søges i, Navn, Adresse, Bynavn og Beskrivelse:
strSQL = strSQL & " (Navn LIKE '" & strKeyword & "')"
strSQL = strSQL & " OR (Adresse LIKE '" & strKeyword & "')"
strSQL = strSQL & " OR (Bynavn LIKE '" & strKeyword & "')"
strSQL = strSQL & " OR (Beskrivelse LIKE '" & strKeyword & "')"

Ret det til dine kolonne navne du vil søge i, det kan være du kun har 3 kolonner sådan her:

strSQL = strSQL & " (Kolonne_A LIKE '" & strKeyword & "')"
strSQL = strSQL & " OR (Kolonne_B LIKE '" & strKeyword & "')"
strSQL = strSQL & " OR (Kolonne_C LIKE '" & strKeyword & "')"

Ups - jeg var ikke klar nok i min formulering - sorry
Jeg har styr på det med tabeller for kolonner, og for at teste det bruger jeg den database der er med eksemplet. Problemer er at connection til databasen i eksemplet er en DNS Less connection, og det har jeg ikke. Derfor kan jeg ikke få det til at virke.

/Kim

Om det er DNS less eller ej skulle ikke ændre på koden. Du åbner din connection sådan her:

objConn.Open="hcb_scales_tips"

Der skal ikke lig med tegn så det skal være:
objConn.Open "hcb_scales_tips"


og skal din connection svare til den i eksemplet så skal objektet hedde myconn sådan her:

<%
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.Open "hcb_scales_tips"
%>

Takker - jeg kan først tjekke det mandag.

/Kim

Det virker bare - takker endnu engang.

/Kim