Foxtable(狐表) → 用户栏目 → 专家坐堂 → 语句执行错误


  共有4698人关注过本帖树形打印复制链接

主题：语句执行错误
帅哥哟，离线，有人找我吗？
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112378 积分：572152 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/10/8 20:24:00 [显示全部帖子]

打开数据库，日志表结构截图看看

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112378 积分：572152 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/10/9 21:28:00 [显示全部帖子]

如果是access数据库，时间列不支持毫秒，要格式化一下，

cmd.Parameters.Add("@时间",format(Date.Now,"yyyy-MM-dd HH:mm:ss"))

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112378 积分：572152 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/10/9 22:07:00 [显示全部帖子]

不支持

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112378 积分：572152 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/10/9 22:35:00 [显示全部帖子]

必须按照这里指定的列的顺序，不能打乱

"Insert Into {日志}(日期,操作,文件名,时间) 
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112378 积分：572152 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/10/9 22:48:00 [显示全部帖子]

这种自己测试有没有问题就知道了

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112378 积分：572152 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/10/9 22:49:00 [显示全部帖子]

报什么错？

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112378 积分：572152 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/10/9 23:00:00 [显示全部帖子]

检查列的名称，顺序和数量是否和参数的一致，问号的数量是否和列数量一致

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112378 积分：572152 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/10/9 23:28:00 [显示全部帖子]

很多问题！
1、
Dim txt As String = FileSys.ReadAllText(ProjectPath & "\xz\DZ0107" & d1 & ".o",Encoding.Default)
cmd.CommandText = "Insert Into {生成}(银行代码,还款类型,罚息金额,归还日期,本金,利息,逾期,贷款余额,余额正负,借款人姓名,银行机构代码,银行机构代码前8位,机构数字) Values(?,?,?,?,?,?,?,?,?,?,?,?,?)"

Dim ary() As String = txt.split("|")
For i As Integer = 3 To ary.Length-1
    cmd.Parameters.clear()
    If (i-3) Mod 17=0
……
2、假如不符合条件，那么下面这些参数就不会添加，这是不允许的，上面所有列都必须和Parameters的参数一一对应，不能多，也不能少

If (i-3) Mod 17=0
    ' sc=DataTables("生成").AddNew
    cmd.Parameters.Add("@银行代码","20")
    cmd.Parameters.Add("@还款类型","02")
    cmd.Parameters.Add("@罚息金额","0")
    cmd.Parameters.Add("@归还日期",ary(i).Substring(0,4) & "-" & ary(i).Substring(4,2) & "-" & ary(i).Substring(6,2))
End If
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112378 积分：572152 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/10/10 11:05:00 [显示全部帖子]

这个代码不可能会出错。怎么用的，贴出你完整的代码

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：112378 积分：572152 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2018/10/10 12:19:00 [显示全部帖子]

请重新贴出你完整的代码

 回到顶部
总数 14 1 2 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 5 次数据查询