Fonctionnalité d'impression dans VB.NET – Bien choisir son serveur d impression

Dans cet article, nous verrons comment utiliser la fonctionnalité d’impression dans VB.NET.

  • 3659

Dans cet article, nous verrons comment utiliser
fonctionnalité d'impression dans VB.NET
.

C'est du code aspx: –

<%

@
Page

La langue

= "VB"

AutoEventWireup

= "faux"
CodeFile= "Default2.aspx.vb"
Hérite= "Default2"
%>

<!

DOCTYPE
html PUBLIQUE
"- // W3C // DTD XHTML 1.0 Transitional // EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html
xmlns= "http://www.w3.org/1999/xhtml">
<tête
courir vers= "serveur">
<Titre> </Titre>

</

tête>
<
corps>

<forme
identifiant= "form1"
courir vers= "serveur">
<div>
<aspic:Panneau
ID= "Panneau"
courir vers= "serveur"
Couleur de fond= "# ffccff"
Largeur= "50%">
<table
cellpadding= "4"
espacement cellulaire= "4"
largeur= "100%"
aligner= "centre">
<tr>
<td
aligner= "centre">

Remplir toutes les informations
</td>
</tr>
<tr>
<td>
<aspic:Étiquette
ID= "LabelFName"
courir vers= "serveur"
Texte= "F_Name"
Largeur= "130px"> </aspic:Étiquette>
<aspic:Zone de texte
ID= "TextBoxName"
courir vers= "serveur"
Largeur= "315px"> </aspic:Zone de texte>
</td>
</tr>
<tr>
<td>
<aspic:Étiquette
ID= "LabelLName"
courir vers= "serveur"
Texte= "L_Name"
Largeur= "130px"> </aspic:Étiquette>
<aspic:Zone de texte
ID= "TextBoxCountry"
courir vers= "serveur"
Largeur= "315px"> </aspic:Zone de texte>
</td>
</tr>
<tr>
<td>
<aspic:Étiquette
ID= "LabelEmailId"
courir vers= "serveur"
Texte= "EmailId"
Largeur= "130px"> </aspic:Étiquette>
<aspic:Zone de texte
ID= "TextBoxEmailId"
courir vers= "serveur"
Largeur= "315px"> </aspic:Zone de texte>
</td>
</tr>
<tr
aligner= "right">
<td>
<aspic:Bouton
ID= "ButtonPrint"
courir vers= "serveur"
Texte= "Imprimer"
Caractères gras= "vrai"
Couleur de premier plan= "Bleu"
Sur clic= "ButtonPrint_Click"
/> <br
/>
</td>
</tr>
</table>
</aspic:Panneau>
</div>
</forme>

</

corps>
</
html>

Ce code est VB: –

Importations

System.Data
Importations

Configuration du système
Importations

System.Web
Importations

System.Web.Security
Importations

System.Web.UI
Importations

System.Web.UI.WebControls
Importations

System.Web.UI.WebControls.WebParts
Importations

System.Web.UI.HtmlControls
Importations

System.IO
Importations

System.Text
Importations

System.Web.SessionState

————————————————– ————————————————– —

Partiel
Classe _Défaut
Hérite System.Web.UI.Page

————————————————– ————————————————– —


Protégé Sous
Page_Load (ByVal expéditeur
Comme Objet,
ByVal e Comme
EventArgs)
Fin Sous

————————————————– ————————————————– —

Protégé Sous
ButtonPrint_Click (ByVal expéditeur
Comme Objet,
ByVal e Comme
System.EventArgs) Poignées ButtonPrint.Click
Faible impression
Comme
Contrôle = DirectCast(Session("impression"),
Contrôle)
PrintHelper.PrintWebControl (print)
Session("impression") = Panneau
ClientScript.RegisterStartupScript (Moi.[GetType](),
"sur clic",
"")
Fin Sous

Fin
Classe

————————————————– ————————————————– —

Utilisation de Helper: –

Nous allons créer la classe d'assistance.Dans

cette classe, j'ai fait une méthode 'PrintWebControl'. Avec cette méthode, nous pouvons imprimer n’importe
Contrôle du serveur comme Datalist, Image, Textbox, Panel etc.

Importations

System.Data
Importations

Configuration du système
Importations

System.Web
Importations

System.Web.Security
Importations

System.Web.UI
Importations

System.Web.UI.WebControls
Importations

System.Web.UI.WebControls.WebParts
Importations

System.Web.UI.HtmlControls
Importations

System.IO
Importations

System.Text
Importations

System.Web.SessionState
Importations

Microsoft.VisualBasic
Publique
Classe PrintHelper
Publique partagé
Sous PrintWebControl (ByVal
impression Comme Contrôle)
PrintWebControl (imprimer, Chaîne.Vide)
Fin Sous


Publique partagé
Sous PrintWebControl (ByVal
impression Comme Contrôle,
ByVal
Scénario Comme
Chaîne)
Faible stringWrite
Comme Nouveau
StringWriter ()
Faible htmlWrite
Comme Nouveau
System.Web.UI.HtmlTextWriter (stringWrite)
Si Type de
impression Est WebControl
ensuite
Faible webControl
Comme Nouveau
Unité (100, UnitType.Percentage)
DirectCast(impression,
WebControl) .Width = webControl
Fin Si
Faible page
Comme Nouveau
Page()
page.EnableEventValidation = Faux
Si Script <>
Chaîne.Vide ensuite
page.ClientScript.RegisterStartupScript (page.[GetType](),
"PrintJavaScript", Script)
Fin Si
Faible htmlForm
Comme Nouveau
HtmlForm ()
page.Controls.Add (htmlForm)
htmlForm.Attributes.Add ("courir vers",
"serveur")
htmlForm.Controls.Add (print)
page.DesignerInitialize ()
page.RenderControl (htmlWrite)
Faible strHTML
Comme
Chaîne = stringWrite.ToString ()
HttpContext.Current.Response.Clear ()
HttpContext.Current.Response.Write (strHTML)
HttpContext.Current.Response.Write ("")
HttpContext.Current.Response.[End]()
Fin Sous

Fin
Classe

Fonctionnalité d'impression dans VB.NET – Bien choisir son serveur d impression
4.9 (98%) 32 votes