C Catarina Medlem sedan juli 2000 27 inlägg Frågan 1 aug. 2000 06:53 #1 Om jag har gjort ett webformulär och vill att den i sitt bekräftelse mail hämtar information dels ifrån formuläret men också ifrån databasen. Jag vet hur man skriver när den ska hämta upp ifrån formuläret, men vad skriver jag när den ska gå in i databasen och hämta information?
R Ricki Medlem sedan juni 2000 373 inlägg Först måste du göra en databaskoppling.
<%
'--------------------------------------------------
' Öppna databasen
'--------------------------------------------------
password = "xxx"
databas = "xxx.mdb"
DBPath = Server.Mappath(mid(Request.ServerVariables("PATH_INFO"),1,instrrev(Request.ServerVariables("PATH_INFO"), "\")) & databas)
Set MinCon=Server.CreateObject("ADODB.Connection")
MinCon.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & DBPath & ";uid=;pwd=" & password & ";"
Set databas = Server.CreateObject("ADODB.Recordset")
SQL = "Select * Frpm Tabell"
databas.Open SQL, MinCon, 1, 2
Varde1 = databas("Kolumn1")
Varde3 = databas("Kolumn4")
Varde4 = databas("Kolumn3")
Osv
databas.Close
%>
Varde1 = <%=Varde1%>
Varde5 = <%=Request.Form("5")%>
Hoppas det var så du menade...
------------------www.ricki.nu
[Redigerat av Ricki den 01 aug 2000]
C Catarina Medlem sedan juli 2000 27 inlägg Japp, jag tror det är så jag menar.
password = "xxx"
Vad är det för password?
Skriver jag någonstans vilken katalog i databasen, jag hämtar infon i från?
Tack, Ricki, för hjälpen!
C Catarina Medlem sedan juli 2000 27 inlägg Nu har jag prövat det men då funkade inte riktigt den säger se så här:
Microsoft VBScript compilation error '800a03ea'
Syntax error
/shop/bekraftelse.asp, line 40
DBPath = Server.Mappath(mid(Request.ServerVariables("PATH_INFO"),1,instrrev(Request.ServerVariables("PATH_INFO"),
-----------------------------------------------------------------------------------------------------------------^
Skulle jag inte skriva så här:
DBPath = Server.Mappath(mid(Request.ServerVariables("PATH_INFO"),1,instrrev(Request.ServerVariables("PATH_INFO"),
"\")) & databas)
Eller ska jag ändra om där det står PATH_INFO?
Hoppas du inte tycker att detta är alltför rörigt...
R Ricki Medlem sedan juni 2000 373 inlägg Jo lite rörrigt är det,
password = "xxx" Används för att skydda dina Access databaser, men har du inget lösenord skriver du bara
namnet på databasen skriver du in databas="xxx.mdb"
Fattar du nu?
------------------www.ricki.nu
C Catarina Medlem sedan juli 2000 27 inlägg Ok, då förstår jag password delen men jag får fortfarande fel meddelandet:
Microsoft VBScript compilation error '800a03ea'
Syntax error
/shop/bekraftelse.asp, line 40
DBPath = Server.Mappath(mid(Request.ServerVariables("PATH_INFO"),1,instrrev(Request.ServerVariables("PATH_INFO"),
-------------------------------------------------------------------------------------------------------------------------------^
Har du någon aning om vad det kan vara?
Tack igen!
R Ricki Medlem sedan juni 2000 373 inlägg Du har vell inte gjort radbrytning?
DBPath = Server.Mappath(mid(Request.ServerVariables("PATH_INFO"),1,instrrev(Request.ServerVariables("PATH_INFO"), "\")) & databas)
:)
------------------www.ricki.nu
E emission Medlem sedan dec. 1999 6 721 inlägg Skriv in sökvägen till databasen direkt, utan att strula så enormt med PATH_INFO. Jag förstår inte meningen med det.
DBPath = Server.Mappath("den virtuella sökvägen från webbroten")
eller
DBPath="den riktiga sökvägen..."
C Catarina Medlem sedan juli 2000 27 inlägg Ok, hoppas ni inte tycker jag är allt för dum nu men jag behöver lite fler svar. Och jag erkänner det där med radbrytningen. ;)
Nu får jag fel meddelande:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified
/shop/bekraftelse.asp, line 44
Och min rad 44 är:
MinCon.Open "Driver={Microsoft Access Driver (data/shop.mdb)}; DBQ=" & DBPath & ";uid=;pwd=" & password & ";"
Hur går jag vidare?
Jag är jättetacksam för all hjälp!
R Ricki Medlem sedan juni 2000 373 inlägg Har du glömt?
Om du postade koden här skulle det var lättare att hjälpa till?
------------------www.ricki.nu
C Catarina Medlem sedan juli 2000 27 inlägg Nepp, har skrivit det där.
<%
'--------------------------------------------------
' Öppna databasen
'--------------------------------------------------
password = ""
databas = "data/shop.mdb"
DBPath = Server.Mappath("data.shop.mbd")
Set MinCon=Server.CreateObject("ADODB.Connection")
MinCon.Open "Driver={Microsoft Access Driver (data/shop.mdb)}; DBQ=" & DBPath & ";uid=;pwd=" & password & ";"
Set databas = Server.CreateObject("ADODB.Recordset")
SQL = "Select * Frpm Tabell"
databas.Open SQL, MinCon, 1, 2
Varde1 = databas("Produkt")
Varde3 = databas("Antal")
Varde4 = databas("Pris")
databas.Close
%>
Säker på att jag har glömt att skriva något.
Och medans jag frågar dumma frågor, vart ska jag lägga in dessa saker?
Den måste jag väl lägga in i själva "kroppen" för bekräftelse mailet?
R Ricki Medlem sedan juni 2000 373 inlägg Värdena vet inte jag hur du ska göra med. Det är ju bara du som har sidan.
Ligger databasen i samma map som filen du skriver aspkoden i ?
Du kan inte skriva in slash(/) i databas="". Databasen måste ligga i samma map om man ska kunna använda den där sökvägen...
------------------www.ricki.nu
C Catarina Medlem sedan juli 2000 27 inlägg Så jag måste alltså lägga de i samma katalog? Nu ligger dom i varsin. Finns det något annat sätt jag kan skriva så jag slipper flytta på dem?
Tack för ditt tålamod! :)
R Ricki Medlem sedan juni 2000 373 inlägg Nja, det går, med det är mer avancerat.
Ex:
Root Katalog
Min hemsida
Min fil.asp
databas
databas.mdb
------------------www.ricki.nu
