1. 论坛系统升级为Xenforo,欢迎大家测试!
    排除公告

ASP自定义函数收集专帖(非函数谢绝回复)

本帖由 不学无术 于 2006-04-04 发布。版面名称:后端开发

  1. 小叶

    小叶 New Member

    注册:
    2005-09-04
    帖子:
    17,941
    赞:
    33
    PHP:
    一段自动补位的函数: 

    Function FormatSn(getNum,getBit) 
    Dim FormatsnNum,Formatsnpre,Formatsnj 
    FormatsnNum 
    = getBit - len(getNum) 
    For 
    Formatsnj = 1 To FormatsnNum 
    Formatsnpre 
    = Formatsnpre & "0" 
    Next 
    FormatSn 
    = Formatsnpre & getNum 
    End 
    Function 

    使用方法 FormatSn(getNum,getBit) 
    getNum 计数 
    getBit 共几位