Databaskoppling

7 svar · 374 visningar · startad av Sico 14 apr. 2002

SicoMedlem sedan maj 20002 597 inlägg

Frågan14 apr. 2002 20:10#1

Jag vet att ämnet har varit uppe ett flertal ggr. Jag hittade massa när jag sökte men jag e ändå skitsur...

Jag har lösen på min databas men får inte till kopplingen ordentligt. Min koppling ser ut enligt följande...

Set Connect = Server.CreateObject( "Adodb.Connection" )
Connect.Provider = "Microsoft.Jet.OLEDB.4.0"
MdbFilePath = Server.MapPath( "/login/login/admin.mdb" )
Connect.ConnectionString = "Data Source='" & MdbFilePath & "'"
Connect.open

Jag har trixat som fasen men det vill inte funka.. Hur ska jag göra? x(

QuidMedlem sedan juni 20006 022 inlägg

14 apr. 2002 20:12#2

Vad får du för fel?

Ta bort enkelfnuttarna ifrån Connect.ConnectionString.

SicoMedlem sedan maj 20002 597 inlägg

14 apr. 2002 20:26#3

Vill veta hur och vart jag ska skriva in lösenordet?

SicoMedlem sedan maj 20002 597 inlägg

14 apr. 2002 22:00#4

Set Connect = Server.CreateObject( "Adodb.Connection" )
dbPath = Server.MapPath( "/login/login/admin.mdb" )
dbPass = "12345"
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & dbPath & ";uid=;pwd=" & dbPass & ";"

Jag skrev såhär så funkade det iaf. Vad gör Provider igentligen?

PatrikBMedlem sedan mars 20002 836 inlägg

14 apr. 2002 22:05#5

Provider är ett annat sätt att connecta mot dbn, ett bra mycket bättre och snabbare sätt en den gamla vanliga access drivisen.

Med providern:

Set Connect = Server.CreateObject( "Adodb.Connection" )
Connect.Provider = "Microsoft.Jet.OLEDB.4.0"
MdbFilePath = Server.MapPath( "/login/login/admin.mdb" )
Connect.ConnectionString = "Data Source='" & MdbFilePath & ";Jet OLEDB:Database Password=password;"

cya,
PatrikB

SicoMedlem sedan maj 20002 597 inlägg

14 apr. 2002 22:35#6

då klagar den på SQL satsen när jag läser användarnamnet vilket den inte gjorde med den koden jag skrev... varför?

LarsGMedlem sedan dec. 200012 464 inlägg

15 apr. 2002 09:02#7

I din tidigare kod så kom du aldrig så långt att sql-satsen kompilerades.

Hur ser sql-satsen ut och vad får du för fel?

SicoMedlem sedan maj 20002 597 inlägg

15 apr. 2002 09:11#8

Feltyp:
ADODB.Recordset (0x800A0E7D)
Åtgärden är inte tillåten på ett objekt som refererar till en stängd eller en ogiltig anslutning.
/login/login/login.asp, line 12

<%
Set RSUser = Server.CreateObject("ADODB.Recordset")
%>
<!--#include file="../dbconnect.asp" -->
<%
SQL = "Select * from t_Members Where f_User='" & Request.Form("Username") & "'"

RSUser.Open SQL,Connect,1,2

[b]If RSUser.EOF Then[/b]
%>

User does not exist.

<%
ElseIf RSUser("f_Password") <> Request.Form("Password") Then
%>

Password is incorrect for<br>
<b><%=Request.Form("UserName")%></b>

<%
Else
	Session("User") = "Yes"
	Session("UserID") = RSUser("f_ID")
	Session("Admin") = RSUser("f_Admin")
	Response.Redirect "admin.asp"

End If

RSUser.close
Connect.close
%>