Other windows programs

Development Platform:
VBScript

details.asp：Code Content
							<!--#include file="dbconn.asp"-->
<% 
   dim id
   dim sql
   dim rs
   dim eventid
   eventid=request.querystring("eventid")
   sql="select * from companyevent where eventid="&eventid
   set rs=conn.execute(sql)
   dim eventtype
select case rs("eventtype")
  case 1 
    eventtype="展会信息"
  case 2 
    eventtype="在线研讨"
  case 3 
    eventtype="产品推广"
  case 4 
    eventtype="新闻发布"
  case 5 
    eventtype="培训讲座"
  case 6 
    eventtype="其他"
end select  
%>   
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="../style.CSS">
<script language = JavaScript 1.1 src="../topmenu.js"></script>
<title>Itoevent发布活动信息</title>
<script language="javascript">
 function valert(){
  alert("请先注册成为我们的用户，谢谢!");
  return false
  } 
</script>
</head>
<body background="../images/bg.gif">
<p align=right><a href="javascript:self.close()"><b>关闭窗口</b></a></p>
<div align="center"><center>
<table border="0" background="bgtitle.gif" cellpadding="0" cellspacing="0" width="400" height="40">
  <tr>
    <td align="center"><p class="title"><b><big><i>企业活动信息</big></b></td>              
  </tr>              
</table>              
</center></div>              
              
  <div align="center"><center><table align=center border="0" cellpadding="0" cellspacing="0" width="300">     <td colspan="2"><br>             
       <table border="0" cellpadding="0" cellspacing="0">    
<tr>     
          <td align="right">活动名称：</td>     
          <td><%=rs("eventname") %></td>     
        </tr>       
        <tr>             
          <td align="right">活动类型：</td>             
           <td><%=eventtype %></td>  
        </tr> 
    
    <tr>     
          <td align="right">开始时间：</td>     
          <td><%=rs("beginyear") %>年<%=rs("beginmon")%>月<%=rs("beginday") %>日</td> 
        </tr>       
    <tr>  
    <tr>     
          <td align="right">结束时间：</td>     
          <td><%=rs("endyear") %>年<%=rs("endmon")%>月<%=rs("endday") %>日</td>
        </tr>
      <tr> 
            <td align=right>周期：</td>
            <td ><% =rs("period") %></td>
            </tr>        
      <tr> 
            <td >所在城市：</td>
            <td><%=rs("eventcity") %></td>
            </tr>
<tr>     
          <td align="right">地点：</td>     
          <td><%=rs("eventaddress") %></td>     
        </tr>     
         <tr>     
          <td align="right">活动介绍：</td>     
          <td><%=rs("eventintr") %></td>     
        </tr>    
    <tr> 
	<tr>     
          <td align="right">参加人员性质：</td>     
          <td><% =rs("property") %></td>     
        </tr>
	<tr>     
          <td align="right">主办单位：</td>     
          <td><% =rs("unit1") %></td>     
        </tr>
	<tr>     
          <td align="right">承办单位：</td>     
          <td><% =rs("unit2") %></td>     
        </tr>
	<tr>     
          <td align="right">相关链接一：</td>     
          <td><% =rs("link1") %></td>     
        </tr>
	<tr>     
          <td align="right">相关链接二：</td>     
          <td><% =rs("link2") %></td>     
        </tr>
	<tr>     
          <td align="right">单位地址：</td>     
          <td><% =rs("companyaddress") %></td>     
        </tr>
	<tr>     
          <td align="right">邮编：</td>     
          <td><% =rs("postcode") %></td>     
        </tr>
  
     <td align="right">联系人：</td>     
          <td><%=rs("contact") %></td>     
        </tr>                         
       <tr>     
          <td align="right">电话：</td>     
          <td><%=rs("tel") %></td>    
        </tr>    
         <tr>     
          <td align="right">传真：</td>     
          <td><%=rs("fax") %></td>     
        </tr>   
        <tr>     
          <td align="right">电子邮件：</td>     
          <td><%=rs("email") %></td>     
        </tr>   
       
      </table>     
      </td>     
    </tr>     
        
  </table>     
  </center></div>     
     
     
<p align="center"><br>     
</p>     
<div align="center">
<% if session("username")="" then %>
<a href="" target=bland onclick="return valert()"><font color=red>我要参加</font></a>
<% else %>
<a href="eventjoin.asp?eventid=<%=eventid%>" ><font color=red>我要参加</font></a>
<% end if %>
<script language="javascript">
<!--
bottoms()
//-->
</script>            
</body>              
</html>              

						