Open "LPT1" For Output As #1   
Print #1, Adodc2.Recordset.Fields(1),Adodc2.Recordset.Fields(2)
Close
不换页打印时如何调用局域网中计算机上的打印机。

解决方案 »

  1.   

    Open "LPT1" ....这种方法比较古老, 只能操作本地打印机, 网络打印机根本就不是这个端口.建议使用VB自带的打印机对象来控制打印, 无论本地还是网络打印机都没有区别.
      

  2.   

    按一楼的方法是不行,VB自带的打印机对象不知道您指的是哪个,Printer.Print好像不能不换页打印。还请您明示下
      

  3.   

     Open "\\Xp-201104021156\EPSONLQ-" For Output As #1
     Print #1, nn; Tab(9); zhh; Tab(29); ys; jgsj; dz; gzxm
     Close
    改成这样好可以打印了。把lpt1改成了打印机在网络中的位置
    谢谢楼上的两位