以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  郁闷,换了操作系统后,代码执行出错(已解决）  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=5759)
--  作者：lkqing
--  发布时间：2010/1/10 22:15:00
--  郁闷,换了操作系统后,代码执行出错(已解决）
我原用XP系统,现改用Vista系统,以下代码在XP系统上执行的好好的,但在Vista系统上却出现错误

      Dim d As Date = e.DataRow("日期")
If e.DataCol.Name = "日期" Then
    If e.NewValue <> Nothing Then
     e.DataRow("单号1") ="CK" & CStr(d).Remove(0,2).Remove(2,1).Remove(4,1)
     e.DataRow("单号2") =CInt("2" & CStr(d).Remove(0,2).Remove(2,1).Remove(4,3))
  End If
End If

提示索引和计数引用错误,真不明白
[此贴子已经被作者于2010-1-12 20:25:27编辑过]
--  作者：ssqq
--  发布时间：2010/1/10 23:27:00
--  
Vista系统是微软系统上最短命的操作系统之一，连微软都推荐升级成WIN7,FOXTABLE在WIN7上测试没有问题。

建议还是用XP或者升级
--  作者：czy
--  发布时间：2010/1/11 0:15:00
--  
应该是操作系统日期格式设置问题。
--  作者：bjljb
--  发布时间：2010/1/11 9:03:00
--  

是日期分隔符不同造成的。

请参考我以前发过的帖子：http://www.datasoft.com.cn/fox/dispbbs.asp?BoardID=2&ID=5593
--  作者：lkqing
--  发布时间：2010/1/11 19:54:00
--  
已经将系统日期改格式 yyyy-m-d 但还是出现同样错误提示
--  作者：狐狸爸爸
--  发布时间：2010/1/13 8:39:00
--  
怎么解决的啊
--  作者：kylin
--  发布时间：2010/1/13 8:44:00
--  

1、如果日期格式是2010/01/13 改成 yyyy-mm-dd
2、如果是2010-1-13 改成yyyy-mm-dd
--  作者：lkqing
--  发布时间：2010/1/13 18:17:00
--  
以下是引用狐狸爸爸在2010-1-13 8:39:00的发言：
怎么解决的啊

也是机缘巧合，我想在笔记本电脑上装xp/Vista双系统，分区时不小心将分区表损坏，只有用电脑自带的一键恢复功能将系统重新恢复成Vista系统。
Vista系统恢复后，我先将日期格式改掉后，再加装其余的应用软件，装好狐表后，我再打开项目又试了一次，没想到竟然没有错误提示，检查执行结果，完全正确。
在重装系统之前yyyy-mm-dd、yyyy-m-d两种格式都试过，均不成功。

[此贴子已经被作者于2010-1-13 18:23:42编辑过]