ثبت دو رکورد یکسان در sql

[saminjoon]

سلام دوستان
من یک کد insert دارم که با هر بار کلیک روی دکمه و اجرای کد ، مقادیر 2 بار در بانک sql ذخیره میشود
کسی دلیلشو میدونه؟

[saminjoon]

واقعا کسی نیست بتونه مشکل منو حل کنه ؟! :ناراحت:

[alinaghiha]

کدتو بذار ببینیم علم غیب نداریم که
من به این مورد بر خوردم اما تو view ها

[saminjoon]

این کدیه که نوشتم:


Dim conn As New SqlConnection(Myconnection)
Dim str As String = "insert into tbfood(nam,comm,picnam,dat,pdat) " & "values('" & txtnam.Text & "','" & req & "','" & PicUrl & "','" & zaman & "',N'" & Application("dat") & "' ) "
Dim comm As New SqlCommand(str, conn)
Try
conn.Open()
comm.ExecuteNonQuery()
conn.Close()

Catch ex As Exception

lblmes.Text = "اطلاعات به درستی ثبت نشد" & ex.Message
End Try
End If

[alinaghiha]

با اینکه وی بی کار نکردم اما مشخصه هیچ اشکالی در کارت نیس
می تونی فقط جدول جاری رو چک کنی ببینی چند رکورد اضافه شده
ممکنه مشکل تو join دوتا جدول باشه که شما دوتا میبینی

[saminjoon]

من منظورتونو کامل متوجه نشدم!!!
من یک جدول در دیتابیس sql ام دارم که همون tbfood است
joinی در کا نیست!!!

[hosseinbarnamenevis]

"INSERT INTO tblusers(itm_user,itm_pass,itm_image,itm_secur)VAL UES(N'" & inaddusers.itmuser & "','" & inaddusers.itmpass & "','" & inaddusers.itmimage & "',N'" & inaddusers.itmsecur & "')", connadduser)
سعی کن کد بالایی که نوشتی از نظر ساختاری دقیقا مثل کدی که نوشتم باشه
شاید مشکلت حل شدمنظورم فقط قرار گیری علامت " در کدت هست

[saminjoon]

سعی کن کد بالایی که نوشتی از نظر ساختاری دقیقا مثل کدی که نوشتم باشه
شاید مشکلت حل شدمنظورم فقط قرار گیری علامت " در کدت هست
کدمو تغییر دادم ولی یه مشکل جدید...
من sql رو استوپ زده بودم واسه زیپ کردن دیتابیس، قبل استارت بستمش، حالا connect نمیشه:اشتباه:

[saminjoon]

"INSERT INTO tblusers(itm_user,itm_pass,itm_image,itm_secur)VAL UES(N'" & inaddusers.itmuser & "','" & inaddusers.itmpass & "','" & inaddusers.itmimage & "',N'" & inaddusers.itmsecur & "')", connadduser)

این کدهم امتحان کردم، البته با کد خودم فرقی نداشت ولی باز هم همینو گذاشتم ولی مشکل برطرف نشد
همچنان دو رکورد با یک کلیک ثبت میشه :ناراحت:

[saminjoon]

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

Sub MyButton(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnn.Click
که با حذف "Handles btnn.Click" آخر اون، مشکل حل شد:لبخند: