4 svar · 230 visningar · startad av Daniel78
Hej, har stött på lite problem med sträng hanteringen. Är det någon som har någon lösning på hur man får strängen 1 att visas som 0001, 10 som 0010, 100 som 0100 osv? Siffrorna kommer ifrån databasen och fältet Post_ID, alltså ett eget ID system där jag vill att i databasen ska 1 synas men det ska visas som 0001 för användaren på en asp sida. Tack på förhand!
Hej, vet ej om jag fattade dig rätt:
Select Case rs("Post_ID")
Case 1
Text = "0001"
Case 10
Text = "0010"
Case 100
Text = "0100"
Case 1000
Text = "1000"
End Select
response.write "talet var "& Text &""
mvh Jörgen :)
------------------
.: Det är jag som ger svaren och det är Ni som ställer frågorna :.
[Redigerat av jorgen den 03 jan 2002]
<%
Function AddZero(ByVal vData, ByVal vDataTotLength)
Dim intLength
Dim varData_tmp
intLength = Len(vData)
For N = (intLength + 1) TO vDataTotLength
varData_tmp = varData_tmp & "0"
Next
AddZero = varData_tmp & vData
End Function
Response.Write AddZero(10,4)
%>
så kan du "passa in" vilken variabel som helst <vData> och få ut en variabel längd <vDataTotLength>. är variabel längden av variabeln inte lika med vDataTotLenth kommer nollor att läggas till i början.
cya,
PatrikB
------------------
-=* IF there is a wrong way to do something, then someone will do it *=-
Function AC_Digits(sNumberString, nReturnLength)
If nReturnLength > Len(sNumberString) Then
AC_Digits = String(nReturnLength - Len(sNumberString), "0") & sNumberString
Else
AC_Digits = Right(sNumberString, nReturnLength)
End If
End Function
Response.Write AC_Digits("10", 6)
------------------
ASPCode.net | ASP/SQL Hosting för utvecklare! |
[Redigerat av Stefan Holmberg den 03 jan 2002]
Hej! Tack för hjälpen, det fungerar precis som jag tänkt mig. Jag använde PatrikB alternativ.