Funktion: Konvertieren Sie lange Ganzzahl -Nummern in IP -Adressen
<%
FunctionCstrip (ByvalAnnernewip)
Dimlsresults
Dimlntemp
Dimlnindex
Forlnindex = 3to0Step-1
lntemp = int (annewip/(256^lnindex)))
lsResults = lsResults & lntemp & "."
annewip = annewip- (lntemp*(256^lnindex))
Nächste
lsResults = links (lsresults, len (lsresults) -1)
Cstrip = lsresults
Endfunktion
%>