دسته بندی ها
21:04 1399/10/17

File Browser در ویژوال بیسیک اکسس چیست ؟ 

Private Sub LstFiles_DblClick(Cancel As Integer)If Not IsNull(Me.LstFiles) And Not Me.LstFiles = "" Then
    Dim myrs As New ADODB.Recordset
    Dim Stream As String, ImageData As String
    Dim binaryStream As New ADODB.Stream
    
    myrs.Open "SELECT * FROM tblFileStore WHERE FileID = '" & Me.LstFiles & "'", CurrentProject.Connection, adOpenKeyset, adLockReadOnly
    
    'Specify stream type - we want To save binary data.
    binaryStream.Type = adTypeBinary
    
    'Open the stream And write binary data To the object
    binaryStream.Open
    binaryStream.Write myrs("FileData")
    
    binaryStream.SaveToFile "C:\"
    'Start HTML generation
    Stream = "<Html><head></head><body>"
    Stream = Stream & "<img src=" & """" & "data:image/" & myrs("filetype") & ";base64," & encodeBase64(binaryStream.Read) & """" & ">"
    Stream = Stream & "</body></html>"
    
    Me.FileBrowser.Document.Open
    Me.FileBrowser.Document.Write Stream
    Me.FileBrowser.Document.Close
    Me.FileBrowser.Refresh
    On Error Resume Next
        myrs.Close
        Set myrs = Nothing
    On Error GoTo 0
    
    binaryStream.Close
End If
End Sub

لطفا راهنمایی میکنید File Browser در خط بالا چیه توی اکسس ؟

ActivX هست یا Reference

 

ویرایش شده در سه شنبه 30 بهمن 1403 ساعت 22:57:33
مشخصات سوال کننده :
کاربر : MohammadH     امتیاز کاربر : 18     رتبه کاربر : 40
دسته بندی : Vb.Net
به این سوال امتیاز بدهید    0
تعداد بازدید این سوال : 2922
پاسخ دهنده : hamid_b 14:31 1399/10/18

معمولا وقتی که شما بخواید به فایلهای روی سیستم دسترسی داشته باشید، مثلا برای آپلود فایل، یا ذخیره از File Browser استفاده میشه. File Browser چیزی مشابه با تصویر زیر هست

 

File Browser چیست

ویرایش شده در چهارشنبه 20 اسفند 1399 ساعت 18:13:22
به این پاسخ امتیاز بدهید    0
امتیاز: 510 رتبه: 4
آخرین سوالات ثبت ‌شده
سوالات مرتبط
آموزش های پرطرفدار
آموزش ساخت اتوماسیون اداری تحت وب
آموزش ساخت سیستم فروش و انبارداری وب
آموزش ساخت سیستم حقوق و دستمزد وب با سینکفیوژن
آموزش ساخت سیستم آزمونگیر آنلاین
برای ارسال پاسخ لطفا وارد حساب کاربری خود شوید.   ورود