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

📄 xggq.asp

📁 娱乐A视网企业黄页程序 1.首页 index.asp 2.管理页 login.asp 管理员admin 密码admin
💻 ASP
字号:
<!--#include file="dbpath/dbpath.asp"-->
<%
if request.cookies("okadmin")="" then
  response.redirect "login.asp"
end if
response.buffer=true
%>
<html>

<head>
<title>企业信息发布</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<style type="text/css"><!-- td           { font-size: 12px; line-height: 17px }
body         { font-size: 12px; line-height: 17px }
a:link       { text-decoration: none; color: blue }
a:visited    { text-decoration: none; color: #993333 }
a:active     { text-decoration: none }
a:hover      { text-decoration: underline; color: red }
-->
</style>
<script language="JavaScript">
function click(e) {
if (document.all) {
if (event.button==2||event.button==3) {
oncontextmenu='return false';
}
}
if (document.layers) {
if (e.which == 3) {
oncontextmenu='return false';
}
}
}
if (document.layers) {
document.captureEvents(Event.MOUSEDOWN);
}
document.onmousedown=click;
document.oncontextmenu = new Function("return false;")
</script>
<script LANGUAGE="javascript">
<!--

function FrmAddLink_onsubmit() {
if (document.xggq.typeid.value=="")
	{
	  alert("对不起,行业类型没有选择!")
	  document.xggq.typeid.focus()
	  return false
	 }
else if (document.xggq.txtcontop.value=="")
	{
	  alert("对不起,企业名称没有输入!")
	  document.xggq.txtcontop.focus()
	  return false
	 }
else if (document.xggq.txtgq.value=="")
	{
	  alert("对不起,企业类型没有选择!")
	  document.xggq.txtgq.focus()
	  return false
	 }
else if(document.xggq.txtcontent.value=="")
	{
	  alert("对不起,企业信息没有输入!")
	  document.xggq.txtcontent.focus()
	  return false
	 }
else if(document.xggq.txtcontent.value.length>500)
	{
	  alert("对不起,企业信息请控制在250字以内!")
	  document.xggq.txtcontent.focus()
	  return false
	 }
else if (document.xggq.txtgs.value=="")
	{
	  alert("对不起,电话没有输入!")
	  document.xggq.txtgs.focus()
	  return false
	 }
else if (document.xggq.txtname.value=="")
	{
	  alert("对不起,联系人没有输入!")
	  document.xggq.txtname.focus()
	  return false
	 }
else if (document.xggq.txtaddress.value=="")
	{
	  alert("对不起,公司地址没有输入!")
	  document.xggq.txtaddress.focus()
	  return false
	 }
else if (document.xggq.txtcode.value=="")
	{
	  alert("对不起,邮政编码没有输入!")
	  document.xggq.txtcode.focus()
	  return false
	 }
else if (document.xggq.txtphone.value=="")
	{
	  alert("对不起,网址没有输入!")
	  document.xggq.txtphone.focus()
	  return false
	 }
else if (document.xggq.txtemail.value=="")
	{
	  alert("对不起,email没有输入!")
	  document.xggq.txtemail.focus()
	  return false
	 }
}

//-->
</script>
<%
   dim strsql
   dim rs
   dim ssubject
   dim smemo
   useridtxt=request("userid")
   pagetxt=request("page")
   lbidtxt=request("lbid")
   set rs=server.createobject("adodb.recordset")
   strsql="select * from gq WHERE ID=" & useridtxt
   rs.open strsql,conn,1,1

%>
</head>

<body leftmargin="0" topmargin="0">

<div align="center">
<table border="0" width="478" cellspacing="0" cellpadding="0">
<center>
<tr>
</center>
<td bgcolor="#FFFFFF" width="315" valign="top">
<table border="2" width="100%" cellspacing="0" cellpadding="0" bordercolor="#FFFFFF">
<tr>
<td width="100%">
<div align="center">
<center>
<table border="0" cellpadding="0" width="510">
</center>
<tr>
<td valign="top" width="443">
<p align="right"><font class="d"><a href="manage.asp">回到管理首页</a></font> 
| <a href="new.asp" target="_parent">最新企业信息</a> | <a href="addgq.asp" target="_parent">发布企业信息</a> |       
<a href="login.asp" target="_parent">企业信息管理</a>             
&nbsp;</td>            
</tr>            
<tr>            
<td width="443" valign="top"></td>            
</tr>            
<tr>            
<td width="443" valign="top">            
<table border="0" width="111%" cellspacing="0" cellpadding="0">            
<tr>            
<td width="100%">            
<table border="0" width="100%" cellspacing="0" cellpadding="0">            
<tr>            
<td width="100%">            
<table align="center">            
   <form method="POST" action="saveup.asp?userid=<%=useridtxt%>&page=<%=pagetxt%>&lbid=<%=lbidtxt%>" name="xggq" LANGUAGE="javascript"               
    onsubmit="return FrmAddLink_onsubmit()">               
                
<tr>            
<td colspan="2">( 带 <font color="red">*</font> 的框为必填项目 )</td>            
</tr>            
<tr>            
<td colspan="2" bgcolor="99cc99"><font class="d">商业信息内容:</font></td>            
</tr>            
<tr valign="top">            
<td align="right" width="20%">选择行业类别:</td>           
<td><select class="smallSel" name="typeid" size="1" style="font-family: 宋体; font-size: 9pt">           
<option>选择行业类型</option>    
               <%    
    
 set rst=server.createobject("adodb.recordset")    
  sqlt="select * from gqlb"    
 rst.open sqlt,conn,1,1    
			  do while not rst.eof    
			      sel="selected"        
    
if StrComp(rs("lbid"),Cstr(rst("lbid")))=0 then    
		             response.write "<option selected value='"+CStr(rst("lbid"))+"' >"+rst("lbmc")+"</option>"+chr(13)+chr(10)    
    
else    
    
                     response.write "<option value='"+CStr(rst("lbid"))+"' >"+rst("lbmc")+"</option>"+chr(13)+chr(10)    
		        	    
end if    
		             rst.movenext    
    		          loop    
			rst.close    
			  %>     
 </select> <font color="ff0000">*</font></td>            
</tr>            
<tr valign="top">            
<td align="right">企业名称:</td>          
<td><input type="text" name="txtcontop" size="50" value="<%=rs("subject")%>" maxlength="80">           
<font color="ff0000">*</font></td>           
</tr>           
<tr valign="top">           
<td align="right">企业类别:</td>          
<td><select name="txtgq">          
<option>选择供求类型</option>   
          <% if rs("gq")= "单位名称" then%>    
<option value="单位名称" selected>单位名称</option>   
<option value="企业名称">企业名称</option>   
                <%else%>    
<option value="单位名称">单位名称</option>   
<option value="企业名称" selected>企业名称</option>   
                <%end if%>    
 </select> <font color="ff0000">*</font></td>            
</tr>            
<tr valign="top">            
<td align="right">详细信息:</td>           
<td><textarea rows="10" name="txtcontent" cols="50"><%=rs("memo")%></textarea> <font color="ff0000">*</font></td>            
</tr>            
<tr valign="top">            
<td colspan="2" bgcolor="#ececec"><font class="d">公司联络信息:</font></td>            
</tr>            
<tr>            
<td align="right">详细地址:</td>           
<td><input type="text" name="txtaddress" size="50" maxlength="100" value="<%=rs("address")%>">            
<font color="red">(*)</font></td>           
</tr>           
<tr>           
<td align="right">邮政编码:</td>           
<td><input type="text" name="txtcode" size="15" maxlength="10" value="<%=rs("code")%>">            
<font color="red">(*)</font></td>           
</tr>           
   <tr>    
<td align="right">联系人姓名:</td>           
<td><input type="text" name="txtname" size="15" maxlength="20" value="<%=rs("name")%>">            
<font color="red">(*)</font></td>            
   </tr>     
   <tr>     
<td align="right">电话:</td>           
<td><input type="text" name="txtgs" size="15" maxlength="50" value="<%=rs("gs")%>">            
<font color="red">(*)</font></td>            
   </tr>     
<tr>            
<td align="right">网址:</td>           
<td><input type="text" name="txtphone" size="15" maxlength="50" value="<%=rs("phone")%>">            
<font color="red">(*)</font></td>           
</tr>           
<tr>           
<td align="right">邮件:</td>           
<td><input type="text" name="txtemail" size="15" maxlength="50" value="<%=rs("email")%>">            
<font color="red">(*)</font></td>           
</tr>           
<tr>           
<td align="right"></td>           
<%rs.close%>                 
<td><br>           
<input type="submit" style="font-family: 宋体; font-size: 9pt;" value="写完了" name="submit">     
  &nbsp;&nbsp; <input type="reset" style="font-family: 宋体; font-size: 9pt;" value="重新写" name="reset">&nbsp;&nbsp;&nbsp;             
<input type="button" value="不想写" name="cmdExit" style="font-family: 宋体; font-size: 9pt;" onclick=" history.back()"></td>            
</tr>            
  </form>               
</table>            
</td>            
</tr>            
</table>            
</td>            
</tr>            
</table>            
</td>            
</tr>            
</table>            
</div>            
<center>            
</center></td>          
</tr>          
</table>          
</td>          
</tr>          
</table>          
</div>          
</body>          
          
</html>          

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -