replace for 筛选表达式出现数据类型编译不匹配错误 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → replace for 筛选表达式出现数据类型编译不匹配错误

共有3393人关注过本帖树形打印复制链接主题：replace for 筛选表达式出现数据类型编译不匹配错误

xyazwm

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：婴狐帖子：8 积分：222 威望：0 精华：0 注册：2019/7/8 23:16:00

replace for 筛选表达式出现数据类型编译不匹配错误 发帖心情

Post By：2020/8/14 6:27:00 [只看该作者]

Dim CorpID As String

Dim Secret As String

Dim r As DataRow

Dim dt As DataTable=DataTables("wechat_account")

Dim accountlist As List(of String())

accountlist=DataTables("wechat_account").GetValues("wechat_corpid|wechat_secret")

For Each account As String() In accountlist

corpid=account(0)

secret=account(1)

'output.show(secret)

Dim accesstocken As String=Functions.Execute("GetWeqyAccessToken",corpid,secret)

Dim da As Date=Date.now()

output.show(da)

output.show(accesstocken)

dt.replacefor("wechat_accestocken",accesstocken,"wechat_corpid='"&CorpID&"'")

'dt.replacefor("tocken_time",da,"wechat_secret"="&secret&")

此主题相关图片如下：编译错误.png

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110790 积分：563882 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/8/14 8:34:00 [只看该作者]

符号，关键字前后加上必要的空格
dt.replacefor("wechat_accestocken",accesstocken,"wechat_corpid='" & CorpID & "'")

主题：replace for 筛选表达式 出现 数据类型编译不匹配错误