Avatar billede emingos Nybegynder
02. maj 2002 - 17:38 Der er 12 kommentarer og
2 løsninger

har lavet tilføj , slet og nu mangler jeg bare rediger.asp !?

hejsa eksperter håber i kan hjælpe jeg har nu lavet en admin sektion med tilføj og slet nu ville jeg gerne kunne redigere i members.. hvordan ser koden ud .. eller hvordan laver jeg denne ?

min tilmeld.asp ser sådan her ud hvis det kan hjælpe jer

<%
'der bliver lavet forbindelse til databasen
Response.Buffer = True
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("database.mdb")
%>
<html>
<head><title>Medlems Klup</title></head>
<body>
<a href="main.asp">back</a>
<form action="tilmeld.asp" method="post">
<font size="4">add medlem</font><p>
<%
'inholdet af formular felterne bliver hentet
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
username = Request("username")
email = Request("email")
password = Request("password")
besked = Request("besked")

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

if username = "" 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 err = 0 then
'alle felterne er udfylt korekt, tjekker om brugernavnet er ledigt
Set rs = Server.CreateObject("ADODB.Recordset")
SQL = "select * from users where username = '" & request.form("username") & "';"
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("email") = email
rs("password") = password
rs("username") = username
rs("besked") = besked
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>brugernavn: <input type="text" name="username" value="<%=Request("username")%>">
<br>password: <input type="text" name="password">
<br>email: <input type="text" name="email" value="<%=Request("email")%>">
<br>fri tekst: <textarea name="besked"><%=Request("besked")%></textarea>
<p><input type="submit" value="Tilmeld">
</form>
<%
'lukker forbindelsen
conn.close
set conn = nothing
%>
</body>
</html>

mvh. emingos
Avatar billede cyberkox Nybegynder
02. maj 2002 - 19:32 #1
<%
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("stem.mdb")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open strDSN

sql = "UPDATE T_Vote WHERE Id = " & request("ID")
sql = "UPDATE T_Vote SET beskrivelse= '" & request.form("beskrivelse") & "'"
sql = "UPDATE T_Vote SET valg1= '" & request.form("valg1") &"'"
sql = "UPDATE T_Vote SET valg2= '" & request.form("valg2") &"'"
sql = "UPDATE T_Vote SET valg3= '" & request.form("valg3") &"'"
sql = "UPDATE T_Vote SET valg4= '" & request.form("valg4") &"'"
sql = "UPDATE T_Vote SET valg5= '" & request.form("valg5") &"'"
Set rs = Conn.Execute (sql)
Conn.Close
   
Response.Redirect ("admin.asp")
%>
Avatar billede cyberkox Nybegynder
02. maj 2002 - 19:49 #2
Ups, det var et svar........
Avatar billede emingos Nybegynder
02. maj 2002 - 20:36 #3
jamen er det alt... virker det også som en form hvor man skriver den data der ska updates??.....
Avatar billede cyberkox Nybegynder
02. maj 2002 - 20:42 #4
Nej.
Kan du ikk lave formen selv ?

Det jeg har skrevet er den fil, formen skal gå hen til bag efter...

stem.mdb = din database
T_Vote  = din tabel i databasen
valg1-5  = name="navnet i formularen"
beskrivelse = name="navnet i formularen"
Avatar billede emingos Nybegynder
02. maj 2002 - 20:48 #5
jow jeg kan godt lave formen men du må give mig noget mere hjælp end det der..

det virker jo nok ikke hvis jeg bare laver en form.. den skal vel linkes med din fil ?
Avatar billede cyberkox Nybegynder
02. maj 2002 - 20:50 #6
Hallo......
Avatar billede cyberkox Nybegynder
02. maj 2002 - 20:51 #7
Okai.
Har du ICQ ?
Avatar billede emingos Nybegynder
02. maj 2002 - 20:57 #8
101760999
Avatar billede cyberkox Nybegynder
02. maj 2002 - 20:59 #9
Har du fået min besked ?
Avatar billede emingos Nybegynder
02. maj 2002 - 22:21 #10
jeg fixer det sku selv...
Avatar billede emingos Nybegynder
02. maj 2002 - 22:21 #11
thx for hjælpen anyway....
Avatar billede cyberkox Nybegynder
03. maj 2002 - 12:09 #12
Takker for de SMÅ POINT.
Jeg kommer med alt, men så tager du næsten alle pointene selv....
Avatar billede emingos Nybegynder
03. maj 2002 - 14:36 #13
kommer med alt.. du hjalp jo nada,,
Avatar billede emingos Nybegynder
03. maj 2002 - 14:37 #14
du ka da bare være glad for jeg overhovedet gav dig nogle...
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