SetSpoolFileAttribute()

なし

SetSpoolFileAttributeメソッドは，拠点サーバにある蓄積ファイルの属性情報の変更が終了した時点で呼び出し元に制御が戻ります。

SetSpoolFileAttributeメソッドは，指定できるプロパティのうち，指定のあったプロパティだけを変更します。SetSpoolFileAttributeメソッドで指定できるプロパティについては，「9.6.2　RS-ActiveX起動部品が提供するプロパティ一覧」を参照してください。また，指定できるプロパティは，一つ以上指定してください。指定されていない場合は，エラー（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 = "Ａ３"
    
    Call objEURPMLS.SetSpoolFileAttribute
    
Err_Trap:
    List5.AddItem "GetAttr Err.Number=(" & Err.Number & ")"
    List5.AddItem "GetAttr Err.Description=(" & Err.Description & ")"
    
    Set objEURPMLS = Nothing
  
End Sub