Network printing function with ASP

zhaozj2021-02-12 150

<% @ Language = VBScript%>

Option expedition

DIM strsubmit "Form to save the submit button"

DIM STRPRINTERPATH "Save the value of the network printer path"

DIM STRUSERNAME "The value of the username in Form

DIM strpassword "Form in password value

DIM STRMESSAGE "FORM print content"

DIM OBJFS "file system object in VBScript

Dim objWshnet "Network objects in WSH

DIM Objprinter "Print Object"

STRSUBMIT = Request.form ("Submit")

If strsubmit = "" ""

Please be aware of:

Since this is a demonstration, where the NT account and password are used in ASP.

The login process should be safely processed in the real application.

Network Printer Path:

Value = "// / >

Value = "<% = strusername%>>

Name = password>

Please enter the text you want to print:

<p>Name = Message> </ textarea> </ td> </ tr></p>
<p><Tr></p>
<p><TD align = right nowrap> </ td></p>
<p><TD align = left nowrap> <input type = "submit" value = "submit"</p>
<p>ID = Submit Name = Submit> </ td></p>
<p></ TR></p>
<p></ TABLE></p>
<p></ Form></p>
<p>When the above information is submitted, you can print it according to the following code.</p>
<p><%</p>
<p>Else</p>
<p>"A response information from Form.</p>
<p>StrinterPath = Request.form ("PrinterPath")</p>
<p>Strusername = Request.form ("UserName")</p>
<p>Strpassword = request.form ("password")</p>
<p>StrMessage = Request.form ("Message")</p>
<p>WE WILL NOW Use the VBScript FileSystemObject Object and the WSH Network Object. The Network Object Will</p>
<p>Give US THE Methods We need to open a printer connection, and the FileSystemObject Will Allow US to Stream Our</p>
<p>Output to the printer. We create these Objects in The Following Code Example:</p>
<p>Set objfs = creteObject ("scripting.filesystemobject")</p>
<p>Set objWshnet = CreateObject ("WScript.Network")</p>
<p>"Use WSH to connect to network printers</p>
<p>Objwshnet.addprinterConnection "LPT1", STRPRINTERPATH, FALSE, STRUSERNAME, STRPASSWORD</p>
<p>"Use the file system object to use the print device as a file</p>
<p>Set objprinter = objfs.createtextfile ("LPT1:", TRUE</p>
<p>"Send text to print equipment</p>
<p>Objprinter.write (StrMessage)</p>
<p>"Turn off the print device object and make an error trap processing</p>
<p>ON Error ResMe next</p>
<p>Objprinter.close</p>
<p>"If an error occurs, turn off the print connection and output an error message.</p>
<p>IF Err THEN</p>
<p>Response.write ("Error #" & "& Err.Description)</p>
<p>Err.clear</p>
<p>Else</p>
<p>"Successful operation, output confirmation information</p>
<p>Response.write ("<center>")</p>
<p>Response.write ("<Table Width = 100% Align = Center Border = 0 Cellspacing = 1 Cellpadding = 1>")</p>
<p>Response.write ("<tr> <td align = right> <b> Print Message Send: </ b> </ td>") Response.write ("<TD Align = LEFT> & StrMessage &" </ TD > </ TR> ")</p>
<p>Response.write ("<tr> <td align = right> <b> network printer path: </ b> </ td>")</p>
<p>Response.write ("<TD Align = Left> & Strprinterpath &" </ TD> </ TR> ")</p>
<p>Response.write ("<tr> <TD align = Right> <b> login account: </ b> </ td>")</p>
<p>Response.write ("<TD Align = Left> & struserName &" </ TD> </ TR> ")</p>
<p>Response.write ("</ Table>")</p>
<p>Response.write ("</ center>")</p>
<p>END IF</p>
<p>"Cancel print connection</p>
<p>Objwshnet.removeprinterConnection "LPT1:"</p>
<p>Set objWshnet = Nothing</p>
<p>Set objfs = Nothing</p>
<p>Set objprinter = Nothing</p>
<p>END IF</p>
<p>%></p>
<p></ Body></p>
<p></ Html></p></div><div class="text-center mt-3 text-grey">
转载请注明原文地址:https://www.9cbs.com/read-6844.html</div><div class="plugin d-flex justify-content-center mt-3"></div><hr><div class="row"><div class="col-lg-12 text-muted mt-2"><i class="icon-tags mr-2"></i><span class="badge border border-secondary mr-2"><h2 class="h6 mb-0 small"><a class="text-secondary" href="tag-2.html">9cbs</a></h2></span></div></div></div></div><div class="card card-postlist border-white shadow"><div class="card-body"><div class="card-title"><div class="d-flex justify-content-between"><div><b>New Post</b>(<span class="posts">0</span>)
</div><div></div></div></div><ul class="postlist list-unstyled">

</ul></div></div><div class="d-none threadlist"><input type="checkbox" name="modtid" value="6844" checked /></div></div></div></div></div><footer class="text-muted small bg-dark py-4 mt-3" id="footer"><div class="container"><div class="row"><div class="col">CopyRight © 2020 All Rights Reserved

</div><div class="col text-right">Processed:
<b>0.061</b>, SQL:
                <b>9</b></div></div></div></footer><script src="./lang/en-us/lang.js?2.2.0"></script><script src="view/js/jquery.min.js?2.2.0"></script><script src="view/js/popper.min.js?2.2.0"></script><script src="view/js/bootstrap.min.js?2.2.0"></script><script src="view/js/xiuno.js?2.2.0"></script><script src="view/js/bootstrap-plugin.js?2.2.0"></script><script src="view/js/async.min.js?2.2.0"></script><script src="view/js/form.js?2.2.0"></script><script>
var debug = DEBUG = 0;
var url_rewrite_on = 1;
var url_path = './';
var forumarr = {"1":"Tech"};
var fid = 1;
var uid = 0;
var gid = 0;
xn.options.water_image_url = 'view/img/water-small.png';
</script><script src="view/js/wellcms.js?2.2.0"></script><a class="scroll-to-top rounded" href="javascript:void(0);"><i class="icon-angle-up"></i></a><a class="scroll-to-bottom rounded" href="javascript:void(0);" style="display: inline;"><i class="icon-angle-down"></i></a></body></html><script>
var forum_url = 'list-1.html';
var safe_token = 'f6RIcGPAZQHgmcbJl_2BpvyqUodACbJR_2B5GcAT0jqejI8cjffUYoNE5LLotsTzkOMdi5oM9nXbHT5KkvbhVQimeQ_3D_3D';
var body = $('body');
body.on('submit', '#form', function() {
var jthis = $(this);
    var jsubmit = jthis.find('#submit');
jthis.reset();
jsubmit.button('loading');
var postdata = jthis.serializeObject();
$.xpost(jthis.attr('action'), postdata, function(code, message) {
if(code == 0) {
location.reload();
} else {
$.alert(message);
jsubmit.button('reset');
}
});
return false;
});

function resize_image() {
var jmessagelist = $('div.message');
var first_width = jmessagelist.width(); 
jmessagelist.each(function() {
var jdiv = $(this);
var maxwidth = jdiv.attr('isfirst') ? first_width : jdiv.width();
var jmessage_width = Math.min(jdiv.width(), maxwidth);
jdiv.find('img, embed, iframe, video').each(function() {
var jimg = $(this);
var img_width = this.org_width;
var img_height = this.org_height;
if(!img_width) {
var img_width = jimg.attr('width');
var img_height = jimg.attr('height');
this.org_width = img_width;
this.org_height = img_height;
}

if(img_width > jmessage_width) {
if(this.tagName == 'IMG') {
jimg.width(jmessage_width);
jimg.css('height', 'auto');
jimg.css('cursor', 'pointer');
jimg.on('click', function() {

});
} else {
jimg.width(jmessage_width);
var height = (img_height / img_width) * jimg.width();
jimg.height(height);
}
}
});
});
}

function resize_table() {
$('div.message').each(function() {
var jdiv = $(this);
jdiv.find('table').addClass('table').wrap('<div class="table-responsive"></div>'); 
});
}

$(function() {
resize_image();
resize_table();
$(window).on('resize', resize_image);
});

$('#nav li[data-active="fid-1"]').addClass('active');
</script>