换数据库了...由原来的MSSQL换成了MYSQL,一段sqlserver的代码怎么转换成MYSQL的代码啊..asp语言的..<%
    'dim p5_Pid,p2_Order
 pd_FrpId=request("pd_FrpId")
  if pd_FrpId="" then
  response.Write("<script language='javascript'>alert('请选择您的信息!');history.go(-1)</script>")
  response.End()
  end if 
 p2_Order=request("p2_Order")
     if p2_Order="" then
         response.Write("<script language='javascript'>alert('操作错误!');window.close();</script>")
   response.End()
  end if
 p5_Pid=request("p5_Pid")
  if p5_Pid="" then
   response.Write("<script language='javascript'>alert('请填写好您的帐号!');hsitry.go(-1);</script>")
   response.End()
  end if
 SqlConnectionString="DRIVER={SQL Server};SERVER=.;UID=root;PWD=xxxxxx;DATABASE=xxxxxx;"
 Set Conn= Server.CreateObject("ADODB.Connection")
 Conn.Open SqlConnectionString 
    set rs=conn.execute("select top 1 * from Users where UserName='"& p5_Pid &"'")
 if rs.eof then
 response.Write("<script language='javascript'>alert('对不起没有此用户,请重新确认!');history.go(-1);</script>")
 response.End()
 else
 useriid=rs("ID")
 end if
'CardNo,CardPass,CardTypeID,BatchNo,Nullity,CreateDate,UseDate,UserID,Accounts
    set rs=conn.execute("select * from Card where CardNo='"& p2_Order &"'")
 if rs.eof then
    set rs=conn.execute("insert into Card (CardNo,CardPass,CardTypeID,BatchNo,Nullity,CreateDate,ID,UserName) values ('"& p2_Order &"','c93ccd78b2076528346216b3b2f701e6',0,0,'"& false &"','"& date() &"','"& useriid &"','"& p5_Pid &"')")
    end if 
 p5_Pid=cstr(useriid)
%>

解决方案 »

  1.   

    建议楼主直接贴SQL语句而不是ASP代码。 这个懂数据库的人就可以帮你看了。否则你必须等愿意分析你的代码的人来
      

  2.   

    修改sql server连接字符串改为mysql的连接字符串。
      

  3.   

    楼主这段代码。只要把数据库连接换一下就可以了。其它的都代码可以不做变动。其它的文件,那就要根据情况进行更换SQL代码了。具体ASP连接MYSQL的字符串为:SqlConnectionString="DRIVER={Mysql ODBC 3.51 Driver};SERVER=127.0.0.1;UID=root;password=xxxxxx;DATABASE=xxxxxx;stmt=set names 'GBK'"注意,你服务器必须 装了Mysql ODBC 3.51驱动。如果是装的5.1的驱动,就把3.51改为5.1的
      

  4.   

    1、SqlConnectionString="DRIVER={mysql odbc 3.5.1 driver};SERVER=.;UID=root;PWD=xxxxxx;DATABASE=xxxxxx;"
     Set Conn= Server.CreateObject("ADODB.Connection")
     Conn.Open SqlConnectionString2、部分查询语句也要修改的
      set rs=conn.execute("select * from Users where UserName='"& p5_Pid &"'" limit 5)