Fungsi: Konversi nomor bilangan bulat panjang menjadi alamat IP
<%
Functioncstrip (byvalannewip)
DIMLSRESULTS
DIMLNTEMP
DIMLNINDEX
Forlnindex = 3to0step-1
lntemp = int (annewip/(256^lnindex)))
lsResult = lsResults & lntemp & "."
annewip = annewip- (lntemp*(256^lnindex))
Berikutnya
LSRESULTS = Kiri (LSRESULTS, LEN (LSRESULTS) -1)
CSTRIP = LSRESULTS
Fungsi endfungsi
%>