📄 usercorp.asp
字号:
if GetUserDataObj_Rs("isLock")=0 then
response.Write("checked")
end if
else
if request.QueryString("Act")<>"Search" then
if p_RegisterCheck = 0 then
response.Write("checked")
end if
end if
end if%>>
不锁定
<input type="radio" name="frm_isLock" value="1" <%if Bol_IsEdit then
if GetUserDataObj_Rs("isLock")=1 then
response.Write("checked")
end if
else
if request.QueryString("Act")<>"Search" then
if p_RegisterCheck = 1 then
response.Write("checked")
end if
end if
end if%>>
锁定 </td>
<td height="16">锁定后该用户将无法登陆</td>
</tr>
<tr class="hback">
<td height="16">
<div align="right">是否允许多人登陆</div>
</td>
<td height="16">
<input type="radio" name="frm_OnlyLogin" value="0" <%if Bol_IsEdit then if GetUserDataObj_Rs("OnlyLogin")=0 then response.Write("checked") end if end if%>>
不允许
<input type="radio" name="frm_OnlyLogin" value="1" <%if Bol_IsEdit then if GetUserDataObj_Rs("OnlyLogin")=1 then response.Write("checked") end if else if request.QueryString("Act")<>"Search" then response.Write("checked") end if end if%>>
允许 </td>
<td height="16">如果不选定则表示不允许</td>
</tr>
<tr class="hback">
<td colspan="3" align="center">
<%if request.QueryString("Act")="Add_BaseData" then %>
<input name="frm_UserNumber_Edit2" type="hidden" value="<% = request.Form("frm_UserNumber") %>">
<input name="frm_UserName" type="hidden" value="<% = request.Form("frm_UserName") %>">
<input name="frm_UserPassword" type="hidden" value="<% = request.Form("frm_UserPassword") %>">
<input name="frm_PassQuestion" type="hidden" value="<% = request.Form("frm_PassQuestion") %>">
<input name="frm_PassAnswer" type="hidden" value="<% = request.Form("frm_PassAnswer") %>">
<input name="frm_SafeCode" type="hidden" value="<% = request.Form("frm_SafeCode") %>">
<input name="frm_Email" type="hidden" value="<% = request.Form("frm_Email") %>">
<%else%>
<input name="frm_UserNumber_Edit2" type="hidden" value="<% = UserNumber %>">
<%end if%>
<input type="submit" name="OtherSubmitButtont" value="<%if request.QueryString("Act")="Search" then response.Write(" 执行查询 ") else response.Write(" 保存企业扩展信息 ") end if%>" />
<input type="reset" name="Submit2" value=" 重置 " />
</td>
</tr>
</form>
</table>
</div>
<div id="Layer3" style="position:relative;z-index:1; left: 0px; top: 0px;">
<table width="96%" border="0" align="center" cellpadding="4" cellspacing="1" class="table">
<form name="UserForm" method="post"<%if request.QueryString("Act")="Add_OtherData" then
response.Write(" action=""UserCorp_DataAction.asp?Act=Add_AllData"" onsubmit=""return CheckForm_Three(this);""")
elseif request.QueryString("Act")="Search" then
response.Write(" action=""?Act=SearchGo""")
else
response.Write(" action=""UserCorp_DataAction.asp?Act=ThreeData"" onsubmit=""return CheckForm_Three(this);""")
end if%>>
<tr class="hback">
<td height="16">
<div align="right"><span class="tx">*</span>公司名称</div>
</td>
<td>
<input name="frm_C_Name" type="text" id="frm_C_Name" style="width:90%" maxlength="50" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_Name")) end if%>">
</td>
<td>
<%if request.QueryString("Act")="Search" then response.Write("模糊查询") else response.Write("请填写您公司的全称") end if%>
</td>
</tr>
<tr class="hback">
<td height="16">
<div align="right">公司简称</div>
</td>
<td>
<input name="frm_C_ShortName" type="text" id="frm_C_ShortName" style="width:90%" maxlength="30" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_ShortName")) end if%>">
</td>
<td>
<%if request.QueryString("Act")<>"Search" then%>
请填写您公司的简单称呼
<%end if%>
</td>
</tr>
<tr class="hback">
<td height="24" align="right">请填写您公司所在的省份</td>
<td>
<input type="text" name="frm_C_Province" readonly="" style="width:90%" maxlength="20" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_Province")) end if%>">
</td>
<td>
<select name="select111" size=1 onChange="javascript:frm_C_Province.value=this.options[this.selectedIndex].value">
<option value="">请选择</option>
<option value="四川">四川</option>
<option value="北京">北京</option>
<option value="上海">上海</option>
<option value="天津">天津</option>
<option value="重庆">重庆</option>
<option value="安徽">安徽</option>
<option value="甘肃">甘肃</option>
<option value="广东">广东</option>
<option value="广西">广西</option>
<option value="贵州">贵州</option>
<option value="福建">福建</option>
<option value="海南">海南</option>
<option value="河北">河北</option>
<option value="河南">河南</option>
<option value="黑龙江">黑龙江</option>
<option value="湖北">湖北</option>
<option value="湖南">湖南</option>
<option value="吉林">吉林</option>
<option value="江苏">江苏</option>
<option value="江西">江西</option>
<option value="辽宁">辽宁</option>
<option value="内蒙古">内蒙古</option>
<option value="宁夏">宁夏</option>
<option value="青海">青海</option>
<option value="山东">山东</option>
<option value="山西">山西</option>
<option value="陕西">陕西</option>
<option value="西藏">西藏</option>
<option value="新疆">新疆</option>
<option value="云南">云南</option>
<option value="浙江">浙江</option>
<option value="港澳台">港澳台</option>
<option value="海外">海外</option>
<option value="其它">其它</option>
</select>
</td>
</tr>
<tr class="hback">
<td height="0">
<div align="right">公司所在城市</div>
</td>
<td>
<input name="frm_C_City" type="text" id="frm_C_City" style="width:90%" maxlength="20" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_City")) end if%>">
</td>
<td>您公司所在的城市</td>
</tr>
<tr class="hback">
<td height="0">
<div align="right"><span class="tx">*</span>公司地址</div>
</td>
<td>
<input name="frm_C_Address" type="text" id="frm_C_Address" style="width:90%" maxlength="100" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_Address")) end if%>">
</td>
<td>您公司的地址</td>
</tr>
<tr class="hback">
<td height="0">
<div align="right"><span class="tx">*</span>邮政编码</div>
</td>
<td>
<input name="frm_C_PostCode" type="text" id="frm_C_PostCode" style="width:90%" maxlength="6" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_PostCode")) end if%>">
</td>
<td>您公司的邮政编码</td>
</tr>
<tr class="hback">
<td height="0">
<div align="right"><span class="tx">*</span>公司联系人</div>
</td>
<td>
<input name="frm_C_ConactName" type="text" id="frm_C_ConactName" style="width:90%" maxlength="20" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_ConactName")) end if%>">
</td>
<td>公司联系人</td>
</tr>
<tr class="hback">
<td height="0">
<div align="right"><span class="tx">*</span>公司联系电话</div>
</td>
<td>
<input name="frm_C_Tel" type="text" id="frm_C_Tel" style="width:90%" maxlength="20" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_Tel")) end if%>">
</td>
<td>公司联系电话。有分机请用"-"分开,如:028-85098980-606</td>
</tr>
<tr class="hback">
<td height="1">
<div align="right">公司传真</div>
</td>
<td>
<input name="frm_C_Fax" type="text" id="frm_C_Fax" style="width:90%" maxlength="20" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_Fax")) end if%>">
</td>
<td>公司传真。有分机请用"-"分开,如:028-85098980-606</td>
</tr>
<tr class="hback">
<td height="3">
<div align="right"><span class="tx">*</span>行业</div>
</td>
<td>
<input name="frm_C_VocationClassName" type="text" id="frm_C_VocationClassName" style="width:90%" readonly value="<%if Bol_IsEdit then response.Write(Get_OtherTable_Value("select vClassName from FS_ME_VocationClass where VCID="&GetUserDataObj_Rs("C_VocationClassID")&"")) end if%>">
<input type="hidden" name="frm_C_VocationClassID" id="frm_C_VocationClassID" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_VocationClassID")) end if%>">
</td>
<td>
<input type="button" name="Submit3" value="选择行业" onClick="SelectClass();">
公司所在的行业</td>
</tr>
<tr class="hback">
<td height="8">
<div align="right">公司网站</div>
</td>
<td>
<input name="frm_C_Website" type="text" id="frm_C_Website" style="width:90%" maxlength="200" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_Website")) end if%>">
</td>
<td>公司所在的企业站点</td>
</tr>
<tr class="hback">
<td height="16">
<div align="right">公司规模</div>
</td>
<td>
<select name="frm_C_size" id="frm_C_size">
<%if request.QueryString("Act")="Search" then response.Write("<option value="""">请选择</option>") end if%>
<option value="1-20人"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_size")="1-20人" then response.Write(" selected") else if request.QueryString("Act")<>"Search" then response.Write(" selected") end if end if%>>1-20人</option>
<option value="21-50人"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_size")="21-50人" then response.Write(" selected") end if%>>21-50人</option>
<option value="51-100人"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_size")="51-100人" then response.Write(" selected") end if%>>51-100人</option>
<option value="101-200人"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_size")="101-200人" then response.Write(" selected") end if%>>101-200人</option>
<option value="201-500人"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_size")="201-500人" then response.Write(" selected") end if%>>201-500人</option>
<option value="501-1000人"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_size")="501-1000人" then response.Write(" selected") end if%>>501-1000人</option>
<option value="1000人以上"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_size")="1000人以上" then response.Write(" selected") end if%>>1000人以上</option>
</select>
</td>
<td> </td>
</tr>
<tr class="hback">
<td height="1">
<div align="right">公司注册资本</div>
</td>
<td>
<select name="frm_C_Capital" id="frm_C_Capital">
<option value="10万以下"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_Capital")="10万以下" then response.Write(" selected") end if%>>10万以下</option>
<option value="10万-19万"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_Capital")="10万-19万" then response.Write(" selected") end if%>>10万-19万</option>
<option value="20万-49万"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_Capital")="20万-49万" then response.Write(" selected") end if%>>20万-49万</option>
<option value="50万-99万"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_Capital")="50万-99万" then response.Write(" selected") else if request.QueryString("Act")<>"Search" then response.Write(" selected") end if end if%>>50万-99万</option>
<option value="100万-199万"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_Capital")="100万-199万" then response.Write(" selected") end if%>>100万-199万</option>
<option value="200万-499万"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_Capital")="200万-499万" then response.Write(" selected") end if%>>200万-499万</option>
<option value="500万-999万"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_Capital")="500万-999万" then response.Write(" selected") end if%>>500万-999万</option>
<option value="1000万以上"<%if Bol_IsEdit then if GetUserDataObj_Rs("C_Capital")="1000万以上" then response.Write(" selected") end if%>>1000万以上</option>
</select>
</td>
<td> </td>
</tr>
<tr class="hback">
<td height="3">
<div align="right">开户银行</div>
</td>
<td>
<input name="frm_C_BankName" type="text" id="frm_C_BankName" style="width:90%" maxlength="50" value="<%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_BankName")) end if%>">
</td>
<td rowspan="2">
<p>公司银行帐户,以方便放在您的联系资料中。<br>
开户银行例子:中国工商银行成都分行双楠分理处<br>
银行帐户名:</p>
</td>
</tr>
<tr class="hback">
<td height="8">
<div align="right">银行帐号及帐户名</div>
</td>
<td>
<textarea name="frm_C_BankUserName" cols="30" rows="4" id="frm_C_BankUserName"><%if Bol_IsEdit then response.Write(GetUserDataObj_Rs("C_BankUserName")) end if%>
</textarea>
</td>
<tr class="hback">
<td colspan="3" align="center">
<%if request.QueryString("Act")="Add_OtherData" then %>
<input name="frm_UserNumber_Edit3" type="hidden" value="<% = request.Form("frm_UserNumber") %>">
<input name="frm_UserName" type="hidden" value="<% = request.Form("frm_UserName") %>">
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -