[Closed]Error is not displayed in alert box :-(

See more:

VB

ASP.NET

Javascript

Hi
I am trying to get

"importsites is not a valid name...." error to display in the alert box, when the excel file that is uploaded has the incorrect tab name, however it does not display, it just falls through.

An alert box is displayed if the file is in the wrong format but not if the tab name is different

all help is much appreciated :-)

importButtonEnabled = True
      PanelUpload.Visible = False
      PanelView.Visible = True
      PanelImport.Visible = False
      btnBack.Visible = True
      btnBack.Enabled = True

      Dim xConnstr As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                        "Data Source=" & Server.MapPath("SiteTemplate.xls") & ";" & _
                        "Extended Properties=Excel 8.0"
      Dim objXConn As New System.Data.OleDb.OleDbConnection(xConnstr)

      Try
          objXConn.Open()

          Dim objCommand As New System.Data.OleDb.OleDbCommand("SELECT * FROM [importsites$]", objXConn)

          'On Error Resume Next
          'objXConn.Close()

          Dim objDataAdapter As New OleDbDataAdapter()

          'If objCommand Is Nothing Then

          'Else

          objDataAdapter.SelectCommand = objCommand

          Dim objDataSet As New DataSet()
          objDataAdapter.Fill(objDataSet, "xldata")

          'view the data you have uploaded in your gridview. this will check for any empty rows at this point and change the colours if necessary
          GridView1.DataSource = objDataSet.Tables(0).DefaultView
          GridView1.DataBind()
          'End If
          objXConn.Close()

          ButtonImport.Enabled = importButtonEnabled
          If ButtonImport.Enabled = False Then
              lblerror.ForeColor = System.Drawing.Color.Red
              lblerror.Text = "ERROR WITH FILE"
          End If

      Catch ex As Exception
          Response.Write("<script LANGUAGE=JavaScript type=""text/javascript"">")
          Response.Write("alert('" & ex.Message.ToString & "')")
          Response.Write("</script>")

          If objXConn.State = ConnectionState.Open Then
              objXConn.Close()

          End If

      End Try

  End Sub