有人发现过这种怪现象吗?
相同的表结构,不同的表名,可是插入数据时,有几个表显示插入数据成功,可是看不到数据。二其它表都正常。
说明,这是前几年别人建的access数据库,我只能在上面修改。而且我发现,我无法改变表结构,请问,有什么办法可以修改。
相同的表结构,不同的表名,可是插入数据时,有几个表显示插入数据成功,可是看不到数据。二其它表都正常。
说明,这是前几年别人建的access数据库,我只能在上面修改。而且我发现,我无法改变表结构,请问,有什么办法可以修改。
解决方案 »
- 我算发现了 CSDN里闲谈话题回贴不下100 问点真东西 跑得比啥都快 真JB还不如在问问里呢 伤了
- vb中的DataReport 问题
- 谁有动态修改本机ip而不重启机器的源代码~~100分贡献出出来,不够在加~~
- 请问:ADO+Access 多表查询问题!
- 求助关于VB6生成的安装程序不能用winsock的问题
- 怎么设置mscomm控件的rthreshould和sthreshould属性?新手入门,在线等待!
- 急求~
- 怎样调用.dll,该dll是用VC做的,而且用到了指针,而在VB里怎么定义??
- 在MDI中调用子窗体的问题!!
- 谁有CLISTBAR32的解密版??给50大分!
- **************请高手帮忙!从Excel导入数据时提示WorkSheet不能发现********
- 这条语句什么用?
也可以修改了,但是插入还是有问题
我调试发现,可能是split函数分解的时候出的问题
因为数字与汉字之间可能有一个空格也可能有多个空格(极端情况还可能没有空格)
请问,先考虑有不定数量的空格该怎么办,感谢大家
=======================
这是你程序显示的吗?显示这个就能确定插入成功了吗?
你有没有设置
ON ERROR RESUME NEXT错误处理语句!?
Public Function GetNum(aStrParam As String) As String
Dim i As Long, strTmp As String
For i = 1 To Len(aStrParam)
If IsNumeric(Mid(aStrParam, i, 1)) Then
GetNum = GetNum & Mid(aStrParam, i, 1)
End If
Next
End Function
Public Function GetValue(aStrParam As String) As String
Dim i As Long, strTmp As String
For i = 1 To Len(aStrParam)
If IsNumeric(Mid(aStrParam, i, 1)) Then
Else: GetValue = GetValue & Mid(aStrParam, i, 1)
End If
Next
End Function