[原]基于Linux使用ASP连接MySQL

操作系统：红旗DC Server 5.0 for x86 SP2
应用软件：ASP
中间环境：iASP 2.1.1
数据库：Mysql 4.1

# mysql
mysql>CREATE DATABASE `testdb` DEFAULT CHARACTER SET gbk COLLATE gbk_chinese_ci;

mysql>set names 'gbk';

mysql> use testdb;
mysql>CREATE TABLE `Customers` (
`CustomerID` int(3) NOT NULL default '0',
`CompanyName` varchar(100) NOT NULL default '',
`ContactName` varchar(100) NOT NULL default '',
PRIMARY KEY  (`CustomerID`)
) ENGINE=MyISAM DEFAULT CHARSET=gbk;

mysql>insert into Customers (CustomerID,CompanyName,ContactName) values (1,'华南理工大学','广州市五山路168号'),(2,'中山大学','广州市晓港路88号');

mysql> set names 'gbk';
mysql> select * from Customers;
+————+————–+——————-+
| CustomerID | CompanyName  | ContactName       |
+————+————–+——————-+
|          1 | 华南理工大学 | 广州市五山路168号 |
|          2 | 中山大学     | 广州市晓港路88号  |
+————+————–+——————-+
2 rows in set (0.00 sec)

mysql>grant all on testdb.* to linuxing@'localhost' identified by 'redflag';
mysql> flush privileges;

/usr/java/j2re1.4.2/bin/java -mx32768000 -classpath /usr/java/j2re1.4.2/bin/../lib/classes.zip:/usr/java/j2re1.4.2/bin/../lib/tools.jar:/usr/iasp/iasp21/lib/jsdk.jar:/usr/iasp/iasp21/lib/iasplib.jar:/usr/iasp/iasp21/lib/activation.jar:/usr/iasp/iasp21/lib/asp2j.jar:/usr/iasp/iasp21/lib/rjax.jar:/usr/iasp/iasp21/lib/ejbcorba.jar:/usr/iasp/iasp21/lib/jndi.jar:/usr/iasp/iasp21/lib/samples.jar:/usr/iasp/iasp21/lib/hado.jar:/usr/iasp/iasp21/lib/pop3.jar:/usr/iasp/iasp21/lib/mail.jar:/usr/iasp/iasp21/lib/iasp_fileup.jar:/usr/iasp/iasp21/lib/iasp_mail.jar:/usr/iasp/iasp21/lib/iasp_grid.jar:/usr/iasp/iasp21/lib/iasp_nntp.jar:/usr/iasp/iasp21/lib/iasp_exec.jar:/usr/iasp/iasp21/lib/iasp_inet.jar:/usr/iasp/iasp21/lib/iasp_upload.jar:/usr/iasp/iasp21/lib/iasp_http.jar:/usr/iasp/iasp21/lib/iasp_pop3.jar:/usr/iasp/iasp21/lib/iasp_chart.jar:/usr/iasp/iasp21/lib/iasp_image.jar:/usr/iasp/iasp21/lib/iasp_sock.jar:/usr/iasp/iasp21/lib/iasp_xmldom.jar:/usr/iasp/iasp21/servlets:/usr/iasp/iasp21/lib/rjaxADODB.jar:/opt/msSQLjdbc/lib/msbase.jar:/opt/msSQLjdbc/lib/mssqlserver.jar:/opt/msSQLjdbc/lib/msutil.jar:/usr/iasp/iasp21/lib/mysql-connector-java-5.0.7-bin.jar servlet.http.HttpServer

<%
dim Sql_Server,Sql_User,Sql_Pass,Sql_Data
Sql_Server="192.168.228.223"
Sql_User="sa"
Sql_Pass="redflag"
Sql_Data="testdb"

dim my_Conn,connstr
'connstr="PROVIDER=SQLOLEDB;DATA SOURCE="&Sql_Server&";UID="&Sql_User&";PWD="&Sql_Pass&";DATABASE="&Sql_Data
'下面定义连接到Mysql数据库的方式
connstr="DRIVER=com.mysql.jdbc.Driver;URL={jdbc:mysql://127.0.0.1:3306/testdb};uid=linuxing;pwd=redflag"
set my_Conn=server.CreateObject("ADODB.connection")
my_Conn.open(connstr)

sub CloseConn()
my_Conn.close
set my_Conn=nothing
end sub
%>

<table>
<tr>
<td>公司ID</td>
<td>公司名</td>
<td>联系方式</td>  
</tr>
<%
Dim rs
Set rs=my_Conn.Execute("Select CustomerID,CompanyName,ContactName From Customers")
Do While Not Rs.Eof

%>
<tr>
<td><%=rs("CustomerID")%></td>
<td><%=rs("CompanyName")%></td>
<td><%=rs("ContactName")%></td>  
</tr>
<%
rs.Movenext
Loop
Set rs=Nothing
%>