📄 editdata_co.asp
字号:
<%
'┌─ 风云ASP在线 ────────────────────────┐
'│ │
'│ 作者:赵振波. http://www.fyasp.com │
'│ │
'│ Q Q:176189168 │
'│ │
'│ Email:fy96@163.com │
'│ │
'│ 程序定做,系统开发,网站制作,提供高质量的网络产品、技术和服务!│
'│ │
'│ │
'└─────────────────── http://www.fyasp.com ──┘
%>
<!--#include file="../inc/conn.asp"-->
<%response.expires=0
dim loginid,rs
loginid=session("loginid")
opendataconn
set rs=conn.execute("select * from company where userid='"&loginid&"'")
if loginid="" or rs.eof then
response.end
else
userid=loginid
pwd=trim(rs("pwd"))
id=trim(rs("id"))
reg_type=trim(rs("reg_type"))
end if
set rs=nothing
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript" src="../inc/index.js"></script>
<link href="../inc/style.css" rel="stylesheet" type="text/css">
</head>
<body background="../ima/5.JPG" leftmargin="0" topmargin="0">
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" class="main">
<tr>
<td>
<!--#include file="../top.asp" -->
</td>
</tr>
<tr>
<td><table width="778" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center"> <table width="760" height="75" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="top" bgcolor="#D9F2D7"><br> <form action="savedata.asp" method="post" name="reg" id="reg">
<table width="614" height="200" border="0" cellpadding="0" cellspacing="1" bgcolor="#7CB721">
<tr>
<td height="23" bgcolor="#7cb721" class="white"> <span class="black"><font color="#FFFFFF">用户注册个人信息:
**为必填写字段 </font></span></td>
</tr>
<tr>
<td height="209" align="center" valign="top" bgcolor="#FFFFFF">
<table width="101%" height="177" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#FFFFFF" class="blackbox" hspace="12">
<tr bgcolor="#f6f6f6" class="black">
<td width="116" height="12" align="right" valign="middle">您的用户名:</td>
<td width="461" height="24"><%=userid%></td>
</tr><%If is_house_ot_user=1 then%>
<tr bgcolor="#f6f6f6" class="black">
<td width="116" height="12" align="right" valign="middle">您的密码:</td>
<td width="461" height="24"> = <a href="<%=house_ot_modIfypass1%>"target=_blank>点击修改密码</a>
= </td>
</tr>
<%else%>
<tr bgcolor="#f6f6f6" class="black">
<td width="116" height="12" align="right" valign="middle">您的密码:</td>
<td width="461" height="24"> (<font color="#FF0000"><%=string(len(pwd),"*")%></font>) = <a href="#" onclick="window.open('editpwd.asp?id=<%=session("loginid")%>','','width=300,height=160,top=20,left=300')" >点击修改密码</a>
= </td>
</tr><%end if%>
<tr bgcolor="#f6f6f6" class="black">
<td width="116" height="12" align="right" valign="middle"> 公司名称:</td>
<td width="461" height="24"> <input name="company" type="text" class="inputb" id="company" size="35" maxlength="40">
<font color="#FF0000"> **</font> </td>
</tr>
<tr bgcolor="#f6f6f6" class="black">
<td height="12" align="right" valign="middle">公司地址:</td>
<td height="12"><input name="address" type="text" class="inputb" id="address" size="35" maxlength="60">
<font color="#FF0000">**</font> </td>
</tr>
<tr bgcolor="#f6f6f6" class="black">
<td height="12" align="right" valign="middle">邮政编码</td>
<td height="12"><input name="zip" type="text" id="zip"></td>
</tr>
<tr bgcolor="#f6f6f6" class="black">
<td height="12" align="right" valign="middle">联系电话:</td>
<td height="12"><input name="phone" type="text" id="phone"></td>
</tr>
<tr bgcolor="#f6f6f6" class="black">
<td height="12" align="right" valign="middle">E-mail:</td>
<td height="12"><input type="text" name="email" size="30" class="inputb">
<font color="#FF0000"> **</font> <font color="#FF6600">(此电子邮件非常重要,请认真填写!)</font></td>
</tr>
<tr bgcolor="#f6f6f6" class="black">
<td width="116" height="12" align="right" valign="middle"> 密码提示问题:</td>
<td width="461" height="12"> <input type="text" name="question" size="20" maxlength="28" class="inputb">
<font color="#FF0000">**</font>需要找回密码的时候,提示的问题“您叫什么名字?”</td>
</tr>
<tr bgcolor="#f6f6f6" class="black">
<td width="116" height="17" align="right" valign="middle"> 问题回答:</td>
<td width="461" height="17"> <input type="text" name="answer" maxlength="28" size="20" class="inputb">
<font color="#FF0000">**</font>您自设问题的答案,如您的答案是“小黄”</td>
</tr>
<tr bgcolor="#f6f6f6" class="black">
<td height="17" align="right" valign="middle">公司简介</td>
<td height="17"><textarea name="info" cols="45" rows="6" id="info"></textarea>
<input name="reg_type" type="hidden" id="reg_type" value="1"></td>
</tr>
</table></td>
</tr>
</table>
<input type="submit" name="Submit2" value="提交" onclick="javascript:return checkfield();">
<SCRIPT language=VBScript>
function checkfield()
if trim(reg.company.value)="" then
msgbox "请填写公司名称!"
reg.company.focus
checkfield=false
exit function
end if
if trim(reg.address.value)="" then
msgbox "请填写公司地址!"
reg.address.focus
checkfield=false
exit function
end if
if trim(reg.email.value)="" then
msgbox "邮件不能为空!"
reg.email.focus
checkfield=false
exit function
else
str1=trim(reg.email.value)
if instr(str1,"@")=0 then
msgbox "邮件地址错误!"
reg.email.focus
checkfield=false
exit function
end if
end if
if trim(reg.question.value)="" then
msgbox "请填写密码提示问题!"
reg.question.focus
checkfield=false
exit function
end if
if trim(reg.answer.value)="" then
msgbox "请填写问题回答!"
reg.answer.focus
checkfield=false
exit function
end if
if trim(reg.info.value)="" then
msgbox "请填写公司简介!"
reg.info.focus
checkfield=false
exit function
end if
checkfield=true
end function
</SCRIPT>
</form>
<br> <br> </td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td> <!--#include file="../end.asp" --> <div align="center"></div></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -