Public dbConnection as object, accessRights as string\r
Public LastErrorMsg as String\r
Public defaultDB as String = "Northwind"\r
-Public const dbDialect = "TSQL" ' What kind of database are we connecting to?\r
+Public const dbDialect = "Access" ' What kind of database are we connecting to?\r
\r
\r
Public Function OpenDB()\r
try\r
select case dbDialect\r
case "Access": dbConnection = new OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("../data/" & defaultDB & ".mdb") & ";User ID=;Password=;")\r
- case "TSQL": dbConnection = new SqlConnection("Data Source=mbrown27;User ID=userid;Password=password;Initial Catalog=" & defaultDB & ";")\r
+ case "TSQL": dbConnection = new SqlConnection("Data Source=MATTSPROBOOK\SQLEXPRESS;User ID=userid;Password=password;Initial Catalog=" & defaultDB & ";")\r
case "Oracle": dbConnection = new OleDbConnection("Provider=OraOLEDB.Oracle;Data Source=XE;User ID=" & defaultDB & ";Password=Password;")\r
case "MySQL": dbConnection = new OdbcConnection("DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=" & defaultDB & ";USER=userid;PASSWORD=password;")\r
case "DB2": dbConnection = new OleDbConnection("Provider=IBMDADB2;Data Source=NORTHWND;Protocol=local;CurrentSchema=SCHEMA;User ID=userid;Password=password;")\r