📄 edit.asp
字号:
<!-- #include file="conn.inc" -->
<%
id=request("id")
if request("Mode")="2" then '删除记录
sql="delete from sql where id=" & id
conn.Execute(sql)
conn.close
response.redirect "souc.asp"
end if
Function CheckChar(FValue)
CheckChar = Replace(FValue, "'", "' + Chr(39) + '")
End Function
if request("Mode")="1" then '保存修改
sqla=CheckChar(request("sqla"))
sm=CheckChar(request("sm"))
fl=request("fl")
sql="update sql set sql='"&sqla&"',说明='"&sm&"',fl="&fl&" where id="&id
conn.execute(sql)
conn.close
response.redirect "souc.asp"
end if%>
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>SQL学习宝1.0</title>
<link rel="stylesheet" type="text/css" href="style.css" title="style">
</head>
<body marginheight="5" marginwidth="0" topmargin="5" leftmargin="5" rightmargin="0" >
<br>
<%
sql="select * from sql where id="&id
set rs=conn.execute(sql)
%>
<form method="post" name="edit" action="edit.asp?mode=1&id=<%=id%>" onsubmit="return CheckForm(this)">
<div align="center"><table border="1" width="466" cellspacing="0" bordercolordark="#FFFFFF">
<tr>
<td width="666"><table border="0" cellspacing="0" cellpadding="0">
<tr><td align=center width="100%"><a href="edit.asp?mode=2&id=<%=id%>" onclick="del()">删除</a> </td></tr>
<tr><td rowspan=7 width=100%>
<table width="491" align=center id="info111">
<tr><td bgcolor=DimGray height="10" width="483"><font color="#FFFFFF">修改</font> </td></tr>
<tr><td width="483"> 分类：<select size="1" name="fl">
<option value="0" <%if rs("fl")=0 then%> selected <%end if%>>查询</option>
<option value="1" <%if rs("fl")=1 then%> selected <%end if%>>记录修改</option>
<option value="2" <%if rs("fl")=2 then%> selected <%end if%>>表修改</option>
</select><br>
sql: <input type="text" name="sqla" size=50 value="<%=rs("sql")%>">
</td></tr>
<tr><td width="483">说明 <textarea rows="2" name="sm" cols="50" wrap="hard"><%=rs("说明")%></textarea></td></tr>
<tr><td align=center width="483">
<p align="right"><input type="submit" value="确 定" class="buttons02" name="info"> <input type="reset" value="重 填" class="buttons02" name=reset1>
<input type="button" value="返回" name="B5" class="buttons02" ONCLICK="window.history.back()"> </p>
</td></tr>
</table>
</table></td>
</tr>
</table></div>
</form>
<%rs.close
conn.close%>
<script Language="JavaScript">
function CheckForm(form)
{
if (form..value=="")
{alert("请填sql！");
form.lb.focus();
return (false);}
return (true);
}
function del()
{ if (confirm("真的要删除记录吗?")){
return true;
}
return false;
}
</script>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -