Forum Post: Re: vba button - added to print screen - fails in SL2011

Hello RedStorm,

Try this below code in your customization.This will solve your Error.

Private Sub Button1_Click()

    BatchNbr = Trim(GetObjectValue("cbatnbr"))

    ParmStr = "ROI.EXE " & PRMSEP

    ParmStr = ParmStr & "03810/RUN" & PRMSEP

    ParmStr = ParmStr & "{vr_03810.batnbr} =" & Sparm(BatchNbr) & "/WHERE" & PRMSEP

    ParmStr = ParmStr & "/PSCRN"

    serr1 = Launch(ParmStr, True, True, 0)

End Sub

Thanks,

Perumalsamy R