📄 edit.asp

📁 OFFICE办公自动化

💻 ASP

字号:

<!--#include file="dbconn.asp"-->
<!--#include file="inc_function.asp"-->
<%
oldpsw=filt_space(trim(request.form("oldpsw")))
password=filt_space(trim(request.form("password")))
nickname=filt_space(trim(request.form("nickname")))
country=filt_space(trim(request.form("country")))
province=filt_space(trim(request.form("province")))
city=filt_space(trim(request.form("city")))
email=filt_space(trim(request.form("email")))
oicq=filt_space(trim(request.form("oicq")))
age=filt_space(trim(request.form("age")))
sex=filt_space(trim(request.form("sex")))
face=filt_space(getFileName(trim(request.form("face"))))

set rs=server.createobject("adodb.recordset")
sqlstr="select * from userinfor where username='"&session("icqusername")&"'"
rs.open sqlstr,conn,1,1
if oldpsw<>rs("password") then
	msg="旧密码错误,不能修改!"
else 
'rs("username")=username
	rs("password")=password
	rs("nickname")=nickname
	rs("country")=country
	rs("province")=province
	rs("city")=city
	rs("email")=email
	rs("oicq")=oicq
	rs("face")=face
	rs("age")=age
	rs("sex")=sex
	msg="恭喜，修改成功！"
	'rs("online")=true
	rs.update
session("icqlogin")=true
session("icqusername")=username
session("icqnickname")=trim(rs("nickname"))
end if
rs.close
conn.close
set conn=nothing
if trim(msg)<>"" then
%>
<html>
<head><title></title>
<script language="javascript">
<!--
function document_onkeydown() {
if(event.ctrlKey && window.event.keyCode==78)
  {
  
     window.alert ("欢迎使用B-ICQ")

  }
}

//-->
</SCRIPT>
<SCRIPT LANGUAGE=javascript FOR=document EVENT=onkeydown>
<!--
 document_onkeydown()
//-->
</SCRIPT>
</head>

<SCRIPT LANGUAGE=javascript>
<!--
function window_onunload() {
var msg="<%=msg%>"
window.close()
window.alert (""+msg)
}
//-->
</SCRIPT>
<body  oncontextmenu=self.event.returnValue=false onunload="return window_onunload()">
	<script language="javascript">
	<!--
	self.close();
	//
		//-->
	</script>
</body>
</html>
<%
end if
%>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -