SetSpoolFileAttributeメソッド
指定したジョブIDのスプールデータの属性情報を変更します。変更できるスプールデータの属性情報については,マニュアル「EUR 帳票出力 機能解説 EUR Server編」を参照してください。
形式
SetSpoolFileAttribute()
パラメタ
なし
解説
SetSpoolFileAttributeメソッドは,スプールサーバにあるスプールデータの属性情報の変更が終了した時点で呼び出し元に制御が戻ります。
SetSpoolFileAttributeメソッドは,指定できるプロパティのうち,指定のあったプロパティだけを変更します。SetSpoolFileAttributeメソッドで指定できるプロパティについては,「7.2.2 プロパティ一覧」を参照してください。また,指定できるプロパティは,一つ以上指定してください。指定されていない場合は,エラー(KEEY528-E)になります。
実行時にエラーが発生した場合,Err.Numberプロパティに終了コード,Err.Descriptionプロパティにメッセージが設定されます。
戻り値
なし
データ型
Empty
呼び出し例
' SetSpoolFileAttribute実行
Private Sub SUB_SetSpoolFileAttribute()
Err.Clear
On Error GoTo Err_Trap
List5.Clear
Dim objEURPMLS
Set objEURPMLS = CreateObject("EURPMLS.Exec")
objEURPMLS.ServerAddress = "255.255.***.***"
objEURPMLS.SearchJobID = "EUR200605291252462630000001******007"
'変更したい項目を修正する
objEURPMLS.SpoolLimit = "20060615"
objEURPMLS.PrinterClassName = "A3"
Call objEURPMLS.SetSpoolFileAttribute
Err_Trap:
List5.AddItem "GetAttr Err.Number=(" & Err.Number & ")"
List5.AddItem "GetAttr Err.Description=(" & Err.Description & ")"
Set objEURPMLS = Nothing
End Sub