Question

我有一个包含字母和数字的字符串。字符串类似于“PST025”，“PST026”等......

我要做的是从表中取出最后一个字符串并创建下一个数字。因此，如果最后一个字符串是“PST026”，我需要创建一个新字符串“PST027”。

我有以下代码：

strAsset = rsStandards("asset") 
nextAsset = CStr((Mid(strAsset,4,3)))
nextAsset = nextAsset + 1

问题在于“nextAsset”给了我“27”而不是“027”。我需要保留前导1。

任何想法。

Answer 1

strAsset = rsStandards("asset") 
nextAsset = Mid(strAsset, 4, 3)
nextAsset = CInt(nextAsset) + 1   ' it would be smart to should check IsNumeric() here
nextAsset = Left(strAsset, 3) & Right("00" & nextAsset, 3)

保持字符串VBScript ASP Classic的前导零

1 个答案: