wz_add.asp
来自「是个不错的文件代码,希望大家好好用,」· ASP 代码 · 共 28 行
ASP
28 行
<!--#include file="conn.asp"-->
<%
title=request("title")
url=request("url")
leibie=request("leibie")
memo=request("memo")
if title="" or url="" or leibie="" then
response.write "<font color='red'>表单不完整!</font><br>"
else
set r=server.createobject("adodb.recordset")
r.open "select * from detail where title='"&title&"'",conn,1,3
r.addnew
r("title")=title
r("url")=url
if memo="" then
r("memo")=" "&memo
else
r("memo")=memo
end if
r("classid")=leibie
r("verity")=1
r.update
response.write "<font color='red'>新网站添加成功!</font><br>"
response.write "<a href='#' onclick='window.close()'>关闭本窗口</a>"
end if
%>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?