Other windows programs

Development Platform:
VBScript

about.asp：Code Content
							
<% 
   dim myconn,i
   set myconn = server.createobject("ADODB.Connection")
   myconn.open "PROVIDER=SQLOLEDB;DATA SOURCE=hermes1;UID=ahao;PWD=hfglhy;DATABASE=itoevent"
  
   i=trim(request.querystring("i"))
   if i="" then 
    i=3
   end if
sql="select userid,companyname from userinfo where porc=0"
Set rscompany= Server.CreateObject("ADODB.Recordset")
rscompany.open sql,myconn,1,1
%>
<html>
<head>
<title>欢迎访问易问网</title>
<META HTTP-EQUIV=Content-Type CONTENT="text/html; charset=gb2312">
<META NAME="KEYWORDS" CONTENT="电子; IT产业; 智能; 企业信息; 活动信息; 集成; 经营; 技术; 网络; 软件开发; 安全技术; 站点制作; 免费; free; internet; wwwboard; headlines; downloads; news; Web site; what's new; solutions; services; software; contests; corporate news;">
<SCRIPT LANGUAGE="JavaScript">
<!--
if (window != window.top)
  top.location.href = location.href;
// -->
</SCRIPT>
<script language = JavaScript 1.1 src="topmenu.js"></script>
<script language = JavaScript 1.1 src="leftmenu.js"></script>
<LINK REL="stylesheet" TYPE="text/css" HREF="main.css">
</head>
<body leftMargin="0" topMargin="0" marginwidth="0" marginheight="0" background="images/bg.gif">
<div id="Layer3" style="position:absolute; left:155px; top:370px; width:89px; height:113px; z-index:1; visibility: hidden"> 
  <table width=98 border=1 cellspacing=0 bgcolor=#f7ce94 cellpadding=1 bordercolorlight="#000000" bordercolordark="#FFFFFF">
    <tr> 
      <td width="76"> 
        <div align="center"><font color="#000000"><b>服务信息</b></font></div>
      </td>
      <td valign=top align=right width="15"><img src="images/close.gif" width="15" height="13" onmouseover=MM_showHideLayers('document.layers['Layer3']','document.all['Layer3']','hide')></td>
    </tr>
    <tr> 
      <td colspan=2> 
　<a href="fandian.asp">饭　店</a><br>
　场　馆<br>
　协　会<br>
　媒　体<br>
　礼　品<br>
      </td>
    </tr>
  </table>
</div>
<script language="javascript">
<!--
printtop(0)
//-->
</script>
<table border="0" width="774" height="25" cellspacing="0" cellpadding="0" bgcolor="#ffffff">
  <tr>
        <td width="160" align="left" valign="top"><img src="images/aa.gif" width=160 height=28 border=0></td>
        <td width="25" align="left" valign="top"><img src="images/dot.gif" width="25" height="18" border="0"></td>
    <td width="589" align=right valign=top>
<form action="search/search1.asp" target="_blank" method=post name="form" style="MARGIN: 0px; PADDING-BOTTOM: 0px; PADDING-LEFT: 0px; PADDING-RIGHT: 0px; PADDING-TOP: 0px">
  <select name="eventtype" size="1">
    <option selected value="0">类型不限</option>
    <option value="1">展览会</option>
    <option value="2">研讨会</option>
    <option value="3">推广会</option>
    <option value="4">新闻发布会</option>
    <option value="5">培训班</option>
    <option value="6">讲座</option>
  </select>
 <select name="beginmon" size="1">
    <option selected value="0">时间不限</option>
    <option value="1">一月</option>
    <option value="2">二月</option>
    <option value="3">三月</option>
    <option value="4">四月</option>
    <option value="5">五月</option>
    <option value="6">六月</option>
    <option value="7">七月</option>
    <option value="8">八月</option>
    <option value="9">九月</option>
    <option value="10">十月</option>
    <option value="11">十一月</option>
    <option value="12">十二月</option>
  </select>
  <select name="city" size="1">
    <option selected value="0">地点不限</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>
  <select name="companyname" size="1">
    <option selected value="0">厂商不限</option>
    <%  do while not rscompany.eof %>
    <option value=<%=rscompany("userid")%>><%=rscompany("companyname")%></option>
    <%  rscompany.movenext
       loop 
       rscompany.close
       set rscompany=nothing
       %>
  </select>
  <input type="submit" value="检索" name="B1" class="pt9" style="font-family: 新细明体, 宋体, Arial; font-size: 9pt; background-color: rgb(128,128,192); color: rgb(0,0,0); text-align: center; vertical-align: middle; border: 1 double" padding-bottom:1px" onmouseover="this.style.color='#00ff00'" onmouseout="this.style.color='#000000'">&nbsp;
	</form>
    </td>
  </tr>
</table>
<table border="0" width="774" cellspacing="0" cellpadding="0">
<tr>
<td width="185" align="left" valign="top">
<script language="javascript">
<!--
printleft(0,200)
//-->
</script>
</td>
<td width="589" align="right" valign="top" bgcolor="#ffffff">
	<table border="0" width="589" cellspacing="0" cellpadding="0">
	<tr><td width=390 align=left valign=center>
<table width=390 height=15 cellspacing=0 cellpadding=0 border=0><tr><td bgcolor="#eeeeee">
当前位置：<a href="index.asp"><font color="#0000a0"><b>首 页</b></font></a>>>关于i2event
</td></tr></table>
	</td>
	<td width=199 valign=top>
            <table width="199" border="0" cellspacing="0" cellpadding="0" align=center>
	    <tr>
            <td height="20" align="right" valign="top">
<form action="search/search2.asp" target="_blank" method=post name="form2" style="MARGIN: 0px; PADDING-BOTTOM: 0px; PADDING-LEFT: 0px; PADDING-RIGHT: 0px; PADDING-TOP: 0px">
输入关键字:<input type="text" name=keywords size=10 value="按内容检索" onmouseover="this.focus()" onfocus="this.select()">
<input type="submit" value="检索" name="B1" class="pt9" style="font-family: 新细明体, 宋体, Arial; font-size: 9pt; background-color: rgb(128,128,192); color: rgb(0,0,0); text-align: center; vertical-align: middle; border: 1 double" padding-bottom:1px" onmouseover="this.style.color='#00ff00'" onmouseout="this.style.color='#000000'">&nbsp;
	</form>
	    </td>
            </tr>
	    </table>
	</td></tr>
	<tr>
	<td colspan=2 width="589" bgcolor="#ffffff" align=left valign=top class=main>
　　<b>关于i2event.com易问网</b><br><br>
　　i2event.com——易问网为海脉数码集团所属的从事市场活动推广的专业网站。<br><br>
　　海脉数码集团成立于1998年，以高新技术依托、以INTERNET为平台，面向经济领域，致力于为企业提供全方位的在线信息服务、市场调研服务、网络技术服务和市场推广服务。海脉拥有海脉信息咨询、海脉互联网技术、海脉在线广告、海脉投资顾问等子公司和《海脉经济导报》、《海脉技术纵横》、《海脉网络经济周刊》、《海脉经济热点周刊》等在线刊物以及“海脉技术联盟网”、“爱酷朋赠券网”、“易问网”等站点，完全具备为企业提供在线媒体信息发布以及市场推广服务的综合资源与整合优势。<br><br>
　　易问网致力于在当今瞬息万变的信息化时代，利用国际互联网成本低、速度快、信息量大、交互性强、不间断以及覆盖面广等绝对优势，为企业提供在线市场推广专业服务，以最大限度的减少活动成本和扩大活动效果。<br><br>
　　针对企业常年大量举办的各种会议展览培训等活动，易问提供网上解决方案<br>
　　　— 企业全年市场活动列表、预告<br>
　　　— 企业端市场活动自主管理系统<br>
　　　— 观众在线登录、确认（信息登记、发放用户名称及密码、登录情况追踪等）<br>
　　　— 企业活动咨询策划、组织实施全程服务<br>
　　　— 在线活动咨询策划、网页设计制作<br>
　　　— 网上活动发布及直播服务<br>
　　　— 利用海脉的数据库向目标受众发送活动信息<br>
　　　— 通过海脉在线媒体与合作伙伴，为企业市场活动提供各种增值推广服务<br>
　　　— 活动后续观众数据分析、满意度调查、相关在线市场调查及各类在线反馈服务<br><br>
 
　　面向企业的CEOCIOCTO专业人员、采购人员，行业主管，媒体记者等受众群体，易问提供下列信息和服务：<br>
　　　— 在线查询展览展示、新闻发布、技术培训、专题讲座等各类活动的预告和详细资料<br>
　　　— 按时间、地点、厂商、活动主题及活动形式检索<br>
　　　— 各类活动的网上登记、确认<br>
　　　— 各类专业网上会展的参与和交流以及在线采访服务<br>
　　　— 为直接用户提供在线寻价、洽谈购买意向的机会<br>
　　　— 为经销商提供与厂商洽谈业务的窗口<br>
　　　— 为专业人员提供相关网上信息<br>
	</td>
	</tr>
	</table>
</td>
</tr>
</table>
<script language="javascript">
<!--
printfoot(0)
//-->
</script>
</body>
</html>

						