一个完美的搭配ASP+MYSQL

在ASP编程中，怎样使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 
  %> 
  

 
   
   
   
   
     Do While Not rs.EOF 
  %> 
   
   
   
   
     rs.MoveNext 
  Loop 
  %> 
  

username	password

 
     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 
  %> 
   
   
   
   
   
     Do While Not rs.EOF 
  %> 
   
   
   
   
     rs.MoveNext 
  Loop 
  %> 
  

username	password

 
     Else 
  Response.Write("Sorry, no data found.") 
  End If 

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

通过学习了以上小编给大家带来的关于“一个完美的搭配ASP+MYSQL”内容后，大家对此是不是有了不一样的了解呢！更多详情咨询尽在js.aizhan.com。