Aus Excel abgeleitet Dateistrukturen anlegen....

...und später noch viel mehr!

Hallo Autoitexperten.

Da ich als Redakteur für eine Webseite immer wieder html Seiten aufsetzen muss und dabei immer wiederkehrende gleiche Arbeitsschritte machen muss hier der Versuch das zu automatisieren. Alleine kriege ich das aber nicht hin.

Ausgehend von einem Laufzettel in Excel, der so (siehe Grafik ) aussieht
[Blockierte Grafik: http://roferix.de/excel_laufzettel.png]

möchte ich automatisiert einen entsprechenden Verzeichnisbaum erstellen lassen.
Das sähe dann so aus (siehe Grafik)
[Blockierte Grafik: http://roferix.de/Dateiverzeichnis.png]

Das Excel demo füge ich als Datei an! (excel_demo.xls)

Ich habe als Neuanfänger auch schon etwas herumexperimentiert und komme bereits über die UDF Excel.au3 an die Exceldaten.

Dann weiss ich aber nicht mehr weiter.

Hilfreich wäre alleine schon folgendes.

Wie greife ich da auf die einzelnen Werte zu. Es scheint ja ein mehrdimensionales Array zu sein ?!

Wäre nett wenn Ihr mir helfen könntet.

Dies ist nur der erste Schritt ... Danach kommen noch weitere!

So soll nämlich zu einem späteren Zeitpunkt in den jeweils entstehenden Ordnern eine index.html angelegt werden.
Diese sollte ordnerscharf jeweils den Title (TAG) aus der entsprechenden Excelzeille bekommen.

Aber fange wie erstmal mit dem ersten Schritt an!

Euch einen schönen Abend und ich bin dankbar für jeden Beitrag

Rochus

Danke schon Mal!

Ich habs gerade mal getestet. Es kommt folgende Fehlermeldung!

[Blockierte Grafik: http://roferix.de/error1.png]

Ich bin gerade in der in der Schule und kann mich erst heute nachmittag intensiv damit beschaffen.

Arbeitest du mit der neuesten Excel udf ?Da hat sich wohl was geändert.
Vielleicht könntest du mir Deine excel.au3 mal senden.

Mail: Rochus@online.de

zu Deinen Fragen: xyz.docx

Jede Zeile in Excel entspricht nachher physikalisch einer Webseite.
der Laufzettel beschreibt was auf jeder Seite an Inhalten steht. Dies sind in der Regel nach html umgesetzte Worddokumente.
Auf jeder einzelnen Webseite wird dann auch der Download der Originaldatei angeboten.

und..
Das Script braucht nicht dynamisch zu sein. Die Struktur ist immer gleich!

Auch dies sollte irgendwann automatisch geschehen. Aber soweit sind wir noch lange nicht.

Der Lösungsansatz ist bereits jetzt sehr hilfreich für mich. Danke dafür.

Gruß Rochus

Vielen Dank für Eure Beiträge!

OK...habe verstanden. Es gibt tatsächlich zwei Versionen, Ich möchte das mit der aktuellen Version machen.

Hab das soweit mal angepaßt, dass die Excedatei mit der neuen UDF angezeigt wird.

Es werden aber keine Ordner angelegt!

Ich habe da ein Verständnisproblem und muss es mir noch mal durch den Kopf gehen lassen.

#include <Array.au3>
#include <Excel.au3>
#include <MsgBoxConstants.au3>

;

#Region declaration
Local $oExcel = _Excel_Open()
Local $sWorkbook = @ScriptDir & "\excel_demo.xls"
Local $oWorkbook = _Excel_BookOpen($oExcel, $sWorkbook, Default, Default, True)
Local $sDir = @ScriptDir & "\Verzeichnisbaum" ; Pfad des Verzeichnisbaum
#EndRegion

#Region actions

If $oWorkbook = 0 Or @error = 2 Then
MsgBox( 16, "Error", "Die angegebene Datei existiert nicht!" )
Exit
EndIf

$aExcelContent = _Excel_RangeRead($oWorkbook, Default, Default, 2) ; Excel-Datei auslesen
_ArrayDisplay( $aExcelContent ) ; Anzeige zum Debugging

; Schleife die bis zur letzten Zeile das 2D-Array durchläuft
; und die Verzeichnisebenen ermittelt und anlegt
For $i = 1 To UBound( $aExcelContent, 1 ) - 1
; Ebene 1
If $aExcelContent[$i][1] <> "" Then
$sE1 = $aExcelContent[$i][5] & "" ; Ebene 1 zwischenspeichern
If DirCreate( $sDir & $aExcelContent[$i][5] & "" ) = 0 Then
MsgBox( 16, "Error", "Verzeichnis " & $sDir & $aExcelContent[$i][5] & _
" konnte nicht angelegt werden." )
Exit
EndIf
EndIf

; Ebene 2
If $aExcelContent[$i][2] <> "" Then
$sE2 = $aExcelContent[$i][5] & "" ; Ebene 2 zwischenspeichern
If DirCreate( $sDir & $sE1 & $aExcelContent[$i][5] & "" ) = 0 Then
MsgBox( 16, "Error", "Verzeichnis " & $sDir & $sE1 & $aExcelContent[$i][5] & _
" konnte nicht angelegt werden." )
Exit
EndIf
EndIf

; Ebene 3
If $aExcelContent[$i][3] <> "" Then
$sE3 = $aExcelContent[$i][5] & "" ; Ebene 3 zwischenspeichern
If DirCreate( $sDir & $sE1 & $sE2 & $aExcelContent[$i][5] & "" ) = 0 Then
MsgBox( 16, "Error", "Verzeichnis " & $sDir & $sE1 & $sE2 & $aExcelContent[$i][5] & _
" konnte nicht angelegt werden." )
Exit
EndIf
EndIf

; Ebene 4
If $aExcelContent[$i][4] <> "" Then
If DirCreate( $sDir & $sE1 & $sE2 & $sE3 & $aExcelContent[$i][5] & "" ) = 0 Then
MsgBox( 16, "Error", "Verzeichnis " & $sDir & $sE1 & $sE2 & $sE3 & $aExcelContent[$i][5] & _
" konnte nicht angelegt werden." )
Exit
EndIf
EndIf
Next

_Excel_BookClose( $oExcel ) ; Schließen der Excel-Datei
#EndRegion

Gruß Rochus

update...

@userisgratefull

Hab jetzt Deine Lösung 1 zu 1 umgesetzt, aber mit der alten Excel.au3

Ergebnis siehst du in der Grafik.

Ich werte das mal als Teilerfolg.

[Blockierte Grafik: http://roferix.de/verzeichnisbaum1.png]

Die Ordner wurden erstellt - allerdings nicht "einsortiert"

Aber jetzt habe ich was in der Hand mit dem ich herumexperimentieren kann.

Gruß Rochus

@UserIsGratefull
#

DIES TRIFFT ES GANZ GENAU.

Du ahnst gar nicht wie viel stupide Arbeit du mir damit abnimmst. Übliche Publikationen bei uns haben ca. 200 Seiten. Entsprechend viele Ordner anlegen. Title benennen. Downloadlinks benennen usw.

Da geht allein fürs Anlegen der Struktur leicht 8 ZeitStunden drauf. Das Ganze nun auf Knopfdruck. Perfekt.

ICH DANKE DIR.

Das ermutigt mich aber auch noch einen Schritt weiter zu gehen und zu automatisieren was nur irgendwie geht.

Ich werde das mal verinnerlichen damit ich das auch verstehe und dann geht es weiter...

Gruß vom dankbaren Rochus

der nächste Baustein wäre jetzt eigentlich folgender.

Jede nun existierende Webseite soll auch einen Link enthalten der auf der im Laufzettel darunterstehenden Webseite relativ verlinkt.

Klartext: Unten auf jeder Seite steht dann "Weiter zu *ensprechender Title""

Dabei muss wahrscheinlich eine Pfadkonvertierung gemacht werden. Denn lokal auf der Festplatte würde man vielleicht folgenden Pfad haben

D:\LFB\server\faecher\chemie\bs\6bg\fb1

da es ja nachher auf den webserver hochgeladen werden soll, muss dann der Pfad angepasst für das Beispiel so lauten.

/server/faecher/chemie/bs/6bg/fb1/

Es reicht übrigens immer nur den Ordner zu adressieren, da jeder Ordner immer nur eine html Datei enthält und zwar die index.html.

Die ganze Downloadproblematik stelle ich jetzt noch mal zurück, da dies etwas komplexer ist und teilweise mehrere Dateien pro Seite zu referenzieren sind, die zudem noch in unterschiedlichen Ordnern verordnet sind.

Eine weiterer Schritt ist die Erstellung von Steuerdateien, die die Navigationstruktur der Seiten abbildet.

In jedem Ordner, der Unterordner enthält, muss dort also eine Textdatei stehen die einen Verweis auf die darunterliegenden Ordner enthält.

So enthalten die Ordner der 1 Ebene ,die ja Unterordner enthalten, eine genmenu.txt Datei deren Eintrag sollte beispielsweise so lauten

Title1=>/faecher/chemie/bs/6bg/fb1/
Title2=>/faecher/chemie/bs/6bg/fb2/
Title3=>/faecher/chemie/bs/6bg/fb3/

So enthalten die Ordner der 2 Ebene ,die ja Unterordner enthalten, eine hmenu.txt Datei deren Eintrag sollte beispielsweise so lauten

Title1_1=>/faecher/chemie/bs/6bg/fb1/ordner1/
Title1_2=>/faecher/chemie/bs/6bg/fb1/ordner2/
Title1_3=>/faecher/chemie/bs/6bg/fb1/ordner3/

So enthalten die Ordner der 3 Ebene ,die ja Unterordner enthalten, eine hmenu1.txt Datei deren Eintrag sollte beispielsweise so lauten

Title1_1_1=>/faecher/chemie/bs/6bg/fb1/ordner1/ordner1_1/
Title1_1_2=>/faecher/chemie/bs/6bg/fb1/ordner1/ordner1_2/
Title1_1_3=>/faecher/chemie/bs/6bg/fb1/ordner1/ordner1_3/

So enthalten die Ordner der 4 Ebene ,die ja Unterordner enthalten, eine hmenu2.txt Datei deren Eintrag sollte beispielsweise so lauten

Title1_1_1_1=>/faecher/chemie/bs/6bg/fb1/ordner1/ordner1_1/ordner1_1_1
Title1_1_1_2=>/faecher/chemie/bs/6bg/fb1/ordner1/ordner1_1/ordner1_1_2
Title1_1_1_3=>/faecher/chemie/bs/6bg/fb1/ordner1/ordner1_1/ordner1_1_3

Wir haben also 4 Navigationsebenen. Mehr kann auch die Webpage mit einer festen Breite nicht sinnvoll darstellen.

Die lauten also genmenu.txt , hmenu.txt , hmenu1.txt, hmenu2.txt

Der Server sammelt sich diese Steuerdateien und baut daraus das entsprechende Navigationsmenü .

Dies muss bis jetzt, mehr oder weniger, händisch gemacht werden. Zum Wahnsinnig werden!!

So weit erst mal.

Gruß Rochus

Sooo

hab schon mal weiter gemacht!

Sieht nun folgendermaßen aus.

Ich hab auch mal ein realistischeres Excelfile dazugelegt.

Ich scheitere gerade an folgendem Problem.

Nun soll auf jeder Seite ein Link zur nächsten Seite und ein Link zur vorherigen Seite angebracht werden.

Auf der 2ten Seite sähe das so aus

zurück zu Title1 -- weiter zu Title 3

Das Problem ist das man ja evtl. ebenenübergreifend verweisen muss.
Das bedeutet wenn ich vom Ordnerebene1 auf Ordnerebene2 verweise muss ich ja eine Ebene höher verweisen und umgekehrt natürlich auch.

Außerdem habe ich in Excel die Spalte Dateien eröffnet. Dort liegt die Pfadinformation zur ensprechenden Datei
Dies in folgender Form.
Name|Pfad (also: getrennt durch das Sonderzeichen '|')

Aus diesen Informationen sollte dann der Downloadlink gebildet werden:

Name: herunterladen (herunterladen ist dann entsprechend mit dem Pfad verlinkt)

Ich denke dann ist auch genug automatisiert und schon viel erreicht.

Vielen Dank für Eure Anregungen.

Exceldatei und Script habe ich angefügt.

Gruß

Rochus