vb.net查询更新添加删除access数据库(标准化类库)部分代码:ImportsSystemImportsSystem.Data.SqlClientImportsSystem.ConfigurationImportsSystem.Collections.GenericImportsSystem.TextImportsSystem.DataImportsSystem.Configuration.ConfigurationSettingsImportsSystem.Data.OleDbPublicClassDatabasePrivateConnStrAsStringPrivateAcConnAsOleDbConnection''''''数据库连接路径及方式''''''SubNew()'ConnStr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Application.StartupPath&"\Test.mdb;PersistSecurityInfo=False"ConnStr="Provider=Microsoft.ACE.OLEDB.12.0;DataSource="&Application.StartupPath&"\Test.accdb;PersistSecurityInfo=False"EndSubSubNew(ByValOleConnStrAsString)ConnStr=OleConnStrEndSubSubNew(ByValAcessVisionAsString,ByValDataSourceAsString,ByValPersistInfoAsString)'connectionString=System.Configuration.ConfigurationSettings.GetConfig("Supermarket")'连接2010数据库'connectionString="Provider=Microsoft.ACE.OLEDB.12.0;DataSource=F:\GCU.accdb"'连接03-07数据库ConnStr="Provider="&AcessVision&";DataSource="&DataSource&";PersistSecurityInfo="&PersistInfoEndSub''''''数据库连接字符串''''''''''''PublicPropertyOleConnStr()AsStringGetReturnConnStrEndGetSet(ByValvalueAsString)ConnStr=valueEndSetEndProperty
1