?? up.asp
字號:
?<!--#INCLUDE file="data.asp"-->
<%
admin=Request("admin")
name=Request("name")
typex=Request("typex")
ad_y=Request("ad_y")
acc=Request("acc")
times=Request("times")
you=Request("you")
types=Request("types")
money=Request("money")
if name="" or typex="" or ad_y="" or acc="" or times="" or you="" or types="" then
response.write "<card id='card1' title='出錯提示!'>"
response.write "<p align='left'>"
response.write "所有項不能為空!"
response.write "<br/><a href='admin_adup.asp?admin=" & admin & "'>返回重寫</a></p></card></wml>"
response.end
end if
Set rs= Server.CreateObject("ADODB.Recordset")
sql="SELECT * From ad_reg"
rs.Open sql,conn,1,2
rs.AddNew
rs("name")=name
rs("type")=typex
rs("ad_y")=ad_y
rs("acc")=acc
rs("time")=times
rs("you")=you
rs("types")=types
rs("money")=money
rs.Update
Response.write "<card id='card1' title='添加成功' ontimer='admin.asp?admin=" & admin & "'><timer value='20'/><p>正在返還!"
Response.write "<br/><a href='admin.asp?admin=" & admin & "'>點擊返回管理頁</a></p></card></wml>"
set rs=nothing
conn.close
set conn=nothing
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -