Link and Submit button not working after launch ReportServer

Dim strNewPreUNo As String             strNewPreUNo = Replace(strPreUNo, "/", "%2F")             Dim strReportURL As String             Dim strRptURL1 As String = "http://"             Dim strRptURL2 As String = System.Configuration.ConfigurationManager.AppSettings("dbDatabaseServerName")   'server             Dim strRptURL3 As String = "/ReportServer?/SDTSreport/" + "PreUBLA" + "&PreUno=" + strNewPreUNo ' + "&rs%3aCommand=Render&rs%3aformat=PDF'" 'rts report server folder"             Dim strRptURL4 As Str ...