征集用VB+ADO打开各种数据库的连接方法,请各路高手帮忙!
Yang_ 2002-05-09 08:24:12 问题是这样的,一个软件需要和用户原有的数据库接口,但用户的数据库可能是各种各样的,现在想做一个接口程序,让用户选择数据库的类型,输入服务器名称(或者目录)、数据库名称、表名、需要交流的各数据的字段名、用户名、密码,接口程序打开用户数据库,添加或者读取用户数据库数据。但环境有限,不可能什么数据库都可以安装,有些数据库可能我都没有听说过。由于用户的类型多样,不想用ODBC和DSN。
请各路高手提供类似这样的信息:
SQL SERVER :
连接串:"Provider=sqloledb;Data Source=" & ServerName & ";Initial Catalog=" & DatabasName & ";User Id=" & UserName & ";password=" & PassWord & "; "
插入语句:"insert into " & TableName & "(" & FieldNameChar & "," & FieldNameNum & "," & FieldNameDate & ") values ('Yang_',100,'2002-5-9')"
查询语句:"select " & FieldNameChar & "," & FieldNameNum & "," & FieldNameDate & " from " & TableName & " where " & FieldNameChar & "='Yang_' and " & FieldNameBum & "=100 and " & FieldNameDate & " butween '2002-5-9' and '2002-5-20'"
Access :
连接串:"Provider=MSDASQL.1;Persist Security Info=False;Extended Properties=DBQ=" & ServerName & DataBaseName & ";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UID=" & UserName & ";UserCommitSync=Yes; PWD=" & PassWord & ";"
插入语句:"insert into " & TableName & "(" & FieldNameChar & "," & FieldNameNum & "," & FieldNameDate & ") values ('Yang_',100,#2002-5-9#)"
查询语句:"select " & FieldNameChar & "," & FieldNameNum & "," & FieldNameDate & " from " & TableName & " where " & FieldNameChar & "='Yang_' and " & FieldNameBum & "=100 and " & FieldNameDate & " butween #2002-5-9# and #2002-5-20#"
我现在才搞定SQL SERVER 和ACCESS,其他的请大家帮忙,重点是ORACLE、SYBASE、MYSQL、INTERBASE、DB2、Paradox、文本文件、EXCEL、DBF等,可能还有其他许多我没有听说过的数据库,也多谢提供。
如果嫌麻烦,写成其他格式也可以,只要估计我能看懂,看不懂时我再问。
谢谢!