Adgang til database via DNS
Jeg har en lille konkurrence, hvor data gemmes i en base. Jeg har brugt den før, men nu skal jeg bruge den et sted hvor der kræves "ADGANG VIA DNS"... hvordan gør man det???Med f.eks.
Bruger: brugernavn
AccessFilnavn: konkurrence.mdb
DNS: www_dns
FTPfolder: d:\folder\www.domain.dk
... Tror nok det er alt man skal bruge :o)
<%
Response.Cookies("Konkurrence") = "Konkurrence"
Response.Cookies("Konkurrence").Expires = Now + 365
Svar = Request.Form("Svar")
Navn = Request.Form("Navn")
Adresse = Request.Form("Adresse")
PostBy = Request.Form("PostBy")
Email = Request.Form("Email")
Brochure = Request.Form("Brochure")
If Email = "" then Email = "E-mail ikke oplyst"
If Brochure = "" then Brochure = "Nej"
db = "DRIVER={Microsoft Access Driver (*.mdb)}; " &_
"DBQ="&Request.ServerVariables("APPL_PHYSICAL_PATH")&"" &_
"log\Konkurrence.mdb;"
Set Rs = Server.CreateObject("ADODB.Connection")
DBPath = db
Rs.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & DBPath
Sql = "Insert into Svar (Svar, Navn, Adresse, PostBy, Email, Brochure) values('" & Svar & "','" & Navn & "','" & Adresse & "','" & PostBy & "','" & Email & "','" & Brochure & "')"
Rs.Execute(Sql)
Streng = "main2.html"
Response.Redirect (Streng)
%>
