本文共 1621 字,大约阅读时间需要 5 分钟。
Function CreateSecuredMdbRecordset( 数据库文件名, 数据表名或Select语句,password )
Dim conn,Provider,DBPath
‘ 建立Connection 对象
Set conn = Server.CreateObject("ADODB.Connection")Provider = "Provider=Microsoft.Jet.OLEDB.4.0;"DBPath = "Data Source=" & Server.MapPath( "数据库文件名" )‘ 连接数据库,注意下面一行带有密码参数conn.Open Provider & DBPath&”Jet OLEDB:Database Password=”&asswordSet CreateSecuredMdbRecordset = Server.CreateObject("ADODB.Recordset")‘ 打开数据表,参数二为Connection对象CreateSecuredMdbRecordset.Open "数据表名", conn, 2, 2End Function
3)DBF文件不是一个标准的数据库文件,只相当于标准数据库文件中的一个数据表,所以为了使用DBF文件,采用把所
有的DBF文件放在一个目录下,这样把目录名看成标准数据中的数据库表,每一个DBF文件相当于标准数据库的数据表。下面函数中Directory是DBF所在的目录名,Function CreateDbfRecordset( 目录名, DBF文件名或Select语句 )
Dim conn,Driver,SourceType,DBPath
‘ 建立Connection 对象
Set conn = Server.CreateObject("ADODB.Connection")Driver = "Driver={Microsoft Visual FoxPro Driver};"SourceType = "SourceType=DBF;"DBPath = "SourceDB=" & Server.MapPath( "目录名" )‘ 调用Open 方法打开数据库
conn.Open Driver & SourceType & DBPathSet CreateDbfRecordset = Server.CreateObject("ADODB.Recordset")
‘ 打开DBF文件,参数二为Connection对象CreateDbfRecordset.Open DBF文件名或Select语句, conn, 2, 2End Function
4)由Foxpro生成的DBC数据库与MDB数据库相似,都是一个数据库包含几个数据表的形式,所以对DBC数据库的存取方
法与MDB数据库相似。Function CreateDbcRecordset( DBC数据库文件名, 数据表名或Select语句 )
Dim conn,Driver,SourceType,DBPath
‘ 建立Connection 对象
Set conn = Server.CreateObject("ADODB.Connection")Driver = "Driver={Microsoft Visual FoxPro Driver};"SourceType = "SourceType=DBC;"来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10294527/viewspace-124395/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/10294527/viewspace-124395/