我只是一个初学者,所以请温柔。我得到了以下代码,它完美地上传了一个视频文件。我需要它同时保存缩略图..有什么想法吗?
上传图像时,下面的“保存缩略图”代码有效。它完美地生成了一个缩略图,但是当我上传视频时却没有,因为它显然是在尝试使用图像。
Protected Sub AjaxFileUpload1_UploadComplete(sender As Object, e As AjaxControlToolkit.AjaxFileUploadEventArgs) Handles AjaxFileUpload1.UploadComplete
'Save the original image
Dim filename As String = RemoveSpecialChars(e.FileName)
Dim imageFilename As String = DateTime.Now.Ticks.ToString() + "_" + filename
Dim acc As New accounts(Membership.GetUser.ProviderUserKey)
AjaxFileUpload1.SaveAs("E:\kunden\homepages\19\d664110395\www\BargainBoxes\catalog\videos\" & imageFilename)
End Sub
'Save a thumbnail of the image
Dim returnImage As System.Drawing.Image = Image.FromFile("E:\kunden\homepages\19\d664110395\www\BargainBoxes\catalog\videos\" & imageFilename)
Dim thumb As System.Drawing.Image = FixedSize(returnImage, 120, 120)
thumb.Save("E:\kunden\homepages\19\d664110395\www\pool-match-up\catalog\images\thumbnails\" & imageFilename, System.Drawing.Imaging.ImageFormat.Jpeg)
我希望它显示视频第一帧的缩略图。
非常感谢您的任何建议。