DataReport控件的datasource属性和数据环境问题 光这样是不够的,你还要在datareport中把command的字段拽进去,才行,还要排版,挺麻烦的! 至于,能不能不用数据环境,我也想知道! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 楼上的,在datareport中,我已经把command的字段拽进去,运行时还是没有响应? 数据环境:DEaddpsd -ttx -addpsd -cph -cpmc -cptm -cpsl -cpdjttx连接的属性为:服务器名:server1用户名:user密码:passwordDB:testaddpsd命令属性为:名称:addpsd连接:ttx数据源:select cph,cpmc,cptm,cpsl,cpdj,je from shdmxdatareprt的属性为:datamember:addpsddatasource:DEaddpsd细节中的控件属性rpttextbox的属性为:datafield:cphdatamember:addpsd其它字段以此类推 Data Report 控件—仅包含可在数据报表设计器上工作的特殊控件(大于4、5个)。(注意:不能在数据报表设计器上使用 Visual Basic 的内部控件或任何 ActiveX 控件,如果采用直接拖拽command的方法相当于使用内部控件,同样是无效的,数据报表只可接收数据环境中的数据信息!) Set ADOcnn = New ADODB.Connection Set ADOrs = New ADODB.Recordset Set ADOcmm = New ADODB.Command '打开连接 ADOcnn.ConnectionString = sSQL_ZONGHE ADOcnn.ConnectionTimeout = 31 ADOcnn.Open '打开表 'ADOrs.CursorType = adOpenDynamic 'ADOrs.LockType = adLockOptimistic 'ADOrs.ActiveConnection = ADOcnn 'ADOrs.Open "select * from djl54a01" '执行查旬 Set ADOcmm.ActiveConnection = ADOcnn ADOcmm.CommandText = "select * from djl54a01" Set DatRpt54A01.DataSource = ADOcmm.Execute 设置好datasource为dataenvironment设置 datamember为command然后在datareport里面点右健,选择 取得结构 为何用vb6自带的打包打出来的,文件总比项目文件中所列的多呢?我不知多出来的文件是做何用的? 地图热区该怎么做? 如何实现一个text中不同的字母不同的颜色 像OICQ上面那些圆的按钮用什么方法制作阿? 学习求助!! VB中如何读取十六进制字符串的问题?(急) 如何获得windows的字体列表? 新买得VSNET装不上 提议 为VB API 编写一个类似“MFC”的类库和 使用范例 VB如何弹出提示框 vb and MS SQL 为什么这段程序运行时参数错误
DEaddpsd
-ttx
-addpsd
-cph
-cpmc
-cptm
-cpsl
-cpdj
ttx连接的属性为:
服务器名:server1
用户名:user
密码:password
DB:test
addpsd命令属性为:
名称:addpsd
连接:ttx
数据源:select cph,cpmc,cptm,cpsl,cpdj,je from shdmxdatareprt的属性为:
datamember:addpsd
datasource:DEaddpsd
细节中的控件属性
rpttextbox的属性为:
datafield:cph
datamember:addpsd
其它字段以此类推
Set ADOrs = New ADODB.Recordset
Set ADOcmm = New ADODB.Command
'打开连接
ADOcnn.ConnectionString = sSQL_ZONGHE
ADOcnn.ConnectionTimeout = 31
ADOcnn.Open
'打开表
'ADOrs.CursorType = adOpenDynamic
'ADOrs.LockType = adLockOptimistic
'ADOrs.ActiveConnection = ADOcnn
'ADOrs.Open "select * from djl54a01"
'执行查旬
Set ADOcmm.ActiveConnection = ADOcnn
ADOcmm.CommandText = "select * from djl54a01"
Set DatRpt54A01.DataSource = ADOcmm.Execute
设置 datamember为command然后在datareport里面点右健,选择 取得结构