Int_IP() -> integer must be positive

Übersicht

BlitzBasic

Beginners-Corner

	ZaP Betreff: Int_IP() -> integer must be positive	Fr, März 30, 2007 20:12 Antworten mit Zitat
Hi! Tja, der Titel sagt alles.. Ich verwende folgende Funktion: Code: [AUSKLAPPEN] [EINKLAPPEN] Function intIP(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 An die Funktion wird die Variable ServerIP$ übergeben, die vom User eingegen wird. Hab vers. IPs ausprobiert, gehen alle nicht..
Starfare: Worklog, Website (download)

ZaP

Betreff: Int_IP() -> integer must be positive

Fr, März 30, 2007 20:12
Antworten mit Zitat

Hi!

Tja, der Titel sagt alles.. Ich verwende folgende Funktion:

Code: [AUSKLAPPEN]

Function intIP(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

An die Funktion wird die Variable ServerIP$ übergeben, die vom User eingegen wird. Hab vers. IPs ausprobiert, gehen alle nicht..

Starfare: Worklog, Website (download)

	StepTiger	Fr, März 30, 2007 20:16 Antworten mit Zitat
Die Funktion klappt zu 100%. Habe eben folgendes Test-Programm geschrieben: Code: [AUSKLAPPEN] [EINKLAPPEN] ip$="192.168.0.1" Print intIP(ip$) Print DottedIP(intIP(ip$)) Print ip$ WaitKey End Function intIP(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
Noch gestern standen wir am Abgrund, doch heute sind wir schon einen Schritt weiter. Computer: AMD Sempron 3000+; ATI Radeon 9800 Pro; 512 MB DDR RAM 400Mhz; Asus E7N8X-E Deluxe; Samsung 200GB HD 5.4ns acces t Gewinner: BP Code Compo #2 Π=3.141592653589793238...<--- und das aus dem kopf Seit der Earthlings-Diskussion überzeugter Fleisch(fr)esser.

StepTiger

Fr, März 30, 2007 20:16
Antworten mit Zitat

Die Funktion klappt zu 100%. Habe eben folgendes Test-Programm geschrieben:
Code: [AUSKLAPPEN]

ip$="192.168.0.1"

Print intIP(ip$)
Print DottedIP(intIP(ip$))
Print ip$

WaitKey
End

Function intIP(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

Noch gestern standen wir am Abgrund, doch heute sind wir schon einen Schritt weiter.
Computer:
AMD Sempron 3000+; ATI Radeon 9800 Pro; 512 MB DDR RAM 400Mhz; Asus E7N8X-E Deluxe; Samsung 200GB HD 5.4ns acces t
Gewinner: BP Code Compo #2
Π=3.141592653589793238...<--- und das aus dem kopf Laughing

Seit der Earthlings-Diskussion überzeugter Fleisch(fr)esser.

	Markus2	Fr, März 30, 2007 20:28 Antworten mit Zitat
Ich glaube du meintest statt Int_IP() -> integer must be positive das hier Int_IP() -> parameter must be positive !? dann solltest du beim zerlegen halt acht geben ...

Markus2

Fr, März 30, 2007 20:28
Antworten mit Zitat

Ich glaube du meintest statt

Int_IP() -> integer must be positive

das hier

Int_IP() -> parameter must be positive !?

dann solltest du beim zerlegen halt acht geben ...

	Thorsten	Fr, März 30, 2007 20:31 Antworten mit Zitat
Markus2 hat Folgendes geschrieben: Int_IP() -> parameter must be positive !? Und das ist, wenn man die Varibale "ip" nicht als String deklariert. mfG

Thorsten

Fr, März 30, 2007 20:31
Antworten mit Zitat

Markus2 hat Folgendes geschrieben:

Int_IP() -> parameter must be positive !?

Und das ist, wenn man die Varibale "ip" nicht als String deklariert.

mfG

	Markus2	Fr, März 30, 2007 20:33 Antworten mit Zitat
Das mit dem parameter must be positive kommt wenn man einen leer string übergibt

Markus2

Fr, März 30, 2007 20:33
Antworten mit Zitat

Das mit dem parameter must be positive kommt wenn man einen
leer string übergibt Smile

	Thorsten	Fr, März 30, 2007 20:49 Antworten mit Zitat
Markus2 hat Folgendes geschrieben: Das mit dem parameter must be positive kommt wenn man einen leer string übergibt ....wenn man die "$" entfernt, erhält man den gleichen fehler Im Prinzip ist die Variable aber leer. mfG