急！有谁知道在win98下，打印机的工作队列最多可有多少项任务？

Question

你的问题我不会答。
不知可否在print.enddoc后加一个检测打印机状态的程序，如果打印机空就继续打印

Answer 1

那速度会不会变的更慢？（因为其作业量很大）我的原程序是个循环语句，如下
stringa = "select * from reprint where reportdate=" & "'" & reportdate1 & "'" & "order by zhangno,val(page) asc"
  Set sele = bank1.OpenRecordset(stringa)
  
  sele.MoveFirst
  Do Until sele.EOF
      zhangno3 = sele!zhangno
      page3 = sele!page
      
      Printer.FontSize = 12    
 
     k1 = sele!Count
     k1 = 30 - k1
     Printer.Print Tab(15); exchangewd(sele!priwno); Tab(35); sele!reportdate; Tab(65); sele!Currency; Tab(85); sele!page
     Printer.Print
     Printer.Print
     Printer.Print "      " & sele!zhangno; Tab(34); Trim(Left(sele!Name, 30)); Tab(80); formats(sele!lastremain)
     Printer.Print
     Printer.Print
    str8 = "select * from saving where zhangno=" & "'" & zhangno3 & "'" & " and page=" & "'" & page3 & "'" & "order by count asc"
     Set pr = bank1.OpenRecordset(str8)
       pr.MoveFirst
       Do Until pr.EOF
       i = Len(pr!summary)
   Printer.Print Tab(3); pr!Date; Tab(9); Trim(pr!accno); Tab(15); exchangecl(pr!cardcl); Tab(20); pr!cardno; Tab(25); formatc(pr!summary); Tab(42); formats(pr!debit) & " " & formats(pr!lend) & " " & formats(pr!backlog) & " " & pr!wangno & " " & pr!renno       pr.MoveNext
       Loop
     
     For k2 = 1 To k1
        Printer.Print
     Next k2
       
     Printer.Print
     Printer.Print Tab(80); formats(sele!remain)
     Printer.Print "           " & hourtime
     Printer.NewPage
  sele.MoveNext
   Printer.EndDoc
  Loop
另外检测打印机状态的程序如何写？