PDA

View Full Version : سوال: نمایش میزان پیشرفت آپلود و دانلود شدن فایل در دیتابیس با progessbar



ali190
دوشنبه 29 اسفند 1390, 09:26 صبح
باسلام و عرض خسته نباشید
پیشاپیش عید نوروز رو خدمت همتون تبریک عرض میکنم
میخواستم بدونم چطور میتونم میزان پیشرفت ذخیره شدن و همچنین فراخوانی یک فایل رو از دیتابیس رو با استفاده از progessBar نمایش بدم.
ممنونم
یاعلی

ali190
دوشنبه 29 اسفند 1390, 23:23 عصر
سلام
آیا این کار در دات نت امکانپذیر هست یا نه؟
ممنونم
یاعلی

فرید نجفلو
دوشنبه 29 اسفند 1390, 23:42 عصر
دوست عزیز همانطور که در این تاپیک دید
سورس:ذخیره ، بازیابی و چاپ عکس در پایگاه داده(دانلود کنید!) (http://barnamenevis.org/showthread.php?333127-سورس-ذخیره-،-بازیابی-و-چاپ-عکس-در-پایگاه-داده(دانلود-کنید!))
ما فایل رو به یک باره از دیتابیس می خونیم نه مثل کپی فایل بلاک به بلاک پس تا اونجایی که من می دونم نمیشه
البته الان یه چیزی تو ذهنم هست که نمی دونم با اون میشه یا نه باید بعدا تست کنم اگه کار کرد تو همین تاپیک می ذارم
انجام این کار واستون مهم و واجبه؟

ali190
سه شنبه 01 فروردین 1391, 01:15 صبح
سلام
در مورد عکس با توجه حجمش حق باشماست ، ولی شما فرض بفرمائید میخواهیم یه فیلم رو در دیتابیس آپلود کنیم
اون موقع نیاز به یه پروسزبار برای نمایش میزان پیشرفت به کاربر 100 درصد احساس میشه
منظر جوابتون هستم
ممنونم
یاعلی

فرید نجفلو
سه شنبه 01 فروردین 1391, 02:56 صبح
هیچ چیز غیر ممکن نیست پیدا کردم به روی چشم:لبخندساده:
به یه نتیجه هایی رسیدم:قلب:

ali190
سه شنبه 01 فروردین 1391, 10:28 صبح
سلام
من فایل ها رو با کد زیر در دیتابیس ذخیره میکنم:


Private dbstr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\mydb.mdb"

Public Sub SaveFile()

Try

Dim filebyte As Byte()

Dim con As OleDbConnection

Dim cmd As OleDbCommand

filebyte = IO.File.ReadAllBytes(txtfilepath.Text)

con = New OleDbConnection(dbstr)

cmd = New OleDbCommand("Insert into tblFiles Values(@filepath,@data)", con)

cmd.Parameters.Add("@filepath", OleDbType.VarChar).Value = txtfilepath.Text

cmd.Parameters.Add("@data", OleDbType.Binary).Value = filebyte

con.Open()

cmd.ExecuteNonQuery()

con.Close()

MsgBox("File saved into database", MsgBoxStyle.Information)

Catch ex As Exception

MsgBox(Err.Description, MsgBoxStyle.Exclamation)

End Try

End Sub

آیا با این کد میشه این محاسبات رو انجام داد ، یا باید استراتژی رو عوض کرد؟
ممنونم
یاعلی

فرید نجفلو
سه شنبه 01 فروردین 1391, 13:30 عصر
شما منو غافل گیر کردید!
من روی SQL Server دارم کارم می کنم و شما کد اکسس گذاشتید!!!
من که فعلا دارم رو اون کار می کنم و قسمت درصد پیشرفت آپلود به سرور رو ساختم:چشمک:
مونده درصد پیشرفت دریافت از سرور که یکم سخت تره
بعد اینکه این تموم شد باید ببینم تبدیل پذیر به اکسس هست یا نه

ali190
پنج شنبه 03 فروردین 1391, 13:01 عصر
سلام
من دیتابیسم SQL Server هست
اما چون کد اکسس دم دستم بود اینجا قرارش دادم