617 lines
		
	
	
		
			24 KiB
		
	
	
	
		
			C#
		
	
	
	
	
	
			
		
		
	
	
			617 lines
		
	
	
		
			24 KiB
		
	
	
	
		
			C#
		
	
	
	
	
	
| using System;
 | |
| using System.Collections.Generic;
 | |
| using System.ComponentModel;
 | |
| using System.Data;
 | |
| using System.IO;
 | |
| using System.Drawing;
 | |
| using System.Linq;
 | |
| using System.Text;
 | |
| using System.Threading.Tasks;
 | |
| using System.Windows.Forms;
 | |
| using System.Data.SqlClient;
 | |
| using System.Data.OleDb;
 | |
| using Volian.Base.Library;
 | |
| 
 | |
| [assembly: log4net.Config.XmlConfigurator(Watch = true)]
 | |
| 
 | |
| //RoAccessToSql is the program to be used to convert Referenced Object data that is stored in a Microsoft Access database to a sql database.
 | |
| //	Input to this program is:
 | |
| //		/acc=<pathname where romaster.mdb is stored>
 | |
| //		/sqldb=<name of sql database to use, this program appends a '_RO' to it>
 | |
| //		/server=<server name>
 | |
| //	for example:  'RoAccessSql /acc=D:\Backup2012\APP\RO /sqldb=VEPROMS_APP /server=.\sqlexpress_2012'
 | |
| // 
 | |
| // Some things to  note:
 | |
| //	1) the database must exist in the server and must have the 'roall' table and stored procedures. It cannot have any data.
 | |
| //	2) no ro images are stored. These will continue to be used as before
 | |
| //	3) log4net is used for errors, it is stored in the same place as the Proms error log
 | |
| //	4) The program can be run standalone, but if run from Proms, the database name, server and romaster.mdb path will be initialized based on the rodb selected
 | |
| //	5) Data in sql is stored in only one table, 'roall'.  It as a column for the table from which it came.
 | |
| 
 | |
| namespace RoAccessToSql
 | |
| {
 | |
| 	public partial class RoAccessToSql : Form
 | |
| 	{
 | |
| 		private static readonly log4net.ILog _MyLog = log4net.LogManager.GetLogger(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
 | |
| 		private string _MSAccessPath = null;
 | |
| 		public string MSAccessPath
 | |
| 		{
 | |
| 			get { return _MSAccessPath; }
 | |
| 			set { _MSAccessPath = value; }
 | |
| 		}
 | |
| 		private string _SqlServerName = null;
 | |
| 		public string SqlServerName
 | |
| 		{
 | |
| 			get { return _SqlServerName; }
 | |
| 			set { _SqlServerName = value; }
 | |
| 		}
 | |
| 		private string _SqlDatabaseName = null;
 | |
| 		public string SqlDatabaseName
 | |
| 		{
 | |
| 			get { return _SqlDatabaseName; }
 | |
| 			set { _SqlDatabaseName = value; }
 | |
| 		}
 | |
| 		bool _Initializing = false;
 | |
| 
 | |
| 		public RoAccessToSql(string[] args)
 | |
| 		{
 | |
| 			_Initializing = true;
 | |
| 			InitializeComponent();
 | |
| 			
 | |
| 			foreach (string parm in args)			// get access & sql database info from program arguments, or use defaults
 | |
| 			{
 | |
| 				if (parm.StartsWith("/acc="))
 | |
| 				{
 | |
| 					MSAccessPath = parm.Substring(5);
 | |
| 				}
 | |
| 				else if (parm.StartsWith("/sqldb="))
 | |
| 				{
 | |
| 					SqlDatabaseName = parm.Substring(7) + "_RO";
 | |
| 				}
 | |
| 				else if (parm.StartsWith("/server="))
 | |
| 				{
 | |
| 					SqlServerName = parm.Substring(8);
 | |
| 				}
 | |
| 			}
 | |
| 			if (MSAccessPath != null && !(Directory.Exists(MSAccessPath)))
 | |
| 			{
 | |
| 				MessageBox.Show("Invalid MS Access path, cannot convert. Fix before running conversion");
 | |
| 				if (MSAccessPath != null) tbAccessPath.Text = MSAccessPath;
 | |
| 			}
 | |
| 			else
 | |
| 				tbAccessPath.Text = MSAccessPath;
 | |
| 			if (SqlServerName == null)
 | |
| 			{
 | |
| 				SqlServerName = @".\sqlserver";
 | |
| 			}
 | |
| 			tbSqlServerName.Text = SqlServerName;
 | |
| 			if (SqlDatabaseName == null)
 | |
| 			{
 | |
| 				SqlDatabaseName = "VEPROMS_RO";
 | |
| 			}
 | |
| 			if (UserInRoEditor()) this.Close();
 | |
| 			tbSqlDbName.Text = SqlDatabaseName;
 | |
| 			_TmpFileForConnectStr = Path.GetTempPath();
 | |
| 			_TmpFileForConnectStr = _TmpFileForConnectStr + @"\PromsConnect.txt";
 | |
| 			File.Delete(_TmpFileForConnectStr);
 | |
| 			_Initializing = false;
 | |
| 		}
 | |
| 
 | |
| 		private bool UserInRoEditor()
 | |
| 		{
 | |
| 			FileInfo fiown = null;
 | |
| 			FileStream fsown = null;
 | |
| 			// The following code was taken from the roeditor. It uses the 'RoEditor.own' file to assure that
 | |
| 			// no one is in the roeditor. This file is located in the microsoft access database directory.
 | |
| 			try
 | |
| 			{
 | |
| 				string filename = MSAccessPath + @"\RoEditor.own";
 | |
| 				fiown = new FileInfo(filename);
 | |
| 				try
 | |
| 				{
 | |
| 					// Try to delete the owner file.  If another process has the file open, this delete will fail.
 | |
| 					// If the file is closed, it will be deleted, and the user will be placed in the editor.  The users
 | |
| 					// name and the time when this session began will be placed in the owner file.
 | |
| 					fiown.Delete();
 | |
| 				}
 | |
| 				catch (Exception ex)
 | |
| 				{
 | |
| 					fsown = fiown.Open(FileMode.Open, FileAccess.Read, FileShare.ReadWrite);
 | |
| 					TextReader tr1 = new StreamReader(fsown);
 | |
| 					string who1 = tr1.ReadToEnd();
 | |
| 					MessageBox.Show(ex.Message + "\r\n\r\n" + who1, "RO Editor In Use", MessageBoxButtons.OK, MessageBoxIcon.Exclamation);
 | |
| 				}
 | |
| 				fsown = fiown.Open(FileMode.OpenOrCreate, FileAccess.Read, FileShare.ReadWrite);
 | |
| 				TextReader tr = new StreamReader(fsown);
 | |
| 				string who = tr.ReadToEnd();
 | |
| 				tr.Close();
 | |
| 				if (who.Contains(Environment.UserName.ToUpper()))
 | |
| 				{
 | |
| 					return true;
 | |
| 				}
 | |
| 			}
 | |
| 			catch (Exception e)
 | |
| 			{
 | |
| 				MessageBox.Show(e.Message, "fileinfo");
 | |
| 			}
 | |
| 			// Open the file just specified. Open it so that no-one else can use it
 | |
| 			try
 | |
| 			{
 | |
| 				fsown = fiown.Open(FileMode.Create, FileAccess.ReadWrite, FileShare.Read);
 | |
| 				TextWriter tw = new StreamWriter(fsown);
 | |
| 				tw.WriteLine("Current User:  {0}, Date and Time Started:  {1}", Environment.UserName.ToUpper(), DateTime.Now.ToString("MM/dd/yyyy @ hh:mm"));
 | |
| 				tw.Flush();
 | |
| 			}
 | |
| 			catch (IOException ex)
 | |
| 			{
 | |
| 				fsown = fiown.Open(FileMode.Open, FileAccess.Read, FileShare.ReadWrite);
 | |
| 				TextReader tr = new StreamReader(fsown);
 | |
| 				string who = tr.ReadToEnd();
 | |
| 				tr.Close();
 | |
| 				if (!who.Contains(Environment.UserName.ToUpper()))
 | |
| 					MessageBox.Show(who, "Another user is executing the RoEditor");
 | |
| 				return true;
 | |
| 			}
 | |
| 			return false;
 | |
| 		}
 | |
| 		static string _ErrorLogFileName;
 | |
| 		public static string ErrorLogFileName
 | |
| 		{
 | |
| 			get { return _ErrorLogFileName; }
 | |
| 			set { _ErrorLogFileName = value; }
 | |
| 		}
 | |
| 		// make error log file name (uses same logic as proms error log)
 | |
| 		static bool ChangeLogFileName(string AppenderName, string NewFilename)
 | |
| 		{
 | |
| 			log4net.Repository.ILoggerRepository RootRep;
 | |
| 			RootRep = log4net.LogManager.GetRepository();
 | |
| 			foreach (log4net.Appender.IAppender iApp in RootRep.GetAppenders())
 | |
| 			{
 | |
| 				if (iApp.Name.CompareTo(AppenderName) == 0
 | |
| 				&& iApp is log4net.Appender.FileAppender)
 | |
| 				{
 | |
| 					log4net.Appender.FileAppender fApp = (log4net.Appender.FileAppender)iApp;
 | |
| 					string folderPath = Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments);
 | |
| 					fApp.File = folderPath + @"\VEPROMS\" + (Volian.Base.Library.VlnSettings.GetCommand("prefix", "") + "_").TrimStart("_".ToCharArray()) + NewFilename;
 | |
| 					ErrorLogFileName = fApp.File;
 | |
| 					fApp.ActivateOptions();
 | |
| 					return true;
 | |
| 				}
 | |
| 			}
 | |
| 			return false;
 | |
| 		}
 | |
| 		// Browse to romaster.mdb (Microsoft access database)
 | |
| 		private void btnBrowse_Click(object sender, EventArgs e)
 | |
| 		{
 | |
| 			FolderBrowserDialog fbd = new FolderBrowserDialog();
 | |
| 			if (fbd.ShowDialog() == DialogResult.OK)
 | |
| 			{
 | |
| 				if (Directory.Exists(fbd.SelectedPath))
 | |
| 					tbAccessPath.Text = fbd.SelectedPath;
 | |
| 				else
 | |
| 					MessageBox.Show("Path doesn't exist " + tbAccessPath.Text);
 | |
| 			}
 | |
| 		}
 | |
| 		// Convert the data
 | |
| 		private void btnConvert_Click(object sender, EventArgs e)
 | |
| 		{
 | |
| 			if (!Directory.Exists(tbAccessPath.Text))
 | |
| 			{
 | |
| 				MessageBox.Show("Invalid Path to Access Database", "Cannot convert data");
 | |
| 				return;
 | |
| 			}
 | |
| 			bool canmigrate = TestConnection(false);
 | |
| 			if (!canmigrate) return;
 | |
| 			SetLogFileInfo();
 | |
| 			this.Cursor = Cursors.WaitCursor;
 | |
| 			MigrateData();
 | |
| 			this.Cursor = Cursors.Default;
 | |
| 		}
 | |
| 		// Setup the log file, including the name and adding Session beginning info to the log file
 | |
| 		private void SetLogFileInfo()
 | |
| 		{
 | |
| 			DateTime dtSunday = DateTime.Now.AddDays(-((int)DateTime.Now.DayOfWeek));
 | |
| 
 | |
| 			ChangeLogFileName("LogFileAppender", SqlDatabaseName + " " + dtSunday.ToString("yyyyMMdd") + " ErrorLog.txt");
 | |
| 			_MyLog.InfoFormat("\r\nSession Beginning\r\n<===={0}[SQL:{1:yyMM.ddHH}]====== User: {2}/{3} Started {4} ===============>{5}"
 | |
| 				, Application.ProductVersion, RevDate, DateTime.Now, Environment.UserDomainName, Environment.UserName, DateTime.Now.ToString("dddd MMMM d, yyyy h:mm:ss tt"), "");
 | |
| 		}
 | |
| 		private string _SqlConnectStr = null;
 | |
| 		// Start the migration process, this method checks for valid connections and calls MigrateTables to actually migrate the data
 | |
| 		private void MigrateData()
 | |
| 		{
 | |
| 			_SqlConnectStr = string.Format(@"Data Source={0};Initial Catalog={1};Integrated Security=True", SqlServerName, SqlDatabaseName);
 | |
| 			using (SqlConnection sqlConnection = new SqlConnection(_SqlConnectStr))
 | |
| 			{
 | |
| 				try
 | |
| 				{
 | |
| 					sqlConnection.Open();
 | |
| 					if (sqlConnection.State == ConnectionState.Open)
 | |
| 					{
 | |
| 						// now try to open access db:
 | |
| 						string strDatabaseConnectionCommand = "Provider=Microsoft.ACE.OLEDB.12.0;Password=\"\";User ID=Admin;Data Source=" + MSAccessPath + "\\ROMaster.mdb;Mode=Share Deny None;Extended Properties=\"\";Jet OLEDB:System database=\"\";Jet OLEDB:Registry Path=\"\";Jet OLEDB:Database Password=\"\";Jet OLEDB:Engine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:New Database Password=\"\";Jet OLEDB:Create System Database=False;Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False";
 | |
| 						using (OleDbConnection accessConnection = new OleDbConnection(strDatabaseConnectionCommand))
 | |
| 						{
 | |
| 							try
 | |
| 							{
 | |
| 								accessConnection.Open();
 | |
| 								if (accessConnection.State == ConnectionState.Open)
 | |
| 								{
 | |
| 									MigrateTables(accessConnection, sqlConnection);
 | |
| 									if (accessConnection.State == ConnectionState.Open) accessConnection.Close();
 | |
| 								}
 | |
| 							}
 | |
| 							catch (OleDbException ex)
 | |
| 							{
 | |
| 								_MyLog.Error("Access Connection failed.", ex);
 | |
| 								MessageBox.Show(ex.Message, "Access Connection failed.");
 | |
| 							}
 | |
| 						}
 | |
| 						if (sqlConnection.State == ConnectionState.Open) sqlConnection.Close();
 | |
| 					}
 | |
| 					else
 | |
| 					{
 | |
| 						_MyLog.Error("SQL Connection is not open. Check connection string: " + tbSqlDbName.Text);
 | |
| 						MessageBox.Show("Check connection string: " + tbSqlDbName.Text, "SQL Connection is not open.");
 | |
| 					}
 | |
| 				}
 | |
| 				catch (SqlException ex) 
 | |
| 				{
 | |
| 					_MyLog.Error("SQL Connection is not open. Check connection string: " + tbSqlDbName.Text);
 | |
| 					MessageBox.Show(ex.Message, "Unknown error when migrating RO data from MS Access to SQL");
 | |
| 				}
 | |
| 			}
 | |
| 		}
 | |
| 
 | |
| 		private void MigrateTables(OleDbConnection accessConnection, SqlConnection sqlConnection)
 | |
| 		{
 | |
| 			DateTime lastTimeDbs = DateTime.Now;
 | |
| 			DateTime lastTimeRos = DateTime.Now;
 | |
| 			List<string> allTables = new List<string>();
 | |
| 			List<string> allTablesText = new List<string>();
 | |
| 			// set up the Progress bars. The top one is for the tables and the bottom one tracks ros as migrated for the current table.
 | |
| 			int maxCntRo = GetRecordCountForTable("ROMaster", accessConnection);
 | |
| 			lastTimeDbs = ProgressBarUpdate(pBarDbs, null, 0, 1, 0, 0, lastTimeDbs, false);
 | |
| 			lastTimeRos = ProgressBarUpdate(pBarROs, null, 0, maxCntRo, 0, 0, lastTimeRos, false);
 | |
| 			lastTimeDbs = ProgressBarUpdate(pBarDbs, "ROMaster Table", 0, 5, 0, 1, lastTimeDbs, false);
 | |
| 			OleDbDataReader reader = null;
 | |
| 			OleDbCommand command = new OleDbCommand("select * from ROMaster", accessConnection);
 | |
| 			reader = command.ExecuteReader();
 | |
| 			// Do access's romaster table first so that the list of other tables to process is found.  While doing this, migrate this table's data.
 | |
| 			int cntRo = 0;
 | |
| 			int cntDb = 0;
 | |
| 			int maxCntDb = 0;
 | |
| 			while (reader.Read())				// reading from Access Database
 | |
| 			{
 | |
| 				string RecID = reader[0].ToString();
 | |
| 				int RecType = int.Parse(reader[1].ToString());
 | |
| 				string ParentID = reader[2].ToString();
 | |
| 				string AccPageID = reader[3].ToString();
 | |
| 				string ModDateTime = reader[4].ToString();
 | |
| 				string Info = reader[5].ToString();
 | |
| 				// Migrate the access record to sql
 | |
| 				AddRecordToRoAll(sqlConnection, RecID, RecType, ParentID, AccPageID, ModDateTime, Info, "ROMASTER");
 | |
| 				cntRo++;
 | |
| 				lastTimeRos = ProgressBarUpdate(pBarROs, "ROMaster", 0, maxCntRo, cntRo, 1, lastTimeRos, true);
 | |
| 				// store table names so that the progress bars can be managed.  Table names are at end of rectype=1 info's field
 | |
| 				if (RecType == 1)
 | |
| 				{
 | |
| 					int tabIndx = Info.LastIndexOf("\tRO");
 | |
| 					string tname = Info.Substring(tabIndx);
 | |
| 					allTables.Add(tname.Substring(1));
 | |
| 					allTablesText.Add(Info.Substring(0, tabIndx));
 | |
| 					maxCntDb++;
 | |
| 				}
 | |
| 			}
 | |
| 			lastTimeRos = ProgressBarUpdate(pBarROs, "ROMaster", 0, maxCntRo, maxCntRo, 1, lastTimeRos, true);
 | |
| 			lastTimeDbs = ProgressBarUpdate(pBarDbs, null, 0, maxCntDb, 0, 0, lastTimeDbs, false);
 | |
| 			reader.Close();
 | |
| 			reader = null;
 | |
| 			
 | |
| 			// now migrate all the tables that were found
 | |
| 			foreach (string tableName in allTables)
 | |
| 			{
 | |
| 				lastTimeRos = DateTime.Now;
 | |
| 				cntRo = 0;
 | |
| 				maxCntRo = GetRecordCountForTable(tableName, accessConnection);
 | |
| 				lastTimeRos = DateTime.Now;
 | |
| 				lastTimeRos = ProgressBarUpdate(pBarROs, null, 0, maxCntRo, 0, 0, lastTimeRos, true);
 | |
| 				lastTimeDbs = ProgressBarUpdate(pBarDbs, allTablesText[cntDb], 0, maxCntDb, cntDb, 1, lastTimeDbs, false);
 | |
| 				command = null;
 | |
| 				command = new OleDbCommand("select * from " + tableName, accessConnection);
 | |
| 				reader = command.ExecuteReader();
 | |
| 				while (reader.Read())			// read all of the records from the current access table
 | |
| 				{
 | |
| 					string RecID = reader[0].ToString();
 | |
| 					int RecType = int.Parse(reader[1].ToString());
 | |
| 					string ParentID = reader[2].ToString();
 | |
| 					string AccPageID = reader[3].ToString();
 | |
| 					string ModDateTime = reader[4].ToString();
 | |
| 					string Info = reader[5].ToString();
 | |
| 					// Migrate to sql:
 | |
| 					AddRecordToRoAll(sqlConnection, RecID, RecType, ParentID, AccPageID, ModDateTime, Info, tableName);
 | |
| 					cntRo++;
 | |
| 					lastTimeRos = ProgressBarUpdate(pBarROs, AccPageID, 0, maxCntRo, cntRo, 1, lastTimeRos, true);
 | |
| 				}
 | |
| 				cntDb++;
 | |
| 				reader.Close();
 | |
| 				reader = null;
 | |
| 				lastTimeRos = ProgressBarUpdate(pBarROs, tableName, 0, maxCntRo, maxCntRo, 1, lastTimeRos, false);
 | |
| 			}
 | |
| 			lastTimeDbs = ProgressBarUpdate(pBarDbs, allTablesText[maxCntDb - 1], 0, maxCntDb, maxCntDb, 1, lastTimeDbs, false);
 | |
| 			pBarDbs.Text = "Referenced Object Tables Migration Completed";
 | |
| 			pBarROs.Text = "Referenced Objects Migration Completed";
 | |
| 			btnConvert.Enabled = false;
 | |
| 
 | |
| 			// add a record to the access database so that proms/roeditor will know that the data has been converted.
 | |
| 			UpdateAccessToFlagConverted(accessConnection);
 | |
| 			// if called from proms, the database connection string must be stored in the rodb record.  write the connection string
 | |
| 			// out to a temporary file so the Proms can set this field in its database.
 | |
| 			WriteSqlPathToTempFile();
 | |
| 		}
 | |
| 		private void UpdateAccessToFlagConverted(OleDbConnection accessConnection)
 | |
| 		{
 | |
| 			try
 | |
| 			{
 | |
| 				OleDbDataReader reader = null;
 | |
| 				string dt = string.Format("{0:yyyyMMddHHmmss}", System.DateTime.Now);
 | |
| 				string strInsert = "INSERT INTO ROMaster (RecID, RecType, ModDateTime, Info) ";
 | |
| 				// note that '8' for rectype flags database converted:
 | |
| 				strInsert = strInsert + " VALUES ('09999999', 8, '" + dt + "', '" + _SqlConnectStr + "');";
 | |
| 				OleDbCommand command = new OleDbCommand(strInsert, accessConnection);
 | |
| 				reader = command.ExecuteReader();
 | |
| 				if (reader.Read()) return;
 | |
| 			}
 | |
| 			catch (Exception e)
 | |
| 			{
 | |
| 				MessageBox.Show(e.Message, "Error on insert to flag migration completed");
 | |
| 			}
 | |
| 		}
 | |
| 		private string _TmpFileForConnectStr = null;
 | |
| 		private void WriteSqlPathToTempFile()
 | |
| 		{
 | |
| 			System.IO.File.WriteAllText(_TmpFileForConnectStr, _SqlConnectStr);
 | |
| 		}
 | |
| 		// the following is used to update the progress bars, it finds how many records are in a table.
 | |
| 		private int GetRecordCountForTable(string tableName, OleDbConnection accessConnection)
 | |
| 		{
 | |
| 			OleDbDataReader reader = null;
 | |
| 			int retcnt = 100;
 | |
| 			try
 | |
| 			{
 | |
| 				OleDbCommand command = new OleDbCommand("SELECT COUNT (RecID) as cnt FROM " + tableName, accessConnection);
 | |
| 				reader = command.ExecuteReader();
 | |
| 				if (reader.Read())
 | |
| 				{
 | |
| 					retcnt = reader.GetInt32(0);
 | |
| 				}
 | |
| 				reader.Close();
 | |
| 				command.Dispose();
 | |
| 			}
 | |
| 			catch
 | |
| 			{
 | |
| 			}
 | |
| 			return retcnt;
 | |
| 		}
 | |
| 		DateTime ProgressBarUpdate(DevComponents.DotNetBar.Controls.ProgressBarX pbi, string msg, int min, int max, int progress, int flag, DateTime lastUpdateDisplay, bool doTimeCheck)
 | |
| 		{
 | |
| 			if (flag == 0)		// setup
 | |
| 				pbi.Maximum = max;
 | |
| 			else
 | |
| 			{
 | |
| 				if (doTimeCheck && lastUpdateDisplay != null && DateTime.Now.Subtract(lastUpdateDisplay).TotalSeconds < 0.25f) return lastUpdateDisplay;
 | |
| 				if (progress == pbi.Maximum)  pbi.Text = msg.Trim();
 | |
| 				pbi.Value = progress;
 | |
| 				pbi.Text = string.Format("Processing {0} ({1} of {2})", msg.Trim(), progress + 1, pbi.Maximum);
 | |
| 			}
 | |
| 			pbi.Refresh();
 | |
| 			return DateTime.Now;
 | |
| 		}
 | |
| 		// Using the data as defined by the arguments, save the data to sql.
 | |
| 		private void AddRecordToRoAll(SqlConnection sqlConnection, string RecID, int RecType, string ParentID, string AccPageID, string ModDateTime, string Info, string tableName)
 | |
| 		{
 | |
| 			try
 | |
| 			{
 | |
| 				SqlCommand command = new SqlCommand();
 | |
| 				command.Connection = sqlConnection;
 | |
| 				command.CommandType = CommandType.StoredProcedure;
 | |
| 				command.CommandText = "insertAllRectypes";
 | |
| 				command.Parameters.AddWithValue("@RecType", RecType);
 | |
| 				if (AccPageID == null || AccPageID == "")
 | |
| 					command.Parameters.AddWithValue("@AccPageID", string.Empty);
 | |
| 				else
 | |
| 					command.Parameters.AddWithValue("@AccPageID", AccPageID);
 | |
| 				command.Parameters.AddWithValue("@ROTable", tableName);
 | |
| 				command.Parameters.AddWithValue("@RecID", RecID);
 | |
| 				command.Parameters.AddWithValue("@ParentID", ParentID);
 | |
| 				command.Parameters.AddWithValue("@Info", Info);
 | |
| 				command.Parameters.AddWithValue("@ModDateTime", ModDateTime);
 | |
| 				using (SqlDataReader reader = command.ExecuteReader())
 | |
| 				{
 | |
| 					bool success = true;
 | |
| 				}
 | |
| 				command = null;
 | |
| 			}
 | |
| 			catch (Exception ex)
 | |
| 			{
 | |
| 				string msg = string.Format("Error when adding a record to the sql database for table {0} recid {1}", tableName, RecID);
 | |
| 				_MyLog.Error(msg, ex);
 | |
| 			}
 | |
| 		}
 | |
| 		private void btnExit_Click(object sender, EventArgs e)
 | |
| 		{
 | |
| 			this.Close();
 | |
| 		}
 | |
| 		// the user selected the button to test the sql connection string
 | |
| 		private void btnTestConnect_Click(object sender, EventArgs e)
 | |
| 		{
 | |
| 			TestConnection(true);
 | |
| 		}
 | |
| 		// the RevDate & RevDescription are found in a stored procedure, vesp_GetSQLCodeRevision, in the sql database.  These get updated each
 | |
| 		// time a revision is made to the sql database using ROFixes.sql script.
 | |
| 		private static DateTime _RevDate = DateTime.MinValue;
 | |
| 		public static DateTime RevDate
 | |
| 		{
 | |
| 			get { return _RevDate; }
 | |
| 			set { _RevDate = value; }
 | |
| 		}
 | |
| 		private static string _RevDescription = "Unknown";
 | |
| 		public static string RevDescription
 | |
| 		{
 | |
| 			get { return _RevDescription; }
 | |
| 			set { _RevDescription = value; }
 | |
| 		}
 | |
| 		// This is called to test the sql connection, either from the button when pressed by user, or from the convert button, before
 | |
| 		// the conversion is done. See below for what is checked
 | |
| 		private bool TestConnection(bool notifyUser)
 | |
| 		{
 | |
| 			// The following conditions must be true in order to migrate the ro data to sql. Only the first condition can be
 | |
| 			//  tested in this executable since the roall database is interfaced to by the roeditor & the program that migrates the data.
 | |
| 			//	The migration program will make the 2-4 tests, put up a message box if it cannot migrate & will send a failure back
 | |
| 			//	to this program, PROMS.
 | |
| 			//	1) (done in proms to enable the migrate button) the rodb record's connection string must be 'cstring' (it is the connection string if data was migrated)
 | |
| 			//	2) the roall database must exist when using the rodb record's connection string and this database must have the stored procedures
 | |
| 			//	3) roall must be empty
 | |
| 			//	4) the database must be the correct version
 | |
| 			bool success = false;
 | |
| 			bool dbsuc = false;
 | |
| 			try
 | |
| 			{
 | |
| 				string conStr = string.Format(@"Data Source={0};Initial Catalog={1};Integrated Security=True", SqlServerName, SqlDatabaseName);
 | |
| 				using (SqlConnection connection = new SqlConnection(conStr))
 | |
| 				{
 | |
| 					try
 | |
| 					{
 | |
| 						connection.Open();
 | |
| 						if (connection.State == ConnectionState.Open)
 | |
| 						{
 | |
| 							// now see if there is an roall table
 | |
| 							SqlCommand command = new SqlCommand();
 | |
| 							command.Connection = connection;
 | |
| 							command.CommandType = CommandType.Text;
 | |
| 							command.CommandText = "(SELECT count(*) FROM sys.objects WHERE object_id = OBJECT_ID(N'[dbo].[ROALL]') AND type in (N'U'))";
 | |
| 							using (SqlDataReader reader = command.ExecuteReader())
 | |
| 							{
 | |
| 								if (reader.Read())
 | |
| 								{
 | |
| 									int count = reader.GetInt32(0);
 | |
| 									if (count < 1)
 | |
| 									{
 | |
| 										MessageBox.Show("The database exists but does not have the required 'ROALL' table. Contact your DBA", "Invalid database");
 | |
| 										dbsuc = false;
 | |
| 									}
 | |
| 									else
 | |
| 										dbsuc = true;
 | |
| 								}
 | |
| 							}
 | |
| 							success = dbsuc;
 | |
| 							if (success)
 | |
| 							{
 | |
| 								// now see if there are stored procedures:
 | |
| 								command = null;   // reset command
 | |
| 								command = new SqlCommand();
 | |
| 								command.Connection = connection;
 | |
| 								command.CommandType = CommandType.Text;
 | |
| 								command.CommandText = "(SELECT count(*) FROM dbo.sysobjects WHERE id = OBJECT_ID(N'[deleteByROTable]') AND OBJECTPROPERTY(id,N'IsProcedure') = 1)";
 | |
| 								using (SqlDataReader reader = command.ExecuteReader())
 | |
| 								{
 | |
| 									if (reader.Read())
 | |
| 									{
 | |
| 										int count = reader.GetInt32(0);
 | |
| 										if (count < 1)
 | |
| 										{
 | |
| 											MessageBox.Show("The database exists but does not have the necessary stored procedures. Contact your DBA", "Invalid database");
 | |
| 											dbsuc = false;
 | |
| 										}
 | |
| 										else
 | |
| 											dbsuc = true;
 | |
| 									}
 | |
| 								}
 | |
| 								success = dbsuc;
 | |
| 							}
 | |
| 							if (success)
 | |
| 							{
 | |
| 								// now test that the roall table is empty:
 | |
| 								command = null;   // reset command
 | |
| 								command = new SqlCommand();
 | |
| 								command.Connection = connection;
 | |
| 								command.CommandType = CommandType.Text;
 | |
| 								command.CommandText = "SELECT count(*) FROM roall";
 | |
| 								using (SqlDataReader reader = command.ExecuteReader())
 | |
| 								{
 | |
| 									if (reader.Read())
 | |
| 									{
 | |
| 										int count = reader.GetInt32(0);
 | |
| 										if (count > 0)
 | |
| 										{
 | |
| 											MessageBox.Show("The database already has data, cannot migrate additional data into it. Contact your DBA", "Invalid contents in database");
 | |
| 											dbsuc = false;
 | |
| 										}
 | |
| 										else
 | |
| 											dbsuc = true;
 | |
| 									}
 | |
| 								}
 | |
| 								success = dbsuc;
 | |
| 							}
 | |
| 							if (success)
 | |
| 							{
 | |
| 								// now test that the database version is ok
 | |
| 								command = null;   // reset command
 | |
| 								command = new SqlCommand();
 | |
| 								command.Connection = connection;
 | |
| 								command.CommandType = CommandType.StoredProcedure;
 | |
| 								command.CommandText = "vesp_GetSQLCodeRevision";
 | |
| 								using (SqlDataReader reader = command.ExecuteReader())
 | |
| 								{
 | |
| 									if (reader.Read())
 | |
| 									{
 | |
| 										_RevDate = reader.GetDateTime(0);
 | |
| 										_RevDescription = reader.GetString(1);
 | |
| 										dbsuc = true;
 | |
| 									}
 | |
| 									else
 | |
| 										dbsuc = false;
 | |
| 								}
 | |
| 								success = dbsuc;
 | |
| 							}
 | |
| 						}
 | |
| 						else
 | |
| 						{
 | |
| 							if (notifyUser) MessageBox.Show("Connection failed.", "Connection Failed");
 | |
| 						}
 | |
| 					}
 | |
| 					catch (SqlException ex)
 | |
| 					{
 | |
| 						if (notifyUser) MessageBox.Show("Connection failed: " + ex, "Connection Failed");
 | |
| 					}
 | |
| 				}
 | |
| 			}
 | |
| 			catch (Exception ex)
 | |
| 			{
 | |
| 				if (notifyUser) MessageBox.Show("Connection failed: " + ex, "Connection Failed");
 | |
| 			}
 | |
| 
 | |
| 			if (notifyUser && success) MessageBox.Show("You have been successfully connected to the database!", "Connection Succeeded");
 | |
| 			return success;
 | |
| 		}
 | |
| 
 | |
| 		private void tbSqlDbName_Leave(object sender, EventArgs e)
 | |
| 		{
 | |
| 			if (_Initializing) return;
 | |
| 			SqlDatabaseName = tbSqlDbName.Text;
 | |
| 		}
 | |
| 
 | |
| 		private void tbSqlServerName_Leave(object sender, EventArgs e)
 | |
| 		{
 | |
| 			if (_Initializing) return;
 | |
| 			SqlServerName = tbSqlServerName.Text;
 | |
| 		}
 | |
| 
 | |
| 		private void tbAccessPath_Leave(object sender, EventArgs e)
 | |
| 		{
 | |
| 			if (_Initializing) return;
 | |
| 			MSAccessPath = tbAccessPath.Text;
 | |
| 		}
 | |
| 	}
 | |
| }
 |