PDA

View Full Version : مشکل با عدم نمایش تصویر



pedram_ns
دوشنبه 07 فروردین 1391, 13:20 عصر
با سلام
من به کاربر اجازه میدم تا برای اطلاعات شرکت خودش روی سایتم یک تصویر لوگو بذاره و هر وقت خواست اون رو حذف کنه.
با شروع ثبت نام من مقدار فیلد لوگو رو در دیتایسم خالی null میذارم و با کد زیر در هنگام جستجو شرکتها اون رو نمایش میدم


Dim adapter As New OleDbDataAdapter(cmd)
Dim ds As New DataSet()

adapter.Fill(ds, "company")

Dim l As Integer
For l = 0 To ds.Tables("company").Rows.Count - 1

Dim logo As String

If Not IsDBNull(ds.Tables("company").Rows(l)("logo")) Then
logo = ds.Tables("company").Rows(l)("logo").ToString()
Else
ds.Tables("company").Rows(l)("logo") = "not_available.gif"
End If

Next

همونطور که در این کد میبیند اگر کاربر تصویر بذاره اون تصویر نمایش داده میشه و اگر تصویری انتخاب نگرده باشه یک تصویر پیش فرض رو نمایش میدم.

مشکل من وقتیه که کاربر اول یک تصویر رو برای شرکتش بذاره و بعد اون رو حذف کنه. با حذف تصویر من باز هم فیلد مربوط به لوگو در دیتابیس رو خالی میذارم ولی دیگه کد بالا نمیتونه عکس پیش فرض رو نشون بده.

لطفا راهنمایی کنید مشکل در کجاست و باید چکار کرد؟

با تشکر

hamid_shrk
دوشنبه 07 فروردین 1391, 13:37 عصر
وقتی کاربر لوگو رو پاک میکنه شما تو دیتا بیستون رشته خالی ریخته میشه و دیگه null نیست ، یکار کنید بعد از پاک کردن لوگو تو دیتابیس هم null ذخیره بشه.

pedram_ns
دوشنبه 07 فروردین 1391, 22:33 عصر
چجوری دقیقا؟ من دیتابیسم اکسسه و با vb هم نوشتم. چطور میشه دستور ذخیره null رو داد؟

hamid_shrk
دوشنبه 07 فروردین 1391, 22:47 عصر
اون راه رو بیخیال ، نمیدونم تو vb چجوری مینویسی اما تو این خط :
If Not IsDBNull
شرطط رو طوری بنویس که اگه null بود یا برابر "" بود عکس پیش فرض رو نشون بده.