当表格名称为数字时就无法查询。如表格名称为“123”(Report2.Text=123)只要不是数字开头的表格名称都能查询。求解
VB脚本如下
VB脚本如下
ssql="Select * FROM "& Report2.Text &" "
scon="Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist SecurityInfo=False;Initial Catalog=cheshi;Data Source=.\wincc"
Set conn=CreateObject("ADODB.Connection")
conn.ConnectionString=scon
conn.Cursorlocation=3
conn.open
Set ors=CreateObject("ADODB.RecordSet")
Set ocom=CreateObject("ADODB.Command")
ocom.commandtype=1
Set ocom.ActiveConnection=conn
ocom.CommandText=ssql
Set ors=ocom.Execute
Set report1.datas
ource=ors
问题补充:
谢谢各位的。回答的几种方案都试过了,还是无法解决这个问题。
现在我已经有解决方案了。
如下Name="a"& ""& DefaultValue &""
ssql="Select * FROM "& Name &" "
scon="Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist SecurityInfo=False;Initial Catalog=cheshi;Data Source=.\wincc"
Set conn=CreateObject("ADODB.Connection")
conn.ConnectionString=scon
conn.Cursorlocation=3
conn.open
Set ors=CreateObject("ADODB.RecordSet")
Set ocom=CreateObject("ADODB.Command")
ocom.commandtype=1
Set ocom.ActiveConnection=conn
ocom.CommandText=ssql
Set ors=ocom.Execute
Set report1.datasource=ors
前面加个字母但又不让它显示出来就可以了。
最佳答案
你这样写相当于是数值,用引号引起来就当作字符来看了。你用msgbox显示ssql看看你拼接的是否正确?
提问者对于答案的评价:
谢谢
原创文章,作者:ximenziask,如若转载,请注明出处:https://www.zhaoplc.com/plc360431.html