VB6.0研发五金厂信息管理系统，研发适合小企业小工厂的信息系统

现在这个时代发展很快，但是在研发企业数据系统的时候，并不是那些某友，某碟的专属。因为那些操作复杂比较，功能繁多。功能多了反而成了累赘。那么今天我这边接到的项目是研发一款乡镇五金厂的信息管理系统软件，架构是CS模式，不喜欢搞BS的网页模式。数据库用的是SQL2008,所有的数据存放到企业本地电脑上，不跑阿里云，不存自身服务器。这样做的好处就是确保企业的数据是安全的。

界面比较粗糙，功能简单实用，完全依据本地的一个五金厂需求而定制。销售，生存，库存一目了然。

这里用到了ADO技术，这些技术在刚开始学习VB编程的时候就接触到过，不过那时候只是走马观花，并不是深入研究。控件的按钮采用了SQL2008。这里要说的是这个数据库可以部署到阿里云上，这样VB写的信息系统可以在互联网上进行连接了。满足企业用户在家也可以访问本套系统。

下面放下数据库连接模块，在本地快速测试的时候，我往往选择用ACCESS，具体到客户部署的时候采用

Public cnn As New ADODB.Connection
Public gblServer As String
Public gblDataBase As String
Public gblServerLogID As String
Public gblServerPwd As String
Public gblRemoteServerIP As String '远程服务器地址
'整个工程只有一个sql连接，在主界面这个窗体加载的时候调用数据库连接即可
'阿里服务器的SQL2008

Public Sub 连接数据库ACCESS()
cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\数据库文件\TestData.mdb;Persist Security Info=False"
End Sub
'注意这个这个SQL2008数据库里面的项目表还没创建
Public Sub 连接本地数据库SQL2008()
Dim SQL2008 As String
gblServerLogID = "sa"
gblServerPwd = "123456"
gblDataBase = "HomeDataBase"
gblServer = "127.0.0.1,1433" '还要打开本地端口1433
SQL2008 = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=" & gblServerLogID & _
";pwd=" & gblServerPwd & _
";Initial Catalog=" & gblDataBase & _
";Data Source=" & gblServer
cnn.Open SQL2008
End Sub

'
'用户名: administrator 密码PANjian16
'47.93.240.158
Public Sub 连接阿里服务器的SQL2008()
Dim SQL2008 As String
gblServerLogID = "sa" '阿里云服务器上的 SQL2008 账号
gblServerPwd = "Paadsaji16" '阿里云服务器上的 SQL2008 密码
gblDataBase = "HomeCataAase" '阿里云服务器上的 sql数据库名
gblServer = "41.93.240.128,1433" '还要打开本地端口1433
SQL2008 = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=" & gblServerLogID & _
";pwd=" & gblServerPwd & _
";Initial Catalog=" & gblDataBase & _
";Data Source=" & gblServer
cnn.Open SQL2008
End Sub

以上服务器IP 信息是错误，只是做个演示。有需要研发可以 +Q 1016058890

VB6.0研发五金厂信息管理系统，研发适合小企业小工厂的信息系统相关推荐

基于Delphi7openGauss2.0开发社区信息管理系统-设计文档
疫情防控信息管理系统设计文档目录需求分析... 3 a.引言... 3 a. 1目的... 3 a. 2文档约定... 3 a. 3预期的读者和阅读建议... 3 a. 4产品的范围... 3 b ...
一个简单的C/C++编写的信息管理系统（适合初学者练手用）
这是作者大一时候的课程作业,多年后发现还保留着,就放上来分享下. 包含基本的数据结构设计:数据的录入.增删查改.排序.统计和全输出:和最后的退出自动保存数据等基本操作. 这里做的是学生信息管理系统,读 ...
基于VB6.0的货架数量管理系统
1.上位机软件使用:vb6.0:SQL SERVER2003; 2.设备包括: ①LED显示屏 ②货架货架总计有18个仓位,每个仓位配备一个RFID读卡设备. ③232-485转换头 ④REID读写 ...
企业信息化，就是上信息管理系统？还有很多企业是这么理解的
我司是为机关单位.中大型企业提供智能化自定义低代码框架开发系统的(JNPF),在沟通合作过程中接触了很多机关单位.企业,发现在信息化方面普遍存在一个认识误区,那就是简单地认为信息化就是上一套信息管理系 ...
赶紧进来看看---C语言实现学生信息管理系统(3.0文件存储版)
本文主要介绍了将学生信息管理系统改造为文件存储版本- 主要涉及文件操作函数–将学生信息导入文件和从文件读取学生信息到程序中,从而达到数据持久化的效果文章最后有源码展示学生信息管理系统1.0静态版- ...
（附源码）ssm高校学生档案信息管理系统毕业设计 010936
ssm高校学生档案信息管理系统摘要在社会快速发展的影响下,教育事业蓬勃发展,大大增加了学校的数量.多样性.教育质量等要求,使教育的管理和运营比过去更加困难.依照这一现实为基础,设计一个快捷而又方便 ...
ssm高校学生档案信息管理系统毕业设计- 附源码010936
ssm高校学生档案信息管理系统摘要在社会快速发展的影响下,教育事业蓬勃发展,大大增加了学校的数量.多样性.教育质量等要求,使教育的管理和运营比过去更加困难.依照这一现实为基础,设计一个快捷而又方便 ...
SSM老年人活动信息管理系统毕业设计源码121730
目录摘要 1 绪论 1.1研究背景 1.2国内外研究现状 1.3系统开发技术的特色 1.4论文结构与章节安排 2老年人活动信息管理系统分析 2.1 可行性分析 2.2 系统流程分析 2.2.1数 ...
SSM+老年人活动信息管理系统毕业设计-附源码121730
目录摘要 1 绪论 1.1研究背景 1.2国内外研究现状 1.3系统开发技术的特色 1.4论文结构与章节安排 2老年人活动信息管理系统分析 2.1 可行性分析 2.2 系统流程分析 2.2.1数 ...

VB6.0研发五金厂信息管理系统，研发适合小企业小工厂的信息系统

VB6.0研发五金厂信息管理系统，研发适合小企业小工厂的信息系统相关推荐

最新文章

热门文章