Code:
Dim A_URL As String = "http://reportserver.com:7403/xmlpserver/Guest/LB_DEV/RMS/Orders/ord_det/ord_det.xdo?_xpf=&_xpt=0&_xdo=%2FGuest%2FLB_DEV%2FRMS%2FOrders%2Ford_det%2Ford_det.xdo&_xmode=4&xdo%3Axdo%3A_paramsPM_order_no_div_input=500036&_paramsPM_order_no=500036&_xt=Purchase%20Order%20Report&_xf=pdf&_xautorun=false"
            Dim B_SAVEAS As String = "C:\reports\xdo.pdf"
...