Umwandlung von einer IP-Adresse in den Interger-Wert dieser

Übersicht BlitzBasic Allgemein

Neue Antwort erstellen

 

Feja

Betreff: Umwandlung von einer IP-Adresse in den Interger-Wert dieser

BeitragFr, Jul 21, 2006 21:54
Antworten mit Zitat
Benutzer-Profile anzeigen
hier gleich noch ein problem:

ich habe eine normale Ip-Adresse und will diese in den integer werk von dieser Verwandeln. Aber soweit ich weiß geht dies nur andrsherun mit dem Befehl "DottedIP(IP_Nummer)"(http://www.blitzbase.de/tutorials/rob_13.htm)

Kann mir jemand helfen?
-- ASUS M2N32 Deluxe Wireless Edition(Mainboard) -- 2*750GB Festplatten -- 4096MB Ram von Corsair!!! -- 2 NVIDIA Geforce 8800 GTX Crossfire PCIexpress *16 -- AMD Athlon 64 X2 5000+ -- Komplettes Gehäuse mit Neonröhren(u.a. Schwarzlicht) beleuchtet -- 1000 Watt Netzteil von Be Quiet

Hubsi

BeitragFr, Jul 21, 2006 22:20
Antworten mit Zitat
Benutzer-Profile anzeigen
Code: [AUSKLAPPEN]
Function integerip(ip$)
a1=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,"."))
a2=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,"."))
a3=Int(Left(ip$,Instr(ip$,".")-1)) : ip$=Right(ip$,Len(ip$)-Instr(ip$,"."))
a4=Int(ip$)
Return (a1 Shl 24) + (a2 Shl 16) + (a3 Shl 8) + a4
End Function
Autor ist mir nicht bekannt, hat die Boardsuche ausgespuckt.
Den ganzen Doag im Bett umanandflagga und iaz daherkema und meine Hendl`n fressn...
 

Feja

BeitragFr, Jul 21, 2006 22:27
Antworten mit Zitat
Benutzer-Profile anzeigen
cool
vielen Dank
genau das richtige
-- ASUS M2N32 Deluxe Wireless Edition(Mainboard) -- 2*750GB Festplatten -- 4096MB Ram von Corsair!!! -- 2 NVIDIA Geforce 8800 GTX Crossfire PCIexpress *16 -- AMD Athlon 64 X2 5000+ -- Komplettes Gehäuse mit Neonröhren(u.a. Schwarzlicht) beleuchtet -- 1000 Watt Netzteil von Be Quiet

Neue Antwort erstellen


Übersicht BlitzBasic Allgemein

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group