vb怎么自动连接服务器,VB 如何制作连接服务器的进程

'定义一个数据集对象

Public objDataSet As DataSet

'定义一个数据视图对象

Public objDataView As DataView

'定义一个数据适配器对象

Public objDataAdpter As SqlDataAdapter

'定义一个数据连接对象，并初始化

Public objSqlConnection As SqlConnection = New SqlConnection("data source=COOLSER;initial catalog=technic;user id=sa;password=")

'定义一个当前的绑定管理对象

Public objCurrencyMannager As CurrencyManager

'定义了查询语句

Public UserSqlstr As String = "SELECT * FROM Docu_system"

Public Function SelectData(ByVal sqlstr As String) As DataSet

objDataSet = New DataSet

objDataSet.Clear()

'实例化一个数据集对象

Try

objSqlConnection.Open()

'打开数据库连接

objDataAdpter = New SqlDataAdapter(sqlstr, objSqlConnection)

'将数据库的数据映射到数据适配器

objDataAdpter.Fill(objDataSet)

'填充数据集的数据

objSqlConnection.Close()

'关闭数据连接，这一点很重要

Catch

MsgBox("错误号：" & Err.Number & "错误描述：" & Err.Description)

End Try

Return objDataSet

objDataSet = Nothing

End Function

Public Function UpdateData(ByVal sqlstr As String) As Boolean

Dim objCommand As SqlCommand = New SqlCommand

Try

objSqlConnection.Open()

objCommand.Connection = objSqlConnection

objCommand.CommandText = sqlstr

objCommand.CommandType = CommandType.Text

objCommand.ExecuteNonQuery()

objSqlConnection.Close()

Catch

MsgBox("错误号：" & Err.Number & "错误描述：" & Err.Description)

Return False

End Try

Return True

End Function

问题点数：100、回复次数：7

◆◆

评论读取中....

请登录后再发表评论!

◆◆

修改失败，请稍后尝试

vb怎么自动连接服务器,VB 如何制作连接服务器的进程相关推荐

vb.net自动发帖器2(httpwebrequest实现)
vb.net自动发帖器2(httpwebrequest实现) 2011年01月25日用HttpWebRequest类做论坛快速发帖器用HttpWebRequest类做论坛发贴机就简单多了. 我们始 ...
VB如何自动保存_VB开发的围棋游戏，原来VB可以这么强大！
大家好,每一天,我们都要有新的目标,这样才能激励自己不断进步与提高! 1 今天,我们共同来学习VB编程开发的围棋游戏实现过程,以帮助大家更好的运用VB去编写程序. 围棋的实现,主要是综合应用了VB编程 ...
自动批量生成VB控件
自动批量生成VB控件内容总结代码内容最近想做一个象棋程序,想用Image控件来加载棋子,这样,每个格就要放一个Image控件,共要制作90个Image控件,如下图: 先别说一个一个画了,就是 ...
vb 与 .accdb 格式的access数据库的连接方法
在用vb连接access数据库时,出现了这样的错误: 这是你的数据库格式不被程序识别.vb默认的一般是.,mdb access数据库格式!这时我们看一下我们要连接的是.accdb 格式的. 看一 ...
php .accdb,vb 与 .accdb 格式的access数据库的连接方法
在用vb 连接 access 数据库时,出现了这样的错误: 这是你的数据库式不被程序识别.vb默认的一般是.,mdb access 数据库式!这时我们看一下我们要连接的是.accdb ...
服务器判断自动还是手动连接网络,ADSL拨号上网实现服务器自动与网络连接
当多台计算机共享ADSL上网时,要使每一台计算机都通过手工方式来控制服务器与网络连接是比较麻烦的,但按照下面介绍的步骤就能实现服务器自动与网络连接. 一.自动进行拨号当多台计算机共享ADSL上网时, ...
VB.NET自动加载宏
VB.NET自动加载.xla文件 Public Function Loadxla(ByVal xlaPath As String, ByVal load As Boolean) As BooleanD ...
我的世界服务器自动刷矿机,我的世界自动刷矿机怎么制作 | 我的世界 | MC世界侠...
我的世界不作弊怎么刷矿物? 准备一个精准采集的稿子,铁或钻石皆可,有效率和耐久为佳)足量的修稿子材料以及一个多功能工作台(制作要用8个工作台+1个迷宫地图核心). 先收集矿石树核心,用稿子挖,越多越好 ...
饥荒自动服务器有点问题,饥荒联机版无法连接服务器怎么办_无法连接服务器的快速解决办法...
饥荒联机版无法连接服务器怎么办?今天小编就为大家带来饥荒联机版无法连接服务器解决方法,让我们来一起看看吧! 其实有时候连不上klei服务器和刷新不出服务器列表,是dns的问题. 尤其一些三级宽带,像什 ...
手机连接服务器数据库文件,手机连接服务器数据库文件夹
手机连接服务器数据库文件夹内容精选换一换 GaussDB(DWS)支持使用gs_dump工具导出某个数据库级的内容,包含数据库的数据和所有对象定义.可根据需要自定义导出如下信息:导出数据库全量信息 ...

vb怎么自动连接服务器,VB 如何制作连接服务器的进程

vb怎么自动连接服务器,VB 如何制作连接服务器的进程相关推荐

最新文章

热门文章