易截截图软件、单文件、免安装、纯绿色、仅160KB

vb+ACCESS - VB / 数据库(包含打印,安装,报表)

有个问题,我有个数据库(ACCESS),其中有个表,表里面有两个列名(书名、单价),我怎么用vb来读取表中的单价的所有记录(也就是这一列),并求和,显示在vb的text上面。
  各位高手,关乎生命,我在线等!请急回帖!
sql语句如下:
select 单价 from 表 '---所有记录
select sum(单价) from 表 '---所有记录求和

添加ADODC控件用以上Sql语句去实现,具体代码网上多的象牛毛。



能详细点么?


Adodc1.CommandType = adCmdText
  Adodc1.CursorLocation = adUseClient
  Adodc1.Refresh
  Text1.Text = Adodc1.Recordset.Fields(0)
  高手,以上几句什么意思?


我上网查了查,请问高手们,我想用普通的方法来显示一列的和怎么办?

  Dim cnn As New ADODB.Connection
  Dim appdisk As String
  Dim db As String
  Dim ss As String
  Dim biaoji As Integer
   
  appdisk = IIf(Right(App.Path, 1) = "\", App.Path, App.Path & "\")  
  db = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & appdisk & "shujuku.mdb"
  cnn.CursorLocation = adUseClient
  cnn.Open db '打开数据库连接
   

   
  cnn.Execute (。。。。)
  cnn.Close

在线等呀,希望高手赐教!

'
'
'
dim rst as new adodb.


相关问答:

vb读取用word转换成的xml里的数据 - VB / 基础类

Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
  Put #1, , MyRecord ' 读入所有字符到变量中 ......

求助:C代码改写成VB代码 - VB / 基础类

谁能帮我把下面这些代码改成VB形式的,多谢了,急用~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......

access数据库连接 - Web 开发 / ASP

我连接access数据库,以前一直很好,最近却总是出错(数据库连接出错!!),代码如下:
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&" ......

使用带用户名和密码的ACCESS连接方式 - .NET技术 / C#

使用ACCESS最大的隐患就是不安全。今天对ACCESS数据库设置了一个密码,必须使用密码才能打开,但是在程序中却无法连接数据库了。大家知道使用用户名和密码,如何连接ACCESS数据库?貌似ACCESS的用户名还不知道?只知 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号