<% ' 文件名:register1.asp ' 功能:用户注册第一步 %> <% '定义变量 Dim strSQL if request.QueryString("link")<>"" then strAction="register1.asp?step=submit&link=" & request.QueryString("link") else strAction="register1.asp?step=submit" end if strtype="select * from industrytype order by industrytypeid" set rstype= Conn.Execute(strtype) If Request.QueryString("step")="submit" then strSQL="Select username from user where username='" &Request.Form("username")&"'" set rsSQL= Conn.Execute(strSQL) If NOT rsSQL.EOF Then if Request.QueryString("link")="" then strLink="register1.asp?step=again" else strLink="register1.asp?step=again&link=" & request.QueryString("link") end if Response.Redirect strLink else strmax="select Max(userid) as themax from user" set rsmax=Conn.Execute(strmax) if isnull(rsmax("themax")) then max=1 else max=rsmax("themax")+1 session("username")=request.Form("username") session("password")=request.Form("password") if Request.QueryString("link")="" then strLink="register2.asp?userid="&max else strLink="register2.asp?userid="& max & "&link=" & request.QueryString("link") end if Response.Redirect strLink End if End If %> 欢迎进入科迅电子电器有限公司主页--会员注册-->Step1
     
     
科迅首页 信息平台 产品介绍 在线订购 企业服务
<%If Request.QueryString("step")="again" then %>

该用户名已经被注册,请用其它用户名注册!

<% end if %> name="form_user" method="post" onSubmit="return check_form()">
会员注册
用户名:
*
用户密码:
*
验证密码:
*
注:1.用户名可以是4-16个字符也可以是中文名字.
  2.带*的框为必填项,不能为空。请用户正确填写以上表单,本网站将检验你的用户名是否存在。
<% Conn.close set Conn = nothing %>

欢迎您加入科迅电子大家庭
  您知道吗?
您加入科迅大家庭,能享受到如下服务:
  1.将自己所在的公司加注到企业名录,就象到“114”查询台登了记,开辟了一个向外界宣传企业的新窗口。依托科迅主页强大的数据库功能,您的信息能被不同国家、不同地区的数以万计的用户检索到。
  2.随时发布企业的供求和合作信息,让您无须投入即可轻松把握互联网时代的无限商机,坐等定单到来。
  3.在科迅投放Banner广告,向科迅下广告订单。在人气旺盛的科迅主页做广告,是网站营销的一个好方法。
  4.参与科迅论坛,就企业上网等专题发表您的高见。
  5.在科迅聊天室与不能见面的商业伙伴或者同窗好友聊天,不失为一种享受。
  
 
建议使用IE5.0浏览器、分辨率800*600以上观看  
科迅电子电器有限公司 版权所有
Copyright (C) 2002 Kesun All rights reserved