×

vb读取sql数据库数据

vb读取sql数据库数据(vba如何提取sql里面的数据)

admin admin 发表于2024-09-29 00:33:49 浏览4 评论0

抢沙发发表评论

“vb读取sql数据库数据”相关信息最新大全有哪些,这是大家都非常关心的,接下来就一起看看vb读取sql数据库数据(vba如何提取sql里面的数据)!

本文目录

vba如何提取sql里面的数据

会用vb数据库连接,你在vba种直接使用vb的方式即可可参考下面的代码------------------Public Function ConnectDB()cs = "Provider=Microsoft.jet.OLEDB.4.0;Data Source="’conn.ConnectionString = CS & app.Path & "\Score5.mdb"conn.ConnectionString = cs & "F:\Scview\score4.mdb"’cs="Provider=SQLOLEDB;Server=JF705;Database=mytest;Uid=sa;pwd=lmlm"’cs="Provider=SQLOLEDB;Server=JF705\ETSERVER;Database=mytest;Uid=sa;pwd=lmlm"’cs="Provider=SQLOLEDB;Server=JF705;Database=mytest;Uid=sa1;pwd=lmlm"’conn.ConnectionString=csconn.Open’response.write conn’response.endEnd Function

怎样用vb读取SQL数据库中的数据并画出 曲线图

平面上的一个点,对应于一对实数。连接平面上的点,构成线段。VB6可以在窗体和PicTrueBox控件上,用PSet (x,y)方法绘制点。步骤与方法:1,连接数据库。2,读取数据。3,绘制点。(连接点)

VB获取网络SQL数据!

和VB正常提取数据库内数据一样,只是连接字符串里,将服务器名称写成"127.0.0.1",不用管服务器的用户名和密码。反正我们是这么做的,下面是连接字符串的内容。Driver={mySQL};Server=127.0.0.1;Port=3306;Option=131072;Stmt=;Database=mydb;Uid=数据库的用户名;Pwd=数据库的用户名;

用VB读取sql表中某一个数据

添加一个ado控件 Private ConnSQL As New ADODB.Connection Private Sub Form_Load() ConnSQL.Open "driver={SQL Server};server=(local);database=xinjiaoyou;uid=sa;pwd=123456;" Dim A:A = ConnSQL.execute("select top 1 uname from a_user where id =1915")(0) msgbox AEnd sub

vb读取sql数据

首先要确定你的记录集中 oRs.Fields(0).Value 的值是什么类型?数值型,字符型,逻辑型...然后定义相应的变量,再赋值。与是否存在 MsgBox 提示窗没有关系如: dim id_f As String id_f=oRs.Fileds(0).Value 取得记录集中字段值的简单办法: id_f=oRs(0)就可以啦...

vb.net读取sql指定列

SELECT        PARSENAME(ip, 4) as part1,        PARSENAME(ip, 3) as part2,        PARSENAME(ip, 2) as part3,        PARSENAME(ip, 1) as part4,ip from         ip地址表

参考:

parsename函数的用法

返回一个对像名特殊的部分,这此部分有对象名称,所有者,数据名,服务器名。注意:此函数不会直接判断特殊对象是否存在,它只返回给定特殊对像名称,要是找不到合适就返回NULL。

语法:

PARSENAME ( ’object_name’ , object_piece )

VB6.0连接SQL数据库,并读取某表格的数据出来

’使用ADODB对象,必须先进行对象模型的引用,步骤如下’通过菜单,勾选 Microsoft ActiveX Data Object 2.6 Library’Microsoft ActiveX Data Object 2.7 Library’Microsoft ActiveX Data Object 2.8 Library’都可以代码以及注释如下:Dim Conn As ADODB.Connection ’声明连接数据库对象 -- 用来连接数据库文件,并对数据库以及数据表的操作Dim Rst As ADODB.Recordset ’声明数据记录集对象 -- 用来返回数据记录集,并对记录的操作Set Conn = New ADODB.Connection ’数据库对象的实例化Set Rst = New ADODB.Recordset ’记录集对象的实例化’二,连接数据库文件’执行 ADODB.Connection对象的Open方法,完成数据库的连接Conn.CursorLocation = adUseClient’连接SQL的字符串格式如下’"Provider=SQLOLEDB.1;Password=登录SQL的密码;Persist Security Info=True;User ID=SQL数据库实例名;Initial Catalog=数据库名;Data Source=SQL服务器计算机名称"’你给出的参数,少了最后一个“SQL服务器计算机名称”,下面我用了6个问号,你根据你的具体情况修改Conn.Open "Provider=SQLOLEDB.1;Password=123;Persist Security Info=True;User ID=Sa;Initial Catalog=2013data;Data Source=??????"’三,返回记录集’执行 ADODB.Recordset对象的Open方法,获得记录集Rst.Open "Select num1,num2 From icitem", Conn, adOpenKeyset, adLockPessimistic ’将返回的记录集显示到DataGrid1Set DataGrid1.DataSource = RstSet Rst = Nothing ’释放记录集对象Set Conn = Nothing ’释放数据库对象

想用VB编一个程序读取sql数据库中的内容

不同的计算机安装SQL的连接是不同的.关于连接总结如下:ADODB编码连接字的实例VB中,关于SQL数据库的连接是比较复杂的,但也有一个可以参考的学习思路,方法如下。1、建立数据库链接在工具条中,有一个“数据视图窗口”的工具,用它可以建立各种数据库的链接。建立链接的过程: 点击“数据视图窗口”,出现“数据视图”窗体,点击选中“数据链接”,按右键,点击“添加数据链接”,出现“数据链接属性”窗口,有四个菜单:“提供程序”、“连接”、“高级”、“所有”。选中“提供程序”菜单,这里有许多用于链接的驱动程序,选中“Microsoft OLE DB Provider for SQL Server”,点击“下一步”。“Microsoft OLE DB Provider for SQL Server”是真正的SQL数据库连接字用的驱动程序。当选中“Microsoft OLE DB Provider for SQL Server”,点击“下一步”,则自动进入“连接”窗体界面。这个“连接”窗体界面的内容,随前面选取的驱动程序而定。因为前面选择的是“Microsoft OLE DB Provider for SQL Server”,所以,“连接”窗体的主要内容就是直接访问SQL数据库的相关内容的设置,如下:在“…….服务器名称”一栏中怎么选择呢?如SQL数据库服务器安装时是选择当地默认的实例,即以本地计算机名代替的服务器,则此处应填写的内容是:(local),或者是:本地的计算机名。估计,非本地的则可填写:服务器的IP地址或服务器名称。在“输入登录服务器的信息”一栏中怎么选择呢?当选择“使用指定的用户名和密码”一项时,用户名与密码是在SQL服务器安装时选定的内容(值)。若不用密码及用户名登入,则连接字的密码应代之为:Integrate Security=SSPI,表示用“Windows NT 集成安全设置”之意,SQL2005是用这一项的。但实际的ADODB的连接字是不能用这个NT打开的。在“服务器上选择数据库”一栏中怎么选择呢?当前面两项内容选择正确后,此处的内容是存在可选的,选中即可。最后“测试连接”,显示成功。则在“数据视图”窗体的“数据链接”中将出现“Datelink1”,表示建立了以“Datelink1”为名的第1个数据库链接。当然也可以建立多个,名字将分别为“Datelink2”、“Datelink3”……2、从已建立的数据库链接的属性中找连接字。当选中“数据视图”窗体的“数据链接”,出现“Datelink1”,并选中“Datelink1”,按右键出现弹出菜单,选中“属性”,点击,并可看见这个链接所用到的名字“Name”,“Name”对应的值,就是连接字的主要内容。只是缺少“Password= ”与“ .ConnectionTimeout= ”,因此只要把这两向补齐,就是一个完整可用的ADODB的连接字,而且也适用于ADODC控件的字连接,即ConnectionString,但不需要双引号“”而已。 注意:在前面“数据链接属性”窗口的四个菜单“提供程序”、“连接”、“高级”、“所有”中,前面只重点介绍了“提供程序”与“连接”两项,实际上,“高级”就有ConnectionTimeout属性的选择项。而“提供程序”、“连接”、“高级”三项的选择结果,都在“所有”项中集中显示出来,而且“所有”项中,还有前三项不具有的其它的内容,因此,要注意察看与应用。Command1_Click()Me.Caption = "NAME"Me.ClsDim con As ADODB.Connection (注:ADODC控件用的申明,不用ADODB,也不用Adodc。)Dim rs As New ADODB.RecordsetSet con = New ADODB.Connectioncon.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=SQL数据库名;Data Sure=(local);Password=密码值(注:无时不选此项);Use Procedure for preplare=1;Auto Translate=True;Packet Size = 4096;Workstation ID=(local)(注:或是局域网的机器名);Use Encryption for Date=False;Tag With column collation when Possible=False"con.Openrs.Open "Select * from SQL数据库表或视图名 ", conMe.AutoRedraw = Truers.MoveFirstDim ptr As IntegerFor ptr = 0 To 20 Print rs.Fields(ptr).Name, 注:Name表示是表格的列名。Next ptrWhile Not rs.EOF() Print For ptr = 0 To 20 Print rs.Fields(ptr).Value, 注:Value表示是表格的数值。Next ptrrs.MoveNextWendEnd Sub用ADODC方法更简单:在窗口中建立:Command1,CAdodc1及DataDrid1,设置好CAdodc1的连接属性,见前所述. Command1_Click()Me.Caption = "NAME"Me.ClsSet DataDrid1=Adodc1End Sub

关于本次vb读取sql数据库数据和vba如何提取sql里面的数据的问题分享到这里就结束了,如果解决了您的问题,我们非常高兴。