还剩70页未读,继续阅读
本资源只提供10页预览,全部文档请下载后查看!喜欢就下载吧,查找使用更方便
文本内容:
系统主函数programcsusingSystem;usingSystem.Collections.Generic;usingSystem.Windows.Forms;namespacewarehouse{staticclassProgram{IIIsummaryIII应用程序的主入口点III/summary[STAThread]staticvoidMainApplication.EnableVisualStyles;Application.SetCompatibleTextRenderingDefaultfalse;Application.RunnewfrmLogin;//运行一个登陆对象集的常规信息usingSystem.Reflection;usingSystem.Runtime.CompilerServices;usingSystem.Runtime.InteropServices;//有关程序集的常规信息通过下列属性集//控制更改这些属性值可修改//与程序集关联的信息[assembly:AssemblyTitlenwarehousen][assembly:AssemblyDescriptionn|[assembly:AssemblyConfigurationn]returnValue.Direction=ParameterDirection.ReturnValue;sqlcon.Open;trysqlcom.ExecuteNonQueryO;catchExceptionexMessageBox.Showex.Message;finally{sqlcom.Dispose;sqlcon.Close;sqlcon.Dispose;intP_int_returnValue二intreturnValue.Value;returnP_int_returnValue;#endregion#region添加仓库信息IIIsummaryIII添加仓库信息III/summaryIIIparamname=P_str_StoreName”仓库名称v/paramIIIparamname=P_str_StorePeople”仓库负责/paramIIIparamname=P_str_StorePhone”仓库电话/paramIIIparamname=P_str_StoreUnit”仓库所属单位v/paramIIIparamname=P_int_StoreRemark备注/paramIII〈returns〉返回一个int类型的值〈/returns〉publicintInsertStoragestringP_str_StoreNamestringP_str_StorePeoplestringP_str_StorePhonestringP_str_StoreUnitstringP_int_StoreRemark{SqlConnectionsqlcon=datacon.getcon;SqlCommandsqlcom=newSqlCommandnproc_insertStoragensqlcon;sqlcom.CommandType=CommandType.StoredProcedure;sqlcom.Parameters.Addn@StoreNamenSqlDbType.VarChar
100.Value二P_str_StoreName;sqlcom.Parameters.Add@StorePeoplenSqlDbType.VarChar
20.Value二P_str_StorePeople;sqlcom.Parameters.Add@StorePhonenSqlDbType.VarChar
20.Value二P_str_StorePhone;sqlcom.Parameters.Add@StoreUnitnSqlDbType.VarChar
100.Value二PstrStoreUnit;sqlcom.Parameters.Addn@StoreRemarknSqlDbType.VarChar
1000.Value=P_int_StoreRemark;SqlParameterreturnValue=sqlcom.Parameters.AddnreturnValueHSqlDbType.Int4;returnValue.Direction=ParameterDirection.ReturnValue;sqlcon.OpenQ;trysqlcom.ExecuteNonQuery;catchExceptionex{MessageBox.Showex.Message;finallysqlcom.Dispose;sqlcon.Close;sqlcon.DisposeQ;intP_int_returnValue=intreturnValue.Value;returnP_int_returnValue;#endregion#region添加新用户IIIsummaryIII添加新用户////summaryIIIparamname=P_str_UserName”用户名v/paramIIIparamname=P_str_UserPwd”用户密码v/paramIIIparamname=P_str_UserRight”用户权限v/paramIII〈returns返回一个int类型的值〈/returns〉publicintInsertUserstringP_str_UserNamestringP_str_UserPwdstringP_str_UserRight{SqlConnectionsqlcon=datacon.getcon;SqlCommandsqlcom=newSqlCommandnproc_insertUsernsqlcon;sqlcom.CommandType=CommandType.StoredProcedure;sqlcom.Parameters.Addn@UserNameMSqlDbType.VarChar
20.Value=PstrUserName;sqlcom.Parameters.AddM@UserPwdMSqlDbType.VarChar
20.Value二PstrUserPwd;sqlcom.Parameters.Addn@UserRightHSqlDbType.Char
10.Value=P_str_UserRight;SqlParameterreturnValue=sqlcom.Parameters.AddnreturnValueHSqlDbType.Int4;returnValue.Direction=ParameterDirection.ReturnValue;sqlcon.Open;try{sqlcom.ExecuteNonQuery;catchExceptionexMessageBox.Showex.Message;finallysqlcom.Dispose;sqlcon.Close;sqlcon.DisposeQ;}intP_int_returnValue=intreturnValue.Value;returnP_int_returnValue;#endregion#region修改用户信息IIIsummary〃/修改用户信息III/summaryIllparamname=P_int_UID”用户编号v/paramIIIparamname=P_str_UserPwcT〉用户密码v/paramIIIparamname=P_str_UserRight”用户权限v/paramIII〈returns返回一个int类型的值〈/returns〉publicvoidupdateUserintP_int_UIDstringP_str_UserPwdstringP_str_UserRightSqlConnectionsqlcon=datacon.getcon;SqlCommandsqlcom=newSqlCommandproc_updateUser\sqlcon;sqlcom.CommandType=CommandType.StoredProcedure;sqlcom.Parameters.Addn@UserID\SqlDbType.Biglnt.Value=P_int_UID;sqlcom.Parameters.Addn@UserPwdnSqlDbType.VarChar
20.Value=P_str_UserPwd;sqlcom.Parameters.Addn@UserRightnSqlDbType.Char
10.Value=P_str_UserRight;sqlcon.Open;try{sqlcom.ExecuteNonQuery;catchExceptionexMessageBox.Showex.Message;finallysqlcom.Dispose;sqlcon.Close;sqlcon.DisposeQ;}#endregion登陆界面frmLogin.esusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.Data.SqlClient;namespacewarehousepublicpartialclassfrmLogin:FormpublicstaticstringM_str_name;〃记录登录用户名字publicstaticstringM_str_pwd;〃记录登录用户密码publicstaticstringM_str_right;〃记录登录用户的权限BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;BaseClass.DataOperatedoperate=newwarehous已BaseClass.DataOperate;publicfrmLoginOInitializeComponent;privatevoidfrmLogin_LoadobjectsenderEventArgse〃窗口打开就加载的信息doperate.cboxBindnselectUserNamefromtb_UserHntb_UsernnUserNamencboxUName;doperate.tewupwdnselectUserPwdfromtb_UserwhereUserName=n+cboxUName.Text+txtPwd;privatevoidbtnLogin_ClickobjectsenderEventArgseintP_int_returnValue=doperate.UserLogincboxUName.Text.TrimtxtPwd.Text.TrimO;ifP_int_returnValue==100M_str_name=cboxUName.Text.Trim;M_str_pwd=txtPwd.Text.Trim;frmMainfmain=newfrmMain;this.Hide;//this5lt^frmloginfmainfmain.Show;ifP_int_returnValue==-100MessageBox.Show用户名或密码错误!“,“提示”,MessageBoxButtons.OKMessageBoxIcon.Information;txtPwd.Text=n;cboxUName.Focus;privatevoidbtnExit_ClickobjectsenderEventArgseApplication.Exit;privatevoidcboxUName_SelectedIndexChangedobjectsenderEventArgseSqlDataReadersqlread=datacon.getreadHselectUserNameUserRightfromtb_UserwhereUserName=n+cboxUName.Text+ifsqlread.ReadlabURight.Text=sqlread[nUserRightn].ToString;M_str_right=labURight.Text;doperate.tewupwdnselectUserPwdfromtb_UserwhereUserName=H+cboxUName.Text+txtPwd;sqlread.Close;privatevoidfrmLogin_FormClosingobjectsenderFormClosingEventArgseApplication.Exit;系统主界面frmMain.esusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.Diagnostics;namespacewarehouse{publicpartialclassfrmMain:FormpublicfrmMainInitializeComponent;privatevoidfrmMain_LoadobjectsenderEventArgsetsslUser.Text二”操作用户权限+frmLogin.M_str_right.ToString.Trim;tsslDate.Text=DateTime.Today.ToLongDateStringO;tsslTime.Text=登录系统时间+DateTime.Now.ToShortTimeStringO;iffrmLogin.M_str_right.ToString.Trim==普通用户”入库管理ToolStripMenuItem.Enabled=false;出库管理ToolStripMenuItem.Enabled=false;借货还货ToolStripMenuItem.Enabled=false;供货商设置ToolStripMenuItem.Enabled二false;货物档案设置ToolStripMenuItem.Enabled=false;仓库设置ToolStripMenuItem.Enabled二false;权限设置ToolStripMenuItem.Enabled=false;用户管理ToolStripMenuItem.Enabled=false;btnIS.Enabled=false;btnOS.Enabled=false;btnBR.Enabled=false;btnPLEnabled=false;btnGLEnabled=false;btnSLEnabled=false;btnRLEnabled=false;btnUM.Enabled=false;privatevoidbtnIS_ClickobjectsenderEventArgse〃入库管理GoodsManage.frmlSManageGMfism=newwarehouse.GoodsManage.frmISManage;//GMfism.Show;GMfism.ShowDialog;〃这两个函数就看谁获得焦点,前者父窗口也可获得焦点,后者只有新创建的窗体privatevoidbtnOS_ClickobjectsenderEventArgse〃出库管理GoodsManage.frmOSManageGMfosm=newwarehouse.GoodsManage.frmOSManage;GMfosm.ShowDialogO;privatevoidbtnBR_ClickobjectsenderEventArgse〃借货还货管理{GoodsManage.frmBGManageGMfbgm二newwarehouse.GoodsManage.frmBGManage;GMfbgm.ShowDialogO;privatevoidbtnPI_ClickobjectsenderEventArgse〃供应商设置BasicInfo.frmPrlnfoBlfpi=newwarehouse.BasicInfo.frmPrInfo;Blfpi.ShowDialogO;privatevoidbtnGI_ClickobjectsenderEventArgse〃货物档案设置|BasicInfo.frmGoodsInfoBlfgi=newwarehouse.BasicInfo.frmGoodsInfo;BTfgi.ShowDialogO;privatevoidbtnSI_ClickobjectsenderEventArgse〃仓库设置BasicInfo.frmStorelnfoBIfsi=newwarehouse.BasicInfo.frmStoreInfo;BIfsi.ShowDialogO;privatevoidbtnISL_ClickobjectsenderEventArgse〃入库查询LookandSum.frmlSLookLSfisl二newwarehouse.LookandSum.frmISLook;LSfisLShowDialogO;privatevoidbtnSL_ClickobjectsenderEventArgse〃库存查询LookandSum.frmGILookLSfgil=newwarehouse.LookandSum.frmGILook;LSfgil.ShowDialogO;privatevoidbtnGOL_ClickobjectsenderEventArgse〃货物借出查询LookandSum.frmBGLookLSfbgl二newwarehouse.LookandSum.frmBGLook;LSfbgl.ShowDialogO;privatevoidbtnGIL_ClickobjectsenderEventArgse〃货物归还查询LookandSum.frmRGLookLSfrgl=newwarehouse.LookandSum.frmRGLook;LSfrgLShowDialogO;privatevoidbtnOSL_ClickobjectsenderEventArgse〃出库查询LookandSum.frmOSLookLSfosl=newwarehouse.LookandSum.frmOSLook;LSfosl.ShowDialogO;privatevoidbtnEP_ClickobjectsenderEventArgse〃更改密码SystemSet.frmEditPwdHPfep=newwarehouse.SystemSet.frmEditPwd;HPfep.ShowDialogO;privatevoidbtnRI_ClickobjectsenderEventArgse〃权限管理{SystemSet.frmRightManageHPfrm二newwarehouse.SystemSet.frmRightManage;HPfrm.ShowDialogO;privatevoidbtnUM_ClickobjectsenderEventArgse〃用户管理SystemSet.frmUserManageHPfum=newwarehouse.SystemSet.frmUserManageO;HPfum.ShowDialogO;privatevoidbtnAU_ClickobjectsenderEventArgse//关于本系统SystemSet.frmAboutUsHPfau=newwarehouse.SystemSet.frmAboutUs;HPfau.ShowDialogO;privatevoidbtnCH_ClickobjectsenderEventArgseifMessageBox.Show你真的要注销当前用户“,“提示”MessageBoxButtons.OKCancelMessageBoxIcon.Information==DialogResult.OKwarehouse.frmLoginfrmlogin=newfrmLogin;this.HideQ;frmlogin.Show;}privatevoidbtnExit_ClickobjectsenderEventArgse〃退出系统this.Close;//=Application.Exit;privatevoidfrmMain_FormClosedobjectsenderFormClosedEventArgseifMessageBox.Show您真的要退出本系统吗?丁提示二MessageBoxButtons.OKCancelMessageBoxIcon.Information==DialogResult.OKApplication.Exit;elsefrmMainfmain=newfrmMain;fmain.Show;privatevoid入库管理ToolStripMenuItem_ClickobjectsenderEventArgsebtnIS_Clicksendere;privatevoid出库管理ToolStripMenuItem_ClickobjectsenderEventArgsebtnOS_Clicksendere;[assembly:AssemblyCompanynn][assembly:AssemblyProductwarehouseH][assembly:AssemblyCopyright版权所有2009]Iassembly:AssemblyTrademarknn][assembly:AssemblyCulturenn]//将ComVisible设置为false使此程序集中的类型//对COM组件不可见如果需要从COM访问此程序集中的类型//则将该类型上的ComVisible属性设置为true[assembly:ComVisiblefalse]//如果此项目向COM公开,则下列GUID用于类型库的ID[assembly:Guid063bd674-c4cc-4dc9-81ee-3791409e9189M]//程序集的版本信息由下面个值组成//主版本//次版本//内部版本号//修订号//[assembly:AssemblyVersion
1.
0.
0.0n][assembly:Assemblyn
1.
0.O.O1]数据库连接类DataCon.es:usingSystem;usingSystem.Collections.Generic;usingSystem.Text;usingSystem.Data;usingSystem.Data.SqlClient;namespacewarehouse.BaseClassclassDataCon#region建立数据库连接IIIsummaryIII建立数据库连接.III/summaryIII〈returns〉返回SqlConnection对象V/returns〉publicSqlConnectiongetconstringM_str_sqlcon=DataSource=local;Database=db_warehouse;userid=sa;pwd=privatevoid借货还货ToolStripMenuItem_ClickobjectsenderEventArgsebtnBR_Clicksendere;privatevoid供货商设置ToolStripMenuItem_ClickobjectsenderEventArgsebtnPI_Clicksendere;privatevoid货物档案设置ToolStripMenuItem_ClickobjectsenderEventArgsebtnGI_Clicksendere;privatevoid仓库设置ToolStripMenuhem_ClickobjectsenderEventArgse{btnSI_Clicksendere;privatevoid库存查询ToolStripMenuItem_ClickobjectsenderEventArgsebtnSL_Clicksendere;privatevoid入库查询ToolStripMenuItem_ClickobjectsenderEventArgsebtnISL_Clicksendere;}privatevoid出库查询ToolStripMenuItem_ClickobjectsenderEventArgsebtnOSL_Clicksendere;privatevoid货物借出查询TooIStripMenuItem_ClickobjectsenderEventArgsebtnGOL_Clicksendere;privatevoid货物归还查询ToolStripMenuItem_ClickobjectsenderEventArgsebtnGIL_Clicksendere;privatevoid更改密码ToolStripMenuItem_ClickobjectsenderEventArgsebtnEP_Clicksendere;privatevoid权限设置ToolStripMenuItem_ClickobjectsenderEventArgsebtnRI_Clicksendere;privatevoid用户管理ToolStripMenuItem_ClickobjectsenderEventArgsebtnUM_Clicksendere;privatevoid关于本系统ToolStripMenuItem_ClickobjectsenderEventArgsebtnAU_Clicksendere;privatevoid货物管理ToolStripMenuItem_ClickobjectsenderEventArgsetabControl
1.Selectedlndex=0;privatevoid基本档案ToolStripMenuItem_ClickobjectsenderEventArgsetabControl
1.Selectedlndex=1;privatevoid查询统计ToolStripMenuItem_ClickobjectsenderEventArgsetabControl
1.Selectedlndex=2;}privatevoid系统设置ToolStripMenuItem_ClickobjectsenderEventArgsetabControl
1.Selectedlndex=3;privatevoid注名肖ToolStripMenuItem_ClickobjectsenderEventArgsebtnCH_Clicksendere;privatevoid退出系统ToolStripMenuItem_ClickobjectsenderEventArgsebtnExit_Clicksendere;privatevoidtoolStripStatusLabel6_ClickobjectsenderEventArgse货物档案管理入库frmlnManage.csusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.Data.SqlClient;namespacewarehouse.GoodsManagepublicpartialclassfrmlSManage:Formwarehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;warehouse.BaseClass.DataOperatedoperate=newwarehouse.BaseClass.DataOperate;publicfrmISManageInitializeComponent;privatevoidfrmISManage_LoadobjectsenderEventArgsedgvISManage.Controls.AddhScroHBarl;〃数据源控件中添加了一个水平滚动条doperate.cboxBindHselectStoreNamefromtb_Storagenntb_StoragenStoreNamencboxSName;//仓库名字显示出来doperate.cboxBindHse!ectPrNamefromtb_ProviderHntb_ProvidernnPrNamencboxPName;〃计量单位显示出来DataSetmyds=datacon.getdsHselectISIDas入库编号GoodsIDas货物编号GoodsNameas货物名称PrNameas供应商名称J+nStoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位GoodsNumas入库数量J+GoodsPriceas货物单价GoodsAPriceas总金额JSDateas入库日期HandlePeopleas经手J+ISRemarkas备注fromtb」nStore,“tb」nStore”;dgvISManage.DataSource=myds.Tables
[0];//dataset41的第——个datatable0=ntb_InStoreHprivatevoidbtnAdd_ClickobjectsenderEventArgseiftxtISGID.Text=*MessageBox.Show货物编号不能为空!,信息,MessageBoxButtons.OKMessageBoxIcon.Information;iftxtISGName.Text=*MessageBox.Show货物名称不能为空,信息”MessageBoxButtons.OKMessageBoxIcon.Information;iftxtGIPrice.Text==*MessageBox.Show货物单价不能为空!信息,MessageBoxButtons.OKMessageBoxIcon.Information;iftxtISGNum.Text=MessageBox.Show入库数量不能为空,信息,MessageBoxButtons.OKMessageBoxIcon.Information;iftxtGSpec.Text=MessageBox.Show货物规格不能为空”,“信息”MessageBoxButtons.OKMessageBoxIcon.Information;}iftxtHPeople.Text==HMessageBox.Show经手不能为空,信息,MessageBoxButtons.OKMessageBoxIcon.Information;else{intP_int_returnValue=doperate.InsertGoodsConvert.ToInt32txtISGID.Text.TrimtxtISGName.Text.TrimcboxPName.Text.TrimcboxSName.Text.TrimtxtGSpec.Text.TrimcboxGUnit.Text.TrimConvert.ToInt32txtISGNum.Text.TrimConvert.ToDecimaltxtGIPrice.Text.TrimtxtHPeople.Text.TrimtxtISRemark.Text.Trim;ifP_int_returnValue==100MessageBox.Show该货物号已经被占用!「信息”,MessageBoxButtons.OKMessageBoxIcon.Information;elseifP_int_returnValue==200MessageBox.Show这类货物已经存在惟一编号!“,“信息:MessageBoxButtons.OKMessageBoxIcon.Information;elseMessageBox.Show货物入库成功!:‘信息”,MessageBoxButtons.OKMessageBoxIcon.Information;frmISManage_Loadsendere;privatevoidbtnDel_ClickobjectsenderEventArgse//try//{〃删除下面数据源控件中的,指示的数据项datacon.getcomndeletefromtb_InStorewhereISID廿+Convert.ToStringdgvISManage|dgvISManage.CurrentCell.Rowindex].Value.Trim+//Convert.ToStringdataGridViewl[ldataGridViewl.CurrentCell.RowIndex].Value.Trim;//来取得所选中的那行数据某列的值…MessageBox.Show“货物册Ij除成功!信息,MessageBoxButtons.OKMessageBoxIcon.Information;frmISManage_Loadsendere;////catchExceptionex//{//MessageBox.Showex.MessagenWMessageBoxButtons.OKMessageBoxIcon.Warning;//}}privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoiddgvISManage_CellClickobjectsenderDataGridViewCellEventArgse/*datagridview控件有一个CeHClick事件是当单击datagridview控件的任意部分是发生.然后再用Convert.ToStringdataGridView1[ldataGridViewl.CurrentCell.Rowindex].Value.Trim;来取得所选中的那行数据某列的值*/txtISGID.Text二Convert.ToStringdgvTSManage[ldgvISManage.CurrentCell.RowIndex].Value.Trim;txtISGName.Text二Convert.ToStringdgvISManage[2dgvISManage.CurrentCell.Rowindex].Value.Trim;cboxSName.Text=Convert.ToStringdgvISManage[4dgvISManage.CurrentCell.Rowindex].Value.Trim;cboxPName.Text=Convert.ToStringdgvISManage|3dgvISManage.CurrentCell.Rowindex].Value.Trim;txtGSpec.Text=Convert.ToStringdgvISManage[5dgvISManage.CurrentCell.Rowindex].Value.Trim;cboxGUnit.Text=Convert.ToStringdgvISManage[6dgvISManage.CurrentCell.Rowindex].Value.Trim;txtISGNum.Text=Convert.ToStringdgvISManage[7dgvISManage.CurrentCell.Rowindex].Value.Trim;txtGIPrice.Text=Convert.ToStringdgvISManage[8dgvISManage.CurrentCell.Rowindex].Value.Trim;txtGSPrice.Text=Convert.ToStringdgvISManage[9dgvISManage.CurrentCell.Rowindex].Value.Trim;txtHPeople.Text=Convert.ToStringdgvISManage[11dgvISManage.CurrentCell.Rowindex].Value.Trim;txtTSRemark.Text=Convert.ToStringdgvISManage[12dgvISManage.CurrentCell.Rowindex].Value.Trim;privatevoidtxtGIPrice_TextChangedobjectsenderEventArgsetry{txtGSPrice.Text=Convert.ToStringConvert.ToDecimaltxtGIPrice.Text.Trim*Convert.ToInt32txtISGNum.Text.Trim.Trim;//Convert.ToDecimaltxtGIPrice.Text.Trim将文本值转为Decimal数值〃将数字的指定String表示形式转换为等效的Decimal数字catchExceptionexMessageBox.Showex.Message警告,MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidfrmISManage_ForinClosedobjectsenderFormClosedEventArgsethis.Close;privatevoidbutton1_ClickobjectsenderEventArgsethis.txtGIPrice.Text=n;this.txtGSpec.Text=”;this.txtHPeople.Text=this.txtISGID.Text=nn;this.txtISGName.Text=n;this.txtISGNum.Text=nn;this.txtISRemark.Text=this.txtGIPrice.Text=nn;this.txtGSPrice.Text=出库管理frmOsManage.csusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.Data.SqlClient;namespacewarehouse.GoodsManagepublicpartialclassfrmOSManage:Formwarehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;warehouse.BaseClass.DataOperatedoperate=newwarehouse.BaseClass.DataOperate;publicfrmOSManageInitializeComponent;}privatevoidfrmOSManage_LoadobjectsenderEventArgsedgvOSManage.Controls.AddhScroIlBarl;doperate.cboxBindnselectdistinctStoreNamefromtb_InStore\ntb_InStorennStoreNamencboxSName;DataSetmyds=datacon.getdsnselectOSIDas出库编号StoreNameas仓库名称GoodsNameas货物名称J+nGoodsSpecas规格GoodsUnitas计量单位GoodsNumas出库数量GoodsPriceas价格GoodsAPriceas总金额J+nOSDateas出库日期PGProvideras提货单位PGPeopleas提货J+nHandlePeopleas经手QSRemarkas备注fromtb_OutStorenntb_OutStoren;dgvOSManage.DataSource=myds.Tableslntb_OutStorenJ;privatevoidbtnAdd_ClickobjectsenderEventArgsetrySqlDataReadersqlread二datacon.getreadnselectGoodsNumfromtb_GoodsInfoH+whereStoreName=H+cboxSName.Text.Trim+andGoodsName=H+cboxGName.Text.Trim+andGoodsSpec=n+cboxGSpec.Text.Trim+ifsqlread.ReadifConvert.ToInt32txtOSGNum.Text.TrimConvert.ToInt32sqlread[nGoodsNumn].ToString.Trim{MessageBox.Show仓库中没有足够的货物!“,“提示,MessageBoxButtons.OKMessageBoxIcon.Information;elsedatacon.getcomninsertintotb_OutStoreStoreNameGoodsNameGoodsSpecGoodsUnitn+GoodsNumGoodsPricePGProviderPGPeopleHandlePeopleOSRemarkn+values+cboxSName.Text.Trim+””+cboxGName.Text.Trim++cboxGSpec.Text.Trim+二+cboxGUnit.Text.Trim+txtOSGNum.Text.Trim++txtGOPrice.Text.Trim++txtOSUnit.Text.Trim++txtOSPeople.Text.Trim++txtHPeople.Text.Trim++txtOSRemark.Text.Trim+””;MessageBox.Show货物出库成功!信息,MessageBoxButtons.OKMessageBoxIcon.Information;frmOSManage_Loadsendere;sqlread.Close;catchExceptionexMessageBox.Showex.MessageMessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnDel_ClickobjectsenderEventArgsedatacon.getcomHdeletefromtb_OutStorewhereOSID=n+Convert.ToStringdgvOSManage[0dgvOSManage.CurrentCell.Rowindex].Value.Trim+MessageBox.Show货物删除成功!信息、MessageBoxButtons.OKMessageBoxIcon.Information;frmOSManage_Loadsendere;catchExceptionexMessageBox.Showex.MessageMessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoiddgvOSManage_CellClickobjectsenderDataGridViewCellEventArgsecboxSName.Text=Convert.ToStringdgvOSManage[1dgvOSManage.CurrentCelLRowIndex].Vaiue.Trim;cboxGName.Text=Convert.ToStringdgvOSManage[2dgvOSManage.CurrentCelLRowIndex].Value.Trim;cboxGSpec.Text=Convert.ToStringdgvOSManage[3dgvOSManage.CurrentCelLRowIndex].Value.Trim;cboxGUnit.Text=Convert.ToStringdgvOSManage[4dgvOSManage.CurrentCelLRowIndex].Value.Trim;txtOSGNum.Text=Convert.ToStringdgvOSManage[5dgvOSManage.CurrentCelLRowIndex].Value.Trim;txtGOPrice.Text=Convert.ToStringdgvOSManage[6dgvOSManage.CurrentCell.Rowindex].Value.Trim;txtGSPrice.Text=Convert.ToStringdgvOSManage[7dgvOSManage.CurrentCell.Rowindex].Value.Trim;txtOSUnit.Text=Convert.ToStringdgvOSManage[9dgvOSManage.CurrentCell.Rowindex].Value.Trim;txtOSPeople.Text=Convert.ToStringdgvOSManage[10dgvOSManage.CurrentCell.Rowindex].Value.Trim;txtHPeople.Text=Convert.ToStringdgvOSManage[l1dgvOSManage.CurrentCell.Rowindex].Value.Trim;SqlConnectionmyCon=newSqlConnectionM_str_sqlcon;returnmyCon;#endregion#region执彳亍SqlCommand命令IIIsummaryIII执行SqlCommandIII/summaryIIIparamname=HM_str_sqlstrSQL语句/parampublicvoidgetcomstringM_str_sqlstrSqlConnectionsqlcon=this.getcon;sqlcon.Open;SqlCommandsqlcom=newSqlCommandM_str_sqlstrsqlcon;sqlcom.ExecuteNonQuery;//返回受影响的行数sqlcom.DisposeQ;sqlcon.Close;sqlcon.Dispose;#endregion#region创建DataSet对象读取数据IIIsummaryIII创建一个DataSet对象III/summaryIIIparamname=HM_str_sqlstrHSQL语句/param〉IIIparamname=M_str_table表名/paramIII〈returns返回DataSet对象V/returns〉publicDataSetgetdsstringM_str_sqlstrstringM_str_tableSqlConnectionsqlcon=this.getcon;sqlcon.Open;SqlDataAdaptersqlda=newSqlDataAdapterM_str_sqlstrsqlcon;DataSetmyds=newDataSet;sqlda.FillmydsM_str_table;returnmyds;#endregion#region创建SqlDataReader对象读取数据txtOSRemark.Text=Convert.ToStringdgvOSManage[12dgvOSManage.CurrentCell.Rowindex].Value.Trim;privatevoidcboxSName_SelectedIndexChangedobjectsenderEventArgsedoperate.cboxBindnselectdistinctGoodsNamefromtb_InStorewhereStoreName=H+cboxSName.Text.Trim+nnHtb_InStorenHGoodsNamencboxGName;privatevoidcboxGName_SelectedIndexChangedobjectsenderEventArgsedoperate.cboxBindselectdistinctGoodsSpecfromtb_InStorewhereStoreName=n+cboxSName.Text.Trim+*andGoodsName=n+cboxGName.Text.Trim+mntb_InStorenuGoodsSpecncboxGSpec;SqlDataReadersqlread=datacon.getreadnselectGoodsUnitGoodsOutPriceGoodsNumfromtb_GoodsInfoH+whereStoreName=n+cboxSName.Text.Trim+nandGoodsName=n+cboxGName.Text.Trim+ifsqlread.Readthis.cboxGUnit.Text=sqlread[GoodsUnit].ToString.Trim;this.txtGOPrice.Text=qlread[nGoodsOutPricen].ToString.Trim;this.tbxshenxia.Text=sqlread[nGoodsNumn].ToString.Trim;sqlread.Close;privatevoidtxtOSGNum_TextChangedobjectsenderEventArgsetrytxtGSPrice.Text=Convert.ToStringConvert.ToDecimaltxtGOPrice.Text.Trim*Convert.ToInt32txtOSGNum.Text.Trim.Trim;catchExceptionexMessageBox.Showex.MessageunMessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidfrmOSManage_FormClosedobjectsenderFormClosedEventArgsethis.Close;借货管理frmBGManage.csusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.Data.SqlClient;namespacewarehouse.GoodsManage{publicpartialclassfrmBGManage:Formwarehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;warehouse.BaseClass.DataOperatedoperate=newwarehouse.BaseClass.DataOperate;publicfrmBGManageInitializeComponent;privatevoidfrmBGManage_LoadobjectsenderEventArgsedgvBGManage.Controls.AddhScrollBarl;doperate.cboxBindnselectStoreNamefromtb_Storagenntb_StoragennStoreNamencboxSName;DataSetmyds=datacon.getdsnselectBGIDas借货编号GoodsNameas货物名称StoreNameas仓库名称,+nGoodsSpecas货物规格GoodsNumas借出数量BGDateas借货日期HandlePeopleas经手J+BGPeopleas借货BGUnitas借货单位BGRemarkas备注fromtb_BorrowGoodsnntb_BorrowGoodsn;dgvBGManage.DataSource=myds.Tables|O|;privatevoidbtnAdd_ClickobjectsenderEventArgsetryif!doperate.validateNumtxtBGNum.Text.TrimerrorPrBGNum.SetErrortxtBGNum”输入必须为数字!elseerrorPrBGNum.Clear;SqlDataReadersqlread=datacon.getreadHselectGoodsNameStoreNameGoodsNumfromtb_GoodsInfon+whereStoreName=n+cboxSName.Text.Trim+andGoodsName=+cboxGName.Text.Trim+nandGoodsSpec=”+cboxGSpec.Text.Trim+ifsqlread.ReadifConvert.ToInt32sqlread[GoodsNum].ToString.Trim=1MessageBox.Show该货物库存已经不足!「警告”,MessageBoxButtons.OKMessageBoxIcon.Warning;elseifConvert.ToInt32txtBGNum.Text.Trim=Convert.ToInt32this.tbxshenxia.Text.TrimMessageBox.Show没有足够的货物供您借取!“,“警告”MessageBoxButtons.OKtxtBGNum.Text=H;txtBGNum.Focus;elsedatacon.getcominsertintotb_BorrowGoodsStoreNameGoodsNameGoodsSpecH+nGoodsNumHandlePeopleBGPeopleBGUnitBGRemarkn+”values”+cboxSName.Text.Trim+二”+cboxGName.Text.Trim++cboxGSpec.Text.Trim+二+txtBGNum.Text.TrimO十1”+txtHPeople.Text.Trim++txtBGPeople.Text.Trim十1”+txtBGDepart.Text.Trim++txtBGRemark.Text.Trim+””;MessageBox.Show借货成功!“,“信息”,MessageBoxButtons.OKMessageBoxIcon.Information;frmBGManage_Loadsendere;}sqlread.Close;}}catchExceptionexMessageBox.Showex.MessagenWn*MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnDel_ClickobjectsenderEventArgsetrydatacon.getcomHdeletefromtb_BorrowGoodswhereBGID=+Convert.ToStringdgvBGManage[dgvBGManage.CurrentCell.RowIndex].Value.Trim+”;MessageBox.Show借货资料删除成功!“,“信息“,MessageBoxButtons.OKMessageBoxIcon.Information;frmBGManage_Loadsendere;catchExceptionexMessageBox.Showex.MessagerfnMessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnRGManage_ClickobjectsenderEventArgseGoodsManage.frmRGManageGMfrgm二newfrmRGManage;this.Hide;GMfrgm.ShowDialogO;privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoidcboxSName_SelectedIndexChangedobjectsenderEventArgsedoperate.cboxBindselectdistinctGoodsNamefromtb_Goods!nfowhereStoreName=+cboxSName.Text.Trim+nnntb_GoodsInfoGoodsNamecboxGName;privatevoidcboxGName_SelectedIndexChangedobjectsenderEventArgsedoperate.cboxBindHselectdistinctGoodsSpecfromtb_GoodsInfowhereStoreName=H+cboxSName.Text.Trim+andGoodsName=H+cboxGName.Text.Trim+ntb_GoodsInfonnGoodsSpecncboxGSpec;SqlDataReadersqlreader=datacon.getreadnselectGoodsNameStoreNameGoodsNumfromtb_GoodsInfowhereStoreName=H+cboxSName.Text.Trim+andGoodsName=n+cboxGName.Text.Trim+ifsqlreader.Readthis.tbxshenxia.Text=sqlreader[GoodsNum].ToString.Trim;sqlreader.Close;privatevoiddgvBGManage_CellClickobjectsenderataGridViewCellEventArgsecboxSName.Text=Convert.ToStringdgvBGManage[2dgvBGManage.CurrentCell.RowIndex].Value.Trim;cboxGName.Text=Convert.ToStringdgvBGManage[1dgvBGManage.CurrentCell.RowIndex].Value.Trim;cboxGSpec.Text=Convert.ToStringdgvBGManage[3dgvBGManage.CurrentCell.RowIndex].Value.Trim;txtBGNum.Text=Convert.ToStringdgvBGManage[4dgvBGManage.CurrentCell.RowIndex].Value.Trim;txtHPeople.Text=Convert.ToStringdgvBGManage[6dgvBGManage.CurrentCell.RowIndex].Value.Trim;txtBGPeople.Text=Convert.ToStringdgvBGManage[7dgvBGManage.CurrentCell.Rowindex].Value.Trim;txtBGDepart.Text=Convert.ToStringdgvBGManage[8dgvBGManage.CurrentCell.RowIndex].Value.Trim;txtBGRemark.Text=Convert.ToStringdgvBGManage[9dgvBGManage.CurrentCell.Rowindex].Value.Trim;privatevoidfrmBGManage_FormClosedobjectsenderFormClosedEventArgsethis.Close;}货物归还frmRGManage.csusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.Data.SqlClient;namespacewarehouse.GoodsManagepublicpartialclassfrmRGManage:Formwarehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;warehouse.BaseClass.DataOperatedoperate=newwarehouse.BaseClass.DataOperate;publicfrmRGManageInitializeComponent;privatevoidfrmRGManage_LoadobjectsenderEventArgsedgvRGManage.Controls.AddhScrollBarl;doperate.cboxBindHselectBGIDfromtb_BorrowGoodsnntb_BorrowGoodsnBGIDcboxBGID;DataSetmyds=datacon.getdsHselectRGIDas还货编号BGIDas借货编号StoreNameas仓库名称GoodsNameas货物名称“+GoodsSpecas货物规格,RGNumas归还数量NRGNumas未归还数量RGDateas还货日期HandlePeopleas经手”+RGPeopleas还货RGRemarkas备注Editeras修改EditDateas修改日期fromtb_ReturnGoodsHntb_RetumGoodsn;dgvRGManage.DataSource=myds.Tables[ntb_ReturnGoodsn];privatevoidbtnAdd_ClickobjectsenderEventArgsetrySqlDataReadersqlread=datacon.getreadnselectGoodsNumfromtb_BorrowGoodsn+nwhereBGID=+Convert.ToInt32cboxBGID.Text.Trim+“”;ifsqlread.ReadifConvert.ToInt32txtRGNum.Text.TrimConvert.ToInt32sqlread[GoodsNum].ToString.Trim{MessageBox.Show您借的货物数目为+Convert.ToInt32sqlread[nGoodsNumn].ToString.Trim+”,请重新填写还货的数量!”,”提示:MessageBoxButtons.OKMessageBoxIcon.Information;txtRGNum.Text二txtRGNum.Focus;elsedatacon.getcomHinsertintotb_ReturnGoodsBGIDStoreNameGoodsNameGoodsSpecRGNum”+nNRGNumHandlePeopleRGPeopleRGRemarkvalues+cboxBGID.Text.Trim++txtSName.Text.Trim++txtGName.Text.TrimO++txtGSpec.Text.Trim++txtRGNum.Text.Trim+Hfl+txtNRGNum.Text.Trim+”J+txtHPeople.Text.Trim++txtRGPeople.Text.Trim++txtRGRemark.Text.Trim+””;MessageBox・Show还货成功!=提示MessageBoxButtons.OKMessageBoxIcon.Information;frmRGManage_Loadsendere;}sqlread.Close;catchExceptionexMessageBox・Showex・Message警告MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnEdit_ClickobjectsenderEventArgse|trydatacon.getcom1updatetb_ReturnGoodssetHandlePeople=n+txtHPeople.Text.Trim+n\RGPeople=n+txtRGPeople.Text.Trim+nRGRemark=n+txtRGRemark.Text.Trim+nEditer=n4-warehouse.frmLogin.M_str_name+MEditDate=H+DateTime.Now.ToShortDateStringO+whereRGID=n+Convert.ToStringdgvRGManage|0dgvRGManage.CurrentCell.Rowindex].Value.Trim+*;MessageBox.Show还货档案资料修改成功!“,“信息”,MessageBoxButtons.OKMessageBoxIcon.Information;frmRGManage_Loadsendere;catchExceptionexMessageBox.Showex.Message警告MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnDel_ClickobjectsenderEventArgsetrydatacon.getcomHdeletefromtb_ReturnGoodswhereRGID=+Convert.ToStringdgvRGManage[0dgvRGManage.CurrentCell.Rowindex].Value.Trim+*;MessageBox.Show还货档案资料册U除成功!「信息”,MessageBoxButtons.OKMessageBoxIcon.Information;frmRGManage_Loadsendere;catchExceptionex{MessageBox.Showex.Message”警告MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;}privatevoidcboxBGID_SelectedIndexChangedobjectsenderEventArgseifcboxBGID.Text==nSystem.Data.DataRowViewnelse{SqlDataReadersqlreada=datacon.getreadnselectGoodsNumfromtb_BorrowGoodsH+whereBGID=+Convert.ToInt32cboxBGID.Text.Trim+””;ifsqlreada.Readthis.lbejiehuo.Text=sqlreada[nGoodsNumH].ToString.Trim;SqlDataReadersqlreadNum=datacon.getreadselectsumRGNumasNumfromtb_ReturnGoodsH+”whereBGID=+Convert.ToInt32cboxBGID.Text.Trim+”;ifsqlreadNum.Read{ifsqlreadNum[nNum].ToString.Trim==HMessageBox.Show“您没有还过该货物;elseMessageBox.Show已归还数量为+sqlreadNum[Num].ToString.Trim+}sqlreadNum.Close;SqlDataReadersqlread=datacon.getreadselectStoreNameGoodsNameGoodsSpecfromtb_BorrowGoodsn+whereBGID=+Convert.ToInt32cboxBGID.Text.Trim+ifsqlread.ReadtxtSName.Text=sqlread[MStoreNamen].ToString.Trim;txtGName.Text=sqlread[nGoodsNamen].ToString.Trim;txtGSpec.Text=sqlread[nGoodsSpecn].ToString.Trim;}sqlread.Close;privatevoiddgvRGManage_CellClickobjectsenderDataGridViewCellEventArgsecboxBGID.Text=Convert.ToStringdgvRGManage[1dgvRGManage.CurrentCell.RowIndex].Value.Trim;txtSName.Text=Convert.ToStringdgvRGManage[2dgvRGManage.CurrentCeIl.RowIndexJ.VaIue.Trim;txtGName.Text=Convert.ToStringdgvRGManage[3dgvRGManage.CurrentCell.RowIndex].Value.Trim;txtRGNum.Text=Convert.ToStringdgvRGManage[5dgvRGManage.CurrentCell.Rowindex].Value.Trim;IllsummaryIII仓ij建——
4、SqlDataReader对象III/summaryIIIparamname=HM_str_sqlstrHSQL语句/param〉III〈returns返回SqlDataReaderMM/returnspublicSqlDataReadergetreadstringM_str_sqlstrSqlConnectionsqlcon=this.getcon;SqlCommandsqlcom=newSqlCommandM_str_sqlstrsqlcon;sqlcon.Open;SqlDataReadersqlread=sqlcom.ExecuteReaderCommandBehavior.CloseConnection;〃方法的参数表示如果关闭关联的对象sqlread则关联的连接sqlcon也关闭了returnsqlread;#endregion数据库操作类DataOperate.cs:usingSystem;usingSystem.Collections.Generic;//命名空间包含定义泛型集合的接口和类,泛型集合允许用户创建强类型集合,它能提供比非泛型强类型集合21的类型安全性和性能usingSystem.Text;//System.Text命名空间包含表示ASCIIUnicode、UTF-7和UTF-8字符编码的类;用于将字符块转换为字节块和将字节块转换为字符块的抽象基类;以及操作和格式化String对象而不创建String的中间实例的Helper类.usingSystem.Windows.Forms;usingSystem.Data;usingSystem.Data.SqlClient;usingSystem.Collections;//usingSystem.Drawing;//命名空间提供了对GDI+基本图形功能的访问.usingSystem.10;//提供用于创建、复制、删除、移动和打开文件的静态方法,并协助创建对象usingSystem.lO.Compression;〃里面包括两个类GzipStream和DeflaterStream它们都可以用于解压缩,但是不支持ZIP、RAR等常用的压缩文件,usingSystem.Drawing.Text;//usingSystem.Drawing.Drawing2D;〃命名空间提供高级的二维和矢量图形功能.usingSystem.Drawing.Imaging;//为源自Bitmap和Metafile的类提供功能的抽象基类txtNRGNum.Text=Convert.ToStringdgvRGManage[6dgvRGManage.CurrentCell.Rowindex].Value.Trim;txtRGPeople.Text=Convert.ToStringdgvRGManage[9dgvRGManage.CurrentCell.RowIndex].Value.Trim;txtHPeople.Text=Convert.ToStringdgvRGManage[8dgvRGManage.CurrentCell.RowIndex].Value.Trim;txtRGRemark.Text=Convert.ToStringdgvRGManage[10dgvRGManage.CurrentCell.RowIndex].Value.Trim;privatevoidtxtRGNum_TextChangedobjectsenderEventArgsetrySqlDataReadersqlread=datacon.getreadnselectGoodsNumfromtb_BorrowGoodsn+”whereBGID=+Convert.ToInt32cboxBGID.Text.Trim+ifsqlread.Read{txtNRGNum.Text=Convert.ToStringConvert.ToInt32sqlread[nGoodsNumn].ToString.Trim-Convert.ToInt32txtRGNum.Text.Trim.Trim;sqlread.Close;catchExceptionexMessageBox.Showex.Message”警告二MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidfrmRGManage_FormClosedobjectsenderFormClosedEventArgsethis.Close;档案设置管理仓库设置frmStorelnfo.csusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.Data.SqlClient;namespacewarehouse.BasicInfopublicpartialclassfrmStorelnfo:Formwarehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;warehouse.BaseClass.DataOperatedoperate=newwarehouse.BaseClass.DataOperate;publicfrmStoreInfoInitializeComponent;privatevoidfrmStoreInfo_LoadobjectsenderEventArgsedgvSInfo.Controls.AddhScrollBarl;DataSetmyds=datacon.getdsnselectStorelDas仓库编号StoreNameas仓库名称StorePeopleas负责J+nStorePhoneas电话StoreUnitas所属单位StoreDateas建库日期StoreRemarkas备注J+*Editeras修改EditDateas修改日期fromtb_Storage\ntb_StorageM;dgvSInfo.DataSource=myds.Tables[ntb_StorageH];privatevoidbtnAdd_ClickobjectsenderEventArgsetry{if!doperate.validatePhonetxtSPhone.Text.TrimerrorPrPhone.SetErrortxtSPhone电话格式不对;elseerrorPrPhone.Clear;iftxtSName.Text==MessageBox.Show仓库名称不能为空!「信息二MessageBoxButtons.OKMessageBoxIcon.Information;elseintP_int_returnVaiue=doperate.InsertStoragetxtSName.Text.TrimtxtSLeader.Text.TrimtxtSPhone.Text.TrimtxtSDepart.Text.TrimQtxtSRemark.Text.Trim;ifP_int_returnValue==100MessageBox.Show该仓库已经存在!「信息”,MessageBoxButtons.OKMessageBoxIcon.Information;elseMessageBox.Show仓库信息添加成功!「信息二MessageBoxButtons.OKMessageBoxIcon.Information;frmStoreInfo_Loadsendere;catchExceptionexMessageBox.Showex.MessageWMessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnEdit_ClickobjectsenderEventArgsetry{if!doperate.validatePhonetxtSPhone.Text.TrimerrorPrPhone.SetErrortxtSPhonen电话号码输入格式不正确elseerrorPrPhone.Clear;datacon.getcomHupdatetb_StoragesetStoreName=n+txtSName.Text.Trim+StorePeople=H+txtSLeader.Text.Trim+\StorePhone=H+txtSPhone.Text.Trim+StoreUni仁+txtSDepart.Text.Tnm+nStoreRemark=H+txtSRemark.Text.Trim+”Editer=+warehouse.frmLogin.M_str_name+二EditDate=+DateTime.Now.ToShortDateStringO+whereStoreID=+Convert.ToStringdgvSInfo[0dgvSInfo.CurrentCell.RowIndex].Value.Trim+MessageBox.Show仓库档案修改成功!“,“信息”MessageBoxButtons.OKMessageBoxIcon.Information;frmStoreInfo_Loadsendere;catchExceptionex{MessageBox.Showex.Message警告”MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnDel_ClickobjectsenderEventArgsetrydatacon.getcomndeletefromtb_StoragewhereStoreTD=n+Convert.ToStringdgvSInfo[0dgvSInfo.CurrentCell.RowIndex].Value.Trim+MessageBox.Show成功册lj除仓库!信息MessageBoxButtons.OKMessageBoxIcon.Information;frmStoreInfo_Loadsendere;catchExceptionexMessageBox.Showex.Message警告MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnExit_ClickobjectsenderEventArgsethis.CloseQ;privatevoiddgvSInfo_CellClickobjectsenderDataGridViewCellEventArgsetxtSName.Text=Convert.ToStringdgvSInfo[1dgvSInfo.CurrentCell.RowIndex].Value.Trim;txtSLeader.Text=Convert.ToStringdgvSInfo[2dgvSInfo.CurrentCell.RowIndex].Value.Trim;txtSPhone.Text=Convert.ToStringdgvSInfo[3dgvSInfo.CurrentCell.RowIndex].Value.Trim;txtSDepart.Text=Convert.ToStringdgvSInfo[4dgvSInfo.CurrentCell.RowIndex].Value.Trim;txtSRemark.Text=Convert.ToStringdgvSInfo[6dgvSInfo.CurrentCell.RowIndex].Value.Trim;privatevoidfrmStoreInfo_FormClosedobjectsenderFormClosedEventArgsethis.Close;供应商设置frmPrlnfo.csusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.Data.SqlClient;namespacewarehouse.BasicInfopublicpartialclassfrmPrlnfo:Formwarehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;warehouse.BaseCIass.DataOperatedoperate=newwarehouse.BaseCIass.DataOperate;publicfrmPrInfolnitializeComponent;privatevoidfrmPrInfo_LoadobjectsenderEventArgsedgvPInfo.Controls.AddhScrollBarl;DataSetmyds=datacon.getdsnselectPrIDas供应商编号PrNameas供应商名称PrPeopleas负责J+PrPhoneas电话PrFaxas传真PrRemarkas备注Editeras修改EditDateas修改日期fromtb_ProviderHtb_ProviderH;dgvPInfo.DataSource=myds.Tables|ntb_Providern];privatevoidbtnAdd_ClickobjectsenderEventArgsetry{if!doperate.validatePhonetxtPPhone.Text.TrimerrorPrPhone.SetErrortxtPPhonen电话号码格式不正确;elseif!doperate.validateFaxtxtPFax.Text.TrimerrorPrFax.SetErrortxtPFax,传真号码输入格式不正确”;elseerrorPrFax.Clear;errorPrPhone.Clear;iftxtPName.Text==nMessageBox.Show供应商名称不能为空!「信息”,MessageBoxButtons.OKMessageBoxIcon.Information;elseintPintreturnValue=doperate.TnsertProvidertxtPName.Text.TrimtxtPLeader.Text.TrimtxtPPhone.Text.TrimtxtPFax.Text.TrimtxtPRemark.Text.Trim;ifP_int_returnValue==100MessageBox.Show该供应商已经存在!「信息二MessageBoxButtons.OKMessageBoxIcon.Information;elseMessageBox.Show供应商信息添加成功!「信息”,MessageBoxButtons.OKMessageBoxIcon.Information;frmPrInfo_Loadsendere;}}catchExceptionexMessageBox・Showex・Message警告MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnEdit_ClickobjectsenderEventArgsetryif!doperate.validatePhonetxtPPhone.Text.TrimerrorPrPhone.SetErrortxtPPhonen电话号码格式不正确”;}elseif!doperate.validateFaxtxtPFax.Text.Trim{errorPrFax.SetErrortxtPFax,”传真号码输入格式不正确;elseerrorPrFax.Clear;errorPrPhone.Clear;datacon.getcomnupdatetb_ProvidersetPrPeople=+txtPLeader.Text.Trim+PrPhone=H+txtPPhone.Text.Trim+“;PrFax=+txtPFax.Text.Trim+”PrRemark=+txtPRemark.Text.Trim+nEditer=n+warehouse.frmLogin.M_str_name+nEditDate=n+DateTime.Now.ToShortDateStringO+wherePrID=+Convert.ToStringdgvPInfo[0dgvPInfo.CurrentCell.RowIndex].Value.Trim+MessageBox.Show供应商档案修改成功!,“信息”MessageBoxButtons.OKMessageBoxIcon.Information;frmPrTnfo_Loadsendere;catchExceptionexMessageBox・Showex・Message“警告”MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnDel_ClickobjectsenderEventArgsetrydatacon.getcomndeletefromtb_ProviderwherePrID=+Convert.ToStringdgvPInfo[0dgvPInfo.CurrentCell.Rowindex].Value.Trim+””;MessageBox.Show成功册U除供应商!,信息MessageBoxButtons.OKMessageBoxIcon.Information;frmPrInfo_Loadsendere;catchExceptionexMessageBox.Showex.MessageMessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoiddgvPInfo_CellClickobjectsenderDataGridViewCellEventArgsetxtPName.Text=Convert.ToStringdgvPInfo[1dgvPInfo.CurrentCell.RowIndex].Value.Trim;txtPLeader.Text=Convert.ToStringdgvPInfo[2dgvPInfo.CurrentCell.RowIndex].Value.Trim;txtPPhone.Text=Convert.ToStringdgvPInfo[3dgvPInfo.CurrentCell.RowIndex].Value.Trim;txtPFax.Text=Convert.ToStringdgvPInfo[4dgvPInfo.CurrentCell.RowIndex].Value.Trim;txtPRemark.Text=Convert.ToStringdgvPInfo[5dgvPInfo.CurrentCelLRowIndex].Value.Trim;privatevoidfrmPrInfo_FormClosedobjectsenderFormClosedEventArgsethis.Close;库存货物管理fnnGoodsInfo.esusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;namespacewarehouse.BasiclnfopublicpartialclassfrmGoodsInfo:Formwarehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;warehouse.BaseClass.DataOperatedoperate=newwarehouse.BaseClass.DataOperate;publicfrmGoodsInfoInitializeComponent;privatevoidfrmGoodsInfo_LoadobjectsenderEventArgsedgvGlnfo.Controls.AddhScrollBarl;DataSetmyds=datacon.getdsnselectGoodsIDas货物编号GoodsNameas货物名称J+nStoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位J+HGoodsNumas货物数量GoodsInPriceas进货价格GoodsOutPriceas出货价格J+Editeras修改EditDateas修改日期fromtb_GoodsInfonntb_GoodsInfo;dgvGInfo.DataSource=myds.Tables[utb_GoodsInfo];privatevoidbtnEdit_ClickobjectsenderEventArgsetry{if!doperate.validateNumtxtGOPrice.Text.TrimerrorPrMoney.SetEirortxtGOPrice输入必须为数字”;elseerrorPrMoney.Clear;datacon.getcomnupdatetb_GoodsInfosetGoodsOutPrice=+txtGOPrice.Text.TrimO+二Editer=+warehouse.frmLogin.M_str_name+nEditDate=n+DateTime.Now.ToShortDateStringO+whereGoodsID=n+Convert.ToStringdgvGInfo|0dgvGInfo.CurrentCell.Rowindex].Value.Trim+n;MessageBox.Show货物档案修改成功!“,“信息,MessageBoxButtons.OKMessageBoxIcon.Information;frmGoodsInfo_Loadsendere;catchExceptionexMessageBox.Showex.Message警告”MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnDel_ClickobjectsenderEventArgseusingSystem.Text.RegularExpressions;//命名空间包含一些类,这些类提供对.NETFramework正则表达式引擎的访问该命名空间提供正则表达式功能namespacewarehouse.BaseClassclassDataOperateDataCondatacon=newDataCon;〃声明DataCon类的一个对象,以调用其方法#region绑定ComboBox控件IIIsummaryIII对ComboBox控件进行数据绑定III/summaryIIIparamname=nM_str_sqlstrSQL语句v/paramIIIparamname=M_str_table”表名v/paramIIIparamname=M_str_tbMember”数据表中字段名/paramIIIparamname=ncboxComboBox控件ID/parampublicvoidcboxBindstringM_str_sqlstrstringM_str_tablestringM_str_tbMemberComboBoxcboxDataSetmyds=datacon.getdsM_str_sqlstrM_str_table;cbox.DataSource=myds.Tables[M_str_table];cbox.DisplayMember=M_str_tbMember;〃显示username字段}#endregion#region验证文本框输入为数字IIIsummaryIII验证文本框输入为数字III/summaryIIIparamname=M_str_num”〉输入字符/paramIII〈returns返回一个bool类型的值〈/returns〉publicboolvalidateNumstringM_str_num{returnRegex.IsMatchM_str_num”八[0-9]*$”;#endregion#region验证文本框输入为电话号码IIIsummarytrydatacon.getcomndeletefromtb_GoodsInfowhereGoodsID=n+Convert.ToStringdgvGInfo|0dgvGInfo.CurrentCell.Rowindex].Value.Trim+andStoreName=n+Convert.ToStringdgvGInfo[2dgvGInfo.CurrentCell.Rowindex].Value.Trim+MessageBox.Show货物册U除成功!,信息MessageBoxButtons.OKMessageBoxIcon.Information;frmGoodsInfo_Loadsendere;catchExceptionexMessageBox.Showex.Message警告”MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoiddgvGInfo_CellClickobjectsenderDataGridViewCellEventArgsetxtGName.Text=Convert.ToStringdgvGInfo[1dgvGInfo.CurrentCell.RowIndex].Value.Trim;txtGSpec.Text=Convert.ToStringdgvGInfo|3dgvGInfo.CurrentCell.Rowindex].Value.Trim;cboxGUnit.Text=Convert.ToStringdgvGInfo[4dgvGInfo.CurrentCell.RowIndex].Value.Trim;txtGNum.Text=Convert.ToStringdgvGInfo[5dgvGInfo.CurrentCell.RowIndex].Value.Trim;txtGIPrice.Text=Convert.ToStringdgvGInfo[6dgvGInfo.CurrentCell.Rowindex].Value.Trim;txtGOPrice.Text=Convert.ToStringdgvGInfo[7dgvGInfo.CurrentCell.Rowindex].Value.Trim;privatevoidfrmGoodsInfo_FormClosedobjectsenderFormClosedEventArgsethis.Close;查询管理借出货物frmBGLook.csusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.Data.SqlClient;namespacewarehouse.LookandSumpublicpartialclassfrmBGLook:FormpublicfrmBGLookInitializeComponent;warehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;privatevoidfrmBGLook_LoadobjectsenderEventArgsedgvBGInfo.Controls.AddhScrollBarl;DataSetmyds=datacon.getdsnselectBGIDas借货编号GoodsNameas货物名称StoreNameas仓库名称J+nGoodsSpecas货物规格GoodsNumas借出数量BGDateas借货日期HandlePeopleas经手J+nBGPeopleas借货BGUnitas借货单位BGRemarkas备注fromtb_BorrowGoodsHntb_BorrowGoodsM;dgvBGInfo.DataSource=myds.Tables[O];privatevoidbtnLook_ClickobjectsenderEventArgsetryiftxtLKWord.Text.Trim==frmBGLook_Loadsendere;elseifcboxLCondition.TextTrim==借货编号”DataSetmyds=datacon.getdsnselectBGIDas借货编号GoodsNameas货物名称StoreNameas仓库名称+GoodsSpecas货物规格GoodsNumas借出数量BGDateas借货日期HandlePeopleas经手J+nBGPeopleas借货BGUnitas借货单位BGRemarkas备注fromtb_BorrowGoodswhereBGID=+txtLKWord.Text.Trim+nHtb_BorrowGoodsH;dgvBGInfo.DataSource二myds.Tables[O|;}ifcboxLCondition.Text.Trim二二借货日期”{stringP_str_dtime=txtLKWord.Text.TrimQ;DataSetmyds=datacon.getdsnselectBGIDas借货编号GoodsNameas货物名称StoreNameas仓库名称+GoodsSpecas货物规格GoodsNumas借出数量BGDateas借货日期HandlePeopleas经手J+nBGPeopleas借货BGUnitas借货单位BGRemarkas备注fromtb_BorrowGoods+whereyearBGDate=n+P_str_dtime.SubstringO4+“andmonthBGDate=n+P_str_dtime.Substring5P_str_dtime.Length-6+ntb_BorrowGoodsn;dgvBGInfo.DataSource二myds.Tables];ifcboxLCondition.Text.Trim==仓库名称”DataSetmyds=datacon.getdsnselectBGIDas借货编号GoodsNameas货物名称StoreNameas仓库名称,”+GoodsSpecas货物规格GoodsNumas借出数量BGDateas借货日期HandlePeopleas经手J+BGPeopleas借货BGUnitas借货单位BGRemarkas备注fromtb_BorrowGoodswhereStoreNamelike+txtLKWord.Text.Trim+H%nntb_BorrowGoods1;dgvBGInfo.DataSource=myds.Tables[O];ifcboxLCondition.Text.Trim=货物名称”{DataSetmyds=datacon.getdsnselectBGIDas借货编号GoodsNameas货物名称StoreNameas仓库名称+GoodsSpecas货物规格GoodsNumas借出数量BGDateas借货日期HandlePeopleas经手J+BGPeopleas借货BGUnitas借货单位BGRemarkas备注fromtb_BorrowGoodswhereGoodsNamelike%”+txtLKWord.Text.Trim+H%nntb_BorrowGoodsn;dgvBGInfo.DataSource=myds.Tables[O];catchExceptionexMessageBox.Showex.Message提示nMessageBoxButtons.OKMessageBoxIcon.Information;privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoidcboxLCondition_SelectedIndexChangedobjectsenderEventArgseifcboxLCondition.Text.Trim==借货日期”label
2.Text=”查询年月份”;elselabe
12.Text=查询关键字”;privatevoidfrmBGLook_FormClosedobjectsenderFormClosedEventArgsethis.Close;库存查询frmGILook.csusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;namespacewarehouse.LookandSumpublicpartialclassfrmGILook:Formwarehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;publicfrmGILookInitializeComponent;privatevoidfrmGILook_LoadobjectsenderEventArgsedgvGlnfo.Controls.AddhScrollBarl;DataSetmyds=datacon.getdsnselectGoodsIDas货物编号GoodsNameas货物名称J+StoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位”+nGoodsNumas货物数量GoodsInPriceas进货价格GoodsOutPriceas出货价格,”+nEditeras修改EditDateas修改日期fromtb_GoodsInfbtb_GoodsInfo;dgvGInfo.DataSource=myds.Tables[O];privatevoidbtnLook_ClickobjectsenderEventArgsetryiftxtLKWord.Text.Trim二”{frmGILook_Loadsendere;elseifcboxLCondition.Text.Trim二二货物编号DataSetmyds=datacon.getdsHselectGoodsIDas货物编号GoodsNameas货物名称+nStoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位J+nGoodsNumas货物数量GoodsInPriceas进货价格GoodsOutPriceas出货价格J+nGoodsLeastas最低存储GoodsMostas最高存储Editeras修改EditDateas修改日期+“fromtb_GoodsInfowhereGoodsID二+txtLKWord.Text.Trim+nntb_GoodsInfoH;dgvGInfo.DataSource=myds.Tables[O];ifcboxLCondition.Text.Trim=货物名称”DataSetmyds=datacon.getdsHselectGoodsIDas货物编号GoodsNameas货物名称+nStoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位+GoodsNumas货物数量GoodsInPriceas进货价格GoodsOutPriceas出货价格,+GoodsLeastas最低存储GoodsMostas最高存储Editeras修改EditDateas修改日期+fromtb_GoodsInfowhereGoodsNamelike%+txtLKWord.Text.Trim+n%nntb_GoodsInfon;dgvGInfo.DataSource=myds.Tables[O];ifcboxLCondition.Text.Trim==仓库名称”{DataSetmyds=datacon.getdsHselectGoodsIDas货物编号GoodsNameas货物名称J+StoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位,+nGoodsNumas货物数量GoodsInPriceas进货价格GoodsOutPriceas出货价格+nGoodsLeastas最低存储GoodsMostas最高存储Editeras修改EditDateas修改日期+fromtb_GoodsInfowhereStoreNamelike%+txtLKWord.Text.Trim+n%nntb_GoodsInfon;dgvGInfo.DataSource=myds.Tables[O];catchExceptionexMessageBox.Showex.Message提示、MessageBoxButtons.OKMessageBoxIcon.Information;privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoidfrmGILook_FormClosedobjectsenderFormClosedEventArgsethis.Close;入库查询frmISLook.csusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;namespacewarehouse.LookandSumpublicpartialclassfrmlSLook:Form{publicfrmISLooklnitializeComponent;warehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;privatevoidfrmISLook_LoadobjectsenderEventArgsedgvISInfo.Controls.AddhScrollBarl;DataSetmyds=datacon.getdsnselectTSIDas入库编号GoodsIDas货物编号GoodsNameas货物名称J+nPrNameas供应商名称StoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位J+GoodsNumas入库数量GoodsPriceas进货价格GoodsAPriceas总金额JSDateas入库日期J+HandlePeopleas经手JSRemarkas备注fromtb_InStoretb」nStore;dgvISInfo.DataSource=myds.Tables[O|;}privatevoidbtnLook_ClickobjectsenderEventArgseiftxtLKWord.Text.Trim==frmISLook_Loadsendere;elseifcboxLCondition.Text.Trim==入库编号”DataSetmyds=datacon.getdsHselectISIDas入库编号GoodsIDas货物编号GoodsNameas货物名称PrNameas供应商名称”+nStoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位GoodsNumas入库数量J+rGoodsPriceas进货价格GoodsAPriceas总金额JSDateas入库日期HandlePeopleas经手+ISRemarkas备注fromtb_InStorewhereISID二+txtLKWord.Text.Trim+nnntb_InStoren;dgvISInfo.DataSource=myds.Tables[O];ifcboxLCondition.Text.Trim==货物编号”DataSetmyds=datacon.getdsnselectISIDas入库编号GoodsIDas货物编号GoodsNameas货物名称PrNameas供应商名称”+nStoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位GoodsNumas入库数量J+HGoodsPriceas进货价格GoodsAPriceas总金额JSDateas入库日期HandlePeopleas经手J+nISRemarkas备注fromtb_InStorewhereGoodsID=+txtLKWord.Text.Trim+tbInStore”;dgvISInfo.DataSource=myds.Tables[O];ifcboxLCondition.Text.Trim==入库日期”{stringP_str_dtime=txtLKWord.Text.Trim;tryConvert.ToDateTimeP_str_dtime;catchMessageBox.Show时间格式不正确,应为XXXX年-XX月-XX日DataSetmyds=datacon.getdsHselectISIDas入库编号GoodsIDas货物编号GoodsNameas货物名称PrNameas供应商名称J+nStoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位GoodsNumas入库数量J+MGoodsPriceas进货价格GoodsAPriceas总金额JSDateas入库日期HandlePeopleas经手J+ISRemarkas备注fromtb_InStorewhereyearISDate=n+P_str_dtime.SubstringO4+nandmonthISDate=n+P_str_dtime.Substring5P_str_dtime.Length-6+nntb_InStoren;dgvISInfo.DataSource=myds.Tables[O];ifcboxLCondition.Text.Trim二=”仓库名称”DataSetmyds=datacon.getdsHselectISIDas入库编号GoodsIDas货物编号GoodsNameas货物名称PrNameas供应商名称J+nStoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位GoodsNumas入库数量J+GoodsPriceas进货价格GoodsAPriceas总金额JSDateas入库日期HandlePeopleas经手J+ISRemarkas备注fromtb」nStorewhereStoreNamelike%”+txtLKWord.Text.Trim+n%Hntb_InStoreH;dgvISInfo.DataSource=myds.Tables[OJ;ifcboxLCondition.Text.Trim=货物名称”DataSetmyds=datacon.getdsnselectISIDas入库编号GoodsIDas货物编号GoodsNameas货物名称PrNameas供应商名称J+StoreNameas仓库名称GoodsSpecas货物规格GoodsUnitas计量单位GoodsNumas入库数量+GoodsPriceas进货价格GoodsAPriceas总金额JSDateas入库日MlHandlePeopleas经手+nISRemarkas备注fromtb_InStorewhereGoodsNamelike*%+txtLKWord.Text.Trim+n%nntb_InStoren;dgvISInfo.DataSource=myds.Tables[O];}catchExceptionexMessageBox.Showex.Message提示,MessageBoxButtons.OKMessageBoxIcon.Information;privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoidcboxLCondition_SelectedIndexChangedobjectsenderEventArgseifcboxLCondition.Text.Trim二二”入库日期”label
2.Text二”查询年月份”;elselabel
2.Text=”查询关键字”;privatevoidfrmISLook_FormClosedobjectsenderFormClosedEventArgsethis.Close;货物出库查询frmOSLook.csusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;namespacewarehouse.LookandSumpublicpartialclassfrmOSLook:FonnpublicfrmOSLookInitializeComponent;Ill验证文本框输入为电话号码III/summaryIIIparamname=M_str_phone”输入字符串/paramIII〈returns返回一个bool类型的值〈/returns〉publicboolvalidatePhonestringM_str_phonereturnRegex.IsMatchM_str_phone@\d{34}-\d{78};#endregion#region验证文本框输入为传真号码IIIsummaryIII验证文本框输入为传真号码III/summaryIIIparamname=”M_str_fax”输入字符串v/paramIII〈returns返回一个bool类型的值〈/returns〉publicboolvalidateFaxstringM_str_faxreturnRegex.IsMatchM_str_fax@n86-\d{23}-\d{78}n;#endregion#region用户登录IIIsummaryIII用户登录III/summaryIIIparamname=P_str_UserName”用户名v/paramIIIparamname=P_str_UserPwd”用户密码v/paramIII〈returns返回一个int类型的值〈/returns〉publicintUserLoginstringP_str_UserNamestringP_str_UserPwdSqlConnectionsqlcon=datacon.getcon;SqlCommandsqlcom=newSqlCommandnproc_Loginnsqlcon;sqlcom.CommandType=CommandType.StoredProcedure;sqlcom.Parameters.Addn@UserNamenSqlDbType.VarChar
20.Value二P_str_UserName;sqlcom.Parameters.Addn@UserPwdnSqlDbType.VarChar
20.Value二P_str_UserPwd;SqlParameterreturnValue=sqlcom.Parameters.AddreturnValue1SqlDbType.Int4;warehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;privatevoidfrmOSLook_LoadobjectsenderEventArgsedgvOSInfo.Controls.AddhScrollBarl;DataSetmyds=datacon.getdsnselectOSIDas出库编号StoreNameas仓库名称GoodsNameas货物名称J+GoodsSpecas规格GoodsUnitas计量单位GoodsNumas出库数量GoodsPriceas价格GoodsAPriceas总金额J+OSDateas出库日期PGProvideras提货单位PGPeopleas提货J+nHandlePeopleas经手QSRemarkas备注fromtbOutStore1ntbOutStore*;dgvOSInfo.DataSource=myds.Tables[O];privatevoidbtnLook_ClickobjectsenderEventArgseiftxtLKWord.Text.Trim=={frmOSLook_Loadsendere;elseifcboxLCondition.Text.Trim二二”出库编号”DataSetmyds=datacon.getdsnselectOSIDas出库编号StoreNameas仓库名称GoodsNameas货物名称+GoodsSpecas规格GoodsUnitas计量单位GoodsNumas出库数量GoodsPriceas价格GoodsAPriceas总金额J+MOSDateas出库日期PGProvideras提货单位PGPeopleas提货J+^HandlePeopleas经手QSRemarkas备注fromtb_OutStorewhereOSID=+txtLKWord.Text.Trim+ntb_OutStoren;dgvOSInfo.DataSource=myds.Tables[O];ifcboxLCondition.Text.TrimO==出库日期”stringP_str_dtime=txtLKWord.Text.Trim;DataSetmyds=datacon.getdsHselectOSIDas出库编号StoreNameas仓库名称GoodsNameas货物名称J+GoodsSpecas规格GoodsUnitas计量单位GoodsNumas出库数量GoodsPriceas价格GoodsAPriceas总金额J+HOSDateas出库日期PGProvideras提货单位PGPeopleas提货”+nHandlePeopleas经手QSRemarkas备注fromtb_OutStorewhereyearOSDate=n+P_str_dtime.SubstringO4+*andmonthOSDate=u+P_str_dtime.Substring5P_str_dtime.Length-6+HHtb_OutStoreH;dgvOSInfo.DataSource=myds.Tables[O];ifcboxLCondition.Text.Trim=二仓库名称”DataSetmyds=datacon.getdsnselectOSIDas出库编号StoreNameas仓库名称GoodsNameas货物名称J+GoodsSpecas规格GoodsUnitas计量单位GoodsNumas出库数量GoodsPriceas价格GoodsAPriceas总金机+OSDateas出库日期PGProvideras提货单位PGPeopleas提货J+HHandlePeopleas经手QSRemarkas备注fromtb_OutStorewhereStoreNamelike%”+txtLKWord.Text.TrimO+n%Hntb_OutStoren;dgvOSInfo.DataSource二myds.Tables[O];ifcboxLCondition.Text.Trim==货物名称”{DataSetmyds=datacon.getdsnselectOSIDas出库编号StoreNameas仓库名称GoodsNameas货物名称J+GoodsSpecas规格GoodsUnitas计量单位GoodsNumas出库数量GoodsPriceas价格GoodsAPriceas总金额J+nOSDateas出库日期PGProvideras提货单位PGPeopleas提货J+nHandlePeopleas经手QSRemarkas备注fromtb_OutStorewhereGoodsNamelike%+txtLKWord.Text.TrimO+n%Hntb_OutStoren;dgvOSInfo.DataSource=myds.Tables[O|;catchExceptionexMessageBox.Showex.Message提示”MessageBoxButtons.OKMessageBoxIcon.Information;privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoidcboxLCondition_SelectedTndexChangedobjectsenderEventArgseifcboxLCondition.Text.Trim==出库日期”label
2.Text=”查询年月份”;elselabel
2.Text=查询关键字”;privatevoidfrmOSLook_FormClosedobjectsenderFormClosedEventArgsethis.Close;}货物归还查询frmRGLook.esusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;namespacewarehouse.LookandSumpublicpartialclassfrmRGLook:FormpublicfrmRGLookInitializeComponent;warehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;privatevoidfrmRGLook_LoadobjectsenderEventArgsedgvRGInfo.Controls.AddhScrollBar1;DataSetmyds=datacon.getdsnselectRGIDas还货编号BGIDas借货编号StoreNameas仓库名称GoodsNameas货物名称J+RGNumas归还数量NRGNumas未归还数量RGDateas还货日期HandlePeopleas经手RGPeopleas还货RGRemarkas备注J+Editeras修改EditDateas修改日期fromtb_ReturnGoods”,ntb_ReturnGoodsn;dgvRGInfo.DataSource=myds.Tables⑼;privatevoidbtnLook_ClickobjectsenderEventArgsetryiftxtLKWord.Text.Trim==nn{frmRGLook_Loadsendere;}elseifcboxLCondition.Text.Trim==还货编号”{DataSetmyds=datacon.getdsHselectRGIDas还货编号BGIDas借货编号StoreNameas仓库名称GoodsNameas货物名称,+“RGNumas归还数量NRGNumas未归还数量RGDateas还货日期HandlePeopleas经手RGPeopleas还货RGRemarkas备注J+Editeras修改EditDateas修改日期fromtb_ReturnGoodswhereRGID=+txtLKWord.Text.Trim+Hntb_ReturnGoodsn;dgvRGlnfo.DataSource=myds.Tables[O];ifcboxLCondition.Text.Trim==借货编号”DataSetmyds=datacon.getdsnseiectRGIDas还货编号BGIDas借货编号StoreNameas仓库名称GoodsNameas货物名称J+RGNumas归还数量NRGNumas未归还数量RGDateas还货日期HandlePeopleas经手RGPeopleas还货RGRemarkas备注J+Editeras修改EditDateas修改日期fromtb_ReturnGoodswhereBGID=+txtLKWord.Text.Trim+nntb_ReturnGoodsn;dgvRGlnfo.DataSource=myds.Tables[OJ;}ifcboxLCondition.Text.Trim==还货日期”stringP_str_dtime=txtLKWord.Text.Trim;DataSetmyds=datacon.getdsnselectRGIDas还货编号BGIDas借货编号StoreNameas仓库名称GoodsNameas货物名称J+RGNumas归还数量NRGNumas未归还数量RGDateas还货日期HandlePeopleas经手RGPeopleas还货RGRemarkas备注J+nEditeras修改EditDateas修改日期fromtb_ReturnGoodswhereyearRGDate=+P_str_dtime.SubstringO4+nandmonthRGDate=H+P_str_dtime.Substring5P_str_dtime.Length-6+nHHtb_ReturnGoodsn;dgvRGInfo.DataSource=myds.Tables[O];ifcboxLCondition.Text.Trim二二”仓库名称”DataSetmyds=datacon.getdsnselectRGIDas还货编号BGIDas借货编号StoreNameas仓库名称GoodsNameas货物名称+RGNumas归还数量NRGNumas未归还数量RGDateas还货日期HandlePeopleas经手RGPeopleas还货RGRemarkas备注+Editeras修改EditDateas修改日期fromtb_ReturnGoodswhereStoreNamelike%+txtLKWord.Text.Trim+n%nHtb_ReturnGoodsn;dgvRGInfo.DataSource=myds.Tables[O];ifcboxLCondition.Text.TrimO==货物名称”DataSetmyds=datacon.getdsnselectRGIDas还货编号BGIDas借货编号StoreNameas仓库名称GoodsNameas货物名称,+RGNumas归还数量NRGNumas未归还数量RGDateas还货日期HandlePeopleas经手RGPeopleas还货RGRemarkas备注J+Editeras修改EditDateas修改日期fromtb_ReturnGoodswhereGoodsNamelike%+txtLKWord.Text.Trim+n%Hntb_ReturnGoodsn;dgvRGlnfo.DataSource=myds.Tables[O];catchExceptionexMessageBox.Showex.Message提示MessageBoxButtons.OKMessageBoxIcon.Information;privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoidcboxLCondition_SelectedTndexChangedobjectsenderEventArgseifcboxLCondition.Text.Trim==还货日期”label
2.Text=”查询年月份”;elselabel
2.Text=查询关键字”;privatevoidfrmRGLook_FormClosedobjectsenderFormClosedEventArgsethis.Close;}系统设置关于本系统frmAboutUs.csusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.IO;〃文件流的头文件namespacewarehouse.SystemSetpublicpartialclassfrmAboutUs:FormpublicfrmAboutUsInitializeComponentO;privatevoidfrmAboutUs_LoadobjectsenderEventArgsestringpath=Application.StartupPath+WAboutUs.txt;//获取可执行文件的地址System.IO.StreamReaderreader=newSystem.IO.StreamReaderpathSystem.Text.Encoding.DefauIt;this.txtAboutUs.Text二reader.ReadToEnd;reader.Close;}privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoidfrmAboutUs_FormClosedobjectsenderFormClosedEventArgse{this.Close;}}密码修改frmEditPwd.esusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;namespacewarehouse.SystemSet{publicpartialclassfrmEditPwd:Form{publicfrmEditPwdInitializeComponent;warehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;privatevoidfrmEditPwd_LoadobjectsenderEventArgsetxtUName.Text=warehouse.frmLogin.M_str_name;privatevoidbtnSure_ClickobjectsenderEventArgseeirorPrPwd.SetErrortxtFUNPwd”两次输入密码不一致!”;elseiftxtUOPwd.Text.Trim!=warehouse.frmLogin.M_str_pwdMessageBox.Show用户旧密码输入错误,请重新输入!,”错误提示“,MessageBoxButtons.OKMessageBoxIcon.Error;elsedatacon.getcomnupdatetb_UsersetUserPwd=4-txtUNPwd.Text.Trim+nwhereUserName=4-txtUName.Text.Trim+nn;MessageBox.Show密码修改成功!,信息,MessageBoxButtons.OKMessageBoxIcon.Information;}privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;}privatevoidfrmEditPwd_FormClosedobjectsenderFormClosedEventArgsethis.Close;}权限管理frmRightManage.esusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.Data.SqlClient;namespacewarehouse.SystemSetpublicpartialclassfrmRightManage:FormpublicfrmRightManageInitializeComponent;warehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;warehouse.BaseClass.DataOperatedoperate=newwarehouse.BaseClass.DataOperate;privatevoidfrmRightManage_LoadobjectsenderEventArgsedoperate.cboxBindnselectUserNamefromtb_UserMntb_UsernHUserNamencboxUName;privatevoidbtnSure_ClickobjectsenderEventArgsedatacon.getcomnupdatetb_UsersetUserRight=n+cboxURight.Text.Trim+“whereUserName=+cboxUName.Text.Trim+;MessageBox.Show权限修改成功!J信息nMessageBoxButtons.OKMessageBoxIcon.Information;privatevoidbtnExit_ClickobjectsenderEventArgsethis.Close;privatevoidcboxUName_SelectedIndexChangedobjectsenderEventArgse〃选择不同的用户时显示不同的权限SqlDataReadersqlread=datacon.getreadnselectUserNameUserRightfromtb_Usern+whereUserName=‘+cboxUName.Text+ifsqlread.ReadcboxURight.Text=sqlread[nUserRightn].ToString.Trim;sqlread.Close;privatevoidfrmRightManage_FormClosedobjectsenderFormClosedEventArgsethis.CloseQ;用户管理frmUserManage.esusingSystem;usingSystem.Collections.Generic;usingSystem.ComponentModel;usingSystem.Data;usingSystem.Drawing;usingSystem.Text;usingSystem.Windows.Forms;usingSystem.Data.SqlClient;namespacewarehouse.SystemSetpublicpartialclassfrmUserManage:FormpublicfrmUserManage|InitializeComponent;warehouse.BaseClass.DataCondatacon=newwarehouse.BaseClass.DataCon;warehouse.BaseClass.DataOperatedoperate=newwarehouse.BaseClass.DataOperate;privatevoidfrmUserManage_LoadobjectsenderEventArgseDataSetmyds=datacon.getdsnselectUserIDas用户编号UserNameas用户名UserPwdas用户密码J+nUserRightas用户权限fromtb_UserHntb_Usern;dgvUInfo.DataSource=myds.Tables[Htb_Usern];doperate.cboxBindHselectUserNamefromtb_Usernntb_UsernnUserNamencboxUName;doperate.cboxBindselectUserRightfromtb_Userntb_UsernUserRightcboxURight;privatevoidbtnAdd_ClickobjectsenderEventArgsereturnValue.Direction=ParameterDirection.ReturnValue;〃返回值??sqlcon.Open;trysqlcom.ExecuteNonQueryO;catchExceptionexMessageBox.Showex.Message;finally{sqlcom.Dispose;sqlcon.Close;sqlcon.Dispose;}intP_int_returnValue二intreturnValue.Value;returnP_int_returnValue;#endregion#region货物入库IIIsummaryIII货物入库III/summaryIIIparamname=P_int_GoodsID”货物编号/param〉IIIparamname=P_str_GoodsName货物名称/paramIIIparamname=P_str_PrName”供应商名称v/paramIIIparamname=P_str_StoreName”仓库名称/paramIIIparamname=P_str_GoodsSpec”货物规格饰1@171〉IIIparamname=P_str_GoodsUnit”计量单位v/paramIIIparamname=P_int_GoodsNum”进货数量/paramIIIparamname=P_dml_GoodsPrice”〉货物单价v/paramIIIparamname=P_str_HPeople经手/param///paramname=P_str_Remark备注/paramIII〈returns返回一个int类型的值〈/returns〉publicintInsertGoodsintP_int_GoodsIDstringP_str_GoodsNamestringP_str_PrNamestringP_str_StoreNametryintP_int_returnValue=doperateJnsertUsercboxUName.Text.TrimtxtUPwd.Text.Trim,cboxURight.Text.Trim;ifP_int_returnValue==100MessageBox.Show该用户已经存在“,“警告”,MessageBoxButtons.OKMessageBoxIcon.Warning;elseMessageBox.Show用户信息添加成功!「信息”,MessageBoxButtons.OKMessageBoxIcon.Information;frmUserManage_Loadsendere;catchExceptionexMessageBox・Showex・Message警告MessageBoxButtons.OKMessageBoxIcon.Warning;privatevoidbtnEdit_ClickobjectsenderEventArgsetrydoperate.updateUserConvert.ToInt32dgvUInfo[0dgvUInfo.CurrentCell.RowIndex].ValuetxtUPwd.Text.TrimcboxURight.Text.Trim;//MessageBox.ShowcboxUName.Items[l].nasdfMessageBoxButtons.OK;〃datacon.getcom”updatetb_UsersetUserPwd=n+txtUPwd.Text.Trim+二UserRight=+cboxURight.Items.ToStringO+whereUserID=+cboxUName.Items.ToStringO+;//Convert.ToStringdgvUlnfo[0dgvUInfo.CurrentCell.Rowindex].Value.Trim+MessageBox.Show用户信息修改成功!“,“信息,MessageBoxButtons.OKMessageBoxIcon.Information;frmUserManage_Loadsendere;catchExceptionexMessageBox.Showex.MessageMessageBoxButtons.OKMessageBoxIcon.Information;privatevoidbtnDel_ClickobjectsenderEventArgse{trydatacon.getcomndeletefromtb_UserwhereUserID=+Convert.ToStringdgvUInfo[0dgvUInfo.CurrentCell.Rowindex].Value.Trim+MessageBox.Show册U除用户信息成功!,信息,MessageBoxButtons.OKMessageBoxIcon.Information;frmUserManage_Loadsendere;catchExceptionexMessageBox.Showex.MessageffnMessageBoxButtons.OKMessageBoxIcon.Warning;privatevoiddgvUInfo_CellClickobjectsenderDataGridViewCellEventArgsecboxUName.Text=Convert.ToStringdgvUInfo[1dgvUInfo.CurrentCell.RowIndex].Value.Trim;txtUPwd.Text=Convert.ToStringdgvUInfof2dgvUInfo.CurrentCell.RowIndex].Value.Trim;cboxURight.Text=Convert.ToStringdgvUInfo[3dgvUInfo.CurrentCell.Rowindex].Value.Trim;privatevoidfrmUserManage_FormClosedobjectsenderFormClosedEventArgsethis.Close;privatevoidbtnexit_ClickobjectsenderEventArgsethis.Close;stringP_str_GoodsSpecstringP_str_GoodsUnitintP_int_GoodsNumdecimalP_dml_GoodsPricestringP_str_HPeoplestringP_str_Remark{SqlConnectionsqlcon=datacon.getcon;SqlCommandsqlcom=newSqlCommandnproc_insertInStorensqlcon;sqlcom.CommandType=CommandType.StoredProcedure;sqlcom.Parameters.Addn@GoodsIDSqlDbType.Biglnt.Value=P_int_GoodsID;sqlcom.Parameters.Add@GoodsName\SqlDbType.VarChar
50.Value二P_str_GoodsName;sqlcom.Parameters.Add11@PrName*SqlDbType.VarChar
100.Value二P_str_PrName;sqlcom.Parameters.Addn@StoreNamenSqlDbType.VarChar
100.Value二P_str_StoreName;sqlcom・Parameters・Add@GoodsSpecSqlDbType.VarChar
50.Value二P_str_GoodsSpec;sqlcom.Parameters.Addn@GoodsUnitHSqlDbType.Char
8.Value二P_str_GoodsUnit;sqlcom.Parameters.AddH@GoodsNumHSqlDbType.Biglnt.Value=P_int_GoodsNum;sqlcom.Parameters.Addn@GoodsPricenSqlDbType.Money.Value二P_dml_GoodsPrice;sqlcom.Parameters.AddH@HandlePeopleHSqlDbType.VarChar
20.Value二P_str_HPeople;sqlcom.Parameters.Add@ISRemarknSqlDbType.VarChar
1000.Value=P_str_Remark;SqlParameterreturnValue=sqlcom.Parameters.AddnreturnValuenSqlDbType.Int4;returnValue.Direction=ParameterDirection.ReturnValue;sqlcon.Open;trysqlcom.ExecuteNonQueryO;catchExceptionexMessageBox.Showex.Message;finallysqlcom.Dispose;sqlcon.Close;sqlcon.DisposeQ;intP_int_returnValue=intreturnValue.Value;returnPintreturnValue;#endregion#region添加供应商信息IIIsummaryIII添加供应商信息III/summaryIIIparamname=P_str_PrName”供应商名称/paramIIIparamname=P_str_PrPeople负责/paramIIIparamname=P_str_PrPhone”供应商联系电话/paramIIIparamname=P_str_PrFax”供应商传真号码/paramIIIparamname=P_int_PrRemark”备注v/paramIII〈returns返回一个int类型的值〈/returnspublicintInsertProviderstringP_str_PrNamestringP_str_PrPeoplestringP_str_PrPhonestringP_str_PrFaxstringP_int_PrRemarkSqlConnectionsqlcon=datacon.getcon;SqlCommandsqlcom=newSqlCommandnproc_insertProvidernsqlcon;sqlcom.CommandType=CommandType.StoredProcedure;sqlcom.Parameters.AddH@PrNameHSqlDbType.VarChar
100.Value二P_str_PrName;sqlcom.Parameters.Addn@PrPeoplenSqlDbType.VarChar
20.Value二P_str_PrPeople;sqlcom.Parameters.Addn@PrPhoneHSqlDbType.VarChar
20.Value二P_str_PrPhone;sqlcom.Parameters.Addn@PrFaxnSqlDbType.VarChar
20.Value二P_str_PrFax;sqlcom.Parameters.Add11@PrRemarknSqlDbType.VarChar
1000.Value二P_int_PrRemark;SqlParameterreturnValue=sqlcom.Parameters.AddreturnValue1SqlDbType.Int4;。