仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 920|回复: 8
打印 上一主题 下一主题

[学习教程] MYSQL网页设计VB程序怎样会见数据库

[复制链接]
谁可相欹 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:21:22 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
使用DBaaS能让收入损失从其他业务上得到弥补,如软件更新和硬件管理。也许决定走DBaaS之路的客户可能会跳过解决方案提供商,尽管这个决策看起来有点短视。

经由过程【Data】控件会见数据库

(1)启动VB。
(2)呈现如0.12所示的新建工程的【新建】选项卡。

(3)呈现如0.13所示的VB主界面。

(4)如0.14所示。

(5)呈现如0.15所示的【属性窗口】界面。

DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
odbc;dsn=graduateDB;uid=scott;pwd=tiger;
DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
(6)如0.16所示。

(7)选择【Form1】窗体上呈现名为Text1的【TextBox】控件。
(8)呈现如0.17所示的【TextBox】控件的属性窗口。
(9)依照和Text1一样的步骤增加名为Text2的【TextBox】控件,其次要的设置为。
(10)依照和Text2一样的步骤增加名为Text3的【TextBox】控件,其次要的设置为。
(11)计划好的窗体Form1如0.18所示。

(12)在VB主界面的【快速按钮区】单击运转快速按钮,如0.19所示。

(13)运转了局如0.20所示。


(14)读者能够从本书的配套光盘上找到实例的配套程序。
【拜见光盘文件】:第10章利用Data控件会见数据库.vbp,窗体为Form1.frm。
(15)使用表格来暗示上述过程当中窗体的设置,如表10.1所示。


经由过程【ADODC】控件会见数据库

(1)启动VB,创建新的工程。
(2)如0.21所示的VB主界面的【菜单栏】选择【工程】/【部件】选项。

(3)呈现如0.22所示的部件的【控件】选项卡。
(4)如0.23所示。

(5)如0.24所示。
(6)呈现如0.25所示的属性页的【通用】选项卡。

(7)切换到如0.26所示的属性页的【身份考证】选项卡。
(8)切换到如0.27所示的属性页的【纪录源】选项卡。

(9)次要的属性设置如0.28所示。

(10)向Form1窗体中增加一个名为Text2的【TextBox】控件。
(11)向Form1窗体中增加一个名为Text3的【TextBox】控件。
(12)读者能够从本书的配套光盘上找到实例的配套程序。
【拜见光盘文件】:第10章利用ADODC控件会见数据库.vbp,窗体为Form2.frm。
(13)使用表格来暗示上述过程当中窗体的设置,如表10.2所示。


(14)程序运转了局如0.29所示。


经由过程【ADODB】编程工具会见数据库

1.援用【ADODB】工具
要利用【ADODB】工具,必需起首举行援用。
(1)启动VB,新建工程。
(2)如0.30所示。
(3)呈现如0.31所示的【援用】界面。

2.利用【ADODB】工具编程
(1)计划如0.32所示的窗体Form3。

使用表格来暗示上述过程当中窗体的设置,如表10.3所示。


(2)读者能够从本书的配套光盘上找到实例的配套程序。
【拜见光盘文件】:第10章利用ADODB工具编程会见数据库.vbp,窗体为Form3.frm。
(3)窗体Form3内一切的VB代码以下。
DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
‘强迫性声明变量后才干利用
OptionExplicit
‘界说RS为ADODB工具的纪录集
DimRsAsNewADODB.Recordset
‘界说conn为ADODB工具的毗连
PrivateconnAsADODB.Connection
‘窗体运转时初始化历程
PrivateSubForm_Load()
‘界说ConnStr为毗连字符串
DimConnStrAsString
‘界说Cmd为ADODB的命令字符串
DimCmdAsNewADODB.Command
Setconn=NewADODB.Connection
ConnStr="DSN=graduateDB;uid=scott;pwd=tiger;"
conn.ConnectionString=ConnStr
‘依照ConnStr的内容毗连数据库
conn.Open
‘查询数据表dept的内容
WithCmd
.ActiveConnection=conn
.CommandType=adCmdTable
.CommandText="dept"
EndWith
‘将数据表dept的内容送纪录集RS
WithRs
.CursorLocation=adUseClient
.CursorType=adOpenStatic
.LockType=adLockPessimistic
.OpenCmd
EndWith
‘界说3个文本框的数据源为RS
SetText1.DataSource=Rs
SetText2.DataSource=Rs
SetText3.DataSource=Rs
‘界说3个文本框显现的字段
Text1.DataField="DEPTNO"
Text2.DataField="DNAME"
Text3.DataField="LOC"
EndSub
‘单击【首纪录】按钮的实行历程
PrivateSubCmdFirst_Click()
Rs.MoveFirst
Rs.Update
EndSub
‘单击【上纪录】按钮的实行历程
PrivateSubCmdPrevious_Click()
Rs.MovePrevious
IfRs.BOFThen
Rs.MoveFirst
Rs.Update
EndIf
EndSub
‘单击【下纪录】按钮的实行历程
PrivateSubCmdNext_Click()
Rs.MoveNext
IfRs.EOFThen
Rs.MoveLast
Rs.Update
EndIf
EndSub
‘单击【末纪录】按钮的实行历程
PrivateSubCmdLast_Click()
Rs.MoveLast
Rs.Update
EndSub
‘单击【加入】按钮的实行历程
PrivateSubCmdExit_Click()
conn.Close
Setconn=Nothing
UnloadMe
EndSub
DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
(4)窗体Form3的运转了局如0.33所示。


使用DBaaS能让收入损失从其他业务上得到弥补,如软件更新和硬件管理。也许决定走DBaaS之路的客户可能会跳过解决方案提供商,尽管这个决策看起来有点短视。
精灵巫婆 该用户已被删除
沙发
发表于 2015-1-19 09:22:05 | 只看该作者
需要注意的一点,也是我使用过程中发现的一个问题。在建立function->schema->table后,如果在现有的分区表上建立没有显式声明的聚集索引时,分区表会自动变为非分区表。这一点很让我纳闷。
山那边是海 该用户已被删除
板凳
发表于 2015-1-25 13:49:45 | 只看该作者
不好!如果出了错;不好调试;不好处理!其实web开发将代码分为3层:web层;业务逻辑层和数据访问层;一般对数据库的操作都在数据访问层来做;这样便于调试和维护!而且将来如果是换了数据库的话;你只需要改数据层的代码;其他层的基本可以不变!要是你在jsp中直接调用sql数据库;那么如果换了数据库呢?岂不都要改?如果报了异常呢?怎么做异常处理?
莫相离 该用户已被删除
地板
发表于 2015-2-2 22:19:13 | 只看该作者
入门没那么困难,精通没那么容易
老尸 该用户已被删除
5#
发表于 2015-2-8 14:06:49 | 只看该作者
但是随着数据量的增大,这种成本差距会逐渐减小,趋于相等。(500万数量级只相差10%左右)
爱飞 该用户已被删除
6#
发表于 2015-2-25 17:23:15 | 只看该作者
作了些试验,发现使用CLR的存储过程或函数在达到一定的阀值的时候,系统性能会呈指数级下滑!这是非常危险的!只使用几个可能没有问题,当一旦大规模使用会造成严重的系统性能问题!
柔情似水 该用户已被删除
7#
发表于 2015-3-8 00:18:28 | 只看该作者
多走走一此相关论坛,多看一些实例开发,多交流0经验,没什么的,我也是刚学没多久!加油
8#
发表于 2015-3-15 17:43:56 | 只看该作者
现在是在考虑:如果写到服务器端,我一下搞他个10个存储过程导过去,那久之服务器不就成垃圾箱了吗?即便优化了我的中间层.
冷月葬花魂 该用户已被删除
9#
发表于 2015-3-22 03:08:56 | 只看该作者
SP4包括用于以下SQLServer2000组件的程序包:Database组件(下载文件:SQL2000-KB884525-SP4-x86.EXE)更新SQLServer2000的32位Database组件,包括数据库引擎、复制、客户端连接组件及工具。有关其他信息,请参阅ReadmeSql2k32Sp4.htm。AnalysisServices组件(下载文件:SQL2000.AS-KB884525-SP4-x86.EXE)更新SQLServer2000的32位AnalysisServices。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-30 00:14

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表