项目复制后,flexgrid控件不显示表格,数据文件保存在data.mdb中,路径设置正确。
这是连接代码:
Function getRS(Byval sql)
Dim cnstr,cn,rs
Dim is_sql
cnstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\SYJ_DongY\VB\DataShengli.mdb;Persist SecuritY Info=False"
Is_sql=Trim(sqL)
Set cn=CreateObject("ADODB.Connection")
cn.ConnectionString=cnstr
cn.open
'Set command=CreateObject("ADODB.Command")
'command.ActiveConnection=cn
'command.CommandText=is_SQl
Set rs=CreateObject("ADODB.Recordset")
rs.open is_sql,cn,3,2,1
Set getRS=rs
End Function
图片说明:
最佳答案
为何在 WinCC 的图形设计器中不能使用部分被安装的微软 ActiveX 控件?
https://support.industry.siemens.com/cs/cn/zh/view/32433778
提问者对于答案的评价:
原创文章,作者:ximenziask,如若转载,请注明出处:https://www.zhaoplc.com/plc367125.html