Foxtable(狐表)用户栏目专家坐堂 → [求助]


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

主题:[求助]

帅哥哟,离线,有人找我吗?
xybcxh
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:824 威望:0 精华:0 注册:2017/11/23 8:55:00
[求助]  发帖心情 Post By:2018/11/29 11:22:00 [显示全部帖子]

老师,今天碰到一个问题,应该怎么改:
.NET Framework 版本:2.0.50727.5420
Foxtable 版本:2018.10.9.1
错误所在事件:窗口,设备新增,AfterLoad
详细错误信息:
索引和长度必须引用该字符串内的位置。
参数名: length

窗口,设备新增,AfterLoad:
Tables("杭康设备总表").allowedit = True
Tables("杭康设备总表").AddNew

'---------以下是自动生成公司编号--------------------------
Dim i As String = DataTables("杭康设备总表").Compute("max(公司编号)")
Dim idx As Integer
If i > " " Then
    idx = cint(i.SubString(8,5)) +1
Else
    idx = 1
End If
Tables("杭康设备总表").Current("公司编号") = "ZJHK/ZY-" & ForMAT(idx,"00000")
Tables("杭康设备总表").Current("序号") = DataTables("杭康设备总表").Compute("max(序号)")+1
'---------以上是自动生成公司编号-----------------------------

Dim gsbh As WinForm.TextBox = e.Form.Controls("公司编号")
Dim ybh As WinForm.TextBox = e.Form.Controls("原编号")

ybh.Value = gsbh.Value  
Dim r As Row = Tables("杭康设备总表").Current

r("原编号") = ybh.Value

-----------------
公司编号列有如下各种内容:
ZJHK/ZY-768
ZJHK/ZY-17-01
ZJHK/ZY-Y01
ZJHK/ZY-CZ01
ZJHK/ZY-AQM01
ZJHK/ZY-17135-3
ZJHK/ZY-18108
以前一直能用,不报错,这几天增加了一列(表结构改动了),新增就报错了,编号不能自动生成。请老师帮助。谢谢。
只要求生成的编号试样:ZJHK/ZY-18108 就成。其他的排除。
[此贴子已经被作者于2018/11/29 11:34:36编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
xybcxh
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:824 威望:0 精华:0 注册:2017/11/23 8:55:00
  发帖心情 Post By:2018/11/29 11:36:00 [显示全部帖子]

只要求生成的编号试样:ZJHK/ZY-18108 就成。其他的排除。

 回到顶部
帅哥哟,离线,有人找我吗?
xybcxh
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:824 威望:0 精华:0 注册:2017/11/23 8:55:00
  发帖心情 Post By:2018/11/29 11:46:00 [显示全部帖子]

ZJHK/ZY-Y10
11
1


 回到顶部
帅哥哟,离线,有人找我吗?
xybcxh
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:824 威望:0 精华:0 注册:2017/11/23 8:55:00
  发帖心情 Post By:2018/11/29 11:55:00 [显示全部帖子]

有的。我现在要生成8+5的编号,然后比原编号+1就成
ZJHK/ZY-00000

 回到顶部
帅哥哟,离线,有人找我吗?
xybcxh
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:824 威望:0 精华:0 注册:2017/11/23 8:55:00
  发帖心情 Post By:2018/11/29 12:00:00 [显示全部帖子]

.NET Framework 版本:2.0.50727.5420
Foxtable 版本:2018.10.9.1
错误所在事件:窗口,设备新增,AfterLoad
详细错误信息:
从字符串“AQM30”到类型“Integer”的转换无效。
输入字符串的格式不正确。
 
老师,把这有字符串的排除就可以了。

 回到顶部
帅哥哟,离线,有人找我吗?
xybcxh
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:92 积分:824 威望:0 精华:0 注册:2017/11/23 8:55:00
  发帖心情 Post By:2018/11/29 12:21:00 [显示全部帖子]

.NET Framework 版本:2.0.50727.5420
Foxtable 版本:2018.10.9.1
错误所在事件:窗口,设备新增,AfterLoad
详细错误信息:
从字符串“344-2”到类型“Integer”的转换无效。
输入字符串的格式不正确。
老师,不好意思,我的编号列太乱了,这是以前旧的编号不统一造成的,现在新增的编号都是8+5位数字了。还得麻烦老师再帮忙修改。

我现在把“344-2”中间插入一个空格,成为“344 -2”,看起来一样,这样就多出了一位,跳过13位总数,不报错,成功。谢谢有点甜老师。
[此贴子已经被作者于2018/11/29 17:01:34编辑过]

 回到顶部