Hallo,
komme irgendwie nicht weiter.
Versuche eine Hompage per Autoit zu gestalten, zumindest einige Teile davon.
Nun versuche ich mit "_StringBetween" die Formatierung einer Überschrift zu ändern.
Was auch so weit gelingt, nur wenn ich die Farbe ändere wird auch die Farbe des drunter stehenden Textes geändert.
Mir fällt da so langsam nichts mehr zu ein warum das so ist.
AutoIt
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <FTPEx.au3>
#include <Misc.au3>
#include <ProgressConstants.au3>
#include <WinAPISys.au3>
#include <GDIPlus.au3>
#include <File.au3>
#include <Array.au3>
#include <String.au3>
#include <GuiStatusBar.au3>
#include <GuiToolbar.au3>
#include <ToolbarConstants.au3>
#include <GuiEdit.au3>
#include <IE.au3>
#include <INet.au3>
#include <GuiRichEdit.au3>
#include <Color.au3>
#include <GUIListBox.au3>
Local $a_font = _ChooseFont("Arial", 12)
If (@error) Then
MsgBox(0, "", "_ChooseFont-Fehler: " & @error)
Else
$neulesen_font = $a_font[2]
$neulesen_groesse = $a_font[3]
$neulesen_farbe = $a_font[7]
$farbwert = StringTrimLeft($a_font[7],2)
;###################### Font Überschrift ############
$text = FileRead("1.txt")
$aArray1 = _StringBetween($text, '.ueberschrift{text-align:center;font-family:', ';')
If @error Then
$aArray1 = _StringBetween($text, '.ueberschrift{text-align:center;font-family:"', '";')
EndIf
If @error Then MsgBox(64, "Fehler", "Diese Font geht nicht")
$fertig = StringReplace($text, $aArray1[0], $neulesen_font)
$fertig = StringToBinary($fertig, 4)
FileWrite("2.txt", $fertig)
;###################### Größe Überschrift ############
$text2 = FileRead("2.txt")
$aArray2 = _StringBetween($text, '.ueberschrift{text-align:center;font-family:' & $aArray1[0] & ';font-size:', 'px;')
$fertig2 = StringReplace($text2, $aArray2[0], $neulesen_groesse)
$fertig2 = StringToBinary($fertig2, 4)
FileWrite("3.txt", $fertig2)
;###################### Farbe Überschrift ############
$text3 = FileRead("3.txt")
$aArray3 = _StringBetween($text, '.ueberschrift{text-align:center;font-family:' & $aArray1[0] & ';font-size:' & $aArray2[0] & 'px;color:#', ';')
$fertig3 = StringReplace($text3, $aArray3[0], $farbwert)
$fertig3 = StringToBinary($fertig3, 4)
FileWrite("4.txt", $fertig3)
FileMove("4.txt", "1.html",1)
FileDelete("3.txt")
FileDelete("2.txt")
EndIf
Alles anzeigen
Hier mal die html Datei als Text
Spoiler anzeigen
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title>Test</title>
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
<style type="text/css">
.ueberschrift{text-align:center;font-family:Arial;font-size:26px;color:#000000;
}
.text1 {font-family:"Times New Roman";font-size:12px;color:#000000;
}
.text2 {font-family:"Times New Roman";font-size:12px;color:#000000;
}
.tabelle {
border-collapse: collapse;
border: 4px solid #C0C0C0;
background-color: #FFFFFF;
}
.auto-style1 {
font-size: xx-large;
}
</style>
</head>
<body>
<p> </p>
<table style="width: auto; height: auto;" align="center" class="tabelle">
<tr>
<td style="height: 23px; width: 692px;" class="ueberschrift">
<strong><br><br></strong>
<span class="ueberschrift_groesse"><strong>Dieses ist nur eine Testüberschrift</strong></span>
<br><br>
</td>
</tr>
<tr>
<td class="text1" style="width: 692px">Auch das hier
ist nur von mir geschriebener müll um etwas da stehen zu haben.
Wer das liest ist es wohl selber schuld, wenn auch nur ein bisschen.
Hätte das ganze ja auch in unleserlichen zeichensätzen schreiben können,
wollte ich aber nicht. Hoffe mal das man mir dieses nicht ganz so übel nimmt.
Werde auch versuchen mich zu bessern, oder auch nicht.
Und noch etwas an fülltext, mir gehen langsam, oder aber auch schnell
die ideen die ich vieleicht oder hmmm naja was denn jetzt noch hier hin?
Das sollte aber langsam auch reichen an mülligen text der wie ich gestehen
muss oder aber auch nicht schwer zu verdauen ist.
<br>
<!--Bild1-->
<br>
<!--Bild2-->
<br>
</td>
</tr>
<tr>
<td class="text2" style="width: 692px">
Den zweiten Text erspare ich dir besser!!
<br><br>
<img alt="" height="522" src="../../../img/Jahresabschluss/Jahresabschluss.jpg" width="800"><br><br><br>
<a href="https://de.wikipedia.org/wiki/ICalendar">
Hier noch weitere Bilder zum anschauen und Downloaden
</a><br><br>
</td>
</tr>
</table>
</body>
</html>
Alles anzeigen
Wie kann man das abstellen das sich auch die Farbe unter der Überschrift ändert, oder einfacher was mache ich falsch?
Gruss
Uli