windows media player burning vb.net?

tyrocx

New member
Hello :) I not sure how to do this.. Here is what I have right now:

'Create basic playlist
Dim playlst As IWMPPlaylist = wmpKJB.playlistCollection.newPlaylist("my new playlist")
playlst.appendItem(wmpKJB.newMedia("C:\bla.mp3"))
wmpKJB.currentPlaylist = playlst

'Display Drive Letters in Drive List combobox
For i As Integer = 0 To Drives.count - 1
cboDrives.Items.Add(Drives.Item(i).driveSpecifier.ToString)
Next
Dim Drive As IWMPCdrom = wmpKJB.cdromCollection.getByDriveSpecifier(cmbdrives.SelectedItem.ToString)


'*STUCK*'
'not sure how to assign the Burner below to the selected Drive.
Dim Burner As IWMPCdromBurn
'Burner.burnPlaylist = wmpKJB.currentPlaylist
'Burner.refreshStatus()
'Burner.startBurn()

This is what microsoft says to do next... but how do I call queryinterface to get the pointer as directed below??

Before you begin burning a CD, you must first call QueryInterface through an IWMPCdrom pointer to retrieve a pointer to the IWMPCdromBurn interface. By using the isAvailable method, you can determine whether a particular CD drive can burn CDs, whether there is a CD in the drive, and how the CD can be used.

Thanks!!!
 
Back
Top