⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 editdata_co.asp

📁 本房地产网站功能强大
💻 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">用户注册个人信息: 
                                     **为必填写字段&nbsp;&nbsp;</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">&nbsp;公司名称:</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">&nbsp;&nbsp;密码提示问题:</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">&nbsp;&nbsp;问题回答:</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 + -