html - Anzeigeprogramm

Dieses Thema html - Anzeigeprogramm im Forum "Windows XP Forum" wurde erstellt von aroso261296, 15. Jan. 2008.

Thema: html - Anzeigeprogramm Hallo !! Ich suche ein Programm wo ich einen html-Text anzeigen lassen kann !! Hintergrund ist der, das ich ein...

  1. Hallo !!

    Ich suche ein Programm wo ich einen html-Text anzeigen lassen kann !!
    Hintergrund ist der, das ich ein Programm habe wo ich mehrere Artikel im html-Format bearbeiten muss,
    diesen aber erst nach dem Hochladen sehen kann. Dies möchte ich aber schon vorher sehen. Welche möglichkeit gibt es da ??
     
  2. Jeder Browser kann HTML anzeigen, bearbeiten geht mit jedem Editor.
    Komfortable mit Syntax-Highlightning wären z.B. Phase 5 oder Notepad++.

    Falls Datenbanken und PHP mit dranhängen, solltest Du Dir gleich mal XAMPP anschaun.
     
  3. für den Hausgebrauch ..... ;D
    Im Notepad deinen Artikel schreiben mit HTML-Code und allem drum und dran - abspeichern als TXT-Datei.
    Die Textdatei einfach mit der Maus auf das Skript TxTtoHTML.vbs (gezippt) ziehen und du hast eine HTML-Vorschau.
    Es geht auch mit Office Word, falls zu es hast - einfach deinen Artikel im Word schreiben und normal (doc) abspeichern - die DOC-Datei mit der Maus einfach auf das Skript WordtoHTML.vbs (gezippt) ziehen.

    TxTtoHTML.vbs
    Code:
    If WScript.Arguments.Count = 0 Then
    MsgBox Bitte ein Textdokument auf das Script ziehen! ,16, Fehler
    WScript.Quit
    
    Else 
    For Each Pfad In WScript.Arguments
    doku = Pfad
    Next
    End If
    
    Set net = CreateObject(WScript.Network) 
    user = net.UserName
    Set fs = CreateObject(Scripting.FileSystemObject)
    Ordner = fs.GetParentFolderName(WScript.ScriptFullName)'Ordnerpfad
    filename = fs.GetBaseName(doku)'Dateiname ohne Endung 
    Set txt = fs.OpenTextFile(doku)
    html = txt.ReadAll
    txt.Close
    
    html = Replace(html, Chr(13), <br>)
    
    Set text = fs.OpenTextFile(Ordner & \ & filename & .htm , 2, True)
    text.WriteLine <!doctype html public -//W3C//DTD html 4.01 Transitional//EN>
    text.WriteLine <html>
    text.WriteLine <head>
    text.WriteLine <title> & filename & </title>
    text.WriteLine <meta name=author content= & user &>
    text.WriteLine <meta name=generator content=text.VBS>
    text.WriteLine </head>
    text.WriteLine <body>
    text.WriteLine html
    text.WriteLine </body>
    text.WriteLine </html>
    text.Close 
    
    Set ws = CreateObject(WScript.Shell)
    ws.Run Chr(34) & Ordner & \ & filename & .htm & Chr(34)
    WordtoHTML.vbs
    Code:
    Beschreibung:
    ' Mit dem Script können per Drag & Drop Word Dokumente (DOC) in .html
    ' Dateien konvertiert werden. Dabei wird ein neues Html- Dokument mit dem
    ' Namen des Word Dokuments und der Endung .html 
    ' in dem Ordner wo das Script liegt erstellt.
    ' Am original Word Dokument wird dabei nichts verändert.
    ' Dateien die nicht die Endung .doc haben, werden ignoriert.
    ' Es können auch mehrere Dokumente auf einmal konvertiert werden
    ' ***************************************************
    Const wdFormatHTML = 8
    
    If WScript.Arguments.Count = 0 Then
    MsgBox Ziehen sie ein Worddokument _
    & auf das Skript! ,16, Fehler
    WScript.Quit
    End If
    
    For Each Datei In WScript.Arguments
     Set objFS = CreateObject(Scripting.FileSystemObject)
     bname = objFS.GetBaseName(Datei)
    ->Dateiname ohnen Endung
     sname = objFS.GetParentFolderName(WScript.ScriptFullName)
    ->Ordnername/Pfad wo das Script liegt
     pname = objFS.BuildPath(sname, bname)
    ->Pfad zusammengesetzt Scriptpfad & Doc-Name ohne Endung
    
     If objFS.GetExtensionName(Datei) = doc Then
    ->Datei auf Endung .doc prüfen
    	Set objWord = CreateObject(Word.Application)
    	Set objDoc = objWord.Documents.Open(Datei)
    	objDoc.SaveAs pname & .html, wdFormatHTML
    	'Doc als *.html speichern
    	objWord.Quit
    
     oeffnen->Das direkte oeffnen der Html- Datei kann 
    ->deaktiviert werden indem ein Hochkomma'(Raute + Shift Taste) 
    ->vor dem oeffnen gesetzt wird. 
     
     End If
    Next
    
    Sub oeffnen
     Set objShell = CreateObject(WScript.Shell)
     objShell.Run Chr(34) & pname & .html & Chr(34)
    End Sub
    mir helfen die Skripte für das Tipparchiv.

    pan_fee
     
Die Seite wird geladen...

html - Anzeigeprogramm - Ähnliche Themen

Forum Datum
TXT-Datei ein HTML einlesen Webentwicklung, Hosting & Programmierung 4. Juli 2014
HTML- anstatt Standard-Ansicht bei Gmail mit Chrome E-Mail-Programme 17. Apr. 2014
HTML Ansicht bei Chrome Web-Browser 15. Apr. 2014
Outlook 2003 druckt keine Mails im html-format Windows XP Forum 4. Okt. 2013
Just Color Picker -> Farbwähler, Pipette, RGB, HTML, HEX Farbcode-Editor Windows XP Forum 6. Sep. 2013