主页 > 知识库 > 让ASP搭配MYSQL

让ASP搭配MYSQL

热门标签:服务器配置 科大讯飞语音识别系统 银行业务 Linux服务器 团购网站 阿里云 Mysql连接数设置 电子围栏
让ASP搭配MYSQL

所需要工具

   mysql-4.1.11-win32
   myodbc-3.51.11-1-dll
   myodbc-3.51.11-1-win
   mysqlcc-0.9.4-win32

-------------------------------------------------------------------

注册文件Mydbc.reg

   REGEDIT4 

   [HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\myodbc driver] 
   "UsageCount"=dword:00000002 
   "Driver"="C:\\WINDOWS\\System\\myodbc.dll" 
   "Setup"="C:\\WINDOWS\\System\\myodbc.dll" 
   "SQLLevel"="1" 
   "FileUsage"="0" 
   "DriverODBCVer"="03.51" 
   "ConnectFunctions"="YYY" 
   "APILevel"="1" 
   "CpTimeout"="120" 
   [HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBCINST.INI\ODBC Drivers] 
   "myodbc driver"="installed" 

-------------------------------------------------------------------

建立ASP文件链接数据库
   例子如下
   Windows DSN name: 所要建立DSN的名称 
   Mysql Host (name or ip):Mysql服务器的名称或者是IP地址,通常填localhost 
   Mysql database name: admin
   Database: admin 
   password: 000000 
   Port(if not 3306): 
   SQL command on connect: 


下面两种链接数据库的ASP代码

1. 使用DSN
   % 
  strConnection = "dsn=admin;driver={myodbd driver};server=localhost;uid=root;pwd=000000;database=admin" 
  Set adoDataConn = Server.CreateObject("ADODB.Connection") 
  adoDataConn.Open strConnection 

  strQuery = "SELECT * FROM user" 
  Set rs = adoDataConn.Execute(strQuery) 
  If Not rs.BOF Then 
  %> 
  TABLE> 
  TR> 
  TDb>username/b>/TD> 
  TD>b>password/b>/TD> 
  /TR> 
  % 
  Do While Not rs.EOF 
  %> 
  TR> 
  TD>%=rs("username")%>/TD> 
  TD>%=rs("password")%>/TD> 
  /TR> 
  % 
  rs.MoveNext 
  Loop 
  %> 
  /TABLE> 
  % 
  Else 
  Response.Write("Sorry, no data found.") 
  End If 

  rs.Close 
  adoDataConn.Close 
  Set adoDataConn = Nothing 
  Set rsEmailData = Nothing 
  %> 


2. 不使用DSN
   % 
  strconnection="DefaultDir=;Driver={myodbc driver};database=admin" 
  Set adoDataConn = Server.CreateObject("ADODB.Connection") 
  adoDataConn.Open strConnection 

  strQuery = "SELECT * FROM user" 
  Set rs = adoDataConn.Execute(strQuery) 
  If Not rs.BOF Then 
  %> 
  TABLE> 
  TR> 
  TDb>username/b>/TD> 
  TD>b>password/b>/TD> 
  /TR> 
  % 
  Do While Not rs.EOF 
  %> 
  TR> 
  TD>%=rs("username")%>/TD> 
  TD>%=rs("password")%>/TD> 
  /TR> 
  % 
  rs.MoveNext 
  Loop 
  %> 
  /TABLE> 
  % 
  Else 
  Response.Write("Sorry, no data found.") 
  End If 

  rs.Close 
  adoDataConn.Close 
  Set adoDataConn = Nothing 
  Set rsEmailData = Nothing 
  %> 

标签:蚌埠 衢州 衡水 枣庄 萍乡 大理 江苏 广元

巨人网络通讯声明:本文标题《让ASP搭配MYSQL》,本文关键词  ;如发现本文内容存在版权问题,烦请提供相关信息告之我们,我们将及时沟通与处理。本站内容系统采集于网络,涉及言论、版权与本站无关。
  • 相关文章
  • 收缩
    • 微信客服
    • 微信二维码
    • 电话咨询

    • 400-1100-266