[font=Arial]
i have a one problem visual basic is i have editing the flash movie using visual basic 6.0 using vb and flash funcation so how can i do to perform this task
CODE
Private Sub cmd_play_Click()
Call ShockwaveFlash1.SetVariable("movieclip", txt_var.Text)
'txt_var.Text = ShockwaveFlash1.GetVariable("company name")
Call ShockwaveFlash1.SetVariable("jhjhkh", txt_var.Text)
ShockwaveFlash1.Base = txt_var.Text
ShockwaveFlash1.LoadMovie 0, "S:\vb\912.swf"
ShockwaveFlash1.Play
End Sub
Private Sub cmd_stop_Click()
ShockwaveFlash1.StopPlay
End Sub
Private Sub Form_Load()
' ShockwaveFlash1.LoadMovie 0, "S:\vb\912.swf"
' ShockwaveFlash1.Play
End Sub
Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As String)
txt_var.Text = args
End Sub
Mod edit - Added code tags.
8 Oct, 2008 - 12:14 AM
| 