Advertisement
Advertisement
| 06.21.2008 at 11:06AM PDT, ID: 23504815 |
|
[x]
Attachment Details
|
||
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: 31: 32: 33: 34: 35: 36: 37: 38: 39: 40: 41: 42: 43: 44: 45: 46: 47: 48: 49: 50: 51: 52: 53: 54: 55: 56: 57: 58: 59: 60: 61: 62: 63: 64: 65: 66: |
<html>
<head>
<title>NOT AJAX</title>
<SCRIPT language="JavaScript">
function submitform()
{
document.myForm.submit();
}
</SCRIPT>
<%
id = Request.QueryString("id")
modify = Request.QueryString("modify")
%>
</head>
<body>
<table width="60%" border=1>
<tr>
<td>First Name</td>
<td>Last Name</td>
<td>Age</td>
<td>Comment</td>
<td>Modify</td>
</tr>
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("comment.mdb") & ";"
txt = "SELECT * FROM tblAjax"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open txt, conn
do while not rs.eof
%>
<form name="myForm">
<tr>
<td><%=rs("fname")%></td>
<td><%=rs("lname")%></td>
<td><%=rs("age")%></td>
<td><%If (cint(rs("id")) = cint(id)) and (modify = "Edit") then %>
<textarea cols="50" rows="5" name="cmt"><%=rs("comment")%></textarea>
<% Else
response.Write rs("comment")& "db id: " & rs("id")
End If
%>
</td>
<td>
<% If (cint(rs("id")) = cint(id)) and (modify = "Edit") Then %>
<input type="button" name="modify" onclick="JavaScript: submitform();" value="Update" /><input type="hidden" name="id" value="<%=rs("id") %>" /></td>
<% Else %>
<input type="submit" name="modify" value="Edit" /><input type="hidden" name="id" value="<%=rs("id") %>" /></td>
<% End If %>
</td>
</tr>
</form>
<%
rs.MoveNext
Loop
%>
</table>
</body>
</html>
|