Go Premium for a chance to win a PS4. Enter to Win

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 848
  • Last Modified:

VB .net FileDialog.ShowDialog launches unrelated external program !?!

Update: Narrowed it down some:
For some unfathomable reason, my system attempts to start an external program 'WRQ reflections' whenever a FileDialog.ShowDialog gets called.  There is absolutely no  reference in the project to reflections (an IBM Host session program).  (The crash referred to in the original post was happening in one of the reflections dlls.)  In disbelief I deleted the reflections folder from the 'Program Files' folder, and now the windows install launches and starts reinstalling reflections whenever showdialog gets called!  I created a new empty VB project & solution, with just one button that executes the following code, and sure enough 'openFileDialog1.ShowDialog' launches windows installer for reflections at the same time that the dialog appears.
.
Public Class Form1
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim openFileDialog1 As New OpenFileDialog()
        openFileDialog1.Title = "Test"
        openFileDialog1.ShowDialog() 'Windows installer fires up at same time that the dialog appears!
    End Sub
End Class

I'm utterly flummoxed!  Any ideas?

Original Post:
I'm debugging a VB .net application that queries data from a couple sources, (sql database tables, excel file), does some cross checking and creates a DataTable listing discrepancies, and saves the datatable as an xml file after having the user select a file to save it to.  
The strange part is that it appears to execute all the querying and data table creation fine, but crashes with 'vshost32-clr2.exe has stopped working' immediately after executing the line 'If saveFileDialog1.ShowDialog() = DialogResult.OK Then'.  That is, the dialog is displayed, but the crash occurs immediately afterwards without any user input.
Windows 7 Pro Service Pack 1 64 bit, Visual Studion 2010 SP1, running a debug build within visual studio.

I would be most grateful for any suggestions on possible causes or how to attempt to identify them.


    Public Sub ExportData()
        ' Create a data table with the appropriate columns.
        Dim Table As DataTable = New DataTable("Export")
        'Add the sku column
        Table.Columns.Add("SKU")
        'Add all other selected columns
        For Each ItemIdx As LookedUpDataItems In [Enum].GetValues(GetType(LookedUpDataItems))
            For Each SourceIdx As DataSourceIndicesEnumeration In SettingsDialog.GetSelectedSourceIndices(ItemIdx)
                If (SourceIdx = DataSourceIndicesEnumeration.ManualOverride) Then
                    Continue For
                End If
                Dim z As String = [Enum].GetName(GetType(LookedUpDataItems), ItemIdx) & "_" & [Enum].GetName(GetType(DataSourceIndicesEnumeration), SourceIdx)
                Table.Columns.Add(z)
                If (SourceIdx = DataSourceIndicesEnumeration.Pkg) Then
                    Table.Columns.Add(z & "Confidence")
                End If
            Next
            Table.Columns.Add([Enum].GetName(GetType(LookedUpDataItems), ItemIdx) & "_Status")
        Next

        For Each o As OrderInfoClass In Orders
            Dim row As DataRow = Table.NewRow()
            LoadExportDataRow(row, o)
            Table.Rows.Add(row)
        Next
        Dim saveFileDialog1 As New SaveFileDialog()
        saveFileDialog1.Title = "Save discrepancy table as..."
        saveFileDialog1.Filter = "xml files (*.xml)|*.xml"
        saveFileDialog1.FilterIndex = 1
        saveFileDialog1.RestoreDirectory = True
        If saveFileDialog1.ShowDialog() = DialogResult.OK Then  '********Crashes immediately after showing the dialog.  *******
            Dim myStream As Stream
            myStream = saveFileDialog1.OpenFile()
            If (myStream IsNot Nothing) Then
                Table.WriteXml(myStream)
                myStream.Close()
            End If
        End If
        MessageBox.Show("To view the discrepancy table, open the xml file with Excel.  When prompted for how to open it, select 'as an XML list'.", "XML File Viewing Notes:")
    End Sub
0
dcShaver
Asked:
dcShaver
1 Solution
 
Roopesh ReddyCommented:
Hi,

Seems like some references still with the registry!

So try cleaning it using some third party utilities to clean registry entries like CCleaner etc.,

http://www.piriform.com/ccleaner

Hope it helps u...
0
 
dcShaverAuthor Commented:
A proper uninstall of reflections fixed it, presumably by removing the registry references.  
Apparently there were similar issues with reflections causing crashes when dialogs were opened in office applications, so IT is in the process of replacing reflections.
Thank you,
0

Featured Post

NFR key for Veeam Backup for Microsoft Office 365

Veeam is happy to provide a free NFR license (for 1 year, up to 10 users). This license allows for the non‑production use of Veeam Backup for Microsoft Office 365 in your home lab without any feature limitations.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now