الوظيفة: تحويل أرقام عدد صحيح طويل إلى عناوين IP
<٪
FunctionCstrip (Byvalannewip)
Dimlsresults
dimlntemp
Dimlnindex
forlnindex = 3to0step-1
lntemp = int (annewip/(256^lnindex))
lsresults = lsresults & lntemp & "."
Annewip = Annewip- (lntemp*(256^lnindex))
التالي
lsresults = اليسار (lsresults ، len (lsresults) -1)
CSTRIP = lsresults
الوظيفية
٪>