private void Show(int id) { while (!RsAccount.EOF) { if (id == RsAccount.Fields["ClientID"].Value) { break; } RsAccount.MoveNext(); } IDbox.Text = RsAccount.Fields["ClientID"].Value.ToString(); Passbox.Text = RsUser.Fields["Password"].Value.ToString(); AccountNumbox.Text = RsAccount.Fields["AccountNumber"].Value.ToString(); AccountTypebox.Text = RsAccount.Fields["AccountType"].Value.ToString(); Balancebox.Text = RsAccount.Fields["Balance"].Value.ToString(); Limitbox.Text = RsAccount.Fields["CreditLimit"].Value.ToString(); branchbox.Text = RsAccount.Fields["BranchNumber"].Value.ToString(); IDbox.Enabled = false; Passbox.Enabled = false; AccountNumbox.Enabled = false; AccountTypebox.Enabled = false; Balancebox.Enabled = false; Limitbox.Enabled = false; branchbox.Enabled = false; }
private void custmreceipt_Load(object sender, EventArgs e) { textBox1.Enabled = false; textBox2.Enabled = false; textBox4.Text = "0"; textBox3.Text = "0"; // comboBox2.DropDownStyle = ComboBoxStyle.DropDownList; comboBox2.Properties.Items.Add("CASH"); comboBox2.Properties.Items.Add("CHEQUE"); // comboBox1.Properties.DropDownStyle = ComboBoxStyle.DropDownList; label7.Visible = false; textBox5.Visible = false; Temp1.Open(@"select * from customerdetails", Program.DB, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic); while (Temp1.EOF == false) { comboBox1.Properties.Items.Add(Temp1.Fields["CName"].Value); Temp1.MoveNext(); } Temp1.Close(); Temp1.Open(@"select * from payments", Program.DB, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic); if (Temp1.RecordCount == 0) { textBox1.Text = "1"; } else { Temp1.MoveLast(); int a = Temp1.Fields["payID"].Value + 1; textBox1.Text = a.ToString(); Temp1.MoveNext(); } Temp1.Close(); }
private void rent_Click(object sender, EventArgs e) { Rscar.MoveFirst(); Rsuser.MoveFirst(); while (!Rscar.EOF) { if (carID.Text.Equals(Rscar.Fields["CarID"].Value)) { Rscar.Fields["Availability"].Value = "No"; Rsuser.AddNew(); Rsuser.Fields["CarID"].Value = Convert.ToInt32(carID.Text); Rsuser.Fields["FirstName"].Value = firstName.Text; Rsuser.Fields["LastName"].Value = lastName.Text; Rsuser.Fields["PhoneNumber"].Value = phoneNumber.Text; Rsuser.Fields["RentDate"].Value = Convert.ToDateTime(rentDate.Text); Rsuser.Fields["ReturnDate"].Value = Convert.ToDateTime(returnDate.Text); Rsuser.Fields["Rent"].Value = "Yes"; Rscar.Update(); Rsuser.Update(); MessageBox.Show("You rent car successfully"); return; } Rscar.MoveNext(); } MessageBox.Show("Something wrong...."); }
public bool loadData(ref string lName) { bool functionReturnValue = false; ADODB.Recordset rs = default(ADODB.Recordset); string lSQL = null; int x = 0; string lID = null; gField = lName; rs = modRecordSet.getRS(ref "SELECT * From ftConstruct WHERE (ftConstruct_Name = '" + Strings.Replace(lName, "'", "''") + "')"); gFieldID = rs.Fields("ftConstruct_FieldID").Value; gFieldName = rs.Fields("ftConstruct_FieldName").Value; gHeading = rs.Fields("ftConstruct_DisplayName").Value; lSQL = rs.Fields("ftConstruct_SQL").Value; rs.Close(); rs = modRecordSet.getRS(ref lSQL); //Display the list of Titles in the DataCombo loading = true; functionReturnValue = false; x = -1; gArray = new string[rs.RecordCount, 3]; while (!(rs.EOF)) { x = x + 1; gArray[x, 0] = rs.Fields(gFieldID).Value; gArray[x, 1] = rs.Fields(gFieldName).Value + ""; gArray[x, 2] = Convert.ToString(0); rs.MoveNext(); } rs.Close(); rs = modRecordSet.getRS(ref "SELECT ftDataItem_ID From ftDataItem WHERE (ftDataItem_PersonID = " + modRecordSet.gPersonID + ") AND (ftDataItem_FieldName = '" + Strings.Replace(gField, "'", "''") + "')"); while (!(rs.EOF)) { lID = rs.Fields("ftDataItem_ID").Value; for (x = 0; x <= Information.UBound(gArray); x++) { if (lID == gArray[x, 0]) { gArray[x, 2] = Convert.ToString(1); } } rs.MoveNext(); } rs.Close(); setup(); functionReturnValue = true; loadLanguage(); ShowDialog(); loading = false; return(functionReturnValue); }
//Lagerbestand private void metroComboBox1_SelectedIndexChanged(object sender, EventArgs e) { ADODB.Connection cn = new ADODB.Connection(); ADODB.Recordset rs = new ADODB.Recordset(); try { cn.Open(cnStr); string periode = metroComboBox1.Text; if (periode == "0") { rs.Open("Select Startmenge, Artikelnummer, Startpreis From Artikelstammdaten", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1); int i = 0; metroGrid5.Rows.Clear(); while (!rs.EOF) { metroGrid5.Rows.Add(); metroGrid5.Rows[i].Cells["period"].Value = Convert.ToInt32(periode); metroGrid5.Rows[i].Cells["id"].Value = Convert.ToInt32(rs.Fields["Artikelnummer"].Value); metroGrid5.Rows[i].Cells["actualStock"].Value = Convert.ToInt32(rs.Fields["Startmenge"].Value); metroGrid5.Rows[i].Cells["actualPrice"].Value = Convert.ToDouble(rs.Fields["Startpreis"].Value); //metroGrid5.Rows[i].Cells["stockValue"].Value = ; rs.MoveNext(); i++; } } else { rs.Open("Select * From warehousestock_article where period ='" + periode + "'", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1); int i = 0; metroGrid5.Rows.Clear(); while (!rs.EOF) { metroGrid5.Rows.Add(); metroGrid5.Rows[i].Cells["period"].Value = Convert.ToInt32(rs.Fields["period"].Value); metroGrid5.Rows[i].Cells["id"].Value = Convert.ToInt32(rs.Fields["id"].Value); metroGrid5.Rows[i].Cells["actualStock"].Value = Convert.ToInt32(rs.Fields["amount"].Value); metroGrid5.Rows[i].Cells["actualPrice"].Value = Convert.ToDouble(rs.Fields["price"].Value); metroGrid5.Rows[i].Cells["stockValue"].Value = Convert.ToDouble(rs.Fields["stockValue"].Value); rs.MoveNext(); i++; } } rs.Close(); } catch (Exception fehler) { Console.WriteLine("Ein Fehler ist aufgetreten", fehler); //Try catch überprüfen.... } finally { cn.Close(); } }
private void metroComboBox4_SelectedIndexChanged(object sender, EventArgs e) { ADODB.Connection cn = new ADODB.Connection(); ADODB.Recordset rs = new ADODB.Recordset(); try { cn.Open(cnStr); string periode = metroComboBox4.Text; if (periode == "0") { rs.Open("Select * From summary", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1); metroGrid4.Rows.Clear(); int i = 0; while (!rs.EOF) { metroGrid1.Rows.Add(); metroGrid1.Rows[i].Cells["Gewinn"].Value = rs.Fields["profit_current"].Value; metroGrid1.Rows[i].Cells["GewinnDurchschnitt"].Value = rs.Fields["profit_average"].Value; metroGrid1.Rows[i].Cells["GewinnGesamt"].Value = rs.Fields["profit_all"].Value; rs.MoveNext(); ++i; } //i = 0; } else { rs.Open("Select * From summary", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1); metroGrid4.Rows.Clear(); int i = 0; while (!rs.EOF) { metroGrid1.Rows.Add(); metroGrid1.Rows[i].Cells["Gewinn"].Value = rs.Fields["profit_current"].Value; metroGrid1.Rows[i].Cells["GewinnDurchschnitt"].Value = rs.Fields["profit_average"].Value; metroGrid1.Rows[i].Cells["GewinnGesamt"].Value = rs.Fields["profit_all"].Value; rs.MoveNext(); ++i; } //i = 0; } rs.Close(); } catch (Exception fehler) { Console.WriteLine("Ein Fehler ist aufgetreten", fehler); //Try catch überprüfen.... } finally { cn.Close(); } }
private void FillList() { if (frmr_tb.RecordCount > 0) { while (frmr_tb.EOF == false) { farmers_list.Items.Add(frmr_tb.Fields["fNames"].Value.ToString()); farmers_list.Update(); frmr_tb.MoveNext(); } frmr_tb.MoveFirst(); } }
private void FillList() { if (cstmr_tb.RecordCount > 0) { while (cstmr_tb.EOF == false) { customers_list.Items.Add(cstmr_tb.Fields["CName"].Value.ToString()); customers_list.Update(); cstmr_tb.MoveNext(); } cstmr_tb.MoveFirst(); } }
private void FillList() { if (comm_tb.RecordCount > 0) { while (comm_tb.EOF == false) { commidities_list.Items.Add(comm_tb.Fields["cname"].Value.ToString()); commidities_list.Update(); comm_tb.MoveNext(); } comm_tb.MoveFirst(); } }
//showing next record in db private void button8_Click(object sender, EventArgs e) { if (Rs.EOF == true && Rs.BOF == true) { MessageBox.Show("Table is Empty!"); return; } Rs.MoveNext(); if (Rs.EOF == true) { Rs.MoveLast(); MessageBox.Show("Passed End of File"); } ShowDataOnForm(); }
private void ErgebnisseForm_LoadBestellungen(ADODB.Connection cn, ADODB.Recordset rs) { rs.Open("Select * From myOrderlist", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1); int i = 0; while (!rs.EOF) { metroGrid1.Rows.Add(); metroGrid1.Rows[i].Cells["Artikelnummer_Bestellung"].Value = rs.Fields["article"].Value; metroGrid1.Rows[i].Cells["Menge_Bestellung"].Value = rs.Fields["quantity"].Value; // Überprüfung auf Eil oder Normalbestellung if (Convert.ToInt32(rs.Fields["modus"].Value) == 4) { metroGrid1.Rows[i].Cells["Bestellart_Bestellung"].Value = "Eil"; } else if (Convert.ToInt32(rs.Fields["modus"].Value) == 5) { metroGrid1.Rows[i].Cells["Bestellart_Bestellung"].Value = "Normal"; } rs.MoveNext(); ++i; } i = 0; rs.Close(); }
private static bool DeleteAsketPor() { string Select = "Select Time.Id, IdRazrabAsket from " + DB.TABLE_REDMINE_ISSUES + " as ISSUES " + " left join " + DB.TABLE_REDMINE_TIME_ENTRIES + " as Time on ISSUES.Id = Time.IssueId " + " where Deleted = 1 and DeletedInAsketPor = 0"; ADODB.Recordset RsPor = DB.Select(Select); if (RsPor == null) { return(false); } string Update = ""; while (!(RsPor.EOF)) { if (RsPor.Fields["IdRazrabAsket"].Value > 0) { Update = "Delete from " + DB.TABLE_REPORT_DEVELOPER + " where Код=" + RsPor.Fields["IdRazrabAsket"].Value; DB.ExecuteQuery(Update); Update = "Update" + DB.TABLE_REDMINE_TIME_ENTRIES + " set DeletedInAsketPor= 1 where id=" + RsPor.Fields["Id"].Value; DB.ExecuteQuery(Update); } RsPor.MoveNext(); } RsPor.Close(); return(true); }
private void getPublicOfferingAdjustDate() { try { string sql = "SELECT [年度], [股票代號], IsNull([現增除權日],'') 現增除權日 FROM [股利政策表] WHERE [年度] = '" + DateTime.Today.AddYears(-1).Year.ToString() + "' AND "; string cStr = ""; foreach (string cID in data.Keys) { cStr += "'" + cID + "',"; } if (cStr.Length > 0) { cStr = cStr.Substring(0, cStr.Length - 1); } sql += "[股票代號] IN (" + cStr + ") ORDER BY [股票代號]"; ADODB.Recordset rs = cn.CMExecute(ref arg, srvLocation, cnPort, sql); for (; !rs.EOF; rs.MoveNext()) { string stockID = rs.Fields["股票代號"].Value; string es = rs.Fields["現增除權日"].Value == null ? "" : rs.Fields["現增除權日"].Value; if (es != "") { data[stockID].exPODate = DateTime.ParseExact(es, "yyyyMMdd", null); } } } catch (Exception ex) { Console.WriteLine("POD error:" + ex.Message); Console.ReadLine(); } }
private void getEarning() { try { string sql = "SELECT [年季], [股票代號], [合併淨損益(千)] FROM [季合併財報(損益單季)] WHERE [年季] IN (SELECT DISTINCT TOP 4 [年季] FROM [季合併財報(損益單季)] ORDER BY [年季] desc) AND "; string cStr = ""; foreach (string cID in data.Keys) { cStr += "'" + cID + "',"; } if (cStr.Length > 0) { cStr = cStr.Substring(0, cStr.Length - 1); } sql += "[股票代號] IN (" + cStr + ") ORDER BY [股票代號], [年季]"; ADODB.Recordset rs = cn.CMExecute(ref arg, srvLocation, cnPort, sql); for (; !rs.EOF; rs.MoveNext()) { string quarter = rs.Fields["年季"].Value; string stockID = rs.Fields["股票代號"].Value; double earning = Convert.ToDouble(rs.Fields["合併淨損益(千)"].Value); data[stockID].commodityEarning.addQuarterEarning(earning); } } catch (Exception ex) { MessageBox.Show("getEarning" + ex.Message); //GlobalVar.errProcess.Add(1, "[CMoneyWork_getEarning][" + ex.Message + "][" + ex.StackTrace + "]"); } }
private static ICollection <T> CopyFromRS <T>(ADODB.Recordset rs) where T : class, new() { HashSet <T> list = new HashSet <T>(); if (rs == null) { return(list); } if (!(rs.BOF && rs.EOF)) { do { /*ThreadPool.QueueUserWorkItem(_ => * { * AddObjectToList(list, rs); * });*/ T obj = CreateObject <T>(rs); list.Add(obj); rs.MoveNext(); } while (!rs.EOF); } return(list); }
private void getDisposeEndDate() { try { string sql = "SELECT [年度], [股票代號], IsNull([處置時間迄],'') 處置結束日 FROM [處置股票] WHERE [年度] >= '" + DateTime.Today.AddMonths(-6).Year.ToString() + "' AND "; string cStr = ""; foreach (string cID in data.Keys) { cStr += "'" + cID + "',"; } if (cStr.Length > 0) { cStr = cStr.Substring(0, cStr.Length - 1); } sql += "[股票代號] IN (" + cStr + ") ORDER BY [股票代號] ,[處置時間迄] "; ADODB.Recordset rs = cn.CMExecute(ref arg, srvLocation, cnPort, sql); for (; !rs.EOF; rs.MoveNext()) { string stockID = rs.Fields["股票代號"].Value; string es = rs.Fields["處置結束日"].Value == null ? "" : rs.Fields["處置結束日"].Value; if (es != "") { data[stockID].disposeEndDate = DateTime.ParseExact(es, "yyyyMMdd", null); } } } catch (Exception ex) { MessageBox.Show("getDisposeEndDate" + ex.Message); //GlobalVar.errProcess.Add(1, "[CMoneyWork_getDisposeEndDates][" + ex.Message + "][" + ex.StackTrace + "]"); } }
private static void AddObjectToList <T>(ICollection <T> list, ADODB.Recordset rs) where T : class, new() { try { try { if (rs.EOF) { return; } _rw.EnterUpgradeableReadLock(); T obj = CreateObject <T>(rs); if (!(rs.EOF)) { rs.MoveNext(); } _rw.EnterWriteLock(); if (obj == null) { return; } list.Add(obj); } finally { _rw.ExitWriteLock(); } } finally { _rw.ExitUpgradeableReadLock(); } }
private void returnButton_Click(object sender, EventArgs e) { Rscar.MoveFirst(); Rsuser.MoveFirst(); Boolean flag = false; while (!Rsuser.EOF) { if (Rsuser.Fields["CarID"].Value == Convert.ToInt32(returnID.Text)) { if (Rsuser.Fields["FirstName"].Value.Equals(returnFirstName.Text) && Rsuser.Fields["LastName"].Value.Equals(returnLastName)) { flag = true; break; } } Rsuser.MoveNext(); } if (flag == true) { while (!Rscar.EOF) { if (Rscar.Fields["CarID"].Value == Convert.ToInt32(returnID.Text)) { Rsuser.Fields["Rent"].Value = "No"; Rsuser.Update(); Rscar.Fields["Availability"].Value = "Yes"; Rscar.Update(); } } } }
private void coletadados() { ADODB.Recordset dados = new ADODB.Recordset(); ADODB.Recordset itens = new ADODB.Recordset(); String SQL = "SELECT * FROM SAÍDA WHERE (COD_SAI = " + _id + ");"; String SQLProdutos = "SELECT COD, ESTOQUE FORM PRODUTOS;"; //Buscando os itens dados.Open(SQL, new Conexao().getDb4(), ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic); itens.Open(SQLProdutos, new Conexao().getDb4(), ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic); while (!(dados.EOF || dados.BOF)) { itens.Find("cod =" + dados.Fields["[cod do CD]"].Value, 0, ADODB.SearchDirectionEnum.adSearchForward); if (!(itens.BOF || itens.EOF)) { itens.Fields["Estoque"].Value = Convert.ToInt64(itens.Fields["Estoque"].Value) + Convert.ToInt64(dados.Fields["Qunatidade"].Value); } dados.MoveNext(); } //EXcluindo ITENS SQL = "DELETE FROM SAÍDA WHERE (COD_SAI = " + _id + ");"; dados.Close(); dados.Open(SQL, new Conexao().getDb4(), ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic); //Excluindo capa SQL = "DELETE FROM cod_sai WHERE(COD_SAI = " + _id + ");"; dados.Close(); dados.Open(SQL, new Conexao().getDb4(), ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic); }
private void menge_Produkt3_Button_Click(object sender, EventArgs e) { metroGrid3.Rows.Clear(); //Recordset ADODB.Connection cn = new ADODB.Connection(); ADODB.Recordset rs = new ADODB.Recordset(); try { cn.Open(cnStr); rs.Open("Select Artikel, Sum(Anzahl) as Anzahl_Menge From Listen where Endprodukt = 3 group by Artikel", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1); int i = 0; while (!rs.EOF) { metroGrid3.Rows.Add(); metroGrid3.Rows[i].Cells["Artikel_Mengen"].Value = Convert.ToInt32(rs.Fields["Artikel"].Value); metroGrid3.Rows[i].Cells["Anzahl_Menge"].Value = Convert.ToInt32(rs.Fields["Anzahl_Menge"].Value); rs.MoveNext(); i++; } rs.Close(); } catch (Exception fehler) { Console.WriteLine("Ein Fehler ist aufgetreten", fehler); //Try catch überprüfen.... } finally { cn.Close(); } }
static List <MyParagraph> getTitleParagraphs(ADODB.Connection cnn, UInt64 titleId) { var paragraphLst = new List <MyParagraph>(); //get title var qry = "select * from paragraphs where titleId = ? "; var rst = new ADODB.Recordset(); rst.Open(qry.Replace("?", titleId.ToString()), cnn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, (int)ADODB.CommandTypeEnum.adCmdText); rst.MoveFirst(); while (!rst.EOF) { var par = new MyParagraph(); par.order = Convert.ToInt32(rst.Fields["order"].Value); par.alignment = Convert.ToInt32(rst.Fields["alignment"].Value); par.leftIndent = Convert.ToInt32(rst.Fields["leftIndent"].Value); par.fontSize = Convert.ToInt32(rst.Fields["fontSize"].Value); par.fontBold = Convert.ToInt32(rst.Fields["fontBold"].Value); par.fontItalic = Convert.ToInt32(rst.Fields["fontItalic"].Value); par.content = Convert.ToString(rst.Fields["content"].Value); paragraphLst.Add(par); rst.MoveNext(); } rst.Close(); return(paragraphLst); }
public string GetResMessage() { ADODB.Recordset reccust = null; string resMessage = ""; try { classE1_1.Open(); DbUse.open_ado_rec(classE1_1.globaldb, ref reccust, "zstblresults"); resMessage = ""; if (!reccust.EOF) { resMessage = resMessage + (string)reccust.Fields["Results"].Value; reccust.MoveNext(); } if (reccust != null) { reccust.Close(); reccust = null; } classE1_1.Close(); } catch (Exception ex) { logFiles.ErrorLog(ex); } resMessage = resMessage.Replace("\n", "<br/>"); return(DbUse.reproduceRedColor(resMessage)); }
private bool IsFeatureEdited(int p_FID) { bool bReturn = false; IGTJobManagementService oJobSrv = GTClassFactory.Create <IGTJobManagementService>(); oJobSrv.DataContext = DataContext; ADODB.Recordset rs = oJobSrv.FindPendingEdits(); if (rs != null) { if (rs.RecordCount > 0) { rs.MoveFirst(); while (rs.EOF == false) { if (Convert.ToInt32(rs.Fields["g3e_fid"].Value) == p_FID && (Convert.ToInt32(rs.Fields["G3E_CNO"].Value) == 21 || Convert.ToInt32(rs.Fields["G3E_CNO"].Value) == 22)) { bReturn = true; break; } rs.MoveNext(); } } } oJobSrv = null; return(bReturn); }
private void FarmerPayment_Load(object sender, EventArgs e) { Temp1.Open(@"select * from farmerpayment", Program.DB, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic); if (Temp1.RecordCount == 0) { textBox1.Text = "1"; } else { textBox1.Text = (Temp1.RecordCount + 1).ToString(); } Temp1.Close(); textBox1.Enabled = false; textBox2.Enabled = false; Temp2.Open(@"select * from farmerdetails", Program.DB, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic); while (Temp2.EOF == false) { Column1.Items.Add(Temp2.Fields["fNames"].Value.ToString()); Temp2.MoveNext(); } Temp2.Close(); // comboBox2.Properties.DropDownStyle = ComboBoxStyle.DropDownList; comboBox2.Properties.Items.Add("CASH"); comboBox2.Properties.Items.Add("CHEQUE"); label7.Visible = false; textBox5.Visible = false; dataGridView1.EditingControlShowing += new DataGridViewEditingControlShowingEventHandler(dataGrid1_Edit); }
//-------------------------------------------------------------------------------------------- /// <summary> /// This method will load the variables from the database. Default values are already set and will /// be used if they can not be loaded from the database. /// </summary> private void LoadVariables() { try { //To be implemented in future versions. //if (!File.Exists(vAssemblyPath + "mail.config.path")) // this.SaveDefaultConfigSchema(); // LoadConfig(); ADODB.Recordset rs = Query(sqlnamevalue); while (!rs.EOF) { switch (rs.Fields[0].Value.ToString().ToLower().Trim()) { case "server_name": server.ServerName = rs.Fields[1].Value.ToString().Trim(); break; case "mail_path": server.MailPath = rs.Fields[1].Value.ToString().Trim(); break; case "smtp_path": server.SmtpDirectory = rs.Fields[1].Value.ToString().Trim(); break; } rs.MoveNext(); } } catch (Exception e) { DebugOut("Unable to load settings from database.\r\n " + e.Message, true); } }
private void textBox1_KeyUp(object sender, KeyEventArgs e) { if (this.textBox1.Text == "") { this.comboBox1.Items.Clear(); this.comboBox1.Text = ""; } else { this.comboBox1.Text = ""; string sql = GetQuery(); ADODB.Recordset AdoRs = new ADODB.Recordset(); if (GeneralCommon.M_CN1.State == 0) { if (GeneralCommon.GF_DbConnect() == false) { return; } } AdoRs.Open(sql, GeneralCommon.M_CN1, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockReadOnly, -1); this.comboBox1.Items.Clear(); while (!AdoRs.EOF) { this.comboBox1.Items.Add(AdoRs.Fields[0].Value); AdoRs.MoveNext(); } } }
private void getWarningScore() { try { string sql = "SELECT [股票代號], [警示指標總符合數] FROM [月財務警示指標] WHERE [年月] = '" + DateTime.Today.ToString("yyyyMM") + "' AND "; string cStr = ""; foreach (string cID in data.Keys) { cStr += "'" + cID + "',"; } if (cStr.Length > 0) { cStr = cStr.Substring(0, cStr.Length - 1); } sql += "[股票代號] IN (" + cStr + ") ORDER BY [股票代號]"; ADODB.Recordset rs = cn.CMExecute(ref arg, srvLocation, cnPort, sql); for (; !rs.EOF; rs.MoveNext()) { string stockID = rs.Fields["股票代號"].Value; int w = Convert.ToInt32(rs.Fields["警示指標總符合數"].Value); data[stockID].warningScore = w; } } catch (Exception ex) { MessageBox.Show("getWarningScore" + ex.Message); //GlobalVar.errProcess.Add(1, "[CMoneyWork_getWarningScore][" + ex.Message + "][" + ex.StackTrace + "]"); } }
protected bool WhatifExists(string whatifName) { bool exists = false; ADODB.Recordset rec = new ADODB.Recordset(); DbUse.OpenAdoRec(classE1_1.globaldb, rec, "SELECT WID, Name FROM tblWhatif;"); try { int i = 0; while (!rec.EOF && !exists) { if (i == 0) { rec.MoveFirst(); } else { rec.MoveNext(); } exists = rec.Fields["Name"].Value.ToString().ToUpper().Equals(whatifName.ToUpper()); i++; } } catch (Exception) { } DbUse.CloseAdoRec(rec); return(exists); }
private void ErgebnisseForm_LoadZugang(ADODB.Connection cn, ADODB.Recordset rs) { rs.Open("Select * From Lagerzugang", cn, ADODB.CursorTypeEnum.adOpenKeyset, ADODB.LockTypeEnum.adLockOptimistic, -1); int i = 0; while (!rs.EOF) { metroGrid1.Rows.Add(); metroGrid1.Rows[i].Cells["Artikelnummer_Zugang"].Value = rs.Fields["article"].Value; metroGrid1.Rows[i].Cells["Bestellperiode_Zugang"].Value = rs.Fields["orderperiod"].Value; // Überprüfung auf Eil oder Normalbestellung if (Convert.ToInt32(rs.Fields["modus"].Value) == 4) { metroGrid1.Rows[i].Cells["Modus_Zugang"].Value = "Eil"; } else if (Convert.ToInt32(rs.Fields["modus"].Value) == 5) { metroGrid1.Rows[i].Cells["Modus_Zugang"].Value = "Normal"; } metroGrid1.Rows[i].Cells["Lieferzeit_Zugang"].Value = rs.Fields["Lieferzeit"].Value; metroGrid1.Rows[i].Cells["Menge_Zugang"].Value = rs.Fields["amount"].Value; metroGrid1.Rows[i].Cells["Preis_Zugang"].Value = rs.Fields["price"].Value; rs.MoveNext(); ++i; } i = 0; rs.Close(); }
private void buildDataControls() { ADODB.Recordset rs = default(ADODB.Recordset); rs = modRecordSet.getRS(ref "SELECT * FROM Channel ORDER BY ChannelID"); cmbCOD.Items.Clear(); cmbDelivery.Items.Clear(); string tmpString = null; int m = 0; while (!(rs.EOF)) { tmpString = rs.Fields("Channel_Name").Value + " " + rs.Fields("ChannelID").Value; m = cmbCOD.Items.Add(tmpString); if (adoPrimaryRS.Fields("Pricelist_CODChannelID").Value == rs.Fields("ChannelID").Value) { cmbCOD.SelectedIndex = m; } tmpString = rs.Fields("Channel_Name").Value + " " + rs.Fields("ChannelID").Value; m = cmbDelivery.Items.Add(tmpString); if (adoPrimaryRS.Fields("Pricelist_DeliveryChannelID").Value == rs.Fields("ChannelID").Value) { cmbDelivery.SelectedIndex = m; } rs.MoveNext(); } // doDataControl Me.cmbChannel, "SELECT ChannelID, Channel_Name FROM Channel ORDER BY ChannelID", "Customer_ChannelID", "ChannelID", "Channel_Name" }
public bool loadFilter(ref string filter_Renamed) { bool functionReturnValue = false; object modGeneral = null; object lDOM = null; object lNode = null; ADODB.Recordset rs = new ADODB.Recordset(); ADODB.Recordset RSitem = new ADODB.Recordset(); short lCNT = 0; rs = modRecordSet.getRS(ref "SELECT ftSet.* From ftSet Where (((ftSet.ftSet_Group) = '" + Strings.Replace(filter_Renamed, "'", "''") + "')) ORDER BY ftSet.ftSet_Order;"); if (rs.BOF | rs.EOF) { functionReturnValue = false; } else { lCNT = -1; objectArray = new object[rs.RecordCount]; while (!(rs.EOF)) { lCNT = lCNT + 1; switch (rs.Fields("ftset_type").Value) { case 2: if (lCNT) { this.Controls.Add(_frmList_0); //_frmList_0.Controls.Add(lCNT) //_cmdList_0.Load(lCNT) cmdList[lCNT].Parent = frmList[lCNT]; //lblList.Load(lCNT) lblList[lCNT].Parent = frmList[lCNT]; } frmList[lCNT].Visible = true; cmdList[lCNT].Visible = true; lblList[lCNT].Visible = true; frmList[lCNT].Top = sizeConvertors.twipsToPixels(sizeConvertors.pixelToTwips(frmList[0].Top, false) + lCNT * sizeConvertors.pixelToTwips(frmList[0].Height, false), false); frmList[lCNT].Text = rs.Fields("ftset_DisplayName").Value; frmList[lCNT].Tag = rs.Fields("ftset_Name").Value; lblList[lCNT].Text = ""; RSitem = modRecordSet.getRS(ref "SELECT ftData_Heading From ftData WHERE (ftData_PersonID = " + modRecordSet.gPersonID + ") AND (ftData_FieldName = '" + Strings.Replace(frmList[lCNT].Tag, "'", "''") + "')"); if (RSitem.BOF | RSitem.EOF) { } else { lblList[lCNT].Text = RSitem.Fields("ftData_Heading").Value; } objectArray[lCNT] = frmList[lCNT]; break; case 1: if (lCNT) { //frmString.Load(lCNT) //txtString.Load(lCNT) _txtString_0.Parent = frmString[lCNT]; } _frmString_0.Visible = true; _txtString_0.Visible = true; _frmString_0.Top = sizeConvertors.twipsToPixels(sizeConvertors.pixelToTwips(frmList[0].Top, false) + lCNT * sizeConvertors.pixelToTwips(frmList[0].Height, false), false); _frmString_0.Text = lNode.selectSingleNode("@name").Text; _frmString_0.Tag = lNode.selectSingleNode("@id").Text; _txtString_0.Text = ""; lDOM = modGeneral.lsData.sql("SELECT ftData_Data From ftData WHERE (ftData_PersonID = " + modRecordSet.gPersonID + ") AND (ftData_FieldName = '" + Strings.Replace(frmString[lCNT].Tag, "'", "''") + "')"); if (lDOM == null) { } else { if (lDOM.documentElement.selectSingleNode("/root/ftData/@ftData_Data") == null) { } else { _txtString_0.Text = lDOM.documentElement.selectSingleNode("/root/ftData/@ftData_Data").Text; } } _txtString_0.Tag = _txtString_0.Text; objectArray[lCNT] = _frmString_0; break; } rs.MoveNext(); } this.Height = sizeConvertors.twipsToPixels(objectArray[Information.UBound(objectArray)].Top + objectArray[Information.UBound(objectArray)].Height + 1000, false); loadLanguage(); ShowDialog(); //UPGRADE_WARNING: Couldn't resolve default property of object loadFilter. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"' functionReturnValue = true; } return functionReturnValue; }
private void cmdInv_Click(System.Object eventSender, System.EventArgs eventArgs) { CrystalDecisions.CrystalReports.Engine.ReportDocument ReportNone = new CrystalDecisions.CrystalReports.Engine.ReportDocument(); int personID = 0; int posID = 0; string[] lArray = null; string lAddress = null; //On Error Resume Next ADODB.Connection cn = default(ADODB.Connection); short x = 0; string databaseName = null; int lID = 0; CrystalDecisions.CrystalReports.Engine.ReportDocument Report = new CrystalDecisions.CrystalReports.Engine.ReportDocument(); ADODB.Recordset rs = default(ADODB.Recordset); ADODB.Recordset rsItems = default(ADODB.Recordset); string sql = null; //UPGRADE_WARNING: Screen property Screen.MousePointer has a new behavior. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="6BA9B8D2-2A32-4B6E-8D36-44949974A5B4"' System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.WaitCursor; if (lvTransaction.FocusedItem == null) return; //lID = Mid(Split(Me.lvTransaction.SelectedItem.Key, "_")(0), 2) if (Convert.ToDouble(Strings.Split(this.lvTransaction.FocusedItem.Name, "_")[2]) == 0) { Interaction.MsgBox("There is no Sale document attached!", MsgBoxStyle.Information); System.Windows.Forms.Cursor.Current = Cursors.Default; return; } lID = Convert.ToInt32(Strings.Split(this.lvTransaction.FocusedItem.Name, "_")[2]); //If openConnection() Then // frmMain.lblPath.Caption = serverPath // closeConnection //End If //Set cn = openConnectionInstance() //lMonth = cmbMonth.ItemData(cmbMonth.ListIndex) //Dim lLineitem As lineitem //If lMonth = gMonthEnd Then // databaseName = "" //Else // databaseName = "Month" & lMonth & ".mdb" //End If databaseName = Strings.Split(this.lvTransaction.FocusedItem.Name, "_")[1]; cn = modRecordSet.openConnectionInstance(ref databaseName); if (cn == null) { return; } transaction lTransaction = new transaction(); lineItem lLineitem = null; customer lCustomer = new customer(); transactionSpecial lSpecial = new transactionSpecial(); if (Convert.ToDouble(Strings.Split(this.lvTransaction.FocusedItem.Name, "_")[3]) == 2) { //sale //Dim Report As New cryReceipt //Set Report = New cryReceipt rs = new ADODB.Recordset(); sql = "SELECT Sale.* From Sale WHERE (((SaleID)=" + lID + "));"; rs.Open(sql, cn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly, ADODB.CommandTypeEnum.adCmdText); if (rs.RecordCount) { lTransaction.cashierID = rs.Fields("Sale_PersonID").Value; lTransaction.channelID = rs.Fields("Sale_ChannelID").Value; lTransaction.managerID = rs.Fields("Sale_ManagerID").Value; lTransaction.paymentDiscount = rs.Fields("Sale_Discount").Value; lTransaction.paymentSlip = rs.Fields("Sale_Slip").Value; lTransaction.paymentSubTotal = rs.Fields("Sale_SubTotal").Value; lTransaction.paymentTender = rs.Fields("Sale_Tender").Value; lTransaction.paymentTotal = rs.Fields("Sale_Total").Value; lTransaction.paymentType = rs.Fields("Sale_PaymentType").Value; lTransaction.posID = rs.Fields("Sale_POSID").Value; lTransaction.transactionDate = rs.Fields("Sale_DatePOS").Value; lTransaction.transactionID = rs.Fields("Sale_Reference").Value + ""; lTransaction.transactionType = "Sale"; //If prPrevSerial_p = True Then strSerial = rs("Sale_Serialref") rs.Close(); rs = modRecordSet.getRS(ref "SELECT * FROM Company"); lTransaction.companyName = rs.Fields("Company_Name").Value; //gParameters.companyName lTransaction.footer = " "; //gParameters.footer & "" lTransaction.heading1 = rs.Fields("Company_PhysicalAddress").Value; //gParameters.heading1 & "" lTransaction.heading2 = " "; //gParameters.heading2 & "" lTransaction.heading3 = " "; //gParameters.heading3 & "" lTransaction.taxNumber = rs.Fields("Company_TaxNumber").Value; //gParameters.taxNumber & "" rs.Close(); sql = "SELECT [Person_FirstName] & ' ' & [Person_LastName] AS personName From Person WHERE (((PersonID)=" + lTransaction.cashierID + "));"; rs = modRecordSet.getRS(ref sql); //rs.Open sql, cn, adOpenStatic, adLockReadOnly, adCmdText if (rs.RecordCount) { lTransaction.cashierName = rs.Fields("personName").Value + ""; } rs.Close(); sql = "SELECT [Person_FirstName] & ' ' & [Person_LastName] AS personName From Person WHERE (((PersonID)=" + lTransaction.managerID + "));"; rs = modRecordSet.getRS(ref sql); //rs.Open sql, cn, adOpenStatic, adLockReadOnly, adCmdText if (rs.RecordCount) { lTransaction.managerName = rs.Fields("personName").Value + ""; } rs.Close(); sql = "SELECT POS_Name From POS WHERE (((POS.POSID)=" + lTransaction.posID + "));"; rs = modRecordSet.getRS(ref sql); //rs.Open sql, cn, adOpenStatic, adLockReadOnly, adCmdText if (rs.RecordCount) { lTransaction.posName = rs.Fields("POS_Name").Value + ""; } rs.Close(); //sql = "SELECT SaleItem.*, StockItem.StockItem_Name AS longName, StockItem.StockItem_ReceiptName AS receiptName, Catalogue.Catalogue_Barcode AS code,'Sale' as saleType FROM (StockItem INNER JOIN SaleItem ON StockItem.StockItemID = SaleItem.SaleItem_StockItemID) INNER JOIN Catalogue ON (Catalogue.Catalogue_Quantity = SaleItem.SaleItem_ShrinkQuantity) AND (SaleItem.SaleItem_StockItemID = Catalogue.Catalogue_StockItemID) WHERE (((SaleItem.SaleItem_DepositType)=0) AND ((SaleItem.SaleItem_SaleID)=" & lID & "))" //sql = sql & " UNION " //sql = sql & "SELECT SaleItem.*, Deposit.Deposit_Name AS longName, Deposit.Deposit_ReceiptName AS receiptName, Deposit.Deposit_Key AS code,'Deposit' as saleType FROM Deposit INNER JOIN SaleItem ON Deposit.DepositID = SaleItem.SaleItem_StockItemID WHERE (((SaleItem.SaleItem_DepositType)<>0) AND ((SaleItem.SaleItem_SaleID)=" & lID & "));" sql = "SELECT SaleItem.*, 'Sale' AS saleType From SaleItem Where (((SaleItem.SaleItem_DepositType) = 0) And ((SaleItem.SaleItem_SaleID) = " + lID + "))"; sql = sql + " UNION "; sql = sql + "SELECT SaleItem.*, 'Deposit' AS saleType From SaleItem WHERE (((SaleItem.SaleItem_DepositType)<>0) AND ((SaleItem.SaleItem_SaleID)=" + lID + "));"; rs.Open(sql, cn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockReadOnly, ADODB.CommandTypeEnum.adCmdText); while (!(rs.EOF)) { lLineitem = new lineItem(); lLineitem.build = 0; lLineitem.depositType = rs.Fields("SaleItem_DepositType").Value; lLineitem.id = rs.Fields("SaleItem_StockItemID").Value; lLineitem.lineNo = rs.Fields("SaleItem_LineNo").Value; lLineitem.originalPrice = rs.Fields("SaleItem_PriceOriginal").Value; lLineitem.price = rs.Fields("SaleItem_Price").Value; lLineitem.quantity = rs.Fields("SaleItem_Quantity").Value; lLineitem.reversal = rs.Fields("SaleItem_Reversal").Value; lLineitem.revoke = rs.Fields("SaleItem_Revoke").Value; lLineitem.setBuild = rs.Fields("SaleItem_SetID").Value; lLineitem.shrink = rs.Fields("SaleItem_ShrinkQuantity").Value; lLineitem.vat = rs.Fields("SaleItem_Vat").Value; lLineitem.transactionType = rs.Fields("SaleType").Value + ""; //lLineitem.code = rs("Code") & "" switch (lLineitem.depositType) { case 0: sql = "SELECT StockItem.StockItem_Name AS longName, StockItem.StockItem_ReceiptName AS receiptName From StockItem WHERE (((StockItemID)=" + rs.Fields("SaleItem_StockItemID").Value + "));"; rsItems = modRecordSet.getRS(ref sql); if (rsItems.RecordCount) { lLineitem.name = rs.Fields("SaleItem_ShrinkQuantity").Value + " x " + rsItems.Fields("longName").Value; lLineitem.receiptName = rs.Fields("SaleItem_ShrinkQuantity").Value + "x" + rsItems.Fields("receiptName").Value; } rsItems.Close(); sql = "SELECT Catalogue.Catalogue_Barcode AS code FROM Catalogue WHERE (Catalogue.Catalogue_Quantity = " + rs.Fields("SaleItem_ShrinkQuantity").Value + ") AND (Catalogue.Catalogue_StockItemID = " + rs.Fields("SaleItem_StockItemID").Value + ");"; rsItems = modRecordSet.getRS(ref sql); if (rsItems.RecordCount) { lLineitem.code = rsItems.Fields("Code").Value + ""; } rsItems.Close(); break; case 1: sql = "SELECT Deposit.Deposit_Name AS longName, Deposit.Deposit_ReceiptName AS receiptName, Deposit.Deposit_Key AS code From Deposit WHERE (((DepositID)=" + rs.Fields("SaleItem_StockItemID").Value + "));"; rsItems = modRecordSet.getRS(ref sql); if (rsItems.RecordCount) { lLineitem.name = rs.Fields("longName").Value + "-Unit"; lLineitem.receiptName = rs.Fields("receiptName").Value + "(U)"; lLineitem.code = rsItems.Fields("Code").Value + ""; } rsItems.Close(); break; case 2: sql = "SELECT Deposit.Deposit_Name AS longName, Deposit.Deposit_ReceiptName AS receiptName, Deposit.Deposit_Key AS code From Deposit WHERE (((DepositID)=" + rs.Fields("SaleItem_StockItemID").Value + "));"; rsItems = modRecordSet.getRS(ref sql); if (rsItems.RecordCount) { lLineitem.name = rs.Fields("longName").Value + "-Empty Crate"; lLineitem.receiptName = rs.Fields("receiptName").Value + "(E)"; lLineitem.code = rsItems.Fields("Code").Value + ""; } rsItems.Close(); break; case 3: sql = "SELECT Deposit.Deposit_Name AS longName, Deposit.Deposit_ReceiptName AS receiptName, Deposit.Deposit_Key AS code From Deposit WHERE (((DepositID)=" + rs.Fields("SaleItem_StockItemID").Value + "));"; rsItems = modRecordSet.getRS(ref sql); if (rsItems.RecordCount) { lLineitem.name = rs.Fields("longName").Value + "-Full Case"; lLineitem.receiptName = rs.Fields("receiptName").Value + "(F)"; lLineitem.code = rsItems.Fields("Code").Value + ""; } rsItems.Close(); break; } lTransaction.lineItems.Add(ref lLineitem); rs.MoveNext(); } rs.Close(); sql = "SELECT Customer.*, CustomerTransaction.* FROM (CustomerTransaction INNER JOIN Sale ON CustomerTransaction.CustomerTransaction_ReferenceID = Sale.SaleID) INNER JOIN Customer ON CustomerTransaction.CustomerTransaction_CustomerID = Customer.CustomerID WHERE (((Sale.SaleID)=" + lID + "));"; rs.Open(sql, cn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly, ADODB.CommandTypeEnum.adCmdText); if (rs.RecordCount) { lCustomer.channelID = lTransaction.channelID; lCustomer.creditLimit = rs.Fields("Customer_ChannelID").Value; lCustomer.department = rs.Fields("Customer_DepartmentName").Value + ""; lCustomer.fax = rs.Fields("Customer_Fax").Value + ""; lCustomer.Key = rs.Fields("CustomerID").Value; lCustomer.name = rs.Fields("Customer_InvoiceName").Value + ""; lCustomer.outstanding = 0; lCustomer.person = rs.Fields("Customer_FirstName").Value + " " + rs.Fields("Customer_Surname").Value; lCustomer.physical = rs.Fields("Customer_PhysicalAddress").Value + ""; lCustomer.postal = rs.Fields("Customer_PostalAddress").Value + ""; lCustomer.signed_Renamed = rs.Fields("CustomerTransaction_PersonName").Value; lCustomer.telephone = rs.Fields("Customer_Telephone").Value + ""; lCustomer.terms = Convert.ToInt16(rs.Fields("Customer_Terms").Value + ""); lCustomer.tax = rs.Fields("Customer_VatNumber").Value + ""; if (rs.Fields("CustomerTransaction_TransactionTypeID").Value == 3) { lTransaction.transactionType = "Payment"; lTransaction.paymentDiscount = 0; } lTransaction.customer_Renamed = lCustomer; } rs.Close(); sql = "SELECT Consignment.* FROM Consignment INNER JOIN Sale ON Consignment.Consignment_SaleID = Sale.SaleID WHERE (((Sale.SaleID)=" + lID + "));"; rs.Open(sql, cn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockReadOnly, ADODB.CommandTypeEnum.adCmdText); if (rs.BOF & rs.EOF) { } else { lSpecial.address = rs.Fields("Consignment_Address").Value; lSpecial.mobile = rs.Fields("Consignment_Mobile").Value; lSpecial.name = rs.Fields("Consignment_Name").Value; lSpecial.quote = 0; lSpecial.saleID = lID; lSpecial.telephone = rs.Fields("Consignment_Number").Value; lSpecial.transactionType = "Consignment"; lTransaction.transactionSpecial_Renamed = lSpecial; } rs.Close(); sql = "SELECT Consignment.* FROM Consignment INNER JOIN Sale ON Consignment.Consignment_CompleteSaleID = Sale.SaleID WHERE (((Sale.SaleID)=" + lID + "));"; rs.Open(sql, cn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockReadOnly, ADODB.CommandTypeEnum.adCmdText); if (rs.BOF & rs.EOF) { } else { lSpecial.address = rs.Fields("Consignment_Address").Value; lSpecial.mobile = rs.Fields("Consignment_Mobile").Value; lSpecial.name = rs.Fields("Consignment_Name").Value; lSpecial.quote = 0; lSpecial.saleID = lID; lSpecial.telephone = rs.Fields("Consignment_Number").Value; lSpecial.transactionType = "Consignment Complete"; lTransaction.transactionSpecial_Renamed = lSpecial; } printTransactionA4(ref lTransaction); } } else if (Convert.ToDouble(Strings.Split(this.lvTransaction.FocusedItem.Name, "_")[3]) == 3) { //payment //Dim Report As New cryPayment Report.Load("cryPayment.rpt"); rs = modRecordSet.getRS(ref "SELECT * FROM Company"); Report.SetParameterValue("txtCompanyName", rs.Fields("Company_Name")); if (Information.IsDBNull(rs.Fields("Company_PhysicalAddress").Value)) { } else { lAddress = Strings.Replace(rs.Fields("Company_PhysicalAddress").Value, Constants.vbCrLf, ", "); if (Strings.Right(lAddress, 2) == ", ") { lAddress = Strings.Left(lAddress, Strings.Len(lAddress) - 2); } } Report.SetParameterValue("txtCompanyDetails1", lAddress); if (Information.IsDBNull(rs.Fields("Company_Telephone").Value)) { } else { Report.SetParameterValue("txtCompanyDetails2", rs.Fields("Company_Telephone")); } if (Information.IsDBNull(rs.Fields("Company_TaxNumber").Value)) { } else { Report.SetParameterValue("txtCompanyDetails4", "TAX NO :" + rs.Fields("Company_TaxNumber").Value); } //If lTransaction.heading2 <> "" Then // Report.txtCompanyDetails2.SetText lTransaction.heading2 // If lTransaction.heading3 <> "" Then // Report.txtCompanyDetails3.SetText lTransaction.heading3 // // Else // If lTransaction.taxNumber <> "" Then // Report.txtCompanyDetails4.SetText "TAX NO :" & lTransaction.taxNumber // End If // End If //Else // If lTransaction.heading3 <> "" Then // Report.txtCompanyDetails2.SetText lTransaction.heading3 // Else // If lTransaction.taxNumber <> "" Then // Report.txtCompanyDetails2.SetText "TAX NO :" & lTransaction.taxNumber // End If // End If //End If rs.Close(); Report.SetParameterValue("txtCustomer", _txtFields_2.Text); if (!string.IsNullOrEmpty(_txtFields_6.Text)) { lArray = Strings.Split(_txtFields_6.Text, Constants.vbCrLf); Report.SetParameterValue("txtCustAddress1", lArray[0]); if (Information.UBound(lArray) >= 1) Report.SetParameterValue("txtCustAddress2", lArray[1]); if (Information.UBound(lArray) >= 2) Report.SetParameterValue("txtCustAddress3", lArray[2]); if (Information.UBound(lArray) >= 3) Report.SetParameterValue("txtCustAddress4", lArray[3]); } if (!string.IsNullOrEmpty(_txtFields_0.Text)) Report.SetParameterValue("txtCustAddress5", "TAX NO: " + _txtFields_0.Text); //If LCase(databaseName) = "pricing.mdb" Then // sql = "SELECT Sale.SaleID, POS.POS_Name, Person.Person_FirstName, Person.Person_LastName, Sale.Sale_Date, Sale.Sale_DatePOS, Sale.Sale_Reference, Sale.Sale_Total, Sale.Sale_Tender FROM (Sale INNER JOIN POS ON Sale.Sale_PosID = POS.POSID) INNER JOIN Person ON Sale.Sale_PersonID = Person.PersonID WHERE (((Sale.SaleID)=" & lID & "));" //Else // sql = "SELECT Sale.SaleID, POS.POS_Name, M_Person.Person_FirstName, M_Person.Person_LastName, Sale.Sale_Date, Sale.Sale_DatePOS, Sale.Sale_Reference, Sale.Sale_Total, Sale.Sale_Tender FROM (Sale INNER JOIN POS ON Sale.Sale_PosID = POS.POSID) INNER JOIN M_Person ON Sale.Sale_PersonID = M_Person.PersonID WHERE (((Sale.SaleID)=" & lID & "));" //End If //sql = "SELECT Sale.SaleID, POS.POS_Name, Person.Person_FirstName, Person.Person_LastName, Sale.Sale_Date, Sale.Sale_DatePOS, Sale.Sale_Reference, Sale.Sale_Total, Sale.Sale_Tender FROM (Sale INNER JOIN POS ON Sale.Sale_PosID = POS.POSID) INNER JOIN Person ON Sale.Sale_PersonID = Person.PersonID WHERE (((Sale.SaleID)=" & lID & "));" sql = "SELECT Sale.* From Sale WHERE (((SaleID)=" + lID + "));"; rs.Open(sql, cn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly, ADODB.CommandTypeEnum.adCmdText); if (rs.RecordCount) { posID = rs.Fields("Sale_PosID").Value; personID = rs.Fields("Sale_PersonID").Value; Report.SetParameterValue("txtInvoiceNumber", rs.Fields("Sale_Reference")); Report.SetParameterValue("txtInvoiceDate", Strings.Format(rs.Fields("Sale_DatePOS").Value, "dd mmm yyyy hh:mm")); //Report.txtPOS.SetText rs("POS_Name") //Report.txtCashier.SetText rs("Person_FirstName") & rs("Person_LastName") Report.SetParameterValue("txtAmount", Strings.FormatNumber(rs.Fields("Sale_Total").Value, 2)); Report.SetParameterValue("txtChange", Strings.FormatNumber(rs.Fields("Sale_Tender").Value - rs.Fields("Sale_Total").Value, 2)); // lTransaction.paymentTotal - lTransaction.paymentTender, 2) Report.SetParameterValue("txtTender", Strings.FormatNumber(rs.Fields("Sale_Tender").Value, 2)); // lTransaction.paymentTender, 2) //Report.txtPaidBy.SetText lTransaction.customer.signed Report.ReportDefinition.Sections("txtPaidBy").SectionFormat.EnableSuppress = true; rs.Close(); sql = "SELECT [Person_FirstName] & ' ' & [Person_LastName] AS personName From Person WHERE (((PersonID)=" + personID + "));"; rs = modRecordSet.getRS(ref sql); if (rs.RecordCount) { Report.SetParameterValue("txtCashier", rs.Fields("personName").Value + ""); } rs.Close(); sql = "SELECT POS_Name From POS WHERE (((POS.POSID)=" + posID + "));"; rs = modRecordSet.getRS(ref sql); if (rs.RecordCount) { Report.SetParameterValue("txtPOS", rs.Fields("POS_Name").Value + ""); } rs.Close(); sql = "SELECT CustomerTransaction.CustomerTransaction_TransactionTypeID, CustomerTransaction.CustomerTransaction_Amount, CustomerTransaction.CustomerTransaction_ReferenceID From CustomerTransaction WHERE (((CustomerTransaction.CustomerTransaction_TransactionTypeID)=8) AND ((CustomerTransaction.CustomerTransaction_ReferenceID)=" + lID + "));"; Debug.Print(sql); rs.Open(sql, cn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly, ADODB.CommandTypeEnum.adCmdText); if (rs.RecordCount) { Report.SetParameterValue("txtSettlement", Strings.FormatNumber(rs.Fields("CustomerTransaction_Amount").Value, 2)); } else { Report.SetParameterValue("txtSettlement", Strings.FormatNumber("0.00", 2)); } My.MyProject.Forms.frmReportShow.Text = "Customer Statement"; My.MyProject.Forms.frmReportShow.CRViewer1.ReportSource = Report; My.MyProject.Forms.frmReportShow.mReport = Report; My.MyProject.Forms.frmReportShow.sMode = "0"; My.MyProject.Forms.frmReportShow.CRViewer1.Refresh(); System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.Default; My.MyProject.Forms.frmReportShow.ShowDialog(); } else { ReportNone.Load("cryNoRecords.rpt"); ReportNone.SetParameterValue("txtCompanyName", rs.Fields("Company_Name")); ReportNone.SetParameterValue("txtTitle", "Customer Statement"); //UPGRADE_WARNING: Couldn't resolve default property of object ReportNone.txtTitle. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"' My.MyProject.Forms.frmReportShow.Text = ReportNone.ParameterFields("txtTitle").ToString; My.MyProject.Forms.frmReportShow.CRViewer1.ReportSource = ReportNone; My.MyProject.Forms.frmReportShow.mReport = ReportNone; My.MyProject.Forms.frmReportShow.sMode = "0"; My.MyProject.Forms.frmReportShow.CRViewer1.Refresh(); System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.Default; My.MyProject.Forms.frmReportShow.ShowDialog(); return; } } }
public string getAddress() { try { Position PoiX = new Position(); PoiX.X = Lat; PoiX.Y = Lon; double tempLen = 1000000; string tempTown = ""; ADODB.Recordset RST = new ADODB.Recordset(); string sqlSTR = "SELECT name,the_geom FROM mergedpoints WHERE the_geom && 'BOX3D(" + (Lon - 0.5) + " " + (Lat - 0.5) + "," + (Lon + 0.5) + " " + (Lat + 0.5) + ") '::box3d AND distance( the_geom, GeometryFromText( 'POINT(" + Lon + " " + Lat + ")', -1 ) ) < 0.5"; string sqlSTROther = "SELECT name,the_geom FROM mergedpoints WHERE the_geom && 'BOX3D(" + (Lon - 6) + " " + (Lat - 6) + "," + (Lon + 6) + " " + (Lat + 6) + ") '::box3d AND distance( the_geom, GeometryFromText( 'POINT(" + Lon + " " + Lat + ")', -1 ) ) < 7"; RST.Open(sqlSTR, this.odbcDatabaseConnection, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockBatchOptimistic, 0); if (RST.EOF == true) { try { RST.Close(); } catch { } RST.Open(sqlSTROther, this.odbcDatabaseConnection, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockBatchOptimistic, 0); } if (RST.EOF == false) { RST.MoveFirst(); while (RST.EOF == false) { string Coord = RST.Fields["the_geom"].Value.ToString(); int Len = Coord.Length; Coord = Right(Coord, (Len - 14)); Len = Coord.Length; Coord = Mid(Coord, 0, (Len - 1)); char[] SepChar = { ' ' }; Array coordArray = Coord.Split(SepChar); double xlon = Convert.ToDouble(coordArray.GetValue(0).ToString()); double xlat = Convert.ToDouble(coordArray.GetValue(1).ToString()); Position PoiY = new Position(); PoiY.X = xlat; PoiY.Y = xlon; Calculations calc = new Calculations(); double xLen = calc.CalculateDistace(PoiX, PoiY); //MessageBox.Show(xLen.ToString()); if (xLen < tempLen) { tempLen = xLen; tempTown = RST.Fields["name"].Value.ToString(); } //PoiY = null; coordArray = null; RST.MoveNext(); } RST.Close(); RST = null; } if (tempLen != 1000000) { string retVal = Decimal.Round((decimal)tempLen, 3).ToString(); return retVal + "Km From " + tempTown; } else { return " "; } } catch (System.Exception qw) { return " "; } }
static void Main(string[] args) { ADODB.Connection conn = null; ADODB.Recordset rs = null; try { //////////////////////////////////////////////////////////////////////////////// // 连接数据源. // Console.WriteLine("正在连接数据库 ..."); // 获取连接字符串 string connStr = string.Format("Provider=SQLOLEDB;Data Source={0};Initial Catalog={1};Integrated Security=SSPI", ".\\sqlexpress", "SQLServer2005DB"); // 打开连接 conn = new ADODB.Connection(); conn.Open(connStr, null, null, 0); //////////////////////////////////////////////////////////////////////////////// // 编写并执行ADO命令. // 可以是SQL指令(SELECT/UPDATE/INSERT/DELETE),或是调用存储过程. // 此处是一个INSERT命令示例. // Console.WriteLine("将一条记录插入表CountryRegion中..."); // 1. 生成一个Command对象 ADODB.Command cmdInsert = new ADODB.Command(); // 2. 将连接赋值于命令 cmdInsert.ActiveConnection = conn; // 3. 设置命令文本 // SQL指令或者存储过程名 cmdInsert.CommandText = "INSERT INTO CountryRegion(CountryRegionCode, Name, ModifiedDate)" + " VALUES (?, ?, ?)"; // 4. 设置命令类型 // ADODB.CommandTypeEnum.adCmdText 用于普通的SQL指令; // ADODB.CommandTypeEnum.adCmdStoredProc 用于存储过程. cmdInsert.CommandType = ADODB.CommandTypeEnum.adCmdText; // 5. 添加参数 // CountryRegionCode (nvarchar(20)参数的添加 ADODB.Parameter paramCode = cmdInsert.CreateParameter( "CountryRegionCode", // 参数名 ADODB.DataTypeEnum.adVarChar, // 参数类型 (nvarchar(20)) ADODB.ParameterDirectionEnum.adParamInput, // 参数类型 20, // 参数的最大长度 "ZZ"+DateTime.Now.Millisecond); // 参数值 cmdInsert.Parameters.Append(paramCode); // Name (nvarchar(200))参数的添加 ADODB.Parameter paramName = cmdInsert.CreateParameter( "Name", // 参数名 ADODB.DataTypeEnum.adVarChar, // 参数类型 (nvarchar(200)) ADODB.ParameterDirectionEnum.adParamInput, // 参数传递方向 200, // 参数的最大长度 "Test Region Name"); // 参数值 cmdInsert.Parameters.Append(paramName); // ModifiedDate (datetime)参数的添加 ADODB.Parameter paramModifiedDate = cmdInsert.CreateParameter( "ModifiedDate", // 参数名 ADODB.DataTypeEnum.adDate, // 参数类型 (datetime) ADODB.ParameterDirectionEnum.adParamInput, // 参数传递方向 -1, // 参数的最大长度 (datetime忽视该值) DateTime.Now); // 参数值 cmdInsert.Parameters.Append(paramModifiedDate); // 6. 执行命令 object nRecordsAffected = Type.Missing; object oParams = Type.Missing; cmdInsert.Execute(out nRecordsAffected, ref oParams, (int)ADODB.ExecuteOptionEnum.adExecuteNoRecords); //////////////////////////////////////////////////////////////////////////////// // 使用Recordset对象. // http://msdn.microsoft.com/en-us/library/ms681510.aspx // Recordset表示了数据表中记录或执行命令获得的结果的集合。 // 在任何时候, Recordset对象都指向集合中的单条记录,并将 // 该记录作为它的当前记录。 // Console.WriteLine("列出表CountryRegion中的所有记录"); // 1. 生成Recordset对象 rs = new ADODB.Recordset(); // 2. 打开Recordset对象 string strSelectCmd = "SELECT * FROM CountryRegion"; // WHERE ... rs.Open(strSelectCmd, // SQL指令/表,视图名 / // 存储过程调用 /文件名 conn, // 连接对象/连接字符串 ADODB.CursorTypeEnum.adOpenForwardOnly, // 游标类型. (只进游标) ADODB.LockTypeEnum.adLockOptimistic, // 锁定类型. (仅当需要调用 // 更新方法时,才锁定记录) (int)ADODB.CommandTypeEnum.adCmdText); // 将第一个参数视为SQL命令 // 或存储过程. // 3. 通过向前移动游标列举记录 // 移动到Recordset中的第一条记录 rs.MoveFirst(); while (!rs.EOF) { // 当在表中定义了一个可空字段,需要检验字段中的值是否为DBNull.Value. string code = (rs.Fields["CountryRegionCode"].Value == DBNull.Value) ? "(DBNull)" : rs.Fields["CountryRegionCode"].Value.ToString(); string name = (rs.Fields["Name"].Value == DBNull.Value) ? "(DBNull)" : rs.Fields["Name"].Value.ToString(); DateTime modifiedDate = (rs.Fields["ModifiedDate"].Value == DBNull.Value) ? DateTime.MinValue : (DateTime)rs.Fields["ModifiedDate"].Value; Console.WriteLine(" {2} \t{0}\t{1}", code, name, modifiedDate.ToString("yyyy-MM-dd")); // 移动到下一条记录 rs.MoveNext(); } } catch (Exception ex) { Console.WriteLine("应用程序出现错误: {0}", ex.Message); if (ex.InnerException != null) Console.WriteLine("描述: {0}", ex.InnerException.Message); } finally { //////////////////////////////////////////////////////////////////////////////// // 退出前清理对象. // Console.WriteLine("正在关闭连接 ..."); // 关闭record set,当它处于打开状态时 if (rs != null && rs.State == (int)ADODB.ObjectStateEnum.adStateOpen) rs.Close(); // 关闭数据库连接,当它处于打开状态时 if (conn != null && conn.State == (int)ADODB.ObjectStateEnum.adStateOpen) conn.Close(); } }
private void backgroundWorker_DoWork(object sender, DoWorkEventArgs e) { try { BackgroundParameter bObj = e.Argument as BackgroundParameter; string url = bObj.url; string querySuffix = bObj.querySuffix; Uri uriFujiRDS = new Uri(url); ProgressObject pObj = new ProgressObject(); backgroundWorker.ReportProgress(0, pObj); DateTime dtime = dateTimePickerStart.Value; string dateStart = dtime.ToString("yyyy-MM-dd HH:mm:ss"); string dateEnd = dtime.AddHours(double.Parse(bObj.duration)).ToString("yyyy-MM-dd HH:mm:ss"); //dateTimePickerEnd.Value.ToString("yyyy-MM-dd HH:mm:ss"); string query = String.Format(@"select * from storage s,document d,study_document sd,study st,patient p,procedure_info pi where d.id = sd.document_uid and s.id=d.storage_uid and st.id=sd.study_uid and p.id=st.patient_uid and pi.id=st.procedure_info_uid and d.name='Notes' and d.creation_timedate between to_date('{0}','YYYY-MM-DD HH24:MI:SS') and to_date('{1}','YYYY-MM-DD HH24:MI:SS')", dateStart, dateEnd); query += querySuffix; ADODB.Recordset rs = new ADODB.Recordset(); byte[] result = retrieveRDS(uriFujiRDS, query); if (result == null) return; string tempfile = Path.GetTempFileName(); ByteArrayToFile(tempfile, result); rs.Open(tempfile, "Provider=MSPersist", ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly, 0); string notefile = Path.GetTempFileName(); //** Eliminating this code due to apparent unreliability of WebClient with redirects //WebClient client = new WebClient(); //client.Credentials = myCredentialCache; //client.UseDefaultCredentials = true; dt = new DataTable(); dt.Columns.Add("Name", typeof(string)); dt.Columns.Add("MRN", typeof(string)); dt.Columns.Add("Accession", typeof(string)); dt.Columns.Add("Procedure", typeof(string)); dt.Columns.Add("Study Time", typeof(string)); dt.Columns.Add("Note Time", typeof(string)); dt.Columns.Add("Note", typeof(string)); dt.Columns.Add("Reports", typeof(string)); DateTime lastprogress = DateTime.Now; while (!rs.EOF) { string http_url = rs.Fields["http_url"].Value.ToString(); string https_url = rs.Fields["https_url"].Value.ToString(); string accnum = rs.Fields["ris_study_euid"].Value.ToString(); string proc = rs.Fields["description"].Value.ToString(); string proc_code = rs.Fields["code"].Value.ToString(); string filename = rs.Fields["filename"].Value.ToString(); string mrn = rs.Fields["internal_euid"].Value.ToString(); string lastname = rs.Fields["last_name"].Value.ToString(); string firstname = rs.Fields["first_name"].Value.ToString(); string middlename = rs.Fields["middle_name"].Value.ToString(); string study_time = ((DateTime)rs.Fields["study_timedate"].Value).ToString("s").Replace('T', ' '); string creation_time = ((DateTime)rs.Fields["creation_timedate"].Value).ToString("s").Replace('T', ' '); if (url.StartsWith("https")) { filename = https_url + filename; } else { filename = http_url + filename; } string note = ""; try { downloadFile(filename, notefile); //client.DownloadFile(filename, notefile); note = parseNote(notefile); } catch (Exception ex) { note = String.Format("Error downloading note at {0}: {1}", filename, ex.Message); } string name = (lastname + ", " + firstname + " " + middlename).Trim(); dt.Rows.Add(name, mrn, accnum, proc, study_time, creation_time, note, ""); rs.MoveNext(); pObj.dt = dt; backgroundWorker.ReportProgress(0, pObj); } rs.Close(); File.Delete(tempfile); int totalNotes = dt.Rows.Count; int current = 0; foreach (DataRow dr in dt.Rows) { // Retrieve reports here query = String.Format(@"select * from storage s,document d,study_document sd,study st where d.id = sd.document_uid and s.id=d.storage_uid and st.id=sd.study_uid and d.name='Report' and st.ris_study_euid='{0}' order by d.creation_timedate", dr["Accession"]); //dr["Reports"] = query; result = retrieveRDS(uriFujiRDS, query); if (result == null) return; tempfile = Path.GetTempFileName(); ByteArrayToFile(tempfile, result); rs.Open(tempfile, "Provider=MSPersist", ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly, 0); string report = ""; while (!rs.EOF) { string http_url = rs.Fields["http_url"].Value.ToString(); string https_url = rs.Fields["https_url"].Value.ToString(); string doctype = rs.Fields["name"].Value.ToString(); string filename = rs.Fields["filename"].Value.ToString(); if (url.StartsWith("https")) { filename = https_url + filename; } else { filename = http_url + filename; } try { downloadFile(filename, notefile); //client.DownloadFile(filename, notefile); report += parseReport(notefile, url); } catch (Exception ex) { report += String.Format("Error downloading report at {0}: {1}", filename, ex.Message); } rs.MoveNext(); if (!rs.EOF) report += "\r\n\r\n======\r\n\r\n"; } rs.Close(); File.Delete(tempfile); dr["Reports"] = report; current += 1; if ((DateTime.Now - lastprogress).Milliseconds > 50) { backgroundWorker.ReportProgress(current * 100 / totalNotes, pObj); lastprogress = DateTime.Now; } } File.Delete(notefile); pObj.updateDT = true; backgroundWorker.ReportProgress(100, pObj); } catch (Exception ex) { labelStatus.Text = ex.Message; } }
public static Boolean bExportDataToSql(String sDatabaseLocation, Boolean bDebug) { clsLog clsLog_ = new clsLog(msLogFile, msVersionData); clsError clsError_ = new clsError(); ADODB.Connection conn = new ADODB.Connection(); ADODB.Recordset rs = new ADODB.Recordset(); clsLog_.mLog(Constants.gcInfo, "Exporting data to sql ..."); String sSql; String sSqlfile = sDatabaseLocation + "\\data\\OneLanData.sql"; String sString = null; String sPropertyInsertIntoHeader = null; String sAccomInsertIntoHeader = null; Int16 i = 0; //String sSql = null; // Variable to hold website information - needed to strip any single quotes out String sWebsite = null; if (bDebug) { clsLog_.mLog(Constants.gcInfo, sIndent + "onelan.bExportDataToSql, sSqlfile = " + sSqlfile); } try { // Open connection to database conn.Open(gcDSN + sDatabaseLocation + "\\" + gsOneLanDatabase); // Remove previous versions of the file if (File.Exists(sSqlfile)) { File.Delete(sSqlfile); } // Open streamwriter obbject StreamWriter sw = File.AppendText(sSqlfile); // Set the insert commands sw.WriteLine("-- File : "+ sSqlfile); sw.WriteLine("-- Date : " + DateTime.Now.ToString("dd-MMM-yyyy HH:mm:ss")); sw.WriteLine("-- Author : auto-sgenerated / NRE www.rmount.co.uk"); sw.WriteLine("-- Client : Raeburn Christie, Aberdeen"); sw.WriteLine("-- Purpose : Repopulate Raeburn mysql database of property data, for use in property screens"); sw.WriteLine(""); sw.WriteLine("-- To apply mysql -pusername -ppassword < " + sSqlfile); sw.WriteLine(""); sw.WriteLine("-- Purge accom table ..."); sw.WriteLine("DELETE FROM accom;"); sw.WriteLine("-- Purge Property table ..."); sw.WriteLine("DELETE FROM property;"); sw.WriteLine(""); sw.WriteLine("-- Repopulate Property table ..."); sPropertyInsertIntoHeader = " INSERT INTO `property` (`PropID`, `PropertyAddress1`, `PropertyAddress2`, `PropertyAddress3`, `Price`, `OffersOverEtc`, `ClosingDate`, `UnderOffer`, `PropertyAddress4`, `Postcode`, `RCCWOffice`) VALUES"; sAccomInsertIntoHeader = "INSERT INTO `accom` (`PropID`, `Accom`, `Website`) VALUES"; // Open the recordset //rs.Open("SELECT * FROM property ORDER BY PropID", conn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockOptimistic, -1); sSql= "SELECT PropID" + " , PropertyAddress1" + " , PropertyAddress2" + " , PropertyAddress3" + " , Price" + " , OffersOverEtc" + " , Format(ClosingDate,'YYYY-MM-DD HH:NN:SS') as cd" + " , UnderOffer" + " , PropertyAddress4" + " , Postcode" + " , RCCWOffice" + " FROM property" + " ORDER BY PropID"; clsLog_.mLog("INFO", "property extract sql = " + sSql); rs.Open (sSql,conn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockOptimistic, -1); if (!rs.EOF) { sw.WriteLine(sPropertyInsertIntoHeader); while (!rs.EOF) { if (i == 150) { sw.WriteLine(sPropertyInsertIntoHeader); i = 0; } // sString = "(" + rs.Fields["PropID"].Value + ",'" + // rs.Fields["PropertyAddress1"].Value + "','" + // rs.Fields["PropertyAddress2"].Value + "','" + // rs.Fields["PropertyAddress3"].Value + "'," + // rs.Fields["Price"].Value + ",'" + // rs.Fields["OffersOverEtc"].Value + "','" + // rs.Fields["ClosingDate"].Value + "','" + // rs.Fields["UnderOffer"].Value + "','" + // rs.Fields["PropertyAddress4"].Value + "','" + // rs.Fields["Postcode"].Value + "','" + // rs.Fields["RCCWOffice"].Value + "')"; sString = "(" + rs.Fields["PropID"].Value + ",'" + rs.Fields["PropertyAddress1"].Value + "','" + rs.Fields["PropertyAddress2"].Value + "','" + rs.Fields["PropertyAddress3"].Value + "'," + rs.Fields["Price"].Value + ",'" + rs.Fields["OffersOverEtc"].Value + "','" + rs.Fields["cd"].Value + "','" + rs.Fields["UnderOffer"].Value + "','" + rs.Fields["PropertyAddress4"].Value + "','" + rs.Fields["Postcode"].Value + "','" + rs.Fields["RCCWOffice"].Value + "')"; //sString = " i = " + i + ", PropID = " + rs.Fields["PropID"].Value; i++; if (i<150) {sString = sString + ","; } else { sString = sString + ";"; } rs.MoveNext(); // Replace '' with NULL sString = sString.Replace("''", "NULL"); // Force mysql null date format sString = sString.Replace("30/12/1899 00:00:00", "1899-12-30 00:00:00"); if (!rs.EOF) { sw.WriteLine(sString); } // end while } // End if } //sw.Close(); rs.Close(); // Replace last comma with a semi colon // Replace '' with NULL //sString = sString.Replace("''", "NULL"); sString = sString.Remove(sString.Length - 1, 1) + ";"; // Add the last line sw.WriteLine(sString); // // Now do the accom sw.WriteLine(""); sw.WriteLine("-- Purge accom table ..."); sw.WriteLine("DELETE FROM accom;"); sw.WriteLine(""); sw.WriteLine("-- Repopulate accom table ..."); rs.Open("SELECT * FROM accom ORDER BY PropID", conn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockOptimistic, -1); if (!rs.EOF) { sw.WriteLine(sAccomInsertIntoHeader); while (!rs.EOF) { if (i == 150) { sw.WriteLine(sAccomInsertIntoHeader); i = 0; } sWebsite = ""; sWebsite = rs.Fields["Website"].Value; // strip any single quotes off website information sWebsite = sWebsite.Replace("'", ""); sString = "(" + rs.Fields["PropID"].Value + "," + "NULL" + ",'" + sWebsite + "')"; i++; if (i < 150) { sString = sString + ","; } else { sString = sString + ";"; } rs.MoveNext(); // Replace '' with NULL sString = sString.Replace("''", "NULL"); if (!rs.EOF) { sw.WriteLine(sString); } // end while } // End if } //sw.Close(); rs.Close(); // Replace last comma with a semi colon // Replace '' with NULL sString = sString.Replace("''", "NULL"); sString = sString.Remove(sString.Length - 1, 1) + ";"; // Add the last line sw.WriteLine(sString); sw.Close(); return true; } catch (Exception e) { clsError_.mLogError("Problem exporting data to sql", "onelan", "bExportDataToSql", e, msVersionData, msLogFile, false); return false; } // End of export data to ssql }
public void ImportPartBom() { string partPath = "http://nwszmail/public/namwah/Parts2/Parts/"; string strSQL = ""; ADODB.Connection cnn = new ADODB.Connection(); ADODB.Recordset rst = new ADODB.Recordset(); //Item item; session.BeginTransaction(); XPCollection<BomLine> bLines = new XPCollection<BomLine>(session); session.Delete(bLines); session.Save(bLines); session.CommitTransaction(); Part part; Dictionary<string, Part> dictPart = new Dictionary<string, Part>(); CacheItem(); ConnectDB(cnn, partPath); strSQL = "SELECT \"nw:partno\", \"nw:material\", \"nw:part:tmxrefno\", \"nw:rout1:resoption\", \"nw:rout1:resourceno\", \"nw:rout1:type\", "; strSQL = strSQL + " \"nw:bom:list:partno\", \"nw:bom:list:qty\" "; strSQL = strSQL + " FROM \"" + partPath ; strSQL = strSQL + "\" WHERE (\"DAV:ishidden\" = false)"; rst.Open(strSQL, cnn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockBatchOptimistic, 1); while (!rst.EOF) { part = new Part(); part.partNo = rst.Fields["nw:partno"].Value.ToString(); part.bomNo = rst.Fields["nw:bom:list:partno"].Value.ToString(); part.bomQty = rst.Fields["nw:bom:list:qty"].Value.ToString(); part.resOption = bool.Parse(rst.Fields["nw:rout1:resoption"].Value.ToString()); part.resourceNo = rst.Fields["nw:rout1:resourceno"].Value.ToString(); part.routType = rst.Fields["nw:rout1:type"].Value.ToString(); if (dictPart.ContainsKey(part.partNo) == false) dictPart.Add(part.partNo, part); rst.MoveNext(); } session.BeginTransaction(); foreach (Item item in dictItem.Values ) { //int rout = 0; if (dictPart.ContainsKey(item.ItemNo)) { part = dictPart[item.ItemNo]; // if (item.ItemNo.EndsWith("P01")) // System.Diagnostics.Debug.WriteLine(item.ItemNo); bool resOption; do { resOption = part.resOption; if (part.resOption && part.bomNo == "") { // Insert Route; if (dictPart.ContainsKey(part.resourceNo)) part = dictPart[part.resourceNo]; else break; } else { // Insert BOM; resOption = false; if (part.resourceNo == "bom" && part.bomNo != "") { string[] bPartNo = Regex.Split(part.bomNo, ","); string[] bQty = Regex.Split(part.bomQty, ","); int i = 0; foreach (string bNo in bPartNo) { if (dictItem.ContainsKey(bNo)) { BomLine bomLine = new BomLine(session); bomLine.BomItem = dictItem[bNo]; bomLine.Item = item; //dictItem[item.ItemNo]; bomLine.PerSeries = 1; int b; if (int.TryParse(bQty[i], out b)) bomLine.Qty = int.Parse(bQty[i]); else bomLine.Qty = 1; bomLine.Save(); } else { System.Diagnostics.Debug.Write(bNo); } i++; } item.Save(); } else if (part.resourceNo != "" && part.resourceNo != "bom" && dictItem.ContainsKey(part.resourceNo)) { BomLine bomLine = new BomLine(session); bomLine.BomItem = dictItem[part.resourceNo]; bomLine.Item = item; //dictItem[part.partNo]; bomLine.PerSeries = 1; bomLine.Qty = 1; bomLine.Save(); item.Save(); } } } while (resOption); } } session.CommitTransaction(); }
public void CopyTable(ADOX.Table tblAccess) { ADODB.Recordset recMaster = new ADODB.Recordset(); ADODB.Recordset recLoop = new ADODB.Recordset(); int intLoop = 0; string strInfile = ""; string strSQL = "SELECT "; string strRecord; string strLoadFilePath = strSourceDbPath.Replace("\\", "\\\\"); string strFileName = strTempPath + tblAccess.Name + ".txt"; StreamWriter sw = new StreamWriter(strFileName, false); //create the infile strInfile += "LOAD DATA LOCAL INFILE '" + strFileName + "' INTO TABLE " + strMySQLDBName + "." + tblAccess.Name + " "; strInfile += "FIELDS TERMINATED BY ',' "; strInfile += "ESCAPED BY '\\\\' "; strInfile += "LINES TERMINATED BY 0x0d0a "; strInfile += "("; //loop through fields to enumerate them for the infile and build a select statement for (intLoop = 0; intLoop < tblAccess.Columns.Count; intLoop++) { strInfile += MySQLName((tblAccess.Columns[intLoop].Name)); switch (tblAccess.Columns[intLoop].Type) { case ADOX.DataTypeEnum.adDate: //convert to MySQL datetime format strSQL += "FORMAT([" + tblAccess.Columns[intLoop].Name + "], 'YYYY-MM-DD HH:MM:SS') as " + tblAccess.Columns[intLoop].Name; break; default: strSQL += "[" + tblAccess.Columns[intLoop].Name + "]"; break; } if (intLoop < tblAccess.Columns.Count - 1) { strSQL += ","; strInfile += ", "; } } strInfile += ");"; strSQL += " FROM [" + tblAccess.Name + "]"; //open the "Master" recordset recMaster.CursorLocation = ADODB.CursorLocationEnum.adUseClient; recMaster.Open(strSQL, conJCMS_db, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic, 0); //create the "Loop" recordset, this is a clone of the master, with the exception //that the definedsize for text fields is lengthened. This is because the added //escape characters could potentially exceed the field length in the master recordset recLoop.CursorLocation = ADODB.CursorLocationEnum.adUseClient; ADODB.Fields fdsLoop = recLoop.Fields; ADODB.Fields fdsMaster = recMaster.Fields; foreach (ADODB.Field fldIn in fdsMaster) { if (fldIn.Type.ToString().IndexOf("Char") > 0) { fdsLoop.Append(fldIn.Name, fldIn.Type, fldIn.DefinedSize + 30, ADODB.FieldAttributeEnum.adFldIsNullable, null); } else { fdsLoop.Append(fldIn.Name, fldIn.Type, fldIn.DefinedSize, ADODB.FieldAttributeEnum.adFldIsNullable, null); } } recLoop.Open(System.Reflection.Missing.Value, System.Reflection.Missing.Value, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic, 0); recLoop.AddNew(System.Reflection.Missing.Value, System.Reflection.Missing.Value); while (!recMaster.EOF) { for (int columnIndex = 0; columnIndex < recMaster.Fields.Count; columnIndex++) { recLoop.Fields[columnIndex].Value = recMaster.Fields[columnIndex].Value; if (recLoop.Fields[columnIndex].Value.ToString().Length > 0) { if ((recLoop.Fields[columnIndex].Value.ToString().IndexOf("\\", 0) + 1) > 0) { recLoop.Fields[columnIndex].Value = recLoop.Fields[columnIndex].Value.ToString().Replace("\\", "\\\\"); } if ((recLoop.Fields[columnIndex].Value.ToString().IndexOf(",", 0) + 1) > 0) { recLoop.Fields[columnIndex].Value = recLoop.Fields[columnIndex].Value.ToString().Replace(",", "\\,"); } if ((recLoop.Fields[columnIndex].Value.ToString().IndexOf(System.Environment.NewLine, 0) + 1) > 0) { recLoop.Fields[columnIndex].Value = recLoop.Fields[columnIndex].Value.ToString().Replace(System.Environment.NewLine, " "); } } } strRecord = recLoop.GetString(ADODB.StringFormatEnum.adClipString, 1, ",", System.Environment.NewLine, "\\N"); recLoop.MovePrevious(); sw.Write(strRecord); recMaster.MoveNext(); } recMaster.Close(); recMaster.ActiveConnection = null; try { recLoop.Close(); } catch { } sw.Close(); ExecuteSQL(strInfile); File.Delete(strFileName); recLoop = null; }
private void DataList1_DblClick(System.Object eventSender, KeyPressEventArgs eventArgs) { ADODB.Recordset rs = default(ADODB.Recordset); ADODB.Recordset rst = default(ADODB.Recordset); ADODB.Recordset rsInner = default(ADODB.Recordset); ADODB.Recordset rsShelf = default(ADODB.Recordset); ADODB.Recordset rsBClabel = default(ADODB.Recordset); short HoldBClabelItem_BCLabelID = 0; string TheSample = null; short IntLabelID = 0; short IncrBClabelID = 0; rs = new ADODB.Recordset(); rst = new ADODB.Recordset(); rsInner = new ADODB.Recordset(); rsShelf = new ADODB.Recordset(); rsBClabel = new ADODB.Recordset(); short TheeMaxID = 0; modRecordSet.cnnDB.Execute("DELETE * FROM BClabel;"); modRecordSet.cnnDB.Execute("DELETE * FROM BClabelItem;"); modApplication.IntDesign = 1; //New code HoldBClabelItem_BCLabelID = 1; rs = modRecordSet.getRS(ref "SELECT BClabel.*, BClabelItem.* FROM BClabel INNER JOIN BClabelItem ON BClabel.BClabelID = BClabelItem.BClabelItem_BCLabelID"); if (rs.RecordCount > 0) { if (string.IsNullOrEmpty(Strings.Trim(DataList1.CurrentCell.Value.ToString()))) { if (modApplication.TheType == 2) { Interaction.MsgBox("Please select Stock Barcode Design and click Next", MsgBoxStyle.Information, "4Pos Back Office"); return; } else { Interaction.MsgBox("Please select Shelf Talker Design and click Next", MsgBoxStyle.Information, "4Pos Back Office"); return; } } else { } modApplication.MyLIDWHole = Convert.ToInt16(DataList1.CurrentCell.Value); rs = modRecordSet.getRS(ref "SELECT BClabel.*, BClabelItem.* FROM BClabel INNER JOIN BClabelItem ON BClabel.BClabel_LabelID = BClabelItem.BClabelItem_LabelID WHERE BClabelItem.BClabelItem_LabelID=" + modApplication.MyLIDWHole + ""); if (rs.RecordCount == 0) { IncrBClabelID = 1; rsInner = modRecordSet.getRS(ref "SELECT Label.*, LabelItem.* FROM Label INNER JOIN LabelItem ON Label.LabelID = LabelItem.labelItem_LabelID WHERE Label.Label_Type=2;"); rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES('Stock','Stock','" + 0 + "',15," + rsInner.Fields("LabelID").Value + ")"); //Set rsBClabel = getRS("INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(1,'Stock','Stock','" & 0 & "',15," & rsInner("LabelID") & ")") while (!(rsInner.EOF)) { //**** //Inserting information into BCLabel //*** if (string.IsNullOrEmpty(Strings.Trim(rsInner.Fields("labelItem_Sample").Value))) { TheSample = " "; //UPGRADE_WARNING: Use of Null/IsNull() detected. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="2EED02CB-5C0E-4DC1-AE94-4FAA3A30F51A"' } else if (Information.IsDBNull(rsInner.Fields("labelItem_Sample").Value)) { TheSample = " "; } else { TheSample = rsInner.Fields("labelItem_Sample").Value; } rst = modRecordSet.getRS(ref "INSERT INTO BClabelItem(BClabelItem_BCLabelID,BClabelItem_Line,BClabelItem_Field,BClabelItem_Align,BClabelItem_Size,BClabelItem_Bold,BClabelItem_Sample,BClabelItem_Disabled,BClabelItem_LabelID)VALUES(" + HoldBClabelItem_BCLabelID + "," + rsInner.Fields("labelItem_Line").Value + ",'" + rsInner.Fields("labelItem_Field").Value + "'," + rsInner.Fields("labelItem_Align").Value + "," + rsInner.Fields("labelItem_Size").Value + "," + rsInner.Fields("labelItem_Bold").Value + ",'" + TheSample + "','" + 0 + "'," + rsInner.Fields("labelItem_LabelID").Value + ")"); IntLabelID = rsInner.Fields("labelItem_LabelID").Value; rsInner.MoveNext(); //**** //If the ID is still for the same design then dont increment HoldBClabelItem_BCLabelID //**** // ERROR: Not supported in C#: OnErrorStatement if (IntLabelID != rsInner.Fields("labelItem_LabelID").Value) { HoldBClabelItem_BCLabelID = HoldBClabelItem_BCLabelID + 1; IncrBClabelID = IncrBClabelID + 1; if (rsInner.Fields("Label_Top").Value == 3) { rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(" + IncrBClabelID + ",'Stock','Stock','" + 0 + "',15," + rsInner.Fields("LabelID").Value + ")"); } else { rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(" + IncrBClabelID + ",'Stock','Stock','" + 0 + "',30," + rsInner.Fields("LabelID").Value + ")"); } } else { } } rst = modRecordSet.getRS(ref "SELECT Max(BClabelID) As MaxLaID FROM BClabel"); //Dim TheeMaxID As Integer TheeMaxID = rst.Fields("MaxLaID").Value; rsInner = modRecordSet.getRS(ref "SELECT Label.*, LabelItem.* FROM Label INNER JOIN LabelItem ON Label.LabelID = LabelItem.labelItem_LabelID WHERE Label.Label_Type=1;"); //**** //Inserting For shelf talker //**** TheeMaxID = TheeMaxID + 1; rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(" + IncrBClabelID + ",'Stock','Stock','" + 0 + "',15," + rsInner.Fields("LabelID").Value + ")"); while (!(rsInner.EOF)) { //**** //Inserting information into BCLabel //*** if (string.IsNullOrEmpty(Strings.Trim(rsInner.Fields("labelItem_Sample").Value))) { TheSample = " "; //UPGRADE_WARNING: Use of Null/IsNull() detected. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="2EED02CB-5C0E-4DC1-AE94-4FAA3A30F51A"' } else if (Information.IsDBNull(rsInner.Fields("labelItem_Sample").Value)) { TheSample = " "; } else { TheSample = rsInner.Fields("labelItem_Sample").Value; } rst = modRecordSet.getRS(ref "INSERT INTO BClabelItem(BClabelItem_BCLabelID,BClabelItem_Line,BClabelItem_Field,BClabelItem_Align,BClabelItem_Size,BClabelItem_Bold,BClabelItem_Sample,BClabelItem_Disabled,BClabelItem_LabelID)VALUES(" + TheeMaxID + "," + rsInner.Fields("labelItem_Line").Value + ",'" + rsInner.Fields("labelItem_Field").Value + "'," + rsInner.Fields("labelItem_Align").Value + "," + rsInner.Fields("labelItem_Size").Value + "," + rsInner.Fields("labelItem_Bold").Value + ",'" + TheSample + "','" + 0 + "'," + rsInner.Fields("labelItem_LabelID").Value + ")"); IntLabelID = rsInner.Fields("labelItem_LabelID").Value; rsInner.MoveNext(); //**** //If the ID is still for the same design then dont increment HoldBClabelItem_BCLabelID //**** if (IntLabelID != rsInner.Fields("labelItem_LabelID").Value) { TheeMaxID = TheeMaxID + 1; //IncrBClabelID = IncrBClabelID + 1 if (rsInner.Fields("Label_Top").Value == 3) { rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(" + TheeMaxID + ",'Stock','Stock','" + 0 + "',15," + rsInner.Fields("LabelID").Value + ")"); } else { rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(" + TheeMaxID + ",'Stock','Stock','" + 0 + "',30," + rsInner.Fields("LabelID").Value + ")"); } } else { } } //*** //For new database //*** if (modApplication.IntDesign1 != 2) { if (string.IsNullOrEmpty(Strings.Trim(DataList1.CurrentCell.Value.ToString()))) { if (modApplication.TheType == 2) { Interaction.MsgBox("Please select Stock Barcode Design and click Next", MsgBoxStyle.Information, "4Pos Back Office"); return; } else { Interaction.MsgBox("Please select Shelf Talker Design and click Next", MsgBoxStyle.Information, "4Pos Back Office"); return; } } else { } } else { modApplication.IntDesign = 0; } if (modApplication.IntDesign1 == 2) { modApplication.IntDesign1 = 0; cmdNew_Click(cmdnew, new System.EventArgs()); return; } modApplication.MyLIDWHole = Convert.ToInt16(DataList1.CurrentCell.Value); rs = modRecordSet.getRS(ref "SELECT BClabel.*, BClabelItem.* FROM BClabel INNER JOIN BClabelItem ON BClabel.BClabel_LabelID = BClabelItem.BClabelItem_LabelID WHERE BClabelItem.BClabelItem_LabelID=" + modApplication.MyLIDWHole + ""); modApplication.RecSel = rs.Fields("BClabelID").Value; //UPGRADE_NOTE: Text was upgraded to CtlText. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="A9E4979A-37FA-4718-9994-97DD76ED70A7"' modApplication.SelectLabelName = DataList1.CurrentCell.Value.ToString(); My.MyProject.Forms.frmBarcodeLoad.ShowDialog(); } else { modApplication.RecSel = rs.Fields("BClabelID").Value; //UPGRADE_NOTE: Text was upgraded to CtlText. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="A9E4979A-37FA-4718-9994-97DD76ED70A7"' modApplication.SelectLabelName = DataList1.CurrentCell.Value.ToString(); My.MyProject.Forms.frmBarcodeLoad.ShowDialog(); } } else if (rs.RecordCount < 1) { //Set rsInner = getRS("SELECT Label.*, LabelItem.* FROM Label INNER JOIN LabelItem ON Label.LabelID = LabelItem.labelItem_LabelID WHERE Label.Label_Type=2;") IncrBClabelID = 1; rsInner = modRecordSet.getRS(ref "SELECT Label.*, LabelItem.* FROM Label INNER JOIN LabelItem ON Label.LabelID = LabelItem.labelItem_LabelID WHERE Label.Label_Type=2;"); rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(1,'Stock','Stock','" + 0 + "',15," + rsInner.Fields("LabelID").Value + ")"); while (!(rsInner.EOF)) { //**** //Inserting information into BCLabel //*** if (string.IsNullOrEmpty(Strings.Trim(rsInner.Fields("labelItem_Sample").Value))) { TheSample = " "; //UPGRADE_WARNING: Use of Null/IsNull() detected. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="2EED02CB-5C0E-4DC1-AE94-4FAA3A30F51A"' } else if (Information.IsDBNull(rsInner.Fields("labelItem_Sample").Value)) { TheSample = " "; } else { TheSample = rsInner.Fields("labelItem_Sample").Value; } rst = modRecordSet.getRS(ref "INSERT INTO BClabelItem(BClabelItem_BCLabelID,BClabelItem_Line,BClabelItem_Field,BClabelItem_Align,BClabelItem_Size,BClabelItem_Bold,BClabelItem_Sample,BClabelItem_Disabled,BClabelItem_LabelID)VALUES(" + HoldBClabelItem_BCLabelID + "," + rsInner.Fields("labelItem_Line").Value + ",'" + rsInner.Fields("labelItem_Field").Value + "'," + rsInner.Fields("labelItem_Align").Value + "," + rsInner.Fields("labelItem_Size").Value + "," + rsInner.Fields("labelItem_Bold").Value + ",'" + TheSample + "','" + 0 + "'," + rsInner.Fields("labelItem_LabelID").Value + ")"); IntLabelID = rsInner.Fields("labelItem_LabelID").Value; rsInner.MoveNext(); //**** //If the ID is still for the same design then dont increment HoldBClabelItem_BCLabelID //**** // ERROR: Not supported in C#: OnErrorStatement if (IntLabelID != rsInner.Fields("labelItem_LabelID").Value) { HoldBClabelItem_BCLabelID = HoldBClabelItem_BCLabelID + 1; IncrBClabelID = IncrBClabelID + 1; if (rsInner.Fields("Label_Top").Value == 3) { rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(" + IncrBClabelID + ",'Stock','Stock','" + 0 + "',15," + rsInner.Fields("LabelID").Value + ")"); } else { rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(" + IncrBClabelID + ",'Stock','Stock','" + 0 + "',30," + rsInner.Fields("LabelID").Value + ")"); } } else { } } rst = modRecordSet.getRS(ref "SELECT Max(BClabelID) As MaxLaID FROM BClabel"); //Dim TheeMaxID As Integer TheeMaxID = rst.Fields("MaxLaID").Value; rsInner = modRecordSet.getRS(ref "SELECT Label.*, LabelItem.* FROM Label INNER JOIN LabelItem ON Label.LabelID = LabelItem.labelItem_LabelID WHERE Label.Label_Type=1;"); //**** //Inserting For shelf talker //**** TheeMaxID = TheeMaxID + 1; rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(" + IncrBClabelID + ",'Stock','Stock','" + 0 + "',15," + rsInner.Fields("LabelID").Value + ")"); while (!(rsInner.EOF)) { //**** //Inserting information into BCLabel //*** if (string.IsNullOrEmpty(Strings.Trim(rsInner.Fields("labelItem_Sample").Value))) { TheSample = " "; //UPGRADE_WARNING: Use of Null/IsNull() detected. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="2EED02CB-5C0E-4DC1-AE94-4FAA3A30F51A"' } else if (Information.IsDBNull(rsInner.Fields("labelItem_Sample").Value)) { TheSample = " "; } else { TheSample = rsInner.Fields("labelItem_Sample").Value; } rst = modRecordSet.getRS(ref "INSERT INTO BClabelItem(BClabelItem_BCLabelID,BClabelItem_Line,BClabelItem_Field,BClabelItem_Align,BClabelItem_Size,BClabelItem_Bold,BClabelItem_Sample,BClabelItem_Disabled,BClabelItem_LabelID)VALUES(" + TheeMaxID + "," + rsInner.Fields("labelItem_Line").Value + ",'" + rsInner.Fields("labelItem_Field").Value + "'," + rsInner.Fields("labelItem_Align").Value + "," + rsInner.Fields("labelItem_Size").Value + "," + rsInner.Fields("labelItem_Bold").Value + ",'" + TheSample + "','" + 0 + "'," + rsInner.Fields("labelItem_LabelID").Value + ")"); IntLabelID = rsInner.Fields("labelItem_LabelID").Value; rsInner.MoveNext(); //**** //If the ID is still for the same design then dont increment HoldBClabelItem_BCLabelID //**** if (IntLabelID != rsInner.Fields("labelItem_LabelID").Value) { TheeMaxID = TheeMaxID + 1; //IncrBClabelID = IncrBClabelID + 1 if (rsInner.Fields("Label_Top").Value == 3) { rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(" + TheeMaxID + ",'Stock','Stock','" + 0 + "',15," + rsInner.Fields("LabelID").Value + ")"); } else { rsBClabel = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(" + TheeMaxID + ",'Stock','Stock','" + 0 + "',30," + rsInner.Fields("LabelID").Value + ")"); } } else { } } //*** //For new database //*** if (modApplication.IntDesign1 != 2) { if (string.IsNullOrEmpty(Strings.Trim(DataList1.CurrentCell.Value.ToString()))) { if (modApplication.TheType == 2) { Interaction.MsgBox("Please select Stock Barcode Design and click Next", MsgBoxStyle.Information, "4Pos Back Office"); return; } else { Interaction.MsgBox("Please select Shelf Talker Design and click Next", MsgBoxStyle.Information, "4Pos Back Office"); return; } } else { } } else { modApplication.IntDesign = 0; } if (modApplication.IntDesign1 == 2) { modApplication.IntDesign1 = 0; cmdNew_Click(cmdnew, new System.EventArgs()); return; } modApplication.MyLIDWHole = Convert.ToInt16(DataList1.CurrentCell.Value); rs = modRecordSet.getRS(ref "SELECT BClabel.*, BClabelItem.* FROM BClabel INNER JOIN BClabelItem ON BClabel.BClabel_LabelID = BClabelItem.BClabelItem_LabelID WHERE BClabelItem.BClabelItem_LabelID=" + modApplication.MyLIDWHole + ""); modApplication.RecSel = rs.Fields("BClabelID").Value; //UPGRADE_NOTE: Text was upgraded to CtlText. Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="A9E4979A-37FA-4718-9994-97DD76ED70A7"' modApplication.SelectLabelName = DataList1.CurrentCell.Value.ToString(); My.MyProject.Forms.frmBarcodeLoad.ShowDialog(); } //*** if statement for checking BClabel and BClabelItem =0 end here }
private void cmdPrintHistory_Click(System.Object eventSender, System.EventArgs eventArgs) { int i = 0; int x = 0; string sql = null; string databaseName = null; short y = 0; short lMonth = 0; ADODB.Connection cn = default(ADODB.Connection); ADODB.Recordset rs = new ADODB.Recordset(); bool bReset = false; // ERROR: Not supported in C#: OnErrorStatement //If cmdShowHistory.Caption = "Show Full History " Then // cmdShowHistory.Caption = "Show Current Month" //ElseIf cmdShowHistory.Caption = "Show Full History" Then // cmdShowHistory.Caption = "Show Current Month" //Else // cmdShowHistory.Caption = "Show Full History " // cmdsearch_Click // Exit Sub //End If if (gLoading) return; gLoading = true; Cursor = System.Windows.Forms.Cursors.WaitCursor; System.Windows.Forms.Application.DoEvents(); y = cmbMonth.Items.Count - 1; //lvTransaction.ListItems.Clear //lblcount.Caption = "0 of 0" //lvTransaction.Visible = False sql = "DELETE tempCustomerHistory.* FROM tempCustomerHistory;"; modRecordSet.cnnDB.Execute(sql); string lPosString = null; //(cmbMonth.ListCount - 1) for (i = 0; i <= y; i++) { lMonth = Convert.ToInt32(cmbMonth.SelectedItem(i)); if (lMonth == gMonthEnd) { databaseName = "pricing.mdb"; } else { databaseName = "Month" + lMonth + ".mdb"; } cn = modRecordSet.openConnectionInstance(ref databaseName); if (cn == null) { goto nextMonth; //Exit Sub } //Dim lString As String //Dim lCustomerString As String //Dim lStockString As String if (this.cmbPOS.SelectedIndex) lPosString = " AND (Sale_PosID=" + cmbPOS.SelectedIndex + ")"; sql = "SELECT CustomerTransaction.CustomerTransactionID, CustomerTransaction.CustomerTransaction_CustomerID, CustomerTransaction.CustomerTransaction_TransactionTypeID, CustomerTransaction.CustomerTransaction_DayEndID, CustomerTransaction.CustomerTransaction_MonthEndID, CustomerTransaction.CustomerTransaction_ReferenceID, CustomerTransaction.CustomerTransaction_Date, CustomerTransaction.CustomerTransaction_Description, CustomerTransaction.CustomerTransaction_Amount, CustomerTransaction.CustomerTransaction_Reference, CustomerTransaction.CustomerTransaction_PersonName," + " TransactionType.TransactionType_Name, IIf([CustomerTransaction_Amount]>0,[CustomerTransaction_Amount],Null) AS debit, IIf([CustomerTransaction_Amount]<0,[CustomerTransaction_Amount],Null) AS credit FROM CustomerTransaction INNER JOIN TransactionType ON CustomerTransaction.CustomerTransaction_TransactionTypeID = TransactionType.TransactionTypeID WHERE (((CustomerTransaction.CustomerTransaction_CustomerID)=" + adoPrimaryRS.Fields("CustomerID").Value + ") AND (CustomerTransaction.CustomerTransaction_MonthEndID=(" + lMonth + "))) ORDER BY CustomerTransaction.CustomerTransactionID DESC;"; sql = "SELECT * FROM CustomerTransaction WHERE (((CustomerTransaction.CustomerTransaction_CustomerID)=" + adoPrimaryRS.Fields("CustomerID").Value + ") AND (CustomerTransaction.CustomerTransaction_MonthEndID=(" + lMonth + "))) ORDER BY CustomerTransaction.CustomerTransactionID DESC;"; Debug.Print(sql); rs.Open(sql, cn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly, ADODB.CommandTypeEnum.adCmdText); //Dim lvItem As listItem x = 0; //lvTransaction.Visible = False while (!(rs.EOF)) { x = x + 1; if (gLoading) { } else { break; // TODO: might not be correct. Was : Exit Do } bResetError: //lblcount.Caption = x & " of " & rs.RecordCount System.Windows.Forms.Application.DoEvents(); if (bReset) { bReset = false; // ERROR: Not supported in C#: OnErrorStatement sql = "INSERT INTO tempCustomerHistory ( CustomerTransactionID, CustomerTransaction_CustomerID, CustomerTransaction_TransactionTypeID, CustomerTransaction_DayEndID, CustomerTransaction_MonthEndID, CustomerTransaction_ReferenceID, CustomerTransaction_Date, CustomerTransaction_Description, CustomerTransaction_Amount, CustomerTransaction_Reference, CustomerTransaction_PersonName, CustomerTransaction_Done ) "; sql = sql + "SELECT " + rs.Fields("CustomerTransactionID").Value + ", " + rs.Fields("CustomerTransaction_CustomerID").Value + ", " + rs.Fields("CustomerTransaction_TransactionTypeID").Value + ", " + rs.Fields("CustomerTransaction_DayEndID").Value + ", " + rs.Fields("CustomerTransaction_MonthEndID").Value + ", " + rs.Fields("CustomerTransaction_ReferenceID").Value + ", #" + rs.Fields("CustomerTransaction_Date").Value + "#, '" + rs.Fields("CustomerTransaction_Description").Value + "', " + rs.Fields("CustomerTransaction_Amount").Value + ", '" + rs.Fields("CustomerTransaction_Reference").Value + "', '" + rs.Fields("CustomerTransaction_PersonName").Value + "', " + rs.Fields("CustomerTransaction_Done").Value + ";"; modRecordSet.cnnDB.Execute(sql); } else { sql = "INSERT INTO tempCustomerHistory ( CustomerTransactionID, CustomerTransaction_CustomerID, CustomerTransaction_TransactionTypeID, CustomerTransaction_DayEndID, CustomerTransaction_MonthEndID, CustomerTransaction_ReferenceID, CustomerTransaction_Date, CustomerTransaction_Description, CustomerTransaction_Amount, CustomerTransaction_Reference, CustomerTransaction_PersonName, CustomerTransaction_Done, CustomerTransaction_Main, CustomerTransaction_Child, CustomerTransaction_Allocated ) "; sql = sql + "SELECT " + rs.Fields("CustomerTransactionID").Value + ", " + rs.Fields("CustomerTransaction_CustomerID").Value + ", " + rs.Fields("CustomerTransaction_TransactionTypeID").Value + ", " + rs.Fields("CustomerTransaction_DayEndID").Value + ", " + rs.Fields("CustomerTransaction_MonthEndID").Value + ", " + rs.Fields("CustomerTransaction_ReferenceID").Value + ", #" + rs.Fields("CustomerTransaction_Date").Value + "#, '" + rs.Fields("CustomerTransaction_Description").Value + "', " + rs.Fields("CustomerTransaction_Amount").Value + ", '" + rs.Fields("CustomerTransaction_Reference").Value + "', '" + rs.Fields("CustomerTransaction_PersonName").Value + "', " + rs.Fields("CustomerTransaction_Done").Value + ", " + rs.Fields("CustomerTransaction_Main").Value + ", " + rs.Fields("CustomerTransaction_Child").Value + ", " + rs.Fields("CustomerTransaction_Allocated").Value + ";"; modRecordSet.cnnDB.Execute(sql); } //If rs("CustomerTransaction_Reference") <> "Month End" Then // Set lvItem = lvTransaction.ListItems.Add(, "K" & rs("CustomerTransactionID") & "_" & databaseName & "_" & rs("CustomerTransaction_ReferenceID") & "_" & rs("CustomerTransaction_TransactionTypeID"), Format(rs("CustomerTransaction_Date"), "yyyy mmm dd hh:mm")) // lvItem.SubItems(1) = rs("CustomerTransaction_Reference") // lvItem.SubItems(2) = rs("TransactionType_Name") // lvItem.SubItems(3) = FormatNumber(rs("debit"), 2) // lvItem.SubItems(4) = FormatNumber(rs("credit"), 2) //End If rs.MoveNext(); } //lvTransaction.Visible = True rs.Close(); nextMonth: } //lvTransaction.Visible = True report_CustomerStatementFullHistory(ref adoPrimaryRS.Fields("CustomerID").Value); Cursor = System.Windows.Forms.Cursors.Default; gLoading = false; return; ErrShowHistory: if (Strings.InStr(Strings.LCase(Err().Description), "not a valid path")) { Interaction.MsgBox(Err().Number + " - " + Err().Description); return; } else if (Err().Number == Convert.ToDouble("3265")) { bReset = true; //Resume bResetError } else { Interaction.MsgBox(Err().Number + " - " + Err().Description); return; // ERROR: Not supported in C#: ResumeStatement } }
private void Command2_Click(System.Object eventSender, System.EventArgs eventArgs) { string lString = null; string sql = null; ADODB.Recordset rsWebDBs = default(ADODB.Recordset); Module1.bBranchChange = false; string ret = null; string dtDate = null; string dtMonth = null; string stPass = null; if (Module1.BranchType == "1") { //UPGRADE_WARNING: Add a delegate for AddressOf TimerProc Click for more: 'ms-help://MS.VSCC.v90/dv_commoner/local/redirect.htm?keyword="E9E157F7-EF0C-4016-87B7-7D7FBBC6EE08"' //SetTimer(Handle.ToInt32, NV_INPUTBOX, 10, TimerProc) ret = Interaction.InputBox("Enter Password"); //Construct password........... if (Strings.Len(DateAndTime.Day(DateAndTime.Today)) == 1) dtDate = "0" + Conversion.Str(DateAndTime.Day(DateAndTime.Today)); else dtDate = Strings.Trim(Conversion.Str(DateAndTime.Day(DateAndTime.Today))); dtDate = Strings.Replace(dtDate, " ", ""); if (Strings.Len(DateAndTime.Month(DateAndTime.Today)) == 1) dtMonth = "0" + Conversion.Str(DateAndTime.Month(DateAndTime.Today)); else dtMonth = Strings.Trim(Conversion.Str(DateAndTime.Month(DateAndTime.Today))); dtMonth = Strings.Replace(dtMonth, " ", ""); //Create password stPass = dtDate + "##" + dtMonth; stPass = Strings.Replace(stPass, " ", ""); if (Strings.Trim(ret) == stPass) { Module1.bBranchChange = true; } else { Interaction.MsgBox("Incorrect password was entered!!!", MsgBoxStyle.Exclamation, "Incorrect Passwords"); return; } } cmdClear_Click(); cmdPulsante_Click(cmdPulsante[0], new System.EventArgs()); cmdPulsante_Click(cmdPulsante[7], new System.EventArgs()); cmdPulsante_Click(cmdPulsante[1], new System.EventArgs()); if (Module1.BranchType == "0") { cmdPulsante_Click(cmdPulsante[0], new System.EventArgs()); rsWebDBs = new ADODB.Recordset(); sql = "SELECT * FROM GRVSale WHERE (GRVSale_HeadOfficeID = " + Convert.ToInt16(Module1.HOfficeID) + ") AND (GRVSale_BranchID = " + Convert.ToInt16(Module1.BranchID) + ") AND (GRVSale_Done = 'False');"; var _with1 = rsWebDBs; _with1.CursorLocation = ADODB.CursorLocationEnum.adUseClient; _with1.CursorType = ADODB.CursorTypeEnum.adOpenForwardOnly; _with1.LockType = ADODB.LockTypeEnum.adLockBatchOptimistic; _with1.Source = sql; _with1.ActiveConnection = Module1.sqlDBcn; _with1.Open(); _with1.ActiveConnection = null; if (rsWebDBs.RecordCount) { tryCheckZip: if (fso.FileExists(modRecordSet.serverPath + "data.zip")) { Interaction.MsgBox("There are 'Sale to GRV' outstanding to be processed. Please click 'OK' once 4POS Domain Controller finished with Pricing update."); goto tryCheckZip; } lString = Strings.Replace(Convert.ToString(DateAndTime.Now), " ", "_"); lString = Strings.Replace(lString, "/", "-"); lString = Strings.Replace(lString, ":", ""); if (fso.FolderExists(gPathHO + "download\\" + lString)) { } else { fso.CreateFolder(gPathHO + "download\\" + lString); } while (!(rsWebDBs.EOF)) { cmdPulsante_Click(cmdPulsante[1], new System.EventArgs()); cmdPulsante_Click(cmdPulsante[0], new System.EventArgs()); DownLoadFile_GRV(ref false, ref Convert.ToString(Strings.Split(rsWebDBs("GRVSale_Path"), "/grv/")[1]), ref gPathHO + "download\\" + lString, ref true); Module1.sGRVSales = gPathHO + "download\\" + lString + "\\" + Convert.ToString(Strings.Split(rsWebDBs("GRVSale_Path"), "/grv/")[1]); //frmGRVimport.Tag = lString My.MyProject.Forms.frmGRVimport.ShowDialog(); if (Module1.sGRVSales == "DONE") { sql = "UPDATE GRVSale SET GRVSale_Done = 'True' WHERE (GRVSaleID = " + rsWebDBs("GRVSaleID").Value + ");"; Module1.sqlDBcn.Execute(sql); } Module1.sGRVSales = ""; rsWebDBs.MoveNext(); } } cmdPulsante_Click(cmdPulsante[1], new System.EventArgs()); } Module1.sGRVSales = ""; Interaction.MsgBox("Process Finished."); }
private void cmdAdd_Click(System.Object eventSender, System.EventArgs eventArgs) { //On Error Resume Next string MyInputStr = null; ADODB.Recordset rst = default(ADODB.Recordset); ADODB.Recordset rs = default(ADODB.Recordset); ADODB.Recordset rsNoRec = default(ADODB.Recordset); ADODB.Recordset rsBDItem = default(ADODB.Recordset); ADODB.Recordset rsBCL = default(ADODB.Recordset); string TheNames1 = null; short RecSel1 = 0; ADODB.Recordset rsLabel = default(ADODB.Recordset); ADODB.Recordset rsCName = default(ADODB.Recordset); string MySamp = null; short TheLaID = 0; short TheMSgValu = 0; rs = new ADODB.Recordset(); rst = new ADODB.Recordset(); rsNoRec = new ADODB.Recordset(); rsBDItem = new ADODB.Recordset(); rsBCL = new ADODB.Recordset(); rsLabel = new ADODB.Recordset(); rsCName = new ADODB.Recordset(); //calling the input box MyInputStr = Interaction.InputBox("Please enter Label Name"); string apostrophe = null; string TheUpOne = null; apostrophe = "'"; short pos = 0; string DouQuotes = null; short start = 0; string MNewVerror = null; start = 1; DouQuotes = "''"; MNewVerror = MyInputStr; pos = Strings.InStr(start, MNewVerror, apostrophe); if (pos > 0) { TheUpOne = Strings.Replace(MNewVerror, apostrophe, DouQuotes, 1, pos, CompareMethod.Text); MyInputStr = TheUpOne; } else { TheUpOne = MNewVerror; MyInputStr = TheUpOne; } //selecting the last labelID so we can increment it by one rs = modRecordSet.getRS(ref "SELECT Max(Label.LabelID) AS TheLastLabel FROM Label"); TheLaID = rs.Fields("TheLastLabel").Value; TheLaID = TheLaID + 1; //checking if the name already exist rsCName = modRecordSet.getRS(ref "SELECT Label.*, LabelItem.* FROM Label INNER JOIN LabelItem ON Label.LabelID = LabelItem.labelItem_LabelID WHERE Label.Label_Name='" + MyInputStr + "' and Label.Label_Type=" + modApplication.TheType + ""); int LeftVa = 0; ADODB.Recordset rsFound = default(ADODB.Recordset); short HoldMyLaID = 0; if (!string.IsNullOrEmpty(Strings.Trim(MyInputStr))) { rs = modRecordSet.getRS(ref "SELECT * FROM BClabelItem WHERE BClabelItem_LabelID=" + modApplication.MyLIDWHole + ""); if (rs.RecordCount == 1) { Interaction.MsgBox("Saving an empty design is not allowed.Please add some fields.", MsgBoxStyle.Information, _4PosBackOffice.NET.My.MyProject.Application.Info.Title); return; } else { } //If HSLeft.value = 0 Then // LeftVa = 0 //Else // LeftVa = LeftVa + 400 //End If if (rsCName.RecordCount < 1) { rsLabel = modRecordSet.getRS(ref "INSERT INTO Label(LabelID,Label_Type,Label_Name,Label_Height,Label_Width,Label_Top,Label_Rotate,Label_Disabled,Label_Left)VALUES(" + TheLaID + "," + modApplication.TheType + ",'" + MyInputStr + "'," + this.HSHeight.Value + "," + this.HSWidth.Value + "," + HSTop.Value + ",'" + 0 + "','" + 0 + "'," + HSLeft.Value + ")"); } else if (rsCName.RecordCount > 0 & modApplication.NewLabelName == MyInputStr) { rsLabel = modRecordSet.getRS(ref "UPDATE Label SET Label_Height=" + this.HSHeight.Value + ",Label_Width=" + this.HSWidth.Value + ",Label_Top=" + HSTop.Value + ",Label_Rotate='" + 0 + "',Label_Disabled='" + 0 + "',Label_Name='" + MyInputStr + "',Label_Left=" + HSLeft.Value + " WHERE Label.Label_Name='" + MyInputStr + "'"); } else if (rsCName.RecordCount > 0 & modApplication.NewLabelName != MyInputStr) { TheMSgValu = Interaction.MsgBox("There is a Design with the same name.Clicking Yes will override the existing design.Are you sure you wish to override the design?", MsgBoxStyle.YesNo, "4POS Back Office"); if (TheMSgValu == MsgBoxResult.Yes) { rsLabel = modRecordSet.getRS(ref "UPDATE Label SET Label_Height=" + this.HSHeight.Value + ",Label_Width=" + this.HSWidth.Value + ",Label_Top=" + HSTop.Value + ",Label_Rotate='" + 0 + "',Label_Disabled='" + 0 + "',Label_Name='" + MyInputStr + "',Label_Left=" + HSLeft.Value + " WHERE Label.Label_Name='" + MyInputStr + "'"); } else if (TheMSgValu == MsgBoxResult.No) { return; } } rst = modRecordSet.getRS(ref "SELECT Max(BClabelItem.BClabelItem_BCLabelID) as TheLastItemID FROM BClabelItem"); //selecting from the selected design to modify it and added it as a new design rsNoRec = modRecordSet.getRS(ref "SELECT * FROM BClabelItem WHERE BClabelItem_BCLabelID=" + modApplication.RecSel + ""); RecSel1 = rst.Fields("TheLastItemID").Value + 1; //adding 1 to insert a new record later //Set rsBCL = getRS("SELECT * FROM BClabel WHERE BClabelID=" & RecSel & "") if (rsCName.RecordCount < 1) { //TheNames = TheNames while (!(rsNoRec.EOF)) { //for hold the sample to insert if (rsNoRec.Fields("BClabelItem_Field").Value == "Company_Name" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Company_Name") { MySamp = "4POS Demo"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Company_Telephone" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Company_Telephone") { MySamp = "082 448 3987"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "line") { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "StockItem_Name" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "StockItem_Name") { MySamp = "Default Stock Item Name"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "code") { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Catalogue_Barcode" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Catalogue_Barcode") { MySamp = "6001060071416"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "PricingGroup_Name" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "PricingGroup_Name") { MySamp = "Beer Local"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Price" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Price") { MySamp = "R 21.99"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Price6") { MySamp = "R 21.99 for 6"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Price12") { MySamp = "R 21.99 for 12"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Price24") { MySamp = "R 21.99 for 24"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "blank") { MySamp = " "; } //if field is equal to code the sample is space if (rsNoRec.Fields("BClabelItem_Field").Value == "code") { TheNames1 = " "; //if the field is equal to line the sample is space } else if (rsNoRec.Fields("BClabelItem_Field").Value == "line") { TheNames1 = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "blank") { TheNames1 = " "; } else { if (modApplication.TheNames == "line") { TheNames1 = " "; } else { TheNames1 = rsNoRec.Fields("BClabelItem_Sample").Value; } } //if field is equal to code if (rsNoRec.Fields("BClabelItem_Field").Value == "code") { rs = modRecordSet.getRS(ref "INSERT INTO LabelItem(labelItem_LabelID,labelItem_Line,labelItem_Field,labelItem_Align,labelItem_Size,labelItem_Bold,labelItem_Sample) VALUES (" + TheLaID + "," + rsNoRec.Fields("BClabelItem_Line").Value + ",'code'," + rsNoRec.Fields("BClabelItem_Align").Value + "," + rsNoRec.Fields("BClabelItem_Size").Value + "," + rsNoRec.Fields("BClabelItem_Bold").Value + ",'" + TheNames1 + "')"); //if field is equal to line } else if (rsNoRec.Fields("BClabelItem_Field").Value == "line") { rs = modRecordSet.getRS(ref "INSERT INTO LabelItem(labelItem_LabelID,labelItem_Line,labelItem_Field,labelItem_Align,labelItem_Size,labelItem_Bold,labelItem_Sample) VALUES (" + TheLaID + "," + rsNoRec.Fields("BClabelItem_Line").Value + ",'line'," + rsNoRec.Fields("BClabelItem_Align").Value + "," + rsNoRec.Fields("BClabelItem_Size").Value + "," + rsNoRec.Fields("BClabelItem_Bold").Value + ",'" + TheNames1 + "')"); //**** //New code for Blank //if field is equal to line } else if (rsNoRec.Fields("BClabelItem_Field").Value == "blank") { rs = modRecordSet.getRS(ref "INSERT INTO LabelItem(labelItem_LabelID,labelItem_Line,labelItem_Field,labelItem_Align,labelItem_Size,labelItem_Bold,labelItem_Sample) VALUES (" + TheLaID + "," + rsNoRec.Fields("BClabelItem_Line").Value + ",'blank'," + rsNoRec.Fields("BClabelItem_Align").Value + "," + rsNoRec.Fields("BClabelItem_Size").Value + "," + rsNoRec.Fields("BClabelItem_Bold").Value + ",'" + TheNames1 + "')"); //**** } else { rs = modRecordSet.getRS(ref "INSERT INTO LabelItem(labelItem_LabelID,labelItem_Line,labelItem_Field,labelItem_Align,labelItem_Size,labelItem_Bold,labelItem_Sample) VALUES (" + TheLaID + "," + rsNoRec.Fields("BClabelItem_Line").Value + ",'" + rsNoRec.Fields("BClabelItem_Field").Value + "'," + rsNoRec.Fields("BClabelItem_Align").Value + "," + rsNoRec.Fields("BClabelItem_Size").Value + "," + rsNoRec.Fields("BClabelItem_Bold").Value + ",'" + MySamp + "')"); } rsNoRec.MoveNext(); } rs = modRecordSet.getRS(ref "SELECT * FROM BClabel WHERE BClabelID=" + modApplication.RecSel + ""); //For Inserting New Record into BClabel rsCName = modRecordSet.getRS(ref "INSERT INTO BClabel(BClabelID,BClabel_Name,BClabel_Type,BClabel_Disabled,BClabel_Height,BClabel_LabelID)VALUES(" + RecSel1 + ",'" + rs.Fields("BClabel_Name").Value + "','" + rs.Fields("BClabel_Type").Value + "'," + rs.Fields("BClabel_Disabled").Value + "," + rs.Fields("BClabel_Height").Value + "," + TheLaID + ")"); rs = modRecordSet.getRS(ref "SELECT * FROM LabelItem WHERE labelItem_LabelID=" + TheLaID + ""); //For Inserting New record into BCLabelItem //If rs.RecordCount > 0 Then //End If while (!(rs.EOF)) { rsCName = modRecordSet.getRS(ref "INSERT INTO BClabelItem(BClabelItem_BCLabelID,BClabelItem_Line,BClabelItem_Field,BClabelItem_Align,BClabelItem_Size,BClabelItem_Bold,BClabelItem_Sample,BClabelItem_Disabled,BClabelItem_LabelID)VALUES(" + RecSel1 + "," + rs.Fields("labelItem_Line").Value + ",'" + rs.Fields("labelItem_Field").Value + "'," + rs.Fields("labelItem_Align").Value + "," + rs.Fields("labelItem_Size").Value + "," + rs.Fields("labelItem_Bold").Value + ",'" + rs.Fields("labelItem_Sample").Value + "','" + 0 + "'," + TheLaID + ")"); rs.MoveNext(); } //000 rsCName = modRecordSet.getRS(ref "SELECT * FROM BClabelItemUndo"); if (rsCName.RecordCount > 0) { rs = modRecordSet.getRS(ref "SELECT * FROM BClabelItemUndo"); } else { modApplication.TheSelectedPrinterNew = 2; modApplication.MyLIDWHole = TheLaID; labelsfile(); return; } //rs.MoveLast while (!(rs.EOF)) { rsNoRec = modRecordSet.getRS(ref "SELECT * FROM BClabelItem WHERE BClabelItemID =" + rs.Fields("BClabelItemID").Value + " AND BClabelItem_Field='" + rs.Fields("BClabelItem_Field").Value + "'"); if (rsNoRec.RecordCount > 0) { rst = modRecordSet.getRS(ref "DELETE * FROM BClabelItem WHERE BClabelItemID=" + rs.Fields("BClabelItemID").Value + ""); //Set rst = getRS("DELETE * FROM BClabelItemUndo WHERE BClabelItemID=" & rs("BClabelItemID") & "") } else if (rsNoRec.RecordCount < 1) { rst = modRecordSet.getRS(ref "INSERT INTO BClabelItem(BClabelItem_BCLabelID,BClabelItem_Line,BClabelItem_Field,BClabelItem_Align,BClabelItem_Size,BClabelItem_Bold,BClabelItem_Sample,BClabelItem_Disabled,BClabelItem_LabelID)VALUES(" + rs.Fields("BClabelItem_BCLabelID").Value + "," + rs.Fields("BClabelItem_Line").Value + ",'" + rs.Fields("BClabelItem_Field").Value + "'," + rs.Fields("BClabelItem_Align").Value + "," + rs.Fields("BClabelItem_Size").Value + "," + rs.Fields("BClabelItem_Bold").Value + ",'" + rs.Fields("BClabelItem_Sample").Value + "'," + rs.Fields("BClabelItem_Disabled").Value + "," + rs.Fields("BClabelItem_LabelID").Value + ")"); //Set rst = getRS("DELETE * FROM BClabelItemUndo WHERE BClabelItemID=" & rs("BClabelItemID") & " and BClabelItem_Field='" & rs("BClabelItem_Field") & "'") } rs.MoveNext(); } rst = modRecordSet.getRS(ref "DELETE * FROM BClabelItemUndo"); // WHERE BClabelItemID=" & rs("BClabelItemID") & " and BClabelItem_Field='" & rs("BClabelItem_Field") & "'") modApplication.MyLIDWHole = TheLaID; modApplication.RecSel = RecSel1; //000 } else { //updating rsFound = new ADODB.Recordset(); HoldMyLaID = rsCName.Fields("labelItem_LabelID").Value; rsFound = modRecordSet.getRS(ref "DELETE * FROM LabelItem WHERE labelItem_LabelID=" + HoldMyLaID + ""); while (!(rsNoRec.EOF)) { //for hold the sample to insert if (rsNoRec.Fields("BClabelItem_Field").Value == "Company_Name" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Company_Name") { MySamp = "4POS Demo"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Company_Telephone" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Company_Telephone") { MySamp = "082 448 3987"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "line") { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "StockItem_Name" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "StockItem_Name") { MySamp = "Default Stock Item Name"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "code") { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Catalogue_Barcode" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Catalogue_Barcode") { MySamp = "6001060071416"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "PricingGroup_Name" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "PricingGroup_Name") { MySamp = "Beer Local"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Price" & string.IsNullOrEmpty(Strings.Trim(rsNoRec.Fields("BClabelItem_Sample").Value))) { MySamp = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Price") { MySamp = "R 21.99"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Price6") { MySamp = "R 21.99 for 6"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Price12") { MySamp = "R 21.99 for 12"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "Price24") { MySamp = "R 21.99 for 24"; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "blank") { MySamp = " "; } //if field is equal to code the sample is space if (rsNoRec.Fields("BClabelItem_Field").Value == "code") { TheNames1 = " "; //if the field is equal to line the sample is space } else if (rsNoRec.Fields("BClabelItem_Field").Value == "line") { TheNames1 = " "; } else if (rsNoRec.Fields("BClabelItem_Field").Value == "blank") { TheNames1 = " "; } else { if (modApplication.TheNames == "line") { TheNames1 = " "; } else { TheNames1 = rsNoRec.Fields("BClabelItem_Sample").Value; } } //if field is equal to code if (rsNoRec.Fields("BClabelItem_Field").Value == "code") { rs = modRecordSet.getRS(ref "INSERT INTO LabelItem(labelItem_LabelID,labelItem_Line,labelItem_Field,labelItem_Align,labelItem_Size,labelItem_Bold,labelItem_Sample) VALUES (" + HoldMyLaID + "," + rsNoRec.Fields("BClabelItem_Line").Value + ",'code'," + rsNoRec.Fields("BClabelItem_Align").Value + "," + rsNoRec.Fields("BClabelItem_Size").Value + "," + rsNoRec.Fields("BClabelItem_Bold").Value + ",'" + TheNames1 + "')"); //if field is equal to line } else if (rsNoRec.Fields("BClabelItem_Field").Value == "line") { rs = modRecordSet.getRS(ref "INSERT INTO LabelItem(labelItem_LabelID,labelItem_Line,labelItem_Field,labelItem_Align,labelItem_Size,labelItem_Bold,labelItem_Sample) VALUES (" + HoldMyLaID + "," + rsNoRec.Fields("BClabelItem_Line").Value + ",'line'," + rsNoRec.Fields("BClabelItem_Align").Value + "," + rsNoRec.Fields("BClabelItem_Size").Value + "," + rsNoRec.Fields("BClabelItem_Bold").Value + ",'" + TheNames1 + "')"); //**** //New code for Blank //if field is equal to line } else if (rsNoRec.Fields("BClabelItem_Field").Value == "blank") { rs = modRecordSet.getRS(ref "INSERT INTO LabelItem(labelItem_LabelID,labelItem_Line,labelItem_Field,labelItem_Align,labelItem_Size,labelItem_Bold,labelItem_Sample) VALUES (" + HoldMyLaID + "," + rsNoRec.Fields("BClabelItem_Line").Value + ",'blank'," + rsNoRec.Fields("BClabelItem_Align").Value + "," + rsNoRec.Fields("BClabelItem_Size").Value + "," + rsNoRec.Fields("BClabelItem_Bold").Value + ",'" + TheNames1 + "')"); //**** } else { rs = modRecordSet.getRS(ref "INSERT INTO LabelItem(labelItem_LabelID,labelItem_Line,labelItem_Field,labelItem_Align,labelItem_Size,labelItem_Bold,labelItem_Sample) VALUES (" + HoldMyLaID + "," + rsNoRec.Fields("BClabelItem_Line").Value + ",'" + rsNoRec.Fields("BClabelItem_Field").Value + "'," + rsNoRec.Fields("BClabelItem_Align").Value + "," + rsNoRec.Fields("BClabelItem_Size").Value + "," + rsNoRec.Fields("BClabelItem_Bold").Value + ",'" + MySamp + "')"); } rsNoRec.MoveNext(); } //updating } } else if (string.IsNullOrEmpty(Strings.Trim(MyInputStr))) { return; } //refreshes modApplication.TheSelectedPrinterNew = 2; modApplication.NewLabelName = ""; labelsfile(); //RecSel1 = 3 //Unload frmPrinter //frmPrinter.selectPrinter //frmBarcodedesign.TheLoading //TheSelectedPrinterNew = 0 }
public bool loadFilter(ref string filter_Renamed) { bool functionReturnValue = false; ADODB.Recordset rs = new ADODB.Recordset(); ADODB.Recordset RSitem = new ADODB.Recordset(); short lCNT = 0; rs = modRecordSet.getRS(ref "SELECT * From ftOrderSet Where (((ftSet_Group) = 'order')) ORDER BY ftSet_Order;"); if (rs.BOF | rs.EOF) { functionReturnValue = false; } else { lCNT = -1; objectArray = new object[rs.RecordCount]; while (!(rs.EOF)) { lCNT = lCNT + 1; switch (rs.Fields("ftset_type").Value) { case 2: if (lCNT) { //_frmList_0. //frmList.Load(lCNT) //cmdList.Load(lCNT) cmdList[lCNT].Parent = _frmList_0; //lblList.Load(lCNT) _lblList_0.Parent = _frmList_0; } _frmList_0.Visible = true; _cmdList_0.Visible = true; _lblList_0.Visible = true; if (lCNT) _frmList_0.Top = sizeConvertors.twipsToPixels(lCNT * sizeConvertors.pixelToTwips(_frmList_0.Height, false) + sizeConvertors.pixelToTwips(_frmList_0.Top, false), false); _frmList_0.Text = rs.Fields("ftset_DisplayName").Value; _frmList_0.Tag = rs.Fields("ftset_Name").Value; _lblList_0.Text = ""; RSitem = modRecordSet.getRS(ref "SELECT ftData_Heading From ftOrder WHERE (ftData_PersonID = " + modRecordSet.gPersonID + ") AND (ftData_FieldName = '" + Strings.Replace(_frmList_0.Tag, "'", "''") + "')"); if (RSitem.BOF | RSitem.EOF) { } else { _lblList_0.Text = RSitem.Fields("ftData_Heading").Value; } objectArray[lCNT] = _frmList_0; break; } rs.MoveNext(); } this.Height = sizeConvertors.twipsToPixels(objectArray[Information.UBound(objectArray)].Top + objectArray[Information.UBound(objectArray)].Height + 1000, false); loadLanguage(); ShowDialog(); functionReturnValue = true; } return functionReturnValue; }
public void ImportPartDetail() { string partPath = "http://nwszmail/public/namwah/Parts2/Parts/"; string strSQL = ""; ADODB.Connection cnn = new ADODB.Connection(); ADODB.Recordset rst = new ADODB.Recordset(); Item item; session.BeginTransaction(); CacheItem(); ConnectDB(cnn, partPath); strSQL = "SELECT \"nw:partno\", \"nw:partname\", \"nw:parttype\", \"nw:material\", \"nw:part:tmxrefno\", \"nw:part:source\", \"nw:part:source\", \"nw:rout1:resoption\", \"nw:rout1:resourceno\", \"nw:rout1:type\", "; strSQL = strSQL + " \"nw:part:category\", \"nw:part:pricecat\", \"nw:bom:list:partno\", \"nw:bom:list:qty\" "; strSQL = strSQL + " FROM \"" + partPath ; strSQL = strSQL + "\" WHERE (\"DAV:ishidden\" = false)"; rst.Open(strSQL, cnn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockBatchOptimistic, 1); while (!rst.EOF) { if (dictItem.ContainsKey(rst.Fields["nw:partno"].Value.ToString()) == false) item = new Item(this.session); else item = dictItem[rst.Fields["nw:partno"].Value.ToString()]; item.ItemNo = rst.Fields["nw:partno"].Value.ToString(); item.CustomerItemNo = rst.Fields["nw:part:tmxrefno"].Value.ToString(); item.ItemName = rst.Fields["nw:partname"].Value.ToString(); item.ItemType = GetItemType(rst.Fields["nw:parttype"].Value.ToString()); item.Material = GetMaterial(rst.Fields["nw:material"].Value.ToString()); item.PriceCategory = GetPriceCategory(rst.Fields["nw:part:pricecat"].Value.ToString()); item.ItemCategory = GetItemCategory(rst.Fields["nw:part:category"].Value.ToString()); if (rst.Fields["nw:part:source"].Value.ToString() == "Buy") item.Source = Item.ItemSource.Buy; else item.Source = Item.ItemSource.Make; item.Unit = GetUnit("Piece"); item.Warehouse = GetWarehouse("Main"); item.Save(); if (dictItem.ContainsKey(rst.Fields["nw:partno"].Value.ToString()) == false) dictItem.Add(item.ItemNo, item); rst.MoveNext(); } session.CommitTransaction(); }
public void ImportHKIPO() { string ipoPath = "http://nwszmail/public/namwah/WorkOrders/Purchasing/InternalPurchaseOrders"; string strSQL = ""; ADODB.Connection cnn = new ADODB.Connection(); ADODB.Recordset rst = new ADODB.Recordset(); Item item; PurchOrderLine poLine; WorkOrder wo; string partNo; string woNo; string ipoNo; session.BeginTransaction(); CacheItem(); CacheWo(); CacheIpo(); ConnectDB(cnn, ipoPath); strSQL = "SELECT \"nw:partno\" , \"nw:partname\", \"nw:parttype\", \"nw:wo:no\", \"nw:supplier\", "; strSQL = strSQL + " \"nw:jo:needqty\", \"nw:jo:needdate\", \"nw:jo:arrivedqty\", \"nw:jo:no\" "; strSQL = strSQL + " FROM \"" + ipoPath; strSQL = strSQL + "\" WHERE (\"DAV:ishidden\" = false)"; rst.Open(strSQL, cnn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockBatchOptimistic, 1); while (!rst.EOF) { partNo = rst.Fields["nw:partno"].Value.ToString(); woNo = rst.Fields["nw:wo:no"].Value.ToString(); ipoNo = rst.Fields["nw:jo:no"].Value.ToString(); if (dictPoLine.ContainsKey(ipoNo)) { PurchOrderLine oldPoLine = dictPoLine[ipoNo]; if (oldPoLine.NeedQty != float.Parse(rst.Fields["nw:jo:needqty"].Value.ToString()) || oldPoLine.ReceivedQty != float.Parse(rst.Fields["nw:jo:arrivedqty"].Value.ToString())) { oldPoLine.NeedQty = float.Parse(rst.Fields["nw:jo:needqty"].Value.ToString()); oldPoLine.SetReceivedQty(float.Parse(rst.Fields["nw:jo:arrivedqty"].Value.ToString())); oldPoLine.Save(); } } else { if (dictItem.ContainsKey(partNo) && dictWo.ContainsKey(woNo)) { item = dictItem[partNo]; wo = dictWo[woNo]; poLine = new PurchOrderLine(session); poLine.WorkOrder = wo; poLine.Item = item; poLine.SetPurchOrderLineNo(ipoNo); poLine.NeedDate = DateTime.Parse(rst.Fields["nw:jo:needdate"].Value.ToString()); poLine.NeedQty = float.Parse(rst.Fields["nw:jo:needqty"].Value.ToString()); poLine.Vendor = GetVendor(rst.Fields["nw:supplier"].Value.ToString()); poLine.SetReceivedQty(float.Parse(rst.Fields["nw:jo:arrivedqty"].Value.ToString())); poLine.Unit = item.Unit; poLine.Warehouse = item.Warehouse; poLine.Save(); } } rst.MoveNext(); } session.CommitTransaction(); }
public string getRoadName() { try { Position PoiX = new Position(); PoiX.X = Lat; PoiX.Y = Lon; double tempLen = 1000000; string tempTown = ""; ADODB.Recordset RST = new ADODB.Recordset(); /* string sqlSTR = "SELECT name,the_geom FROM " + this.roadsTableName +" WHERE the_geom && 'BOX3D(" + (Lon - 0.1) + " " + (Lat - 0.1) + "," + (Lon + 0.1) + " " + (Lat + 0.1) + ") '::box3d AND distance( the_geom, GeometryFromText( 'POINT(" + Lon + " " + Lat + ")', -1 ) ) < 0.11"; string sqlSTROther = "SELECT name,the_geom FROM " + this.roadsTableName + " WHERE the_geom && 'BOX3D(" + (Lon - 1) + " " + (Lat - 1) + "," + (Lon + 1) + " " + (Lat + 1) + ") '::box3d AND distance( the_geom, GeometryFromText( 'POINT(" + Lon + " " + Lat + ")', -1 ) ) < 1.1";*/ string sqlSTR = "SELECT rd_name,the_geom FROM kRoads WHERE the_geom && 'BOX3D(" + (Lon - 0.1) + " " + (Lat - 0.1) + "," + (Lon + 0.1) + " " + (Lat + 0.1) + ") '::box3d AND distance( the_geom, GeometryFromText( 'POINT(" + Lon + " " + Lat + ")', -1 ) ) < 0.11"; string sqlSTROther = "SELECT rd_name,the_geom FROM kRoads WHERE the_geom && 'BOX3D(" + (Lon - 1) + " " + (Lat - 1) + "," + (Lon + 1) + " " + (Lat + 1) + ") '::box3d AND distance( the_geom, GeometryFromText( 'POINT(" + Lon + " " + Lat + ")', -1 ) ) < 1.1"; RST.Open(sqlSTR, this.odbcDatabaseConnection, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockBatchOptimistic, 0); if (RST.EOF == true) { try { RST.Close(); } catch { } RST.Open(sqlSTROther, this.odbcDatabaseConnection, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockBatchOptimistic, 0); } if (RST.EOF == false) { RST.MoveFirst(); while (RST.EOF == false) { /*we are no longer dealing with a single point we are * dealind with a line string*/ string Coord = RST.Fields["the_geom"].Value.ToString(); int Len = Coord.Length; Coord = Right(Coord, (Len - 25)); Len = Coord.Length; Coord = Mid(Coord, 0, (Len - 2)); char[] SepChar = { ',' }; Array pointArray = Coord.Split(SepChar); /*lets loop through the line string*/ for (int p = 0; p < pointArray.Length; p++) { try { char[] pointSep = { ' ' }; Array coordArray = pointArray.GetValue(p).ToString().Split(pointSep); double xlon = Convert.ToDouble(coordArray.GetValue(0).ToString()); double xlat = Convert.ToDouble(coordArray.GetValue(1).ToString()); Position PoiY = new Position(); PoiY.X = xlat; PoiY.Y = xlon; Calculations calc = new Calculations(); double xLen = 10000001; try { xLen = calc.CalculateDistace(PoiX, PoiY); } catch { } calc = null; //MessageBox.Show(xLen.ToString()); if (xLen < tempLen) { tempLen = xLen; if (tempLen > 0.5) { tempTown = " Along Unknown Road"; } else { tempTown = " Along " + RST.Fields["rd_name"].Value.ToString(); } } //PoiY = null; coordArray = null; //Application.DoEvents(); } catch { } } //Application.DoEvents(); RST.MoveNext(); } RST.Close(); RST = null; } if (tempLen != 1000000) { return tempTown; } else { return " "; } } catch (System.Exception qw) { return " "; } }
public void ImportSSTK() { string soPath = "http://nwszmail/public/namwah/Parts2/SafetyStock/"; string strSQL = ""; Dictionary<string, SalesOrder> dictSo = new Dictionary<string, SalesOrder>(); ADODB.Connection cnn = new ADODB.Connection(); ADODB.Recordset rst = new ADODB.Recordset(); Item item; string partNo; string soLineIndex; CacheItem(); ConnectDB(cnn, soPath); strSQL = "SELECT \"nw:cpo:item:initneeddate\", \"nw:cpo:date\" "; strSQL = strSQL + " , \"nw:cpo:item:needqty\", \"nw:cpo:item:needdate\", \"nw:cpo:item:priority\", \"nw:part:sstqty\" "; strSQL = strSQL + " , \"nw:cpo:no\", \"nw:part:tmxrefno\" "; strSQL = strSQL + " FROM \"" + soPath; strSQL = strSQL + "\" WHERE (\"DAV:ishidden\" = false )"; rst.Open(strSQL, cnn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockBatchOptimistic, 1); session.BeginTransaction(); XPCollection<SalesOrderLine> soLines = new XPCollection<SalesOrderLine>(session); soLines.Criteria = CriteriaOperator.Parse("SalesOrder.OrderType == SalesOrder.SalesOrderType.SSTK"); session.BeginTransaction(); session.Delete(soLines); session.CommitTransaction(); DateTime sTime = DateTime.Now; string poNo; while (!rst.EOF) { partNo = rst.Fields["nw:part:tmxrefno"].Value.ToString(); soLineIndex = rst.Fields["nw:cpo:no"].Value.ToString() + "-" + rst.Fields["nw:part:tmxrefno"].Value.ToString(); poNo = rst.Fields["nw:cpo:no"].Value.ToString(); if (dictItem.ContainsKey(partNo)) { item = dictItem[partNo]; SalesOrder so; if (dictSo.ContainsKey(rst.Fields["nw:cpo:no"].Value.ToString())) { so = dictSo[rst.Fields["nw:cpo:no"].Value.ToString()]; } else { so = session.FindObject<SalesOrder>(new BinaryOperator("OrderNo", rst.Fields["nw:cpo:no"].Value.ToString())); if (so == null) { so = new SalesOrder(session); so.SetOrderNo(rst.Fields["nw:cpo:no"].Value.ToString()); so.OrderType = SalesOrder.SalesOrderType.SSTK; so.Customer = GetCustomer("TIMEX"); so.Save(); } dictSo.Add(rst.Fields["nw:cpo:no"].Value.ToString(), so); } SalesOrderLine soLine = new SalesOrderLine(session); soLine.SalesOrder = so; soLine.Item = item; so.AddLineNo(); soLine.SetOrderLineNo(so.LastLineNo); soLine.CustomerItemNo = rst.Fields["nw:part:tmxrefno"].Value.ToString(); soLine.CustomerOrderNo = rst.Fields["nw:cpo:no"].Value.ToString(); //soLine.InitNeedDate = DateTime.Parse(rst.Fields["nw:cpo:item:initneeddate"].Value.ToString()); soLine.NeedDate = DateTime.Parse(rst.Fields["nw:cpo:item:needdate"].Value.ToString()); soLine.NeedQty = float.Parse(rst.Fields["nw:part:sstqty"].Value.ToString()); soLine.PoDate = DateTime.Parse(rst.Fields["nw:cpo:date"].Value.ToString()); soLine.Priority = int.Parse(rst.Fields["nw:cpo:item:priority"].Value.ToString()); soLine.ApprovedSalesOrderLine(); soLine.Save(); } rst.MoveNext(); } System.Diagnostics.Debug.WriteLine("Start Time : " + sTime.ToString() + ". End Time : " + DateTime.Now.ToString()); session.CommitTransaction(); System.Diagnostics.Debug.WriteLine("Commit Time : " + DateTime.Now.ToString()); }
private void cmdExit_Click(System.Object eventSender, System.EventArgs eventArgs) { //On Error GoTo ErrH ADODB.Recordset rs = default(ADODB.Recordset); ADODB.Recordset rst = default(ADODB.Recordset); ADODB.Recordset rsHave = default(ADODB.Recordset); ADODB.Recordset rsMaxID = default(ADODB.Recordset); short HoldBClabelItem_BCLabelID = 0; string TheSample = null; ADODB.Recordset rsInner = default(ADODB.Recordset); short HoldLaIDVaBack = 0; short TMaxID = 0; rs = new ADODB.Recordset(); rst = new ADODB.Recordset(); rsHave = new ADODB.Recordset(); rsInner = new ADODB.Recordset(); rsMaxID = new ADODB.Recordset(); modApplication.IntDesign = 0; //New code rs = modRecordSet.getRS(ref "DELETE * FROM BClabelItemUndo"); strheight = 0; strwidht = 0; rs = modRecordSet.getRS(ref "SELECT * FROM LabelItem WHERE labelItem_LabelID=" + modApplication.MyLIDWHole + ""); if (rs.RecordCount == 1) { rs = modRecordSet.getRS(ref "DELETE * FROM LabelItem WHERE labelItem_LabelID=" + modApplication.MyLIDWHole + ""); rs = modRecordSet.getRS(ref "DELETE * FROM Label WHERE LabelID=" + modApplication.MyLIDWHole + ""); rs = modRecordSet.getRS(ref "DELETE * FROM BClabel WHERE BClabel_LabelID=" + modApplication.MyLIDWHole + ""); rs = modRecordSet.getRS(ref "DELETE * FROM BClabelItem WHERE BClabelItem_LabelID=" + modApplication.MyLIDWHole + ""); this.Close(); My.MyProject.Forms.frmDesign.RefreshLoad(ref modApplication.TheType); return; } else { } rs = modRecordSet.getRS(ref "SELECT Max(LabelItem.labelItem_LabelID) as TheMaxID FROM LabelItem"); TMaxID = rs.Fields("TheMaxID").Value; rs = modRecordSet.getRS(ref "SELECT * FROM LabelItem ORDER BY labelItem_LabelID"); rs.MoveFirst(); //Loading BClabelItem with Infor from LabelItem while (!(rs.EOF)) { // ERROR: Not supported in C#: OnErrorStatement rsHave = modRecordSet.getRS(ref "SELECT * FROM BClabelItem WHERE BClabelItem_LabelID=" + rs.Fields("labelItem_LabelID").Value + ""); HoldBClabelItem_BCLabelID = rsHave.Fields("BClabelItem_BCLabelID").Value; rst = modRecordSet.getRS(ref "DELETE * FROM BClabelItem WHERE BClabelItem_LabelID =" + rs.Fields("labelItem_LabelID").Value + ""); rsInner = modRecordSet.getRS(ref "SELECT * FROM LabelItem WHERE labelItem_LabelID=" + rs.Fields("labelItem_LabelID").Value + ""); while (!(rsInner.EOF)) { if (Information.IsDBNull(rsInner.Fields("labelItem_Sample").Value)) { TheSample = " "; } else { TheSample = rsInner.Fields("labelItem_Sample").Value; } rst = modRecordSet.getRS(ref "INSERT INTO BClabelItem(BClabelItem_BCLabelID,BClabelItem_Line,BClabelItem_Field,BClabelItem_Align,BClabelItem_Size,BClabelItem_Bold,BClabelItem_Sample,BClabelItem_Disabled,BClabelItem_LabelID)VALUES(" + HoldBClabelItem_BCLabelID + "," + rsInner.Fields("labelItem_Line").Value + ",'" + rsInner.Fields("labelItem_Field").Value + "'," + rsInner.Fields("labelItem_Align").Value + "," + rsInner.Fields("labelItem_Size").Value + "," + rsInner.Fields("labelItem_Bold").Value + ",'" + TheSample + "','" + 0 + "'," + rsInner.Fields("labelItem_LabelID").Value + ")"); rsInner.MoveNext(); } HoldLaIDVaBack = rs.Fields("labelItem_LabelID").Value; rs.MoveNext(); while (!(rs.Fields("labelItem_LabelID").Value != HoldLaIDVaBack)) { if (rs.Fields("labelItem_LabelID").Value == TMaxID) { rs.MoveLast(); rs.MoveNext(); break; // TODO: might not be correct. Was : Exit Do } rs.MoveNext(); } } this.Close(); My.MyProject.Forms.frmDesign.RefreshLoad(ref modApplication.TheType); //ErrH: frmDesign.RefreshLoad TheType //frmdesign.RefreshLoad TheType }
public void ImportSalesOrder() { string soPath = "http://nwszmail/public/namwah/Sales/Timex/PurchaseOrders/"; string strSQL = ""; Dictionary<string, SalesOrder> dictSo = new Dictionary<string, SalesOrder>(); ADODB.Connection cnn = new ADODB.Connection(); ADODB.Recordset rst = new ADODB.Recordset(); Item item; /* XPCollection<SalesOrderLine> soLines = new XPCollection<SalesOrderLine>(session); session.BeginTransaction(); session.Delete(soLines); session.CommitTransaction(); return; */ string partNo; string soLineIndex; CacheItem(); CacheSalesOrderLine(Namwah.Module.BO.SalesOrder.SalesOrderType.Normal); ConnectDB(cnn, soPath); strSQL = "SELECT \"nw:partno\" , \"nw:cpo:item:ignore\", \"nw:cpo:item:index\", \"nw:cpo:item:initneeddate\", \"nw:cpo:date\" "; strSQL = strSQL + " , \"nw:cpo:item:needqty\", \"nw:cpo:item:needdate\", \"nw:cpo:item:priority\", \"nw:cpo:item:shippedqty\" "; strSQL = strSQL + " , \"nw:cpo:item:remark\", \"nw:cpo:no\", \"nw:customer\", \"nw:part:tmxrefno\" "; strSQL = strSQL + " FROM \"" + soPath; strSQL = strSQL + "\" WHERE (\"DAV:ishidden\" = false AND \"nw:customer\" = 'Timex' )"; return ; rst.Open(strSQL, cnn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockBatchOptimistic, 1); session.BeginTransaction(); DateTime sTime = DateTime.Now; string poNo; while (!rst.EOF) { partNo = rst.Fields["nw:partno"].Value.ToString(); soLineIndex = rst.Fields["nw:cpo:no"].Value.ToString() + "-" + rst.Fields["nw:cpo:item:index"].Value.ToString(); poNo = rst.Fields["nw:cpo:no"].Value.ToString(); if (poNo.StartsWith("PoHistory") == false) { if (dictItem.ContainsKey(partNo)) { if (dictSalesOrderLine.ContainsKey(soLineIndex)) { SalesOrderLine soLine = dictSalesOrderLine[soLineIndex]; soLine.NeedQty = float.Parse(rst.Fields["nw:cpo:item:needqty"].Value.ToString()); soLine.Priority = int.Parse(rst.Fields["nw:cpo:item:priority"].Value.ToString()); soLine.NeedQty = float.Parse(rst.Fields["nw:cpo:item:needqty"].Value.ToString()); soLine.SetShipQty(float.Parse(rst.Fields["nw:cpo:item:shippedqty"].Value.ToString())); soLine.Save(); } else { item = dictItem[partNo]; SalesOrder so; if (dictSo.ContainsKey(rst.Fields["nw:cpo:no"].Value.ToString())) { so = dictSo[rst.Fields["nw:cpo:no"].Value.ToString()]; } else { so = session.FindObject<SalesOrder>(new BinaryOperator("OrderNo", rst.Fields["nw:cpo:no"].Value.ToString())); if (so == null) { so = new SalesOrder(session); so.SetOrderNo(rst.Fields["nw:cpo:no"].Value.ToString()); so.Customer = GetCustomer(rst.Fields["nw:customer"].Value.ToString()); so.Save(); } dictSo.Add(rst.Fields["nw:cpo:no"].Value.ToString(), so); } SalesOrderLine soLine = new SalesOrderLine(session); soLine.SalesOrder = so; soLine.Item = item; soLine.SetOrderLineNo(int.Parse(rst.Fields["nw:cpo:item:index"].Value.ToString())); soLine.CustomerItemNo = rst.Fields["nw:part:tmxrefno"].Value.ToString(); soLine.CustomerOrderNo = rst.Fields["nw:cpo:no"].Value.ToString(); if (rst.Fields["nw:cpo:item:ignore"].Value.ToString() != "") soLine.IgnorePlanningReport = bool.Parse(rst.Fields["nw:cpo:item:ignore"].Value.ToString()); if (rst.Fields["nw:cpo:item:initneeddate"].Value.ToString() != "") soLine.InitNeedDate = DateTime.Parse(rst.Fields["nw:cpo:item:initneeddate"].Value.ToString()); soLine.NeedDate = DateTime.Parse(rst.Fields["nw:cpo:item:needdate"].Value.ToString()); soLine.NeedQty = float.Parse(rst.Fields["nw:cpo:item:needqty"].Value.ToString()); soLine.PoDate = DateTime.Parse(rst.Fields["nw:cpo:date"].Value.ToString()); soLine.Priority = int.Parse(rst.Fields["nw:cpo:item:priority"].Value.ToString()); soLine.SetShipQty(float.Parse(rst.Fields["nw:cpo:item:shippedqty"].Value.ToString())); soLine.ApprovedSalesOrderLine(); soLine.Save(); } } } rst.MoveNext(); } System.Diagnostics.Debug.WriteLine("Start Time : " + sTime.ToString() + ". End Time : " + DateTime.Now.ToString()); session.CommitTransaction(); System.Diagnostics.Debug.WriteLine("Commit Time : " + DateTime.Now.ToString()); }
public void ImportWorkOrder() { string woPath = "http://nwszmail/public/namwah/WorkOrders/"; string strSQL = ""; ADODB.Connection cnn = new ADODB.Connection(); ADODB.Recordset rst = new ADODB.Recordset(); Item item; WorkOrder wo; string partNo; string woNo; session.BeginTransaction(); CacheItem(); CacheWo(); ConnectDB(cnn, woPath); strSQL = "SELECT \"nw:partno\" , \"nw:partname\", \"nw:parttype\", \"nw:wo:no\", "; strSQL = strSQL + " \"nw:wo:needqty\", \"nw:wo:needdate\", \"nw:wo:ssblankuseqty\", \"nw:wo:extra\" "; strSQL = strSQL + " FROM \"" + woPath; strSQL = strSQL + "\" WHERE (\"DAV:ishidden\" = false)"; rst.Open(strSQL, cnn, ADODB.CursorTypeEnum.adOpenForwardOnly, ADODB.LockTypeEnum.adLockBatchOptimistic, 1); while (!rst.EOF) { partNo = rst.Fields["nw:partno"].Value.ToString(); woNo = rst.Fields["nw:wo:no"].Value.ToString(); if (dictItem.ContainsKey(partNo)) { if (dictWo.ContainsKey(woNo)) { WorkOrder oldWo = dictWo[woNo]; if (oldWo.NeedQty != float.Parse(rst.Fields["nw:wo:needqty"].Value.ToString())) { oldWo.NeedQty = float.Parse(rst.Fields["nw:wo:needqty"].Value.ToString()); oldWo.Save(); } } else { item = dictItem[partNo]; wo = new WorkOrder(session, woNo); wo.Item = item; wo.NeedDate = DateTime.Parse(rst.Fields["nw:wo:needdate"].Value.ToString()); wo.NeedQty = float.Parse(rst.Fields["nw:wo:needqty"].Value.ToString()); if (rst.Fields["nw:wo:extra"].Value.ToString() != "") wo.ExtraQty = float.Parse(rst.Fields["nw:wo:extra"].Value.ToString()); if (rst.Fields["nw:wo:ssblankuseqty"].Value.ToString() != "") wo.ssBlankUseQty = float.Parse(rst.Fields["nw:wo:ssblankuseqty"].Value.ToString()); wo.Save(); } } rst.MoveNext(); } session.CommitTransaction(); }
private void showLabels() { rs = modRecordSet.getRS(ref "SELECT Person.PersonID, [Person_FirstName] & ' ' & [Person_LastName] AS PersonName, Person.Person_QuickAccess, Label.* From Person, Label Where Person.Person_Disabled = False And Label.Label_Type = 3 ANd PersonID <> 1 ORDER BY [Person_FirstName] & ' ' & [Person_LastName];"); this.lstPerson.Items.Clear(); string tmpString = null; while (!(rs.EOF)) { tmpString = rs.Fields("PersonName").Value + " " + rs.Fields("PersonID").Value; lstPerson.Items.Add(tmpString); tmpString = ""; rs.MoveNext(); } }
private void loadGRV() { ADODB.Recordset rs = default(ADODB.Recordset); System.Windows.Forms.ListViewItem listItem = null; lvImport.Items.Clear(); rs = modRecordSet.getRS(ref "SELECT StockItem.StockItemID, GRVimport.GRVimport_Key, GRVimport.GRVimport_Barcode, StockItem.StockItem_Name, Catalogue.Catalogue_Quantity, GRVimport.GRVimport_Quantity, GRVimport.GRVimport_Cost, GRVimport.GRVimport_Price FROM (GRVimport INNER JOIN Catalogue ON GRVimport.GRVimport_Barcode = Catalogue.Catalogue_Barcode) INNER JOIN StockItem ON Catalogue.Catalogue_StockItemID = StockItem.StockItemID;"); while (!(rs.EOF)) { listItem = this.lvImport.Items.Add("k" + rs.Fields("stockitemID").Value, rs.Fields("GRVimport_Barcode").Value, ""); if (listItem.SubItems.Count > 1) { listItem.SubItems[1].Text = rs.Fields("StockItem_Name").Value; } else { listItem.SubItems.Insert(1, new System.Windows.Forms.ListViewItem.ListViewSubItem(null, rs.Fields("StockItem_Name").Value)); } if (listItem.SubItems.Count > 2) { listItem.SubItems[2].Text = rs.Fields("Catalogue_Quantity").Value; } else { listItem.SubItems.Insert(2, new System.Windows.Forms.ListViewItem.ListViewSubItem(null, rs.Fields("Catalogue_Quantity").Value)); } if (listItem.SubItems.Count > 3) { listItem.SubItems[3].Text = rs.Fields("GRVimport_Quantity").Value; } else { listItem.SubItems.Insert(3, new System.Windows.Forms.ListViewItem.ListViewSubItem(null, rs.Fields("GRVimport_Quantity").Value)); } if (listItem.SubItems.Count > 4) { listItem.SubItems[4].Text = Strings.FormatNumber(rs.Fields("GRVimport_Cost").Value, 2); } else { listItem.SubItems.Insert(4, new System.Windows.Forms.ListViewItem.ListViewSubItem(null, Strings.FormatNumber(rs.Fields("GRVimport_Cost").Value, 2))); } if (listItem.SubItems.Count > 5) { listItem.SubItems[5].Text = Strings.FormatNumber(rs.Fields("GRVimport_Price").Value, 2); } else { listItem.SubItems.Insert(5, new System.Windows.Forms.ListViewItem.ListViewSubItem(null, Strings.FormatNumber(rs.Fields("GRVimport_Price").Value, 2))); } if (listItem.SubItems.Count > 6) { listItem.SubItems[6].Text = rs.Fields("GRVimport_Key").Value; } else { listItem.SubItems.Insert(6, new System.Windows.Forms.ListViewItem.ListViewSubItem(null, rs.Fields("GRVimport_Key").Value)); } rs.MoveNext(); } }
private void loadCompanies() { ADODB.Recordset rs = new ADODB.Recordset(); System.Windows.Forms.ListViewItem lListitem = null; rs.CursorLocation = ADODB.CursorLocationEnum.adUseClient; //If openConnection Then //End If rs.Open("SELECT locationCompany.locationCompanyID, location.location_Name, locationCompany.locationCompany_Name, locationCompany.locationCompany_Path FROM location INNER JOIN locationCompany ON location.locationID = locationCompany.locationCompany_LocationID ORDER BY location.location_Name, locationCompany.locationCompany_Name;", cnnDBmaster, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic); //If lvLocation.Items.Count <> 0 Then //Me.lvLocation.Items.Clear() //End If if (rs.RecordCount) { while (!(rs.EOF)) { lListitem = lvLocation.Items.Add("k" + rs.Fields("locationCompanyID").Value, rs.Fields("locationCompany_Name").Value, 2); if (lListitem.SubItems.Count > 0) { lListitem.SubItems[0].Text = rs.Fields("location_Name").Value + ""; } else { lListitem.SubItems.Insert(0, new System.Windows.Forms.ListViewItem.ListViewSubItem(null, rs.Fields("location_Name").Value + "")); } if (lListitem.SubItems.Count > 1) { lListitem.SubItems[1].Text = rs.Fields("locationCompany_Path").Value + ""; } else { lListitem.SubItems.Insert(1, new System.Windows.Forms.ListViewItem.ListViewSubItem(null, rs.Fields("locationCompany_Path").Value + "")); } if (Strings.LCase(rs.Fields("locationCompany_Path").Value + "") == Strings.LCase(modRecordSet.serverPath + "pricing.mdb")) { lListitem.Selected = true; lvLocation_DoubleClick(lvLocation, new System.EventArgs()); } rs.MoveNext(); } } }
private void labelsfile() { System.Windows.Forms.CheckBox chk6 = new System.Windows.Forms.CheckBox(); System.Windows.Forms.CheckBox chk5 = new System.Windows.Forms.CheckBox(); System.Windows.Forms.CheckBox chk4 = new System.Windows.Forms.CheckBox(); System.Windows.Forms.CheckBox chk3 = new System.Windows.Forms.CheckBox(); System.Windows.Forms.CheckBox chk2 = new System.Windows.Forms.CheckBox(); System.Windows.Forms.CheckBox chk1 = new System.Windows.Forms.CheckBox(); int lValue = 0; Scripting.FileSystemObject fso = new Scripting.FileSystemObject(); string strname = null; ADODB.Recordset rsNew = default(ADODB.Recordset); rsNew = new ADODB.Recordset(); // ERROR: Not supported in C#: OnErrorStatement //openConnection gPersonID = 1; //If loadBarcodePrinter() Then Debug.Print(gLBLwidth); lValue = gLBLwidth; rsNew = modRecordSet.getRS(ref "SELECT * FROM Label WHERE LabelID=" + modApplication.MyLIDWHole + " ORDER BY Label_Type,LabelID"); modApplication.SelectLabelName = rsNew.Fields("Label_Name").Value; this.lbldesign.Text = modApplication.SelectLabelName; twipsToMM = 57; int StHi = 0; int StWi = 0; while (!(rsNew.EOF)) { if (modApplication.TheSelectedPrinterNew != 2) { strwidht = rsNew.Fields("Label_Width").Value; strheight = rsNew.Fields("Label_Height").Value; } else { strwidht = this.HSWidth.Value; strheight = this.HSHeight.Value; } _chkFields_0.CheckState = chk1.Checked; _chkFields_1.CheckState = chk2.Checked; _chkFields_2.CheckState = chk3.Checked; _chkFields_3.CheckState = chk4.Checked; _chkFields_4.CheckState = chk5.Checked; _chkFields_5.CheckState = chk6.Checked; modApplication.LaIDHold = rsNew.Fields("LabelID").Value; HSHeight.Value = strheight; if (modApplication.TheSelectedPrinterNew == 2) { HSHeight_Change(0); } HSWidth.Value = strwidht; if (modApplication.TheSelectedPrinterNew == 2) { HSHeight_Change(0); } rsNew.MoveNext(); } modApplication.TheSelectedPrinterNew = 0; modApplication.IntDesign = 0; Debug.Print(gLBLwidth); return; errLoad: // ERROR: Not supported in C#: ResumeStatement updatte(); }