conn.asp

这是一个最常用的flash程序

<%
'--------------------------------------------------------------
 Dbname = "../data/flash.asp"          '更改数据库文件位置，强烈建议更改为.asp的文件！
 Set Conn = Server.CreateObject("ADODB.Connection")
 Connstr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.Mappath(Dbname)
 Conn.Open Connstr

'------------------------------------------------------------
 Set List = Conn.Execute("Select * From System")
 WebName = List("WebName")
 WebUrl = List("WebUrl")
 webemail = List("webemail")
 zzname = List("zzname")
 qq = List("webqq")

%>