| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 796 人关注过本帖
标题:数据录入保存提示函数的值,类型或数目无效
只看楼主 加入收藏
mspanwei
Rank: 1
等 级:新手上路
威 望:1
帖 子:49
专家分:0
注 册:2010-1-5
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:5 
数据录入保存提示函数的值,类型或数目无效
IF !USED("t2")
    USE t2 IN 0
ENDIF
if empty(thisform.TEXT1.value)=.f.  
    a=messagebox('确定要添加记录吗?',32+4,'系统提示')
    if a=6
        sele t2
        INSERT INTO t2(卸车日期【日期型】,发站,托运人,到站,到局,品名,车种,车数【数值型】,吨数【数值型】,收货人,卸车地点,备注);
         VALUES (alltrim(thisform.text1.value),alltrim(thisform.text2.value),alltrim(thisform.text3.value),;
        alltrim(thisform.text4.value),alltrim(),alltrim(thisform.text6.value),;
        alltrim(thisform.text7.value),alltrim(thisform.text8.value),alltrim(thisform.text5.value),alltrim(thisform.text9.value),;
        alltrim(),alltrim(thisform.text10.value))
        messagebox('保存记录成功!',64,'系统提示')
    endif
else
    messagebox('请输入卸车日期!',16,'系统提示')
endif

 ThisForm.Refresh
表单如下,请前辈帮助

yhwxc.rar (174.6 KB)
搜索更多相关主题的帖子: 收货人 托运人 
2011-01-08 05:03
qjbzjp
Rank: 13Rank: 13Rank: 13Rank: 13
来 自:尧的故乡
等 级:贵宾
威 望:48
帖 子:1914
专家分:4397
注 册:2007-3-14
收藏
得分:20 
1.楼主的车数【数值型】,吨数【数值型】,对应的.text接收数据类型不对,可以在表单的init中设置:
thisform.text5.Value=0
thisform.text8.Value=0
2.数值型不能用alltrim()函数:
        INSERT INTO t2(卸车日期,发站,托运人,到站,到局,品名,车种,车数,吨数,收货人,卸车地点,备注);
         VALUES (thisform.text1.value,alltrim(thisform.text2.value),alltrim(thisform.text3.value),;
        alltrim(thisform.text4.value),alltrim(),alltrim(thisform.text6.value),;
        ALLTRIM(thisform.text7.value),thisform.text8.value,thisform.text5.value,alltrim(thisform.text9.value),;
        alltrim(),alltrim(thisform.text10.value))

相互学习,互相交流,共同提高。
2011-01-08 08:50
mspanwei
Rank: 1
等 级:新手上路
威 望:1
帖 子:49
专家分:0
注 册:2010-1-5
收藏
得分:0 
还有一个问题请教版主,如果我把【卸车日期】字段改为日期型,以便日后按时间段查询,命令要怎么改动啊?
谢谢!
2011-01-08 11:33
qjbzjp
Rank: 13Rank: 13Rank: 13Rank: 13
来 自:尧的故乡
等 级:贵宾
威 望:48
帖 子:1914
专家分:4397
注 册:2007-3-14
收藏
得分:0 
T2表中【卸车日期】字段已经是日期型的了。

相互学习,互相交流,共同提高。
2011-01-08 14:15
mspanwei
Rank: 1
等 级:新手上路
威 望:1
帖 子:49
专家分:0
注 册:2010-1-5
收藏
得分:0 
字段设置为文本格式,我已经将系统时间设为
thisform.text1.value=dtoc(DATE(),1+1)
这样以后可以按时间段进行查询吗?
谢谢!
2011-01-08 14:53
mspanwei
Rank: 1
等 级:新手上路
威 望:1
帖 子:49
专家分:0
注 册:2010-1-5
收藏
得分:0 
可以保存,谢谢qjbzjp版主!
2011-01-08 15:01
快速回复:数据录入保存提示函数的值,类型或数目无效
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.020741 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved