例6－12.txt

web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习 的好资料

<!-- #INCLUDE file=" ADOVBS.inc"-->
<%
Set Conn=Server.CreateObject("ADODB.Connection") 
Conn.Open "MyData" 
'执行一个有结果返回的SQL命令
Set RS=Conn.Execute("SELECT * FROM sales", RecCount , AdCMDText) 
RS.Close
Conn.Close
%>