Avatar billede henne Nybegynder
27. juli 2001 - 14:23 Der er 4 kommentarer og
1 løsning

DSN-less connection, hjælp!!!!

Hej,
Jeg har lavet en database i UltraDEV, med ASP og ACCESS database (supplier.mdb). Jeg har lavet den på min stationære maskine hvor jeg har defineret IIS-server og en ODBC connection til supplier.mdb. Og det virker som det skal.
Nu skal jeg have oploaden den til mit webhotel. Men finder først ud af nu at man skal bruge en DSN-less connection.

http://www.netsite.dk/support-asp-access.html

Dette er linket til udbyderen og der forklaring på DSN-less connection. Men hvor skal jeg ændre på de sider jeg har lavet?

-------------------------------------------

<%@LANGUAGE=\"VBSCRIPT\"%>
<!--#include file=\"../Connections/Supplier.asp\" -->
<%
Dim rsLogin__strUsername
rsLogin__strUsername = \"xyz\"
if (Request.Form(\"txtUsername\") <> \"\") then rsLogin__strUsername = Request.Form(\"txtUsername\")
%>
<%
Dim rsLogin__strPassword
rsLogin__strPassword = \"123\"
if (Request.Form(\"txtPassword\") <> \"\") then rsLogin__strPassword = Request.Form(\"txtPassword\")
%>
<%
set rsLogin = Server.CreateObject(\"ADODB.Recordset\")
rsLogin.ActiveConnection = MM_Supplier_STRING
rsLogin.Source = \"SELECT Username, Password, UserID  FROM tblUsers  WHERE Username = \'\" + Replace(rsLogin__strUsername, \"\'\", \"\'\'\") + \"\' AND Password = \'\" + Replace(rsLogin__strPassword, \"\'\", \"\'\'\") + \"\'\"
rsLogin.CursorType = 0
rsLogin.CursorLocation = 2
rsLogin.LockType = 3
rsLogin.Open()
rsLogin_numRows = 0
%>
<%
If rsLogin_strUsername <> \"xyz\" AND NOT rsLogin.eof then
    Session(\"svUserID\") =(rsLogin.Fields.Item(\"UserID\").Value)
    Response.Cookies(\"ckLoggedin\") = \"Loggedin\"
    Response.Cookies(\"ckLoggedin\").Expires = date + 3
    Response.Redirect \"login2.asp\"
        Else
    Response.Redirect \"login.asp?AccessDenied\"
    End If
%>
<%
rsLogin.Close()
Set rsLogin = Nothing
%>
<%
rsLogin.Close()
%>
--------------------------

Kan du hjælpe med med denne side og fortælle mig hvor der skal ændres. Se også på det link jeg har lagt til Netsite.dk.

På forhånd tak!
Jeg er nok først tilbage på min plads på mandag og kan ikke lave reply før der.

MVH Henrik
Avatar billede kichian Nybegynder
27. juli 2001 - 14:25 #1
I filen Connections/Supplier.asp er variablen MM_Supplier_STRING defineret. Ret denne til hvad din leverendør skriver.
Avatar billede henne Nybegynder
30. juli 2001 - 12:31 #2
Hej Kichian,
Tak for dit svar. Det kan godt være at jeg skal have det uddybet lidt!

I min \"../Connections/Supplier.asp\" fil står der:
--------------------------------
<%
\' FileName=\"Connection_odbc_conn_dsn.htm\"
\' Type=\"ADO\"
\' HTTP=\"false\"
\' Catalog=\"\"
\' Schema=\"\"
MM_Supplier_STRING = \"dsn=Supplier;\"
%>
------------------------------------------
Netsite A/S giver et eksemple på en side der henter data fra en database:
----------------------------------------------
<html>
<head>
<title>Eksempel på hentning af data fra en database</title>
</head>
<body>

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open Application(\"database\")

SQL = \"select * from TabelNavn\"
Set RS = Conn.Execute(SQL)

Do While Not RS.EOF

Response.Write RS(\"Felt1\") & \"<br>\"
Response.Write RS(\"Felt2\")

RS.MoveNext
Loop

RS.Close
Set RS = Nothing

Conn.Close
Set RS = Nothing
%>

</body>
</html>
-------------------------------------------
Endvidere siger de at der skal bruges en global.asa fil der hedder:
--------------------------------------------
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
SUB Application_OnStart

Application(\"database\") =
\"DBQ=d:\\home\\domæne.dk\\database\\database.mdb;UID=;PWD=;\" &_
\"Driver={Microsoft Access Driver (*.mdb)};\"

END SUB
</SCRIPT>
------------------------------------------------
Hvad skal skiftes ud i supplier.asp filen sådanne som du ser det. Eller hvad skal jeg gøre. Jeg har prøvet lidt af hvert med syntes ikke at det vil virke alligevel.
Avatar billede henne Nybegynder
30. juli 2001 - 12:31 #3
Hej Kichian,
Tak for dit svar. Det kan godt være at jeg skal have det uddybet lidt!

I min \"../Connections/Supplier.asp\" fil står der:
--------------------------------
<%
\' FileName=\"Connection_odbc_conn_dsn.htm\"
\' Type=\"ADO\"
\' HTTP=\"false\"
\' Catalog=\"\"
\' Schema=\"\"
MM_Supplier_STRING = \"dsn=Supplier;\"
%>
------------------------------------------
Netsite A/S giver et eksemple på en side der henter data fra en database:
----------------------------------------------
<html>
<head>
<title>Eksempel på hentning af data fra en database</title>
</head>
<body>

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open Application(\"database\")

SQL = \"select * from TabelNavn\"
Set RS = Conn.Execute(SQL)

Do While Not RS.EOF

Response.Write RS(\"Felt1\") & \"<br>\"
Response.Write RS(\"Felt2\")

RS.MoveNext
Loop

RS.Close
Set RS = Nothing

Conn.Close
Set RS = Nothing
%>

</body>
</html>
-------------------------------------------
Endvidere siger de at der skal bruges en global.asa fil der hedder:
--------------------------------------------
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
SUB Application_OnStart

Application(\"database\") =
\"DBQ=d:\\home\\domæne.dk\\database\\database.mdb;UID=;PWD=;\" &_
\"Driver={Microsoft Access Driver (*.mdb)};\"

END SUB
</SCRIPT>
------------------------------------------------
Hvad skal skiftes ud i supplier.asp filen sådanne som du ser det. Eller hvad skal jeg gøre. Jeg har prøvet lidt af hvert med syntes ikke at det vil virke alligevel.
Avatar billede henne Nybegynder
30. juli 2001 - 12:32 #4
Hov den komme vist to gange, sorry!
Det er det samme der står.
Avatar billede kichian Nybegynder
30. juli 2001 - 14:04 #5
Din MM_Supplier_STRING skal ændres til DBQ=d:\\home\\domæne.dk\\database\\database.mdb;UID=;PWD=;\" &_
\"Driver={Microsoft Access Driver (*.mdb)};\"

Hvor DBQ skal pege på din database-fil.
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester