Login og rettelser i database
Blot som en start -> jeg er total nybegynder på ASP, men et sted skal man jo starte, og det er med at læse osv.Jeg prøver at lave en lille database, hvor man kan rette i.
Det er lykkedes mig at få lavet så man kan taste oplysninger ind, se nedenstående koder.
Nu ville jeg gerne, ved at indtaste bruger og password at man så kunne rette sine oplysninger.
Er der en som har løsningen, det er vist noget med update osv osv.
<!DOCTYPE html PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<meta http-equiv="content-type" content="text/html;charset=iso-8859-1">
<meta name="generator" content="Adobe GoLive 6">
<title>Welcome to Adobe GoLive 6</title>
</head>
<body bgcolor="#ffffff" leftmargin="0" marginheight="0" marginwidth="0" topmargin="0">
<form action="doit.asp" method="post" name="dff_ind">
Test
<p>Bruger <input type="text" name="bruger" size="24" tabindex="1"></p>
<p>Password <input type="password" name="password" size="24" tabindex="2"></p>
<p>Gruppe <input type="text" name="gruppe" size="24" tabindex="3"></p>
<p>Pris 1 <input type="text" name="pris1" size="24" tabindex="4"></p>
<p>Pris 2 <input type="text" name="pris2" size="24" tabindex="5"></p>
<p>Pris 3 <input type="text" name="pris3" size="24" tabindex="6"></p>
<p><input type="submit" name="submit" value="Indsæt data" tabindex="7"></p>
</form>
<table width="606" border="0" cellspacing="0" cellpadding="0" cool gridx="16" gridy="16" height="380" showgridx showgridy usegridx usegridy>
<tr height="379">
<td width="605" height="379"></td>
<td width="1" height="379"><spacer type="block" width="1" height="379"></td>
</tr>
<tr height="1" cntrlrow>
<td width="605" height="1"><spacer type="block" width="605" height="1"></td>
<td width="1" height="1"></td>
</tr>
</table>
<p></p>
</body>
</html>
-----
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=d:\web\prolight.dk\database\analyse.mdb"
Conn.Open DSN
strSQL = "Insert into dffanalyse ("
strSQL = strSQL & "bruger, "
strSQL = strSQL & "password, "
strSQL = strSQL & "gruppe, "
strSQL = strSQL & "pris1, "
strSQL = strSQL & "pris2, "
strSQL = strSQL & "pris3) "
strSQL = strSQL & "values ( "
strSQL = strSQL & "'" & Request.Form("bruger") & "', "
strSQL = strSQL & "'" & Request.Form("password") & "', "
strSQL = strSQL & "'" & Request.Form("gruppe") & "', "
strSQL = strSQL & "'" & Request.Form("pris1") & "', "
strSQL = strSQL & "'" & Request.Form("pris2") & "', "
strSQL = strSQL & "'" & Request.Form("pris3") & "')"
Response.Write(strSQL)
Conn.Execute(strSQL)
%>
