简单的数据库输入和显示

ASP新手入门
输入数据到数据库或者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">
&nbsp;</td>

<td ALIGN="left" valign="top">
&nbsp;</td>

<td ALIGN="left" valign="top">
&nbsp;</td>

</tr>

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



相关内容推荐

ASP表单输入到HTML

ASP能写.html或者任何其他的直接到web服务器的文档文本(你需要写文本输出到写权限的目录)。这是能够不需要上传PC的文件用户输入即时的发布信息。 下面的例子有四个输入区域(标

周的天数

想在asp显示当前一周有多少天吗?这个代码会把握住今天的值和利用到案例选择显示一周的天数。 % date_value = date() %%= date_value %br% dayofweek=weekday(date_value) %day number in week %= dayofweek %br%

ASP-条件语句

有时,当我们写代码时,我们要为作出不同的决定而执行不同的操作。我们可以使用条件语句中的代码来做到这一点。条件语句是一套用于执行基于不同条件的不同动作的命令。 为了支

asp获取IP地址的函数

FunctionGetIp() DimDulIp,ProIP DulIp=Request.ServerVariables("HTTP_X_FORWARDED_FOR") ProIP=Request.ServerVariables("REMOTE_ADDR") IfDulIp=""Then GetIp=ProIP Else GetIp=DulIp EndIf EndFunction

编写第一个ASP程序

现在有很多关于ASP编程的教程。其中有些是对于你有帮助,有些完全没有用。甚至有些写得是误人子弟。无论如何,你读过一些关于ASP的内容,现在你已经准备好构建第一个应用程序。

返回
顶部