|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
无法实现跨操作系统的应用。当然这也是微软的理由之一,只有这样才能发挥ASP最佳的能力。可是我却认为正是Windows限制了ASP,ASP的概念本就是为一个能让系统运行于一个大的多样化环境而设计的;ado|教程 本站原创内容,转载请说明出处网页教授教养网。
我们可使用SQLDELETE命令来删除表中的一个纪录,和增加纪录的办法一样,起首列出纪录内容
<html>
<body>
<%
setconn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open"e:/webjx/webjx.mdb"
setrs=Server.CreateObject("ADODB.Recordset")
rs.open"SELECT*FROMcustomers",conn
%>
<h2>数据库的内容列表</h2>
<tableborder="1"width="100%">
<tr>
<%
foreachxinrs.Fields
response.write("<th>"&ucase(x.name)&"</th>")
next
%>
</tr>
<%dountilrs.EOF%>
<tr>
<formmethod="post"action="demo_delete.asp">
<%
foreachxinrs.Fields
ifx.name="customerID"then%>
<td>
<inputtype="submit"name="customerID"value="<%=x.value%>">
</td>
<%else%>
<td><%Response.Write(x.value)%></td>
<%endif
next
%>
</form>
<%rs.MoveNext%>
</tr>
<%
loop
conn.close
%>
</table>
</body>
</html>
详细的删除程序:demo_delete.asp
<html>
<body>
<h2>DeleteRecord</h2>
<%
setconn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open"e:/webjx/webjx.mdb"
cid=Request.Form("customerID")
ifRequest.form("companyname")=""then
setrs=Server.CreateObject("ADODB.Recordset")
rs.open"SELECT*FROMcustomersWHEREcustomerID="&cid&"",conn
%>
<formmethod="post"action="demo_update.asp">
<table>
<%foreachxinrs.Fields%>
<tr>
<td><%=x.name%></td>
<td><inputname="<%=x.name%>"value="<%=x.value%>"></td>
<%next%>
</tr>
</table>
<br/><br/>
<inputtype="submit"value="删除纪录">
</form>
<%
else
sql="DELETEFROMcustomers"
sql=sql&"WHEREcustomersID="&cid&""
onerrorresumenext
conn.Executesql
iferr0then
response.write("Noupdatepermissions!")
else
response.write("Record"&cid&"wasdeleted!")
endif
endif
conn.close
%>
</body>
</html>
教程就写到这里,但愿对初学ASP的伴侣有所匡助,我就感应欣喜了,同时但愿妙手给指导。
缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。 |
|