Beiträge von Icynator

Icynator

aber dafür muss ja process explorer immer laufen...
und wenn ich des programm neu gestartet hab müsst ich ja im process explorer das programm erst wieder extra suchen und auf properties klicken und so...

das muss doch i-wie gehn das autoit selbst prüfen kann ob das programm noch ne verbindung hat

Icynator

Ich weiß ja eben auch net wie ich des erkennen könnte...
aber z.b. das Programm Process Explorer kanns....
Da sieht das ganze so aus:

Bei bestehender Verbindung:
_Dubletten_list_MPA_GUI.au3

Bei sich schließender Verbindung:
Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

Bei geschlossener Verbindung:
Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

autoBert
dann hab ich aber das Problem das sich während dessen ja gerade ne Datei hochladen könnte und das dann abgebrochen wird
oder eben genau nach die 4 stunden nachdem das Programm neu gestartet wurde die i-net verbindung mal abkackt...

Icynator

?!
Das Programm beendet sich doch nicht selbst?!

Die verbindung geht manchmal verloren (vor allem nach dem 24h dc)

Icynator

in dem window wird aber nicht angezeigt ob die verbindung vorhanden is...
ich stell das immer mit process explorer fest ob die verbindung noch besteht...

Icynator

Hey leute,
ich hab mal eine Frage,
und zwar hab ich bei mir daheim ein Upload Programm am laufen,
das an ne bestimmte ip auf nem bestimmten port dateien schickt,
jetzt bricht das programm aber öfters mal ab und ich muss es neu starten,
da ich aber oft nich zuhause bin wollte ich das über ein autoit tool auslesen lassen ob das programm noch mit dem server verbunden is und wenn nich das programm neu startet...

allerdings wüsst ich überhaupt nicht wie ich das lösen sollte...

Icynator

deine seite is down
kannst dus bitte nochmal i-wo hochladen?

Icynator

funzt
thx

Icynator

Benutz ich auch

So ne dll is ja schnell neu geschrieben

Und da ich dein post aus dem anderen Thread gelesen hab wusste ich des ja und habs beachtet

Icynator

ich fürs als x86 aus oO
Hab nämlich noch die XP SP3 Version mit 32 bit
Also beim Compiler von AutoIt is auf jeden fall x86 eingestellt

Icynator

test1.dll...

hab auf @error getestet... dann kommt raus das er die funktion nicht findet... also liegts wahrscheinlich echt daran das er keine .net dll verwenden kann...

EDIT:\\ Wenn ich die dll mitn dotNET DLL-Exporter umwandel kommt immer autoit hat ein problem festgestellt und muss.................

Icynator

ich hab das nach einem tutorial von einem aus dem forum hier gemacht...
der hat gemeint sobald die dll korrekt verwendet wird steht in $return[0] keine 0...

Icynator

Also ich hab grad probiert meine eigene dll datei mit dllcall zu verwenden...
Allerdings klappt das nicht
Wo liegtn da der Fehler:

Dll Code (in VB.NET 2008)

Code

Public Class Class1


    Public Function ADD(ByVal first As Integer, ByVal sec As Integer)
        Dim abc As Integer
        abc = first + sec
        Return abc
    End Function


    Public Function Subtraction(ByVal first As Integer, ByVal sec As Integer)
        Dim abc As Integer
        abc = first - sec
        Return abc
    End Function


    Public Function Multiplication(ByVal first As Integer, ByVal sec As Integer)
        Dim abc As Integer
        abc = first * sec
        Return abc
    End Function


    Public Function Division(ByVal first As Integer, ByVal sec As Integer)
        Dim abc As Integer
        abc = first / sec
        Return abc
    End Function


End Class

Alles anzeigen

Autoit Code:

[autoit]

$return = DllCall("test1", "int", "ADD", "int", 5, "int", 5)
If $return[0] = 0 Then MsgBox("","","")

[/autoit]

die dll heißt compiled test1.dll und liegt im selben verzeichniss wie die autoit source...

error der kommt:

C:\Dokumente und Einstellungen\Icynator\Eigene Dateien\Visual Studio 2008\Projects\test1\test1\bin\Release\Neu AutoIt v3 Script.au3 (2) : ==> Subscript used with non-Array variable.:
If $return[0] = 0 Then MsgBox("","","")
If $return^ ERROR

mfg
Icynator

Lösung:

vb.net source:

Code

Public Class Class1


    Public Function ADD(ByVal first As Integer, ByVal sec As Integer) As Integer
        Dim abc As Integer
        abc = first + sec
        Return abc
    End Function


End Class

Alles anzeigen

Mit dem dotNET DLL-Exporter umwandeln zu ner kompatiblen dll

und verwenden

Icynator

Hi,
da ich nicht weiß wo das jetzt hingehört habe ich es mal hier gepostet weil ich dachte das passt hier am besten rein.
Und zwar hab ich folgenden Auftrag:

Könnte jemand die zwei Scripte von Sprenger120 entweder zu Visual Basic .NET oder nach C# umschreiben?

Währe nett.

mfg
Icynator

Icynator

Danke sehr nice
habs mir selbst umgeschrieben
THX an alle die geholfen haben

Icynator

Zitat von Sprenger120

#include <GUIConstantsEx.au3> ;~ Server Ip $MaxConnect = 100 TCPStartup() $Socket = TCPListen(@IPAddress1, 3333, $MaxConnect) ;~ für 100 Clients Dim $Verbindung[$MaxConnect] For $x = 0 To UBound($Verbindung) - 1 $Verbindung[$x] = -1 Next While 1 For $x = 0 To UBound($Verbindung) - 1 If $Verbindung[$x] = -1 Then $Verbindung[$x] = TCPAccept($Socket) EndIf If $Verbindung[$x] <> -1 Then $Resv = TCPRecv($Verbindung[$x], 2048) If @error Then TCPCloseSocket($Verbindung[$x]) $Verbindung[$x] = -1 EndIf If $Resv <> "" Then For $y = 0 To UBound($Verbindung) - 1 If $Verbindung[$y] <> -1 Then TCPSend($Verbindung[$y], $Resv) Next EndIf EndIf Next WEnd

kommt n error xD

I:\AutoIt Projekte\Game\Client.au3(43,39) : WARNING: $Client: possibly used before declaration.
$Message = TCPRecv($Client,
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
I:\AutoIt Projekte\Game\Client.au3(43,39) : ERROR: $Client: undeclared global variable.
$Message = TCPRecv($Client,

Icynator

Oscar meint nicht bei dir sondern generell die Mitgliederliste....
Denn wenn du auf forum gehst und dann ganz runter scrollst steht unten bei der statistik 5555

Icynator

Mag jetzt stark nach ner ausrede klingen aber ich hab die alle wieder gelöscht

ich glaub auch das ich die scripte versteh wenn mir jemand was postet

aber ich versuchs nochmal und poste meine versuche dann

Icynator

Hi leute,
ich möchte ein spiel mit autoit schreiben das über tcp an nen server connectet...
aber ich bekomms einfach nicht gebacken

die dateien sollen eig. folgendes machen:

server:

bekommt string
arbeitet ne funktion ab
schickt nen string zurück

client:

schickt was am server
wartet bis ne antwort kommt
arbeitet mit der antwort weiter

das ganze sollte natürlich mit unbestimmt vielen clients laufen....
und der client sollte auch nicht nur einmal was senden können und dann neu gestartet werden müssen...

ich bekomms einfach nich hin bin jetzt scho 3 tage am basteln aber ich schaffs einfach nicht...

könnte mir bitte jemand 2 beispielscripte machen?

EDIT: Meine Versuche sin als dateianhänge dabei...

mfg
Icynator

Icynator

warum spinnt das script bei dem abschnitt in der angehängten datei?

quellcode is der:

[autoit]

$textuisystem_handle = FileOpen("textuisystem3.txt", 128)
$textuisystem_final_handle=fileopen("textuisystem4.txt",129)
$line = 0
While 1
$textuisystem_contents = FileReadLine($textuisystem_handle, $line)
If @error = -1 Then ExitLoop
#cs
Switch $textuisystem_contents
Case ""

[/autoit][autoit][/autoit][autoit]

EndSwitch
#ce
FileWrite($textuisystem_final_handle,$textuisystem_contents & @CRLF)
$line +=1
Wend

[/autoit][autoit][/autoit][autoit]

FileClose($textuisystem_handle)
fileclose($textuisystem_final_handle)

[/autoit]

Icynator

warum macht der wenn ich das so mach zwischen jeden buchstaben n leerzeichen
und aus zahlen nen ?

[autoit]

$textuisystem_handle = FileOpen("textuisystem2.txt", 16)
$textuisystem_final_handle=fileopen("textuisystem3.txt",17)

[/autoit][autoit][/autoit][autoit]

While 1
$textuisystem_contents = FileReadLine($textuisystem_handle)
If @error = -1 Then ExitLoop
#cs
Switch $textuisystem_contents
Case

[/autoit][autoit][/autoit][autoit]

EndSwitch
#ce
FileWrite($textuisystem_final_handle,$textuisystem_contents & @CRLF)
Wend

[/autoit][autoit][/autoit][autoit]

FileClose($textuisystem_handle)
Fileclose($textuisystem_final_handle)

[/autoit]

EDIT: okay habs... ich muss die zu lesende datei mit dem parameter 128 öffnen und die zu schreibende mit 129

Beiträge von Icynator

Besteht Verbindung?

Besteht Verbindung?

Besteht Verbindung?

Besteht Verbindung?

Besteht Verbindung?

DeskLock

DLLCall

DLLCall

DLLCall

DLLCall

DLLCall

DLLCall

AutoIt Script zu C# oder VB.net

tcp server / client

tcp server / client

User Nr. 5555

tcp server / client

tcp server / client

StringReplace mit Binär

StringReplace mit Binär