OK, this is my situation:
I have created an application, and on its main form it has a label which when clicked, opens up a open file dialogue. The user selects the flash file to open and selects "OK". Then, the "Player" form, which has a full-screen flash control opens with the movie being the one the user just selected.
This is my code so far:
Private Sub Label7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label7.Click
Dim FlashFile As New OpenFileDialog()
With FlashFile
.Filter = "All Files |*.*"
.FileName = ""
End With
If (FlashFile.ShowDialog() = Windows.Forms.DialogResult.OK) Then
Player.AxShockwaveFlash1.Movie = _
System.IO.File.ReadAllText(FlashFile.FileName)
Player.Show()
End If
End Sub
When I run the app, it goes smoothly until I click OK on the open file dialogue and the debugger opens, pointing out an error with the "Player.AxShockwaveFlash1.Movie = _" line and the "System.IO.File.ReadAllText(FlashFile.FileName)" lines.
I have created an application, and on its main form it has a label which when clicked, opens up a open file dialogue. The user selects the flash file to open and selects "OK". Then, the "Player" form, which has a full-screen flash control opens with the movie being the one the user just selected.
This is my code so far:
Private Sub Label7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label7.Click
Dim FlashFile As New OpenFileDialog()
With FlashFile
.Filter = "All Files |*.*"
.FileName = ""
End With
If (FlashFile.ShowDialog() = Windows.Forms.DialogResult.OK) Then
Player.AxShockwaveFlash1.Movie = _
System.IO.File.ReadAllText(FlashFile.FileName)
Player.Show()
End If
End Sub
When I run the app, it goes smoothly until I click OK on the open file dialogue and the debugger opens, pointing out an error with the "Player.AxShockwaveFlash1.Movie = _" line and the "System.IO.File.ReadAllText(FlashFile.FileName)" lines.
