?? addnews.asp
字號:
<!--#include file="conn.asp"-->
<%if session("password")<>"" then%>
<%
if request("xh1")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('學號欄要全部填');" & "history.back()" & "</script>"
Response.End
end if
if request("xh2")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('學號欄要全部填');" & "history.back()" & "</script>"
Response.End
end if
if request("xh3")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('學號欄要全部填');" & "history.back()" & "</script>"
Response.End
end if
if request("xh4")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('學號欄要全部填');" & "history.back()" & "</script>"
Response.End
end if
if request("xh5")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('學號欄要全部填');" & "history.back()" & "</script>"
Response.End
end if
if request("xh6")="" then
response.write "<script language=JavaScript>" & chr(13) & "alert('學號欄要全部填');" & "history.back()" & "</script>"
Response.End
end if
bj1=Replace(Request.Form("bj1"),"'","''")
xh1=Replace(Request.Form("xh1"),"'","''")
user1=Replace(Request.Form("user1"),"'","''")
kc1=Replace(Request.Form("kc1"),"'","''")
cj1=Replace(Request.Form("cj1"),"'","''")
xq1=Replace(Request.Form("xq1"),"'","''")
lx1=Replace(Request.Form("lx1"),"'","''")
bj2=Replace(Request.Form("bj2"),"'","''")
xh2=Replace(Request.Form("xh2"),"'","''")
user2=Replace(Request.Form("user2"),"'","''")
kc2=Replace(Request.Form("kc2"),"'","''")
cj2=Replace(Request.Form("cj2"),"'","''")
xq2=Replace(Request.Form("xq2"),"'","''")
lx2=Replace(Request.Form("lx2"),"'","''")
bj3=Replace(Request.Form("bj3"),"'","''")
xh3=Replace(Request.Form("xh3"),"'","''")
user3=Replace(Request.Form("user3"),"'","''")
kc3=Replace(Request.Form("kc3"),"'","''")
cj3=Replace(Request.Form("cj3"),"'","''")
xq3=Replace(Request.Form("xq3"),"'","''")
lx3=Replace(Request.Form("lx3"),"'","''")
bj4=Replace(Request.Form("bj4"),"'","''")
xh4=Replace(Request.Form("xh4"),"'","''")
user4=Replace(Request.Form("user4"),"'","''")
kc4=Replace(Request.Form("kc4"),"'","''")
cj4=Replace(Request.Form("cj4"),"'","''")
xq4=Replace(Request.Form("xq4"),"'","''")
lx4=Replace(Request.Form("lx4"),"'","''")
bj5=Replace(Request.Form("bj5"),"'","''")
xh5=Replace(Request.Form("xh5"),"'","''")
user5=Replace(Request.Form("user5"),"'","''")
kc5=Replace(Request.Form("kc5"),"'","''")
cj5=Replace(Request.Form("cj5"),"'","''")
xq5=Replace(Request.Form("xq5"),"'","''")
lx5=Replace(Request.Form("lx5"),"'","''")
bj6=Replace(Request.Form("bj6"),"'","''")
xh6=Replace(Request.Form("xh6"),"'","''")
user6=Replace(Request.Form("user6"),"'","''")
kc6=Replace(Request.Form("kc6"),"'","''")
cj6=Replace(Request.Form("cj6"),"'","''")
xq6=Replace(Request.Form("xq6"),"'","''")
lx6=Replace(Request.Form("lx6"),"'","''")
set savebbs1=conn.execute("insert into bbs1(bj,xh,user,kc,cj,xq,lx)values('"&bj1&"','"&xh1&"','"&user1&"','"&kc1&"','"&cj1&"','"&xq1&"','"&lx1&"')")
set savebbs2=conn.execute("insert into bbs1(bj,xh,user,kc,cj,xq,lx)values('"&bj2&"','"&xh2&"','"&user2&"','"&kc2&"','"&cj2&"','"&xq2&"','"&lx2&"')")
set savebbs3=conn.execute("insert into bbs1(bj,xh,user,kc,cj,xq,lx)values('"&bj3&"','"&xh3&"','"&user3&"','"&kc3&"','"&cj3&"','"&xq3&"','"&lx3&"')")
set savebbs4=conn.execute("insert into bbs1(bj,xh,user,kc,cj,xq,lx)values('"&bj4&"','"&xh4&"','"&user4&"','"&kc4&"','"&cj4&"','"&xq4&"','"&lx4&"')")
set savebbs5=conn.execute("insert into bbs1(bj,xh,user,kc,cj,xq,lx)values('"&bj5&"','"&xh5&"','"&user5&"','"&kc5&"','"&cj5&"','"&xq5&"','"&lx5&"')")
set savebbs6=conn.execute("insert into bbs1(bj,xh,user,kc,cj,xq,lx)values('"&bj6&"','"&xh6&"','"&user6&"','"&kc6&"','"&cj6&"','"&xq6&"','"&lx6&"')")
response.write "<script language=JavaScript>" & chr(13) & "alert('同學信息修改成功!');"&"window.location.href = 'adds.asp'"&" </script>"
set savebbs=nothing
%>
<%else
Response.Redirect "index.asp"
end if%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -