|  | 主题:  编号累加问题,前面带0的,系统自动去掉了,急? | 
            
                        
                
                    |  嘎嘎
 职务:普通成员
 等级:1
 金币:1.0
 发贴:287
 注册:2002/6/30 21:40:14
 
 | 
                            
                            #12005/3/2 11:03:20 
                                会员编号为 00001、00002、00003~~~ 默认现在 rs("code")在数据库中 为 00001 ,这个数值是我手工加的。
 现在要累加,
 如:
 dim code
 code=rs("code")+00001
 问题就在这,最终code=2  而我要的是code=00002
 我找vbscript函数没有找到,不知道用什么函数控制??
 请大侠指点?谢谢先!
 | 
                        
                
                    |  蓝鲸
 职务:版主
 等级:5
 金币:42.1
 发贴:2614
 注册:2001/12/20 15:57:57
 
 | 
                            
                            #22005/3/2 15:10:33 
                                要自己写函数,实现格式化功能
                                
                                
                                
                             非常大鱼 | 
                        
                
                    |  嘎嘎
 职务:普通成员
 等级:1
 金币:1.0
 发贴:287
 注册:2002/6/30 21:40:14
 
 | 
                            
                            #32005/3/2 21:07:58 
                                请问?如何写呢??有类似的东西么?还请明示。 谢谢~不懂啊~    | 
                        
                
                    |  蓝鲸
 职务:版主
 等级:5
 金币:42.1
 发贴:2614
 注册:2001/12/20 15:57:57
 
 | 
                            
                            #42005/3/3 0:10:20 
                                先用IsNumeric判断是否为数字,再判断字符串长度,不足的用0补上
                                
                                
                                
                             非常大鱼 | 
                        
                
                    |  嘎嘎
 职务:普通成员
 等级:1
 金币:1.0
 发贴:287
 注册:2002/6/30 21:40:14
 
 | 
                            
                            #52005/3/3 1:31:59 
                                谢谢,我试试,如果弄不明白,还得请您指教,呵呵~
                                
                                
                                
                             | 
                        
                
                    |  缺缺
 职务:管理员
 等级:8
 金币:41.0
 发贴:9620
 注册:2004/1/14 19:14:47
 
 | 
                            
                            #62005/3/3 10:26:10 
                                如果写程序不会自己写函数,那就不能叫做程序    | 
                        
                
                    |  不是高手
 职务:普通成员
 等级:3
 金币:5.0
 发贴:1352
 注册:2002/8/23 2:27:18
 
 | 
                            
                            #72005/3/8 11:21:01 
                                VB里有string()函数实现你的要求,用法: 引用:
 返回具有指定长度的、重复字符组成的字符串。
 
 String(number, character)
 参数
 number
 返回字符串的长度。如果 number 参数包含 Null,则返回 Null。
 Character
 指定字符或字符串表达式的字符代码,其中字符串表达式的第一个字符用于组成返回的字符串。如果 character 参数包含 Null,则返回 Null。
 说明
 如果指定的 character 值大于 255,则 String 使用下列公式将该数转换成有效的字符代码:
 
 character Mod 256
 下面的示例利用 String 函数返回指定长度的由重复字符组成的字符串:
 
 Dim MyString
 MyString = String(5, "*")   ' 返回"*****"。
 MyString = String(5, 42)   ' 返回"*****"。
 MyString = String(10, "ABC")   ' 返回"AAAAAAAAAA"。
 
 
 
 |