Avatar billede gp Nybegynder
20. maj 2002 - 11:58 Der er 4 kommentarer og
1 løsning

Jer har prøvet før - db connection hos enavn

Hej igen,

Jeg er lidt på den...
Jeg kan kun læse ikke updaterer, jeg har talt med min web udbyder enavn, de siger at jeg skal bruge følgende connection, og databasen er ikke skrivebeskyttet.

<%Response.Buffer = True%>
<%
ConnString = "DSN=pharmacentiacomdsn"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConnString
%>

Jeg har gemt det i en fil conn.asp.

Nu har jeg prøvet alt et eks:
<!--#include file="conn.asp"-->
<html>
<head><title>Medlems Klup</title></head>
<body>
<form action="tilmeld.asp" method="post">
<font size="4">Bliv medlem</font><p>
<%
'inholdet af formular felterne bliver hentet
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
navn = Request("navn")
brugernavn = Request("brugernavn")
email = Request("email")
password = Request("password")

'der bliver tjekket om brugeren har udfylt alle felterne rigtigt
err = 0               
err = 0

if brugernavn = "" then
err = 1
errmess = errmess & "Du skrev ikke noget brugernavn<br>"
end if
   
if password = "" then
err = 1
errmess = errmess & "Du skrev ikke noget password<br>"
end if
   
'tjekker om emailen er gyldig
if InStr(email,"@") = 0 or InStr(email,".") = 0 or email = "" then
err = 1
errmess = errmess & "Din email adresse er ikke gyldig<br>"

end if

if navn = "" then
err = 1
errmess = errmess & "Du skrev ikke dit navn<br>"
end if
   
if err = 0 then
'alle felterne er udfylt korekt, tjekker om brugernavnet er ledigt
Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "select * from members where brugernavn = '" & request.form("brugernavn") & "';"
rs.open SQL, Conn, 3, 3

if not rs.EOF then
  Response.Write "Brugernavnet er allerede taget<br>"
else
'brugernavnet er var ledigt og brugerens data bliver tilføjet til databasen               
rs.AddNew
rs("navn") = navn
rs("email") = email
rs("password") = password
rs("brugernavn") = brugernavn
rs("tekst") = tekst
rs.update
'bare skriv response.Redirect "" og så lokal placeringen af den fil brugeren skal komme over til når han har udfylt formularen rigtigt
Response.Write "Du er nu medlem<br>"
end if
end if
               
end if %>
<%= errmess %>
<br>navn: <input type="text" name="navn" value="<%=Request("navn")%>">
<br>brugernavn: <input type="text" name="brugernavn" value="<%=Request("brugernavn")%>">
<br>password: <input type="text" name="password">
<br>email: <input type="text" name="email" value="<%=Request("email")%>">
<br>fri tekst: <textarea name="tekst" rows="1" cols="20"><%=Request("tekst")%></textarea>
<p><input type="submit" value="Tilmeld">
</form>
<%
'lukker forbindelsen
conn.close
set conn = nothing
%>

Jeg der nogle der også bruger enavn med en MS Access connection, jeg vil gerne have et par eks.

På forhånd tak.

GP
Avatar billede aspprogram Nybegynder
20. maj 2002 - 12:00 #1
du fortæller jo ikke navnet på din database....
Avatar billede aspprogram Nybegynder
20. maj 2002 - 12:01 #2
prøv denne:

set Conn = Server.createobject("adodb.connection")
conn.Open "DBQ="& Server.MapPath(".") &"/projekt.mdb; DefaultDir=DBQ="& Server.MapPath("/") &";Driver={Microsoft Access Driver (*.mdb)};"


der hvor der står projekt.mdb, ændre det til stien til din database
Avatar billede medions Nybegynder
20. maj 2002 - 12:02 #3
Set Conn = Server.CreateObject("ADODB.Connection")
    strConn = "Data Source=d:\home\db\database.mdb;Provider=Microsoft.Jet.OLEDB.4.0; pwd=password; userid=brugernavn"
    Conn.Open strConn

//>Rune
Avatar billede a1a1 Novice
20. maj 2002 - 12:10 #4
han kalder jo en/et dsn
dsn="pharmacentiacomdsn"

det skulle være godt nok, HVIS det er sat op på servern..

rs.open SQL, Conn, 3, 3
er du sikker på at 3, 3 er noget der kan opdateres (ikke adlockreadonly)(kan ikke huske hvad de betyder)

dsn'en kan også være sat op til kun readonly..
det dir. som db en ligger i skal også have skrive rettigheder (det er ikke nok med selve db'en), men man må jo gå udfra at det er sat ordentligt op....
Avatar billede gp Nybegynder
01. april 2003 - 13:30 #5
Spm lukket, jeg har ikke fundet fejlen...
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