static ADOX.DataTypeEnum GetAccessFormats(DataColumn col) { switch (col.DataType.Name) { case "Boolean" : return ADOX.DataTypeEnum.adBoolean; case "Byte" : return ADOX.DataTypeEnum.adUnsignedTinyInt; case "Char" : return ADOX.DataTypeEnum.adVarWChar; case "DateTime" : return ADOX.DataTypeEnum.adDate; case "Decimal" : return ADOX.DataTypeEnum.adDecimal; case "Double" : return ADOX.DataTypeEnum.adDouble; case "Int16" : return ADOX

public string ConvertFieldToUpper( string MyTable, string MyField) { Access.Application oAccess = ((Access.Application) (Marshal.GetActiveObject( "Access.Application" ))); try { string strSQL; strSQL = String.Format( "UPDATE {0} SET {1} = UCase([{1}])" , MyTable, MyField); oAccess.DoCmd.RunSQL(strSQL.ToString(), null ); return "OK" ; } catch (Exception) { throw ; } finally { Marshal.ReleaseComObject(oAccess); } } public string ConvertFieldToLower( string MyTable, string

/// <summary> /// /// </summary> /// <param name="hideNavigationPane"></param> /// <param name="myUIName"></param> /// <param name="myUIXML"></param> /// <returns>True/False</returns> public bool InitializeDatabase( bool hideNavigationPane, string myUIName, string myUIXML) { Access.Application oAccess = ((Access.Application) (Marshal.GetActiveObject( "Access.Application" ))); try { oAccess.SetOption

public bool ConvertReportToXPS( string myReport, string XPSFileName) { Access.Application oAccess = ((Access.Application) (Marshal.GetActiveObject( "Access.Application" ))); try { oAccess.DoCmd.OutputTo(Access.AcOutputObjectType.acOutputReport, myReport, Access.Constants.acFormatXPS, XPSFileName, System.Type.Missing, System.Type.Missing, System.Type.Missing); return true ; } catch (Exception) { throw ; } finally { Marshal.ReleaseComObject(oAccess); } }

public bool TablesAreEqual( string MyTableSource, string MyTableToCompare, string MyIndexField) { try { OleDbConnection cnn; using (DataSet ds = new DataSet()) { OleDbDataAdapter da; string cs = oAccess.CurrentProject.Connection.ToString(); string strSQL = String.Format( "SELECT * FROM {0} LEFT JOIN {1} ON {0}.{2} = {1}.{2}WHERE {1}.{2} Is Null" , MyTableSource, MyTableToCompare, MyIndexField); cnn = new OleDbConnection(cs); da = new OleDbDataAdapter(strSQL, cnn); da.Fill(ds); if (ds.Tables

Access.Application oAccess = ((Access.Application)                 (Marshal.GetActiveObject("Access.Application"))); // ---------------------------------------------------------------------------------------- // Author: Joao Tito Livio // Company: MACL // Assembly version: 0.0.* // Date: 21-04-2009 // Time: 23:47 // Project Item Name: M3DatabaseUtilities.cs // Project Item Filename: M3DatabaseUtilities.cs // Project

public bool ExecuteSqlFromFile(String MyConnectionString, String MyTextFilePath) { using (OleDbConnection sqlConnection = new OleDbConnection(MyConnectionString)) { OleDbCommand cmd = new OleDbCommand(); try { using (StreamReader fh = new StreamReader(MyTextFilePath)) { String MyText; string s; while ((s = fh.ReadLine()) != null ) MyText = s; fh.Close(); cmd.CommandText = s; } cmd.CommandType = CommandType.Text; cmd.Connection = sqlConnection; sqlConnection.Open(); cmd.ExecuteNonQuery(); sqlConnection

  // ---------------------------------------------------------------------------------------- // Author: Joao Tito Livio // Company: MACL // Assembly version: 0.0.* // Date: 21-04-2009 // Time: 23:55 // Project Item Name: M3Data.cs // Project Item Filename: M3Data.cs // Project Item Kind: Code // Class FullName: Macl.M3Data // Class Name: M3Data // Class Kind Description: Class // Class Kind Keyword: class // Procedure FullName: Macl.M3Data.ReturnRecordset // Procedure Name: ReturnRecordset

/// <summary> /// /// </summary> /// <param name="MyPath"></param> /// <returns>True/False</returns> public bool GenerateLogDatabase( string myPath) { CatalogClass cat = new CatalogClass(); string strSQL; string cs; try { cs = "Provider=Microsoft.Jet.OLEDB.4.0;" + "Data Source=" + myPath + ";" + "Jet OLEDB:Engine Type=5" ; strSQL = "CREATE TABLE Issues (mID AUTOINCREMENT, mUser TEXT(100) NOT NULL " + "

Great News SharePoint Designer 2007 is now FREE! Get it here