ASP链接MYSQL并读取数据的程序

发表于:2007-06-30来源:作者:点击数: 标签:
% @#ASP链接MY SQL 的程序 @#需要装MYSQLODBC驱动 下载地址 @#E-MAIL:Kaxue@Hotmail.com QQ:484110 HOMEPAGE:www.Flyday .net @#整理时间:Thursday, May 23, 2002 5:54 PM WIN2000SERVER+IIS5 测式通过 strConnection = "dsn=user" @#strconnection="Defaul
<%
  @#ASP链接MYSQL的程序
  @#需要装MYSQLODBC驱动 下载地址
  @#E-MAIL:Kaxue@Hotmail.com QQ:484110 HOMEPAGE:www.Flyday.net
  @#整理时间:Thursday, May 23, 2002 5:54 PM WIN2000SERVER+IIS5 测式通过
  strConnection = "dsn=user"
  @#strconnection="DefaultDir=;Driver={myodbc driver};database=bbs"
  Set adoDataConn = Server.CreateObject("ADODB.Connection")
  adoDataConn.Open strConnection

strQuery = "SELECT * FROM user where username="kaxi""
  Set rs= Server.CreateObject("ADODB.Recordset")
  rs.open strQuery,strConnection,2,1

response.write rs.recordcount
  If Not rs.BOF Then
  %>
  <TABLE><TR><TD<b>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("对不起,没有找到您需要的数据")
  End If

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

原文转自:http://www.ltesting.net