ساخت Thumbnail از ویدیو

[m007moh 181]

با سلام خدمت دوستان

من میخواستم از ی سر فیلم که به صورت آنلان وارد برنامه میشه Thumbnail دریت کنم تا بتونم توی لیست ویو نشونش بدم

دوستان گفتن که شما می تونید با کتابخانه MediaBrowser اینکارو بکنی یه متد داره با نام GetVideoThumbnailByID  که میتونه این کار رو کنه

 ولی من نمیتونم از این کتابخونه استفاده کنم؟؟؟

GetVideoThumbnailByID

تو توضیحاتش نوشته id as longاین چیه؟

کتابخونه رو هم پیوست میکنم باتون

اگه لطف کنید کمکم کنید یا یه نمونه سورس در اختیارم بدارید ممنون میشم ازتون

با تشکر

 

MediaBrowser.zip

[امین شاهدی 5,777]

شما باید آدرس کامل ویدیو رو داشته باشین و از طریق این متد اون رو به صورت یک Map لود کنید و با دادن key هایی که تو کامنت نوشته اطلاعاتی مثل آیدی و اسم و سایز و .... رو بگیرید : 

Dim mb As MediaBrowser
mb.GetExtVideoFileInfo("address file video")

و کد کامل به این صورت میشه : 

Dim MB As MediaBrowser
Dim ID As Long
Dim Bitmap1 As Bitmap

ID=MB.GetExtVideoFileInfo("address file video").Get("ID")
Bitmap1=MB.GetVideoThumbnailByID(ID,True) 

[m007moh 181]

ممنون از پاسخ گویی سریعتون

من این کار رو انجام دادم ولی خطای زیر رو داد

لطف میکنید اگر در این مورد هم راهنمایی کنید

با تشکر

 

 

[mohammad-alone 564]

مرسی از کد خوبتون.

حالا این آدرس فایلهای آنلاین رو که دادیم ، در عمل دانلود میکنه اطلاعات فایل رو؟

[m007moh 181]

 

شما باید آدرس کامل ویدیو رو داشته باشین و از طریق این متد اون رو به صورت یک Map لود کنید و با دادن key هایی که تو کامنت نوشته اطلاعاتی مثل آیدی و اسم و سایز و .... رو بگیرید : 

Dim mb As MediaBrowser
mb.GetExtVideoFileInfo("address file video")

و کد کامل به این صورت میشه : 

Dim MB As MediaBrowser
Dim ID As Long
Dim Bitmap1 As Bitmap

ID=MB.GetExtVideoFileInfo("address file video").Get("ID")
Bitmap1=MB.GetVideoThumbnailByID(ID,True) 

ممنون از پاسخ گویی سریعتون

من این کار رو انجام دادم ولی خطای زیر رو داد

لطف میکنید اگر در این مورد هم راهنمایی کنید

با تشکر