Recent
Top
Categories
All Categories
Components
156
UI
150
File System
99
Texts + Strings
88
Graphics
51
Learning Materials
42
Multimedia
39
Sessions
37
Languages
About
GetDigits
Categories
Texts + Strings
GetDigits
Extracts digits out of a string
Public
Tested
My Own Work
<%
Function GetDigits(value)
dim s, sd, i
s = ""
for i = 1 to Len(value)
sd = Mid(value, i, 1)
if (Asc(sd) >= Asc("0")) and (Asc(sd) <= Asc("9")) then
s = s & sd
end if
next
GetDigits = s
End Function
%>
Views
4434
Downloads
1371
Classic ASP
Texts + Strings
JeffSmith
26
Revisions
v1.0
May
27
Sunday
2018
Download code
×
Copy
New Category
×
50 chars max.
New Language
×
50 chars max.
New Setting
×
50 chars max.
Setting Value
Edit Category
×
50 chars max.
{{$CatDesc$}}
Edit Language
×
50 chars max.
{{$LangDesc$}}
Edit Setting
×
50 chars max.
{{$SettingValue$}}
{{$SettingValue2$}}
{{$SettingDescription$}}
Dynamic modal
×