| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1414 人关注过本帖
标题:一个很难的循环问题![已经写出来了,感谢各位大侠](源码已贴出)【注释已 ...
只看楼主 加入收藏
nvzhanshi
Rank: 2
等 级:论坛游民
帖 子:54
专家分:47
注 册:2010-11-28
结帖率:66.67%
收藏
已结贴  问题点数:20 回复次数:27 
一个很难的循环问题![已经写出来了,感谢各位大侠](源码已贴出)【注释已加】
问题描述:
目前在做关于汽车车牌管理的系统,在车牌入库方面遇到了麻烦,还请各位大侠指点一二,在下不甚感激。
关于车牌入库,都是批量入库,比如输入车牌起始号码和终止号码(号码均是5位,包含数字和字母),点击入库按钮,方可在数据库内添加相应条数的记录。例如:起始号码(10000),终止号码(10099),入库后,在数据库是相应的100条记录。这样的很容易实现,因为车牌号码都是数字。
但是关于车牌号码还存在字母,比如:起始号码(100W0),终止号码(101W4),入库后,数据库中的内容有15条,车牌号分别是(100W0,100W1,100W2,100W3,100W4,100W5,100W6,100W7,100W8,100W9,101W0,101W1,101W2,101W3,101W4)。如果是这样的起始号码和终止号码,应该如何使用循环往数据库中写入呢?
还有一种情况,就是一个号牌有多个字母,比如(3Q7T8,3Q7T9,3Q8T0),(B789D,B790D,B791D),(76DS8,76DS9,77DS0)。

以上就是这个关于车牌入库存在的显示问题,请各位有经验的同志给个思路或算法,谢谢了!


[ 本帖最后由 nvzhanshi 于 2010-12-1 13:24 编辑 ]
搜索更多相关主题的帖子: 数据库 汽车 
2010-11-28 19:38
cnfarer
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:179
帖 子:3330
专家分:21157
注 册:2010-1-19
收藏
得分:5 
其实,你可以先把那个字母位去掉,就变在了一个纯数了(这个时候就可以用循环了),生成号码时,转换成字符串,再在指定位置插入那个字母就行了!

★★★★★为人民服务★★★★★
2010-11-28 20:36
gupiao175
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:40
帖 子:1787
专家分:7527
注 册:2007-6-27
收藏
得分:5 
    str="数据" '车牌数据
    Set Reg = New RegExp
    Reg.Global     = True
    Reg.Pattern    = "[A-Za-z]" '字母正则
    Reg.IgnoreCase = False
    str2=Reg.replace(str,"");'str2就是不带字母的数据了。然后循环插入数据!在插入的时候在固定的位置再插入回原来有的字母!不过这种方法只适合字母固定位置的情况,如果是随机的,那就没办法了。


Q:1428196631,百度:开发地 即可找到我,有事请留言!
2010-11-29 00:57
hams
Rank: 12Rank: 12Rank: 12
等 级:贵宾
威 望:18
帖 子:912
专家分:3670
注 册:2008-7-30
收藏
得分:5 
i1=1000
i2=1014
for i=i1 to i2
response.write mid(i,1,3)&"W"&mid(i,4,1)
next

俺不高手,俺也是来学习的。
俺的意见不一定就对,当你不认同时请点忽视按钮。
当走到十字路口不知该如何走时,可在论坛问下路,但你若希望别人能一路把你送到目的地,显然是不现实的,因为别人也有自己要走的路。
2010-11-29 08:12
nvzhanshi
Rank: 2
等 级:论坛游民
帖 子:54
专家分:47
注 册:2010-11-28
收藏
得分:0 
以下是引用cnfarer在2010-11-28 20:36:30的发言:

其实,你可以先把那个字母位去掉,就变在了一个纯数了(这个时候就可以用循环了),生成号码时,转换成字符串,再在指定位置插入那个字母就行了!
大侠,问一下,如果我要判断这个变量的某几位是字母,用什么方法好?
比如:a=123w7,b=124w1
用什么函数进行拆分?或者用什么函数放到数组里面?然后怎么判断?
我现在也可以写出来,不过感觉写出来以后效率会很低,请大侠指点一下!
2010-11-29 18:23
nvzhanshi
Rank: 2
等 级:论坛游民
帖 子:54
专家分:47
注 册:2010-11-28
收藏
得分:0 
以下是引用gupiao175在2010-11-29 00:57:10的发言:

    str="数据" '车牌数据
    Set Reg = New RegExp
    Reg.Global     = True
    Reg.Pattern    = "[A-Za-z]" '字母正则
    Reg.IgnoreCase = False
    str2=Reg.replace(str,"");'str2就是不带字母的数据了。然后循环插入数据!在插入的时候在固定的位置再插入回原来有的字母!不过这种方法只适合字母固定位置的情况,如果是随机的,那就没办法了。
这个方法好像只能满足str中只有1个字母吧!就算是我固定了字母的位置也不行。例如:str1=123w5(规定在第4位就可以),str2=1w2c5(有多个字母的车牌,显然就不行了)
这样的方法确实不行!

[ 本帖最后由 nvzhanshi 于 2010-11-29 18:27 编辑 ]
2010-11-29 18:25
nvzhanshi
Rank: 2
等 级:论坛游民
帖 子:54
专家分:47
注 册:2010-11-28
收藏
得分:0 
以下是引用hams在2010-11-29 08:12:06的发言:

i1=1000
i2=1014
for i=i1 to i2
response.write mid(i,1,3)&"W"&mid(i,4,1)
next
大侠给出的这段是说我知道第几位是字母,才能和样写。并且要知道字母是什么。
但是对于怎么在变量中把字母分离出来,我想的方法很麻烦。大侠可否帮忙给出一段分离字母和判断字母的代码?

例子:i1=123W7 i2=124W1
2010-11-29 18:31
nvzhanshi
Rank: 2
等 级:论坛游民
帖 子:54
专家分:47
注 册:2010-11-28
收藏
得分:0 
很感谢各位版主帮忙解答!不过问题还没解决,还请各位大侠帮忙想想办法!
2010-11-29 18:32
gupiao175
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:40
帖 子:1787
专家分:7527
注 册:2007-6-27
收藏
得分:0 
以下是引用nvzhanshi在2010-11-29 18:25:17的发言:

这个方法好像只能满足str中只有1个字母吧!就算是我固定了字母的位置也不行。例如:str1=123w5(规定在第4位就可以),str2=1w2c5(有多个字母的车牌,显然就不行了)
这样的方法确实不行!
   我不说了吗?这种方法只适合字母固定位置的情况!
   至于1个2个字母。难道正则规定了只能匹配一个字母,不能匹配2个。。。甚至上亿个字母的情况吗?

Q:1428196631,百度:开发地 即可找到我,有事请留言!
2010-11-29 18:36
gupiao175
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:40
帖 子:1787
专家分:7527
注 册:2007-6-27
收藏
得分:0 
以下是引用nvzhanshi在2010-11-29 18:31:12的发言:

大侠给出的这段是说我知道第几位是字母,才能和样写。并且要知道字母是什么。
但是对于怎么在变量中把字母分离出来,我想的方法很麻烦。大侠可否帮忙给出一段分离字母和判断字母的代码?

例子:i1=123W7 i2=124W1
    dim arr '定义字母的ascii编码位数52位
    dim arr2 '定义数字的10位ascii
   arr=65,,66....,122 '大写字母的ascii是65-90,小写字母ascii是97到122.
   arr2=48....,57 '数字的ascii是48到57

    for i=0 to len(str)
      j=ASC(mid(str,i,1)) 'ASC把字符转换成ascii编码
    if(instr(arr,j)) '把这个编码用instr函数在上面定义的2个ascii字符串里查找,找到哪个如何定义,这里自己写了。OK!
   因为不能写作业贴,这里只是给你提个思路!

Q:1428196631,百度:开发地 即可找到我,有事请留言!
2010-11-29 18:52
快速回复:一个很难的循环问题![已经写出来了,感谢各位大侠](源码已贴出)【注 ...
数据加载中...
 
   



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

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