Hallo zusammen,
wer kann mir helfen, die absoluten Pfad-Verweise auf Handles umzubauen? Das Skript funktioniert so zwar einwandfrei, aber ich meine, mit Handles ist es etwas schonender und schneller? Danke !!
[autoit]#include<File.au3>
#include <Array.au3>
#include <ie.au3>
Local $DVISEDatei = "\\mainsrv02\david\import\test.nmr"
Local $sText
$sBaseURL = "http://mainwebsrv01/pw/Query01.php"
$oIE = _IECreate ($sBaseURL,0,0)
$oTable = _IETableGetCollection($oIE, 0)
[/autoit][autoit][/autoit][autoit]$aTableData = _IETableWriteToArray($oTable, True)
_ArrayDelete($aTableData,0)
_ArrayDelete($aTableData,0)
_ArrayDelete($aTableData,1)
_ArrayDelete($aTableData,0)
_ArrayDelete($aTableData,UBound($aTableData))
_IEQuit($oIE)
[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]For $j = 0 To UBound($aTableData, 1) - 1
For $i = 0 To UBound($aTableData, 2) - 1
$sText &= $aTableData[$j][$i] & ";"
Next
$sText = StringTrimRight($sText, 1) & @CRLF
Next
$File = FileOpen($DVISEDatei, 2)
FileWrite($File, $sText)
FileClose($File)
_FileWriteToLine($DVISEDatei,1, "[DEFAULT=2]",0)
_FileWriteToLine($DVISEDatei,1, "[DEL ]",0)
_FileWriteToLine($DVISEDatei,1, "[ADR_NACHNAME,ADR_VORNAME,ADR_EMAIL,ADR_KOMMENTAR,ADR_ANREDE,ADR_TEL_PRIVAT,ADR_TEL_MOBIL,ADR_ANGEZEIGTER_NAME]",0)
_FileWriteToLine($DVISEDatei,1, "[\\mainsrv02\david\archive\user\1001c000\in\c]",0)
_FileWriteToLine($DVISEDatei,1, "[ANSI]",0)
$content = FileRead($DVISEDatei) ; lesen
$content = StringReplace($content, "NULL", "") ; ersetzen
$handle = FileOpen($DVISEDatei, 2) ; Datei zum überschreiben öffnen
FileWrite($DVISEDatei,$content) ; neuen Inhalt schreiben
FileClose($handle) ; Datei schließen
FileClose($content) ; Datei schließen