I am doing a project named " remote PC spy robot". I have a wireless camera attached to my robot and i am able to receive the data using the receiver and TV tuner card. For coding i am using vb6.0 . By using vlc version 1.0.5 i am able to see the video from my wireless cam. for that i am using this following code. I have used "dshow:\\ because i have only one tv tuner card.
Code: Select all
'comment:-I can see video of tuner locally
Private Sub Connect_Command_Click()
Dim connect_string As String
connect_string = "dshow://"
VLCPlugin.addTarget connect_string, null, VLCPlaylistMode.VLCPlayListReplaceAndGo, -666
VLCPlugin.play
End Sub
This is okay but I want to stream the tv tuner card video aswell. so i am using the following code
Code: Select all
'comment this code for streaming tv tuner video to remote pc in lan
Private Sub Connect_Command_Click()
Dim option() As Variant
Dim connect As String
connect_string = "dshow://"
option() = Array(":sout=#transcode{vcodec=WMV2,vb=512,scale=1,acodec=mpga,ab=64,channels=2}:duplicate{dst=display,dst=std{access=http,mux=ts,dst=192.168.9.144:1234}}")
VLCPlugin.addTarget connect_string, option(), VLCPlaylistMode.VLCPlayListReplaceAndGo, -666
End Sub
Regards,
dudedevil