PDA

View Full Version : ذخیره نشدن اطلاعات در دیتابیس بعد گذشت چند دقیقه



naser_feb8646
چهارشنبه 05 بهمن 1390, 01:35 صبح
سلام دوستان
به یه مشکل برخوردم من یه صفحه دارم که توی اون یه سری تکست باکس و یه ادیتور ckeditor هست
قراره اطلاعات این کنترل ها در دیتا بیس ذخیره بشه اما مشکل اینجاست که اگر یه مدت زمانی از لود کامل صفحه بگذره اطلاعات ذخیره نمیشه و تمام اطلاعاتی هم که قبلا تو این کنترل ها نوشته شده با پست بک پاک میشه
برای مثال من تیتر خبر و تاریخ رو مینویسم اما متن خبر چون زیاده نوشتنش طول میکشه بعد اینکه متن رو نوشتم روی دکمه ذخیره کلیک میکنم اما اطلاعات ذخیره نمیشه

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

meisam3322
چهارشنبه 05 بهمن 1390, 02:58 صبح
از سشن استفاده میکنین ؟

hamid_shrk
چهارشنبه 05 بهمن 1390, 09:27 صبح
احتمالا دستوراتتون رو درون یک شرط گذاشتید که با سشن در ارتباط هست / یا اینکه مقداری از سشن رو هم میخواید وارد دیتا بیس کنید و از try catch بدون پیغام استفاده کردید..

alonemm
چهارشنبه 05 بهمن 1390, 10:59 صبح
سلام دوستان
به یه مشکل برخوردم من یه صفحه دارم که توی اون یه سری تکست باکس و یه ادیتور ckeditor هست
قراره اطلاعات این کنترل ها در دیتا بیس ذخیره بشه اما مشکل اینجاست که اگر یه مدت زمانی از لود کامل صفحه بگذره اطلاعات ذخیره نمیشه و تمام اطلاعاتی هم که قبلا تو این کنترل ها نوشته شده با پست بک پاک میشه
برای مثال من تیتر خبر و تاریخ رو مینویسم اما متن خبر چون زیاده نوشتنش طول میکشه بعد اینکه متن رو نوشتم روی دکمه ذخیره کلیک میکنم اما اطلاعات ذخیره نمیشه

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

لطف کنید کدهاتون رو بزارید تا بهتر راهنمایی کنیم و از پست اضافی جلوگیری بشه.

naser_feb8646
پنج شنبه 06 بهمن 1390, 14:16 عصر
سلام دوستان
ممنون از پاسخگویی شما ولی من از سشن استفاده نمیکنم
اینم کد ذخیره کردن اطلاعات

Protected Sub btnInsert_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnInsert.Click
Dim Path As String = Server.MapPath("..\Picture\News\")
Dim FileName As String = FileUpload1.FileName
While (System.IO.File.Exists(Path & FileName))
FileName = "1" & FileName
End While
If Not (FileName = "") Then
FileUpload1.SaveAs(Path & FileName)
Dim objImage As System.Drawing.Image, objThumbnail As System.Drawing.Image
Dim shtWidth As Short, shtHeight As Short
objImage = System.Drawing.Image.FromFile(Path & FileName)
shtWidth = 100
shtHeight = 100
objThumbnail = objImage.GetThumbnailImage(shtWidth, shtHeight, Nothing, System.IntPtr.Zero)
Dim imageSName As String = Path & "thumbnail" & FileName
objThumbnail.Save(imageSName, System.Drawing.Imaging.ImageFormat.Jpeg)
objThumbnail.Dispose()
objImage.Dispose()
Else
Label1.Text = "عکس برای خبر انتخاب نشده است"
Exit Sub
End If

Dim sqlcon As String = WebConfigurationManager.ConnectionStrings("SQLcon").ConnectionString
Dim con As SqlConnection = New SqlConnection(sqlcon)
Dim com As SqlCommand = con.CreateCommand()
Dim cmd As String = "insert into Table_news (newsdate ,subject ,context ,newspic) values (N'" & txtDate.Text & "', N'" & txtSubject.Text & "', N'" & Editor.Text & "', N'" & FileName & "')"

Try
con.Open()
com.CommandText = cmd
com.ExecuteNonQuery()
con.Close()
Catch ex As Exception
Label1.Text = ex.Message
End Try
Label1.Text = "اطلاعات با موفقیت ثبت شد"
End Sub

karim orooji
پنج شنبه 06 بهمن 1390, 19:40 عصر
سلام
بهتره برای مقدار گیری از


com.parametr.addwhilevaleu("مقدار دهی","اسم فیلد")

و com.commandtext رو هم توی متغیر نزار جلوی خودش بنویس ببین درست میشه


یا علی