Moin,

z.B. indem Du der Variablen [c]Html[/c] vor oder bei der Ausgabe per [c]FileAppend[/c] HTML-Tags voranstellst, die eine leere Zeile erzeugen.

Die Funktionskörper von Funktionen wie [c]Csv2Html()[/c] würde ich nicht in anderen Code einbetten. Auch wenn es funktioniert, macht es den Code meiner Meinung nach unübersichtlich. Funktionen sind eigenständige Codeabschnitte genauso wie Subroutinen.

StringTrimRight, FromWithOutCsvEnding, From, 4

ButtonConvert:
	Gui, Submit, NoHide
	
	StringTrimRight, FromWithOutCsvEnding, From, 4
	StringRight, csvtest, From, 3
	
	IfEqual, csvtest, csv
	{
		FullPfad = %FromWithOutCsvEnding%.html
		
		FileRead,Csv,%From%
		Html:=Csv2Html(Csv)
		FileAppend,%Html%,%FullPfad%
		Csv2Html(Csv,FeldTrenner=";")
		{
			HochKommas="
			StringReplace,Csv,Csv,%HochKommas%,,all
			StringReplace,Csv,Csv,`r,,all
			StringReplace,Csv,Csv,`n,</td></tr>`r`n<tr><td>,all		
			StringReplace,Html,Csv,%FeldTrenner%,</td><td>,all
			StringTrimRight,Html,Html,20
			Vor=<table border="1" width="100`%">`r`n<tr><td>
			Nach=</td></tr>`r`n</table>
			return Vor Html Nach
		}	
		
		MsgBox,0,, Your new file has been created here: %FullPfad%
		
		MsgBox,4,, Open the new file?
		IfMsgBox No
			Return
		else
			Run %FullPfad%
		
	}else{
		MsgBox,0,, Your input is not a .csv File!
	}

Return

[quote="Gerdi"]eventuell bringt Dich auch
[code]FileRead,Csv,c:\temp\muster.csv
Html:=Csv2Html(Csv)
FileAppend,%Html%,c:\temp\muster.html
run c:\temp\muster.html
Csv2Html(Csv,FeldTrenner=";")
{
HochKommas="
StringReplace,Csv,Csv,%HochKommas%,,all
StringReplace,Csv,Csv,`r,,all
StringReplace,Csv,Csv,`n,</td></tr>`r`n<tr><td>,all
StringReplace,Html,Csv,%FeldTrenner%,</td><td>,all
StringTrimRight,Html,Html,20
Vor=<table border="1" width="100`%">`r`n<tr><td>
Nach=</td></tr>`r`n</table>
return Vor Html Nach
}
[/code]
weiter.[/quote]


Hallo, Danke! hat super gut funktioniert, habe auf die schnelle einen Fenster erstellt mit FileSelectFile ein Datei aussuchen und mit [code]StringTrimRight, FromWithOutCsvEnding, From, 4[/code] die letzten 4 ziffern(.csv) entfernt und als .html gespeichert.Hat super funktioniert.

Aber wie muss ich den Code umändern, sodass ich die erste Zeile freilassen kann, zum Beispiel für einen Firmenlogo? Also das dieser Code immer eine Zeile ganz oben freilässt?

Hier mein veränderter Code:

[code]ButtonConvert:
Gui, Submit, NoHide

StringTrimRight, FromWithOutCsvEnding, From, 4
StringRight, csvtest, From, 3

IfEqual, csvtest, csv
{
FullPfad = %FromWithOutCsvEnding%.html

FileRead,Csv,%From%
Html:=Csv2Html(Csv)
FileAppend,%Html%,%FullPfad%
Csv2Html(Csv,FeldTrenner=";")
{
HochKommas="
StringReplace,Csv,Csv,%HochKommas%,,all
StringReplace,Csv,Csv,`r,,all
StringReplace,Csv,Csv,`n,</td></tr>`r`n<tr><td>,all
StringReplace,Html,Csv,%FeldTrenner%,</td><td>,all
StringTrimRight,Html,Html,20
Vor=<table border="1" width="100`%">`r`n<tr><td>
Nach=</td></tr>`r`n</table>
return Vor Html Nach
}

MsgBox,0,, Your new file has been created here: %FullPfad%

MsgBox,4,, Open the new file?
IfMsgBox No
Return
else
Run %FullPfad%

}else{
MsgBox,0,, Your input is not a .csv File!
}

Return[/code]

Danke
Lg

FileRead,Csv,c:\temp\muster.csv
Html:=Csv2Html(Csv)
FileAppend,%Html%,c:\temp\muster.html
run c:\temp\muster.html
Csv2Html(Csv,FeldTrenner=";")
{
	HochKommas="
	StringReplace,Csv,Csv,%HochKommas%,,all
	StringReplace,Csv,Csv,`r,,all
	StringReplace,Csv,Csv,`n,</td></tr>`r`n<tr><td>,all		
	StringReplace,Html,Csv,%FeldTrenner%,</td><td>,all
	StringTrimRight,Html,Html,20
	Vor=<table border="1" width="100`%">`r`n<tr><td>
	Nach=</td></tr>`r`n</table>
	return Vor Html Nach
}

eventuell bringt Dich auch
[code]FileRead,Csv,c:\temp\muster.csv
Html:=Csv2Html(Csv)
FileAppend,%Html%,c:\temp\muster.html
run c:\temp\muster.html
Csv2Html(Csv,FeldTrenner=";")
{
HochKommas="
StringReplace,Csv,Csv,%HochKommas%,,all
StringReplace,Csv,Csv,`r,,all
StringReplace,Csv,Csv,`n,</td></tr>`r`n<tr><td>,all
StringReplace,Html,Csv,%FeldTrenner%,</td><td>,all
StringTrimRight,Html,Html,20
Vor=<table border="1" width="100`%">`r`n<tr><td>
Nach=</td></tr>`r`n</table>
return Vor Html Nach
}
[/code]
weiter.

[url=http://www.blazonry.com/perl/csv2htm_pl.txt]Hier[/url] gibt es einen [url=http://www.blazonry.com/perl/csv2htm.php]csv2htm-Konverter[/url], der in Perl geschrieben ist. Kann man entweder mit Perl verwenden oder (vermutlich nicht allzu schwer) nach AHK umschreiben...

Dankeschön

ich denke ich hatte das mal in OpenOffice - Da kann man das direkt Import/Expotieren.

Vielen Dank, ich komme seit Stunden einfach nicht mehr weiter...
Die File existiert in csv. Ich möchte nur die File in html Tabelle haben, das kann bestimmt nicht so schwer sein oder? ich möchte ungern das ganze Programm umändern (wollte ich zwar am anfang, aber es funktioniert nicht; also es will einfach nicht gehen, dass ich direkt in eine html tabelle schreibe)

gibt es keinen fertig tool, wo man nur den Dateinamen eingibt, und es automatisch convertiert?

Eine sehr gute Adresse zum Thema HTML ist [url]https://selfhtml.org/[/url].

Hallo,
danke für die antwort.
Wie ist der Code für genau diesen Code für Html? ich habe mit <td> und so weiter ausprobiert ging aber nicht so wie ich es wollte.

Moin,

ich verstehe das Problem nicht ganz. Willst Du die Daten in eine von wem auch immer angezeigte HTML-Seite einfügen oder willst Du eine HTML-Datei erstellen. Im zweiten Fall musst Du eben genau das tun, HTML schreiben. ;)

FileCreateDir, %auditdir%\%Delivery%\%Delivery%_%PalletIN%
FileAppend, `nTFT%count%;%MNF%;%Model%;%Size%;%GRD%;%COL%;%SN%;%Delivery%;%PAL1%;%NumberBox1%;%WK1%;%WK2%;%WK3%;%WK4%;%Info1%;%Info2%;%Info3%;Test OK;%FullyDate%,  %auditdir%\%Delivery%\%Delivery%_%PalletIN%\%Delivery%_%PalletIN%.csv

Hallo, ich habe ein Skript geschrieben, welches bei einem GUI Fenster einzelne Textfelder in einer csv Tabelle reinschreibt. Nun würde ich gerne anstatt einer csv direkt in eine html Tabelle eintragen, was muss man ändern? bzw. kann man direkt konvertieren?
am einfachsten wäre für mich direkt in eine html Tabelle reinzuschreiben.

[code=autohotkey file=Untitled.ahk]

FileCreateDir, %auditdir%\%Delivery%\%Delivery%_%PalletIN%
FileAppend, `nTFT%count%;%MNF%;%Model%;%Size%;%GRD%;%COL%;%SN%;%Delivery%;%PAL1%;%NumberBox1%;%WK1%;%WK2%;%WK3%;%WK4%;%Info1%;%Info2%;%Info3%;Test OK;%FullyDate%, %auditdir%\%Delivery%\%Delivery%_%PalletIN%\%Delivery%_%PalletIN%.csv

[/code]