简单的数据库输入和显示

来源：互联网发布：软件的收费模式编辑：程序博客网时间：2024/05/29 11:43

输入数据到数据库或者SQL服务器数据库是ASP的小伎俩。这个脚本会输入两个文本区域（名和姓），然后把它们书写到一个数据库。第二个脚本会允许你观察到所有进入数据库日期的输入值。
input_text_to_db_form.asp
<font face = "arial" size="1">
<form method="post" action="input_text_to_db.asp">
<input type="hidden" name="subject" value="<%= title %>">
First Name<br>
<input type="text" name="u_fname" size="20"><br>
Last Name<br>
<input type="text" name="u_lname" size="20">
<input type="submit" value="Submit">
</form></font>

input_text_to_db.asp
<%
u_lname=request.form("u_lname")
u_fname=request.form("u_fname")
%>

<%
accessdb="testinputdb"
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
set rs = server.createobject("ADODB.Recordset")

SQL = "insert into testtable (lname, fname) "

SQL = SQL & "values ('" & u_lname
SQL = SQL & "','" & u_fname & "')"

rs.Open sql, cn
%>
<font face = "arial" size="1">
First Name <%= u_fname %>
<br>
Last Name <%= u_lname %>
<br>
has been added to the db <br>
<a href = "input_text_db_view.asp">View the Table</a>
</font>

input_text_to_db_view.asp
<%
accessdb="testinputdb"
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
Set rs = Server.CreateObject("ADODB.Recordset")

sql = "select * from testtable"

rs.Open sql, cn
%>

<div align="left">

<table BORDER="0" BGCOLOR="#FFFFFF" CELLSPACING="0" align="left" width="640">
<THEAD>

<tr>
<th valign="top" align="left"><font face="Arial" size="2" color="#000000">First Name</font></th>
<th valign="top" align="left"><font face="Arial" size="2" color="#000000">Last Name</font></th>
<th valign="top" align="left"><font face="Arial" size="2" color="#000000">Unique ID</font></th>
</tr>
</THEAD>
<TBODY>

<%
On Error Resume Next
rs.MoveFirst
do while Not rs.eof
%>

<tr VALIGN="TOP">
<td ALIGN="left" valign="top">
<font face="Arial" size="2" color="#000000">
<%= rs("fname") %>
</font></td>

<td ALIGN="left" valign="top">
<font face="Arial" size="2" color="#000000">
<%= rs("lname") %>
</font></td>

<td ALIGN="left" valign="top">
<font face="Arial" size="2" color="#000000">
<%= rs("unique_id") %>
</font></td>

</tr>

<%
rs.MoveNext
loop%>

<tr VALIGN="TOP">
<td ALIGN="left" valign="top">
 </td>

<td ALIGN="left" valign="top">
 </td>

<td ALIGN="left" valign="top">
 </td>

</tr>

</TBODY>
<TFOOT>
</TFOOT>
</table>

</div>

简单生活，希望对大家有用!要觉得本文有价值请分享给您的朋友，生活就是人来人往，分享越多!收获越多!作者：天天ASP家园

0 0