|
| |
VB.NET - Ein- und Umsteiger| Re: Mit VB eine HTML Datei erstellen und drucken | |  | | Autor: Manfred X | | Datum: 26.05.14 18:20 |
| Du ignorierst meine Erklärungen.
Habe ich gepostet, daß Du HTML als String deklarieren sollst?
Das wird inferentiell oder explizit deklariert: siehe oben.
| |
| Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 25.05.14 23:09 |
| Hallo zusammen.
Bin absoluter vb-newbie und bastel gerade an einem Rechner rum um mol/l in g/l ect umzurechnen.
Das habe ich bisher gut hingekriegt nur würde ich noch gerne das Resultat der Berechnung in ein formatiertes Dokument (in meinem Beispiel html, jedoch weiß ich nicht was vb da noch bereit hält, evtl gibts ja noch was einfacheres/besseres)
Das Problem welches ich gerade habe ist:
1. End Sub wird nicht akzeptiert. Vb Express scheint den Code noch immer als html zu interpretieren. Was fehlt da noch? Habe ich die Variablen richtig integriert? Fehler: End of erwartet.
2. Gibt es einen Befehl der das html Dokument gleich mittels browser druckt?
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles Button1.Click
Dim lHtmlDoc = <html>
<head>
<title>Umrechnung <%= Stoff %> von <%= ComboBox1.Text & "/" & _
ComboBox2.Text %> zu <%= ComboBox3.Text & "/" & ComboBox4.Text %></title>
</head>
<a align="center" style="text-align:center">
<h1 align="center" _
style="padding:0px;margin:0px">~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~</h1>
<h1 align="center" style="padding:0px;margin:0px">Umrechnung von <%= _
ComboBox1.Text & "/" & ComboBox2.Text %> zu <%= ComboBox3.Text & "/" & _
ComboBox4.Text %></h1>
<h1 align="center" _
style="padding:0px;margin:0px">~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~</h1>
<center><br>
<br>
<p style="padding:0px;margin:0px">Stoffname: <%= Stoff %><br></p>
<p style="padding:0px;margin:0px">Molare Masse: <%= Masse %> g/mol<br></p>
<p style="padding:0px;margin:0px">Externes Resultat: <%= Input %> <%= _
ComboBox1.Text & "/" & ComboBox2.Text %><br></p>
<br>
<br>
<h4 style="text-align:center"><%= TextBoxInput.Text %><%= ComboBox1.Text _
& "/" & ComboBox2.Text %> _
_
</h4>
<h4 style="text-align:center">----------------------------- x <%= _
Multiplikator %> = <%= Answer %><%= ComboBox3.Text & "/" & ComboBox4.Text %></h4>
<h4 style="text-align:center"><%= Masse %> g/mol _
_
</h4>
<br>
<br>
<h6 align="center" style="padding:0px;margin:0px">xxxxxxxxxxxxxxx</h6>
<h6 align="center" style="padding:0px;margin:0px">x _
ETTIKETTE x</h6>
<h6 align="center" style="padding:0px;margin:0px">xxxxxxxxxxxxxxx</h6>
<br>
<br>
</center><br>
<p style="text-align:center">Datum: <%=Date.Today %> _
Visum:.....................<br></p>
<br><center>
<input align="center" type="button" onclick="window.print()" value='Drucken'>
</p></center></body>
</html>
Dim lFile As String = ""
lFile = print.AddExtension("html")
lHtmlDoc.Save(lFile)
Process.Start(lFile)
End Sub
End Class | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 26.05.14 14:33 |
| Danke habe das Body Element vergessen. Das debuggen geht jedoch noch immer nicht. Es wird noch immer ein end of erwartet und end sub wird nicht interpretiert. Eigentlich kannst du dir den Html-Code wegdenken ausser die Interpretation wird irgendwo im Html gestört. Das scheint jedoch nicht der Fall zu sein. Wenn ich den HTML Code entfernte bis zum Punkt "Dim lHtmlDoc = <html>" bleiben die Fehler bestehen.
Irgendwo fehlt also noch was am Ende.
Dim lHtmlDoc = <html>
...HTML Code...
'hier irgendwo fehlt etwas?
Dim lFile As String = ""
lFile = print.AddExtension("html")
lHtmlDoc.Save(lFile)
Process.Start(lFile)
End Sub
End ClassIrgendwie wird "Dim lHtmlDoc = <html>" nicht abgeschlossen. Sobald ich die Funktion auskommentiere verschwinden die Fehlermeldungen.
Die Verwendung der folgenden Variabel sollte stimmen?
<%= ComboBox1.Text & "/" & ComboBox2.Text %> Oder muss ich diese trennen?
<%= ComboBox1.Text %> & "/" & <%= ComboBox2.Text %> Danke
Beitrag wurde zuletzt am 26.05.14 um 14:41:36 editiert. | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 26.05.14 15:57 |
| Eine Antwort aus einem anderen Forum lautet wie folgt:
--------------------------------------------------------
Also...
Zuerst hast du deine lHtmlDoc-Variable nicht definiert. Dies würde mit OptionStrict ON, meine ich, nicht zugelassen.
Dann hat ein String immer in Aunführungszeichen zu sein. (")
Dann kannst du die Anführungszeichen für den Style aber nicht nutzen. Da musste du dann entweder einen Slash (/) davor schreiben oder einfache Anführungszeichen (') verwenden.
Desweiteren muss ein String immer in einer Zeile sein, ausgenommen du brichst ihn mit " & _ um dann beginnst du die neue Zeile wieder mit einem Anführungszeichen.
Dann ist print nicht definiert, sodass es keine AddExtension-Methode gibt. Außerdem hat eine String-Variable keine Methode Save.
---------------------------------------------------------
Leider versteh ich nicht genau wie das umzusetzen ist? Ich habs folgendermaßen interpretiert:
1. Ich muss bei public class noch die variable lHtmlDoc as String definieren?
2. Das mit strict on versteh ich nicht
3. Ich muss also die HTML in Anführungszeichen schreiben? Z.b.
VB.NET-Quellcode
Dim lHtmlDoc = "<html>" &
"<head>" &
"<title>blabla</title>" &
"</head>" &
"</html>"4. Ich kann " nicht im Style verwenden. Heißt ich muss innerhalb der HTML alle " mit ' ersetzen?
| |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Manfred X | | Datum: 26.05.14 16:08 |
| Hallo!
In VB.Net gibt es neben Strict On noch Infer On.
Falls diese Option gesetzt ist, wird die Deklaration
aus der Zuweisung erschlossen.
In Deinem Fall sähe die inferentiell erschlossene Deklaration so aus:
Dim lHtmlDoc As System.Xml.Linq.XElement
Deshalb: keine Anführungszeichen um die Zuweisung.
Auch das mit dem Umbruch stimmt nicht.
Was sollen diese /br/-Metazeichen bewirken? Ist so was gemeint? <br />
Style sollte ???? etwa so aussehen:
<h1 align="center" style="padding:0px;margin:0px"></h1>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~>
Ich habe an dieser Stelle eine Warnung bekommen.
Beitrag wurde zuletzt am 26.05.14 um 16:30:21 editiert. | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 26.05.14 16:35 |
| Hmm also muss ich jetzt bei Public Class Infer On setzen und muss ich " doch nicht mit ' ersetzen?
Ich schreib mal den Code den ich bisher verwende.
Public Class Form1
'Infer ON <--- Hier?
Dim lHtmlDoc As String ---> Ersetzen mit: "Dim lHtmlDoc As" & _
"System.Xml.Linq.XElement" ?
Public Input As Decimal
Public Masse As Decimal
Public Multiplikator As Decimal
Public Answer As Decimal
Public Faktor As Decimal
Private Sub ButtonSubmit_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles ButtonSubmit.Click
Multiplikator = 1
Input = TextBoxInput.Text
LabelInfo.Text = " "Dann folgt die berechnung und anschliessend soll ein Druck möglich sein
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles Button1.Click
Dim lHtmlDoc = "<html>" &
"<head>" &
"<title>Umrechnung <%= Stoff %> von <%= ComboBox1.Text & " / " &" & _
"ComboBox2.Text %> zu <%= ComboBox3.Text & " / " & ComboBox4.Text %></title>" &
usw...
"</p></center></body>" &
"</html>"
WebBrowser.DocumentText = lHtmlDoc.ToString()
While WebBrowser.ReadyState <> WebBrowserReadyState.Complete
Application.DoEvents()
End While WebBrowser.Print()
End Sub
End ClassBeim Code zum Drucken ist VB auch nicht zufrieden. Den Ausdruck WebBrowser1 sowie versteht er nicht (Wird nicht Farblich hervorgehoben) und wenn ich dies auf WebBrowser ändere versteht er Document.Text nicht und ich erhalte die Meldung "Der Verweis auf einen nicht freigegebenen Member erfordert einen Objektverweis". Bei End While WebBrowser.Print () erhalte ich die Fehlermeldung "End of erwartet".
Beitrag wurde zuletzt am 26.05.14 um 16:42:13 editiert. | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Manfred X | | Datum: 26.05.14 16:42 |
| Hallo!
Wenn Du das XElement explizit deklarierst ist "Option Infer On" unnötig.
Das brauchtest Du nur, so lange die Deklaration implizit war (ohne AS).
Du kannst die Option aber stehen lassen (Das wird projekt-global unter
Einstellungen-Kompilieren festgelegt oder innerhalb der einzelnen CodeDateien).
Schreibe in der Routine jetzt ohne Dim einfach: lHtmlDoc = .....
(sonst erstellst eine klassenglobale und eine lokale Variable).
Du mußt eine Instanz des WebBrowser-Control erstellen:
Dim WebBrowser1 as New WebBrowser
Diese Variablen würde ich als Strings ausgeben:
Dim stoff, masse, multiplikator, answer, input As String
Edit: Ich habe die Vermutung, du hast im Code die davor definierte Routine
nicht mit End Sub beendet.
Beitrag wurde zuletzt am 26.05.14 um 16:57:22 editiert. | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 26.05.14 16:55 |
| Danke
Habe Dim aus der Routine entfernt und Dim WebBrowser1 as New WebBrowser in die Public Class geschrieben. Die Meisten Fehlermeldungen sind jetzt behoben. Nur eine ist geblieben.
Die Fehlermeldung "End of Anweisung erwartet" bei End While WebBrowser1.Print() Wenn ich die Variablen als String definiere kann ich dann immernoch im Kommastellenbereich rechnen? ich verwende Zahlen von 10^9 bis 10^-9 daher dachte ich Decimal wäre besser da dort angegeben wurde das diese Speziell für die Ausgabe von Kommastellen gedachst ist. | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Manfred X | | Datum: 26.05.14 17:04 |
| Du solltest zunächst die Berechnungen durchführen
z.B. mit Variablen des Typs "Decimal" oder mit "Double",
falls Du mathematische Funktionen benötigst.
Erst die zu druckenden Rechen-Ergebnisse weist du auf Stringvariablen zu
(explizite Konvertierung z.B. durch die Format-Methode).
Dabei kannst Du gleich eine geeignete Formatierung der Zahlen oder die
Einbettung der numerischen Resultate in den zu druckenden Text vornehmen.
| |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 26.05.14 17:20 |
| Gut habe die Variablen vor der Ausgabe in Strings gewandelt. Die Berechnung wurde an diesem Punkt schon durchgeführt. Heisst alle Variablen stehen zu diesem Zeitpunkt schon bereit.
Ich habe jedoch immernoch den Fehler dass er bei End While WebBrowser.Print() eine "End of Anweisung erwartet"
WebBrowser.DocumentText = lHtmlDoc.ToString()
While WebBrowser.ReadyState <> WebBrowserReadyState.Complete
Application.DoEvents()
End While WebBrowser1.Print() | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Manfred X | | Datum: 26.05.14 17:31 |
| Du solltest noch die Tatsache mit einbeziehen,
daß in VB mehrere Anweisungen innerhalb einer Zeile
durch den Doppelpunkt zu trennen sind.
Schau Dir diesbezüglich auch noch einmal den Beitrag
von DaveS an.
| |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 26.05.14 17:37 |
| Sorry falsch kopiert. Der aktuelle Eintrag lautet wie folgt:
WebBrowser1.DocumentText = lHtmlDoc.ToString()
While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
Application.DoEvents()
End While WebBrowser1.Print()Falls du das mit WebBrowser1 mit dem Beitrag von DaveS gemeint hast sonst musst du es etwas genauer definieren was du meinst. Trozdem immernoch der Fehler "End of Anweisung erwartet" oder hängt das mit der Befehlsverkettung durch "&" oder ":" zusammen?
Muss ich also zwischen den Befehlen anstatt ein "&" ein ":" einsetzen? | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Manfred X | | Datum: 26.05.14 17:44 |
| Keine neue Zeile für die letzte Anweisung ????
Auch kein Doppelpunkt vor der letzten Anweisung ????
Den Code von DaveS (2. Beitrag) machst Du auch nicht kopieren ????
Mir gehen die Optionen aus ..... | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 26.05.14 18:05 |
| AH sorry jetzt hab ichs gesehen... Deine Optionen sind schon ok nur die Ausführlichkeit deiner Erklärung dieser ist etwas knapp ;) Daher habe ich nicht gleich verstanden was du meinst.
WebBrowser1.DocumentText = lHtmlDoc.ToString()
While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
Application.DoEvents()
End While
WebBrowser1.Print()Jetzt kann ich zumindest wieder Debuggen. Jetzt habe ich den Fehler dass ich beim Klicken auf Print die Meldung erhalte: Ungültige Konvertierung von der Zeichenfolge <title>Umrechnung <%= Stoff >v in Double." Dabei wird der komplette HTML-Code markiert. Ich habe lHtmlDoc doch als String definiert warum meint er es wäre double?
Public Class Form1
Dim lHtmlDoc As StringDer HTML-Code habe ich so Hinterlegt: Dabei scheint er ab Zeile 3 schwierigkeiten zu haben.
lHtmlDoc = "<html>" &
"<head>" &
"<title>Umrechnung <%= Stoff %> von <%= ComboBox1.Text & " / " &" & _
"ComboBox2.Text %> zu <%= ComboBox3.Text & " / " & ComboBox4.Text %></title>" &
"</head>" &
"<body>" &
"<a align='center' style='text-align:center'>" &
ect... | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 26.05.14 18:32 |
| | Danke für deine Hilfe ich versuch es mal zu Integrieren. | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 26.05.14 19:01 |
| Ich Ignorier es nicht, ich weis es nicht besser hab ja schon erwähnt dass ich seit etwa einer Woche mit VB arbeite und vorher noch nichts damit zu tun hatte...
Jetzt habe ich den Fehler dass nach dem HTML-Code ein end of erwartet wird...
Public Class Form1
Public Input As Decimal
Public Masse As Decimal
Public Multiplikator As Decimal
Public Answer As Decimal
Public Faktor As Decimal
Public OutputRes As String
Public OutputMul As String
Public OutputMas As String
Public OutputInp As String
Dim WebBrowser1 As New WebBrowser
Public Stoff As String
Public Sub genHtml()
Dim lHtmlDoc = <html>
<head>
<title>Umrechnung <%= Form2.ListView1.SelectedItems(0).Text %> von <%= _
ComboBox1.Text %>/<%= ComboBox2.Text %> zu <%= ComboBox3.Text _
%>/<%= ComboBox4.Text %></title>
</head>
<body>
<a align="center" style="text-align:center">
<h1 align="center" _
style="padding:0px;margin:0px">~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~</h1>
<h1 align="center" style="padding:0px;margin:0px">Umrechnung von <%= _
ComboBox1.Text %>/<%= ComboBox2.Text %> zu <%= ComboBox3.Text %>/<%= _
ComboBox4.Text %></h1>
<h1 align="center" _
style="padding:0px;margin:0px">~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~</h1>
<center><br>
<br>
<p style="padding:0px;margin:0px">Stoffname: <%= _
Form2.ListView1.SelectedItems(0) %><%= ComboBox1.Text %>/<%= _
ComboBox2.Text %><br></p>
<p style="padding:0px;margin:0px">Molare Masse: <%= Masse %>g/mol<br></p>
<p style="padding:0px;margin:0px">Externes Resultat: <%= TextBoxInput.Text _
%> mcg/l<br></p>
<br>
<br>
<h4 style="text-align:center"><%= OutputInp %> _
_
</h4>
<h4 style="text-align:center">----------------------------- x <%= OutputMul _
%> = <%= OutputRes %></h4>
<h4 style="text-align:center"><%= Masse %> g/mol _
_
</h4>
<br>
<br>
<h6 align="center" style="padding:0px;margin:0px">xxxxxxxxxxxxxxx</h6>
<h6 align="center" style="padding:0px;margin:0px">x _
ETTIKETTE x</h6>
<h6 align="center" style="padding:0px;margin:0px">xxxxxxxxxxxxxxx</h6>
<br>
<br>
</center><br>
<p style="text-align:center">Datum: <%= Date.Today %> _
Visum:.....................<br></p>
<p align="center" style="padding:0px;margin:0px">
<p align="center" style="padding:0px;margin:0px">Firma</p>
<p align="center" style="padding:0px;margin:0px">Adresse</p>
<p align="center" style="padding:0px;margin:0px">PLZ<br></p>
</body>
</html>
Dim lFile As String = "C:\page.htm"
WebBrowser1.DocumentText = lHtmlDoc.ToString()
While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
Application.DoEvents()
End While
WebBrowser1.Print()
End Sub
Beitrag wurde zuletzt am 26.05.14 um 19:08:24 editiert. | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 26.05.14 20:49 |
| Ok habs soweit hingekriegt. Kann ich irgendwie abstände einfügen um den Text besser plazieren zu können? So wie ich es im ursprünglichen HTML mit " " verwendet habe.
Habe schon versucht " " als string zu nehmen und dann mit <%= Abstand %><%= Abstand %><%= Abstand %>... versucht abstände einzufügen jedoch werden die beim Druck als Text interpretiert.
Und Es direkt in das HTML zu schreiben geht nicht dann kommen wieder Fehlermeldungen (Hättest mir auch gleich sagen können dass es u.a. daran liegt ;))
Der Printout sieht im moment noch nicht so Toll aus. Es soll als Bruch dargestellt werden nur sind Nenner und Teiler im Moment über dem "="-Zeichen. Daher würde ich gerne noch Abstände einfügen.
Download Printout.pdf: https://www.vb-paradise.de/index.php/Attachment/28812-printout-pdf/
Beitrag wurde zuletzt am 26.05.14 um 21:08:58 editiert. | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | Autor:  DaveS (Moderator) | | Datum: 26.05.14 21:52 |
| Ich weiß nicht was du machst, noch wie dein Dokument aussehen soll, und was ich hätte sagen sollen, was immer das war, habe ich nicht gesagt weil ich keinen Grund dazu hatte. Außerdem wie du schreibst ist ohnehin wenig verständlich.
Was du hier generierst ist ein Xml Dokument, und keine reine Html, es sei denn du schreibst XHTML oder XHTML5. (Die Idee Linq.Xml zu verwenden stammt von dir). nbsp ist in Xml nicht bekannt. XHTML erlaubt das mit einer DTD, XHTML hat keine DTD. Sowieso ist diese Art der Formatierung kaum zu empfehlen. Es gibt Tags wie div, span, und CSS für die Formatierung und Positionierung. Um gute Html zu schreiben muss man einiges wissen und vielleicht am Besten ein Editor verwenden, wenn man nicht so viel Erfahrung hat. Das hier ist allerdings ein VB.Net Forum und wir befassen uns nur begrenzt mit anderen Themen.
Eventuell ginge es einfacher eine Datei mit Html und Eingebetteten Platzhalter wie $A, $B einzulesen und die Platzhalter mit einfachen String-Methoden zu ersetzen. So habe ich sowas meistens gemacht. Ob alles stimmt kann man dann unabhängig vom Programm leichter prüfen.
________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist | |
| Re: Mit VB eine HTML Datei erstellen und drucken | | | | Autor: Apop85 | | Datum: 26.05.14 22:22 |
| @DaveS
Ich versteh jetzt deine Reaktion nicht ganz. Ich habe mich für deine Tips bedankt und versucht zu befolgen nur ist mir der Fehler unterlaufen den Code falsch einzufügen was ich leider etwas spät bemerkt habe... Sorry!
Ich weis auch nicht was du sonst noch hättest schreiben sollen da ich mit deinen Antworten eigentlich zufrieden war. Da ich aber absolut keine Ahnung habe bin ich froh dass mir auch alle anderen noch dabei geholfen zum Ziel zu kommen.
Tut mir auch leid wenn du meine Fragen nicht richtig verstehst (Anhand deiner Antworten scheint dies jedoch nicht der Fall gewesen zu sein...?). Ich kenn mich halt wirklich nicht aus und kenne die entsprechenden Fachbegriffe/Befehle halt nicht um die Anfrage richtig formulieren zu können, was ich jetzt zum 3. Mal vermerke.
Wie das Dokument aussieht siehst du wenn du das PDF downloadest und wie es aussehen sollte habe ich eigentlich beschrieben... ich will die Eingabe und die Masse nicht über dem Gleichzeichen sondern über den Trennstrichen
Und ich frage ja auch nicht gezielt nach einem HTML-Code sondern was man in VB als alternative verwenden muss damit es in einem html-File korrekt angezeigt wird...
Die Idee mit Linq.xml stammt übrigens weder von mir noch verwende ich dies... Das im vorherigen Beitrag ist der vollständige von mir verwendete code...
@All
Da ich wirklich nicht viel verstehe wäre ich u.a. auch froh um ein Code-Beispiel.
Beitrag wurde zuletzt am 26.05.14 um 22:25:49 editiert. | |
| Für mich funktionierende Lösung | | | | Autor: Apop85 | | Datum: 27.05.14 14:12 |
| Hier mal der Code der für mich funktioniert hat. Für andere die das gleiche suchen...
Danke nochmals für die Hilfe von allen.
Public Class Form1
Dim WebBrowser1 As New WebBrowser
Dim Variable As String = "Titel"
' eure Variablen
Public Sub genHtml()
Dim lHtmlDoc = <html>
<head>
<title>Dein <%= Variable %></title>
</head>
<body>
' Dein HTML Code
</body>
</html>
Dim lFile As String = "C:\page.htm"
' Drucken
WebBrowser1.DocumentText = lHtmlDoc.ToString()
While WebBrowser1.ReadyState <> WebBrowserReadyState.Complete
Application.DoEvents()
End While
WebBrowser1.Print()
End Sub
' Print-Button
Private Sub ButtonPrint_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles ButtonPrint.Click
genHtml()
End Sub
End Class | |
 | Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
 Einloggen | Neu registrieren |
 |
|
sevISDN 1.0 
Überwachung aller eingehender Anrufe!
Die DLL erkennt alle über die CAPI-Schnittstelle eingehenden Anrufe und teilt Ihnen sogar mit, aus welchem Ortsbereich der Anruf stammt. Weitere Highlights: Online-Rufident, Erkennung der Anrufbehandlung u.v.m. Weitere InfosTipp des Monats sevGraph (VB/VBA) 
Grafische Auswertungen
Präsentieren Sie Ihre Daten mit wenig Aufwand in grafischer Form. sevGraph unterstützt hierbei Balken-, Linien- und Stapel-Diagramme (Stacked Bars), sowie 2D- und 3D-Tortendiagramme und arbeitet vollständig datenbankunabhängig! Weitere Infos
|
Mai 2024
Sie sind aktuell nicht angemeldet.