2005-12-31 16:45
2005-12-31 16:47
把兩個文件改成這樣，不報錯，刪除數據信息也沒有反應，沒有刪除成功。
<!--#include file="xh_conn.asp"-->
<%
lianluo=request.querystring("lianluo")
delsql="delete from 營業 where lianluo='"&lianluo&"'"
db.execute(delsql)
response.redirect "xh_add.asp"
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>無標題文檔</title>
</head>
<body>
</body>
</html>
xh_conn.asp文件代碼
<%
set db=server.createobject("adodb.connection")
db.open "Driver={SQL Server};server=cylong;database=生產管理;uid=sa;pwd="
%>
[此贴子已经被作者于2005-12-31 17:14:47编辑过]
2005-12-31 17:14
2005-12-31 17:24
2005-12-31 17:28
下面的代碼是前一頁的
<!--#include file="xh_conn.asp"-->
<%
sql="select * from 營業"
set rs=db.execute(sql)
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>管理頁面</title>
<style type="text/css">
<!--
table {
font-size: 9pt;
text-decoration: none;
border: 1px solid #000000;
}
-->
</style>
<style type="text/css">
<!--
a {
font-size: 9pt;
color: #000000;
text-decoration: none;
}
-->
</style>
</head>
<body>
<p align="center"><font color="#FFFFFF"><a href="xh_write.asp">添加錄入</a> </font><a href="xh_loginout.asp">退出管理</a></p>
<table width="666" border="0" align="center" cellpadding="5" cellspacing="0">
<tr align="center" bgcolor="#006699">
<td colspan="5"><font color="#FFFFFF">錄入 管 理 頁 面</font></td>
</tr>
<tr align="center">
<td width="271"> ?j ?/td>
<td width="120"><font color="#FF0000">型號</font></td>
<td width="161"><font color="#FF0000">編輯</font></td>
<td colspan="2"><font color="#FF0000"> 刪除</font></td>
</tr>
<%do while not rs.eof%>
<tr>
<td align="center"><%=rs("lianluo")%></td>
<td><a href=../xh_look.asp?id=<%=rs("lianluo")%> target="_blank"><%=rs("型 ?)%></a></td>
<td align="center"><a href="xh_edit.asp?id=<%=rs("lianluo")%>">編輯</a></td>
<td width="72" align="center"><a href="xh_del.asp?id=<%=rs("lianluo")%>">刪除</a></td>
</tr>
<%
rs.movenext
loop
%>
</table>
<br>
</body>
</html>
2005-12-31 17:30
2005-12-31 17:34
2005-12-31 17:38
