yui_sさん、こんにちは。

＞二回目に渡す値が違うようなのですが、どのようにすればよいか分かりません。
＞適切な値を取得する方法にどのようなやり方があるでしょうか？
＞よろしくお願いします。
一連を以下に記述します。
●グローバル外部関数
function boolean ClosePrinter(ulong hPrinter) library \"winspool.drv\"
function boolean GetPrinterA(ulong hPrinter, ulong Level, ref blob PrinterInfo,
 ulong cbBuf, ref ulong cbNeeded) library \"winspool.drv\"
function boolean OpenPrinterA(ref string PrinterName, ref ulong hPrinter,
 ref string PrinterDefaults) library \"winspool.drv\"

●スクリプト
blob PrinterInfoBlob
string PrinterName, PrinterDefaults
ulong hPrinter, cbNeeded
SetNull( PrinterDefaults )

// プリンタハンドルを開く
if OpenPrinterA( PrinterName, hPrinter, PrinterDefaults ) = False then
　　return False
end if

// 必要なバッファサイズを求める
GetPrinterA( hPrinter, 5, PrinterInfoBlob, cbNeeded, cbNeeded )

// 領域確保
PrinterInfoBlob = Blob( Space( cbNeeded ) )

// プリンタ情報を取得
if GetPrinterA( hPrinter, 5, PrinterInfoBlob, cbNeeded, cbNeeded ) = False then
　　ClosePrinter( hPrinter )
　　return False
end if

// プリンタハンドルを閉じる
ClosePrinter( hPrinter )

追伸
・GetPrinter()で得られたプリンタ情報の内容を参照には、発言No：017164を参考にして下さい。
・詳細なプリンタ状態を得る場合は、レベル2の方がいいです。