وارد کردن فلش در برنامه

[کاظم فلاحی خواه]

چگونه می شه فایل های فلش رو در VB.NET قرار داد . می خوام برنامه ای بنویسم تا فایل های فلش رو بخونه .

[Hybrid]

سلام دوست عزیز ، امیدوارم حالت خوب باشه ، شما باید از Activex ، Shockwave Flash Object استفاده کنید . از طریق شکل زیر میتونید اونو به برنامه اضافه کنید فقط :

1 ) در صورتی این Activex فعال میشه که برنامه AdobeFlash رو کامپیوترتون نصب باشه ،

2 ) چند تا خاصیت و متد هم داره ، مثلا خاصیت Movie که آدرس دقیق اون فایل فلش رو بهش میدین و از طریق متد های Stop و Play اجرا و متوقف میکنین

http://img4up.com/up2/96526900802429504257.jpg
http://img4up.com/up2/92842933100970630268.jpg

[کاظم فلاحی خواه]

سلام معاون ،ممنون . این کارایی که گفتی رو انجام دادم اما هیچ کنترلی به toolbox اضافه نمی شود .

[xxnagin]

سلام
بعضی از activx به تول باکس اضافه نمیشن
وبرنامه vb با admin باید اجرا بشن تا ocx به تول باکس اضافه بشه
اگه به toolbox اضافه نشد با این کد اعلان کن و در لود فرمت



Dim Shockwave AsNew ShockwaveFlashObjects.ShockwaveFlash
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.Controls.Add(Shockwave)
End Sub



بعد یه دکمه بذار





PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
OpenFileDialog1.ShowDialog()
Shockwave.Movie = OpenFileDialog1.FileName
Shockwave.Play()


EndSub

[کاظم فلاحی خواه]

از همه ممنون ، درست شد . وقتی ویژوال استادیو رو Restatrt کردم کنترل اضافه شد .

[aknj56]

با سلام خدمت دوستان
من برای وارد کردن Shockwaveطبق دستور کار می کنم اضافه می شه ولی بلافاصله میکه باید برنامه بسته بشه بعدهم که برنامه رو باز می کنی اثری از اون نیست و اضافه نشده طبق اون آموزشی هم که دوستمون لییکش رو گذاشتند و همین مشکل من رو داشتند هم انجام دادم ولی اون کدها همش ارور میده و درست نمی شه