欧美日本一区二区,日韩一区二区三,任我爽精品视频在线播放

讓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文件鏈接數(shù)據(jù)庫
   例子如下
   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:

下面兩種鏈接數(shù)據(jù)庫的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
  %>

標簽：麗江懷化成都天津公主嶺內(nèi)江重慶臺灣

巨人網(wǎng)絡通訊聲明：本文標題《讓ASP搭配MYSQL》，本文關鍵詞讓,ASP,搭配,MYSQL,讓,ASP,搭配,；如發(fā)現(xiàn)本文內(nèi)容存在版權問題，煩請?zhí)峁┫嚓P信息告之我們，我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡，涉及言論、版權與本站無關。

校园春色亚洲色图_亚洲视频分类_中文字幕精品一区二区精品_麻豆一区区三区四区产品精品蜜桃

讓ASP搭配MYSQL