Vb 6.0, работа с видео файлами Опции

[WishMaster]

Пожалуйста помогите:нужно создать (в VB 6.0) кнопку ,при нажатии на которую открывался бы видео файл в новом окне.Пробовал использовать ActiveX не выходит.Заранее благодарен.

[WishMaster]

Спасибо ,volvo,но то меня тоже дошло ( часа через 2),что WMP входит в статдарт ну я так и сделал , в целом вышло даже хорошо(после 2-х то месяцев,я и этому был ужасно рад),вообщем если вдруг гоуто дадо то вот
Private Sub Form_Load()
Dim v As Variant
On Error GoTo err5
v = CurDir
Form3.Visible = True
Call WindowsMediaPlayer1_load
'WindowsMediaPlayer1.openPlayer (v + "1.mp3")
Exit Sub
err5: Exit Sub
End Sub

Private Sub WindowsMediaPlayer1_load()
WindowsMediaPlayer1.Width = Form3.Width
WindowsMediaPlayer1.Height = Form3.Height
WindowsMediaPlayer1.URL = (v + "1.avi")
End Sub