code.asp
来自「20041230162250801409: 浙江省丽水市公铁联运有限公司OA系」· ASP 代码 · 共 46 行
ASP
46 行
<%On Error Resume Next
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("../../data.mdb")
set rs=server.createobject("adodb.recordset")
sql="select top 10 * from tuyun "
rs.open sql,conn,1,3
%>
<html>
<head>
<link href="../../appmain.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>随机码清除</title>
</head>
<body>
<div align="left"></div>
<div align="center">
<table width="601" cellspacing="0" cellpadding="0" >
<tr >
<td >
<table width="233" align="center" cellpadding="0" cellspacing="0" class="FORMTABLE">
<tr>
<td background="../../image/topBar_bg.gif"> <div align="center">ID号(货运站)</div></td>
<td background="../../image/topBar_bg.gif"> <div align="center">随机码</div></td>
<td background="../../image/topBar_bg.gif"> <div align="center">操作</div></td>
</tr>
<tr>
<% do while not rs.eof %>
<td width="96"> <div align="center"><%=rs("id")%> </div></td>
<td width="97"><div align="center"><%=rs("code") %></div></td>
<td width="38"><a href="codedel.asp?ID=<%=rs("ID")%>" onclick="return confirm('你真的要删除此信息吗!')"><img src="../../image/buttonclear.gif" width="52" height="18" border="0"></a></td>
</tr>
<% rs.movenext
loop
%>
</table>
<div align="right"></div></td>
</tr>
</table>
</div>
<p> </p>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?