如何获得打印机状态？（急！在线！行的通就给分！）

Question

如何在WIN98和2000中获得打印机状态信息
为什么我得到的STATUS总是零？

Answer 1

可用CREATEFILE以PRN为文件名生成一个文件，检测返回值，若成功则打印机可用，否则显示打印机故障。生成关于PRN的文件句柄后，可象普通文件一样向文件写入内容，比如WRITE，写完后关闭文件。
//从并行端口读取打印机状态
function GetPrinterStatus:byte;
asm
  MOV DX,$379;
  IN AL,DX;
end;
//获取打印机是否出错
function CheckPrinter:boolean;
var
  temp:byte;
begin
  temp:=GetPrinterStatus;
  Result:=not ( ((temp and $80)=0) //打印机忙
  or ((temp and $20)<>0)  //打印机缺纸
  or ((temp and $10)=0)    //打印机未联机
  or ((temp and $08)=0) ); //打印机出错;
end;

Answer 2

可是运行GetPrinterStatus时提示没有权限

Answer 3

2000下这段程序运行后报错，再一个就是如何检测USB口的打印机