Beiträge von chip

**chip**

Meinst das so:

Spoiler anzeigen

[autoit]

#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate('MyGUI', 300, 300)
$Tab1 = GUICtrlCreateTab(20, 20, 262, 261, $TCS_FOCUSONBUTTONDOWN)
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$Button1 = GUICtrlCreateButton("Button1", 32, 64, 75, 25)
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
$TabSheet3 = GUICtrlCreateTabItem("TabSheet3")
GUICtrlCreateTabItem('')
GUICtrlSetState(-1,$GUI_SHOW)
GuiCtrlSetState(-1,$GUI_ONTOP)
$hPic = GUICtrlCreatePic(@ScriptDir & '\Tech.bmp', 0, 0, 300, 300, $WS_CLIPSIBLINGS )
GuiCtrlSetState(-1,$GUI_DISABLE)

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

GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

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

EndSwitch
WEnd

[/autoit]

**chip**

Würde an deiner Stelle die Outlook-UDF nehmen: http://www.autoitscript.com/forum/topic/126305-outlookex-udf/

**chip**

autoBert doch ist vollkommen richtig, was _StringBetween ausgibt.

Da _StringBetween den String Stück für Stück zerlegt.

Beispiel :

Startstring: S!1654.0!879.5!VIA05_NEW!UNNAMED_1_ELKO_I547_A!!
erster suche ergibt 1654.0
Reststring: 879.5!VIA05_NEW!UNNAMED_1_ELKO_I547_A!!
zweite suche ergibt: VIA05_NEW
Reststring: UNNAMED_1_ELKO_I547_A!!
dritte sucher Ergibt:

Hier noch Scriptvorschlag von mir zum kürzen. Getestet mit einer pcb mit 50k Zeilen:

Spoiler anzeigen

[autoit]

#include <String.au3>
#include <Array.au3>
#include <File.au3>
Global $Path

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

_Laden()

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

Func _Laden()
Local $aTmp, $aSource, $aResult
$Path = FileOpenDialog("Bitte PCB-Datei wählen.", @DesktopDir & "\", "PCB-File (*.pcb)", 1 + 4)
If @error = 1 Then MsgBox(0, "", "Keine Datei ausgewählt.")
If @error = 2 Then MsgBox(0, "", "Falscher Dateifilter")
_FileReadToArray($Path, $aSource)
Dim $aResult[$aSource[0] + 1][19]

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

$file = FileOpen($Path, 2)
For $i = 1 To $aSource[0]
ToolTip($i)
$aTmp = StringSplit($aSource[$i], '!', 2)
If UBound($aTmp) > 10 Then
$zeichen = StringLen($aTmp[10])
If $zeichen > 15 Then
$aTmp[10] = StringTrimRight($aTmp[10], $zeichen - 15)
EndIf
EndIf
$final = _ArrayToString($aTmp, "!")
FileWriteLine($file, $final)
Next
FileClose($file)
EndFunc ;==>_Laden

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

Oder alternative den Wert ganz löschen:

Spoiler anzeigen

[autoit]

#include <String.au3>
#include <Array.au3>
#include <File.au3>
Global $Path

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

_Laden()

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

Func _Laden()
Local $aTmp, $aSource, $aResult
$Path = FileOpenDialog("Bitte PCB-Datei wählen.", @DesktopDir & "\", "PCB-File (*.pcb)", 1 + 4)
If @error = 1 Then MsgBox(0, "", "Keine Datei ausgewählt.")
If @error = 2 Then MsgBox(0, "", "Falscher Dateifilter")
_FileReadToArray($Path, $aSource)
Dim $aResult[$aSource[0] + 1][19]

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

$file = FileOpen($Path, 2)
For $i = 1 To $aSource[0]
ToolTip($i)
$aTmp = StringSplit($aSource[$i], '!', 2)
If UBound($aTmp) > 10 Then
$zeichen = StringLen($aTmp[10])
If $zeichen > 15 Then
$aTmp[10] = ""
EndIf
EndIf
$final = _ArrayToString($aTmp, "!")
FileWriteLine($file, $final)
Next
FileClose($file)
EndFunc ;==>_Laden

[/autoit]

**chip**

Also bei der Datei im Anhang funktioniert dein Script problemlos. Alle Zeilen werden richtig ausgegeben.

**chip**

Wenn dan wäre es der 01.01.1970, aber er formatiert ja die Zelle von daher hat es damit eigentlicht nichts zu tun.

**chip**

Schon etwas ältere UDF: http://www.autoitscript.com/forum/topic/12…t-com-port-udf/

**chip**

Kannst so machen:

[autoit]

$pfad = "d:\xxx\" & @UserName
DirCreate($pfad)
DirMove ($pfad,$ziel)

[/autoit]

**chip**

Zitat von Timtam

ich hab das schon verstanden....ich hab ihn nur erstmal, um den debug durchführen zu können, als merger für die Includes in ein großes Script genutzt.

Nein hast du leider nicht. Ein Obfuscator ist dafür da um einen Quelltext "schwerer" lesbar für das menschliche Auge zu machen. Da Autoitobject aber eine Erweiterung von Autoit darstellt welche der Autoiinterne Obfuscator nicht kennt kommt da nur Schrott raus.

**chip**

Mh dir scheint das Grundlegende Verständniss dafür zu fehlen für was ein Obfuscator da ist bzw. was dieser macht: http://de.wikipedia.org/wiki/Obfuscator

**chip**

Nein musst du nich. Ließ dir die Hilfe dazu durch.

**chip**

Um dir alle Fenster mit dem jeweiligen Handle ausgeben zu lassen, kannst du diesen Befehl verwenden:

[autoit]

WinList()

[/autoit]

**chip**

Wünsche euch auch allen einen guten Rutsch und fallt nicht auf die Nase ;).

**chip**

Würde mal sagen Virenscanner updaten.

**chip**

Ja ist es, allerdings frage ich mich warum ihr dann nicht z.b. PaperCut im Einsatz habt. Da bekommst bei einem von dir definierte Tonerstand einfach eine Email welche dich darüber Informiert: http://www.papercut.ch/

**chip**

Kann ich nicht nachvollziehen, bei mir gehts es unter Win 7 64 bit ohne Probleme.

**chip**

Moin,

ich wünsche allen frohe Weihnachten. Lasst euch das Weihnachtsessen gut schmecken und euch reich beschenken.

[Blockierte Grafik: http://masztalerz.files.wordpress.com/2010/01/kar_0881.jpg]

**chip**

Weil für Excel die Klasse [CLASS:XLMAIN] heißt. Mit Autoit wurde das Tool "AutoIt Window Info" installiert, damit kannst die die Infos eines Fensters/Elements anzeigen lassen.

**chip**

Dann ist das ganze wohl vom Motherboard bzw. BIOS abhängig weil bei mri geht z.b. das Festplattentemperaturscript.

**chip**

Jub weil seit IE 6 das ohne Änderung in der Registry nichtmehr geht: http://support.microsoft.com/kb/834489/de

Zitat

Deaktivieren des neuen Standardverhaltens bei der Verarbeitung von Benutzerinformationen in HTTP- oder HTTPS-URLs
Um das neue Standardverhalten in Windows Explorer und Internet Explorer zu deaktivieren, erstellen Sie die DWORD-Werte iexplore.exe und explorer.exe in einem der folgenden Registrierungsschlüssel, und setzen Sie die Werte auf 0:

Legen Sie den Wert für alle Benutzer des Programms im folgenden Registrierungsschlüssel fest:
HKEY_LOCAL_MACHINE\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_HTTP_USERNAME_PASSWORD_DISABLE
Legen Sie den Wert nur für den aktuellen Benutzer des Programms im folgenden Registrierungsschlüssel fest:
HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_HTTP_USERNAME_PASSWORD_DISABLE

**chip**

Bei htaccess kannst usernamen und pw direkt in der URL übergeben:

Code

http://BENUTZER:PASSWORT@URL

Edit: Ok man sollte den ganzen Thread lesen.

Beiträge von chip

Button bleibt trotz Tab-Wechsel da

Drag & Drop mit E-Mail

Problem mit _stringbetween

Problem mit _stringbetween

Datumsformat wird nicht richtig übernommen

mit AutoIt über COM-Port LED-Würfel ansteuern. Geht das ?

Bestimmten ordner kopieren

Zeilennummern in kompilierten Scripts auch mit Obfuscator nicht nachvollziehbar

Zeilennummern in kompilierten Scripts auch mit Obfuscator nicht nachvollziehbar

Fenster ohne Klasse und Titel ansprechen

Fenster ohne Klasse und Titel ansprechen

Jahreswechsel

_FFStart() öffnet 4242.com

CSV auswerten

Decode Produktkey 64 Bit oder Server 2008

Frohe Weihnachten

WinActivate Frage

Temperaturen per WMI auslesen Win7

Download aus geschütztem Bereich

Download aus geschütztem Bereich