?? ly.asp
字號:
<!--#include file="conn.Asp"-->
<%
dim username,usertext,biaoti
username=request("username")
usertext=request("usertext")
biaoti=request("biaoti")
if biaoti="" then
Call Msgs("標題不能為空!","manage1.asp?action=ly")
else
if usertext="" then
Call Msgs("留言內容不能為空!","manage1.asp?action=ly")
else
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open "select * from ly",conn,1,3
rs.addnew
rs("username")=username
rs("biaoti")=biaoti
rs("usertext")=usertext
rs.update
rs.close
Call Msgs("留言成功!","manage1.asp?action=ly")
end if
end if
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -