?? sp25175_reader_save.asp
字號(hào):
<!--#include file="conn.asp"-->
<%
readerid=trim(request("readerid"))
readername=trim(request("readername"))
serialnumber=trim(request("serialnumber"))
readertel=trim(request("readertel"))
readeraddress=trim(request("readeraddress"))
readertxt=trim(request("readertxt"))
set rs=server.createobject("adodb.recordset")
if readerid="" then sql="select * from reader where readername='"&readername&"' or serialnumber='"&serialnumber&"'"
if readerid<>"" then sql="select * from reader where readerid="&readerid
rs.open sql,db,1,3
if not rs.eof or not rs.bof then
if readerid="" then response.write "<script language=javascript>alert('對(duì)不起已經(jīng)有此用戶名');history.back(-1)</script>"
if readerid<>"" then
rs("readername")=readername
rs("serialnumber")=serialnumber
rs("readertel")=readertel
rs("readeraddress")=readeraddress
rs("readertxt")=readertxt
rs.update
rs.close
set rs=nothing
response.redirect "sp25175_reader.asp?readerid="&readerid&"&mage2fly=修改成功"
end if
else
rs.addnew
rs("readername")=readername
rs("serialnumber")=serialnumber
rs("readertel")=readertel
rs("readeraddress")=readeraddress
rs("readertxt")=readertxt
rs.update
readerid=rs("readerid")
rs.close
set rs=nothing
response.redirect "sp25175_reader.asp?readerid="&readerid&"&mage2fly=添加成功"
end if
%>
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -