Question

vfp程序代码 到底哪里错了？说有不能识别的谓语

pSqlInsert档案入档="insert into 档案入档数据表(入档编号,档案编号,档案名称,入档时间,经办人,档案说明)values("+""+ThisForm..cntData.txt入档编号.value+"','+""+ThisForm..cntData.txt档案编号.value+"','+;
""+ThisForm.cntData.txt档案名称.value+"','+"ctod("+""+ThisForm.cntData.txt入档时间.value+"'),'+;
""+ThisForm.cntData.txt经办人.value+"','+""+ThisForm.cntData.txt档案说明.value+"")"
pSqlInsert 档案卡片= "insert into 档案卡片数据表(档案编号,档案名称,档案说明,是否已借阅) values ("+;
""+ThisForm.cntData.txt档案编号.value+"','+""ThisForm.cntData.txt档案名称.value+"','+;
""+ThisForm.cntData.txt档案说明.value+"','+".F."+")"
&pSqlInsert档案入档

Answer 1

多处“thisform..cnt。。。”中多了一个句点，应为“THISFORM.CNT。。。”

对于此段代码来说，建议进行如下处理（仅给出方案）：

 

 
my入档编号=ThisForm.cntData.txt入档编号.value
my档案编号=ThisForm.cntData.txt档案编号.value
my档案名称=ThisForm.cntData.txt档案名称.value
my入档时间=ctod(ThisForm.cntData.txt入档时间.value)
my经办人=ThisForm.cntData.txt经办人.value
my档案说明=ThisForm.cntData.txt档案说明.value
insert into 档案入档数据表(入档编号,档案编号,档案名称,入档时间,经办人,档案说明) value(my入档编号,my档案编号,my档案名称,my入档时间,my经办人,my档案说明)

●请放心使用，有问题的话请追问
●满意请及时采纳，谢谢，采纳后你将获得5财富值。
●你的采纳将是我继续努力帮助他人的最强动力！

Answer 2

什么乱七八糟的，加那么多引号干什么，给你个代码自己看吧。

bds="SELECT Gxclb.*, Gxc.dsj,gxc.cjdm,gxc.gg FROM gxc!gxclb LEFT OUTER JOIN gxc!gxc ON Gxclb.bh = Gxc.bh into dbf ls "
bds=bds+"where alltrim(gxclb.bh)==alltrim(ThisForm.text2.value)"

&bds