PDA

View Full Version : سوال: رفع اشکالات برنامه ام



neda esmaeili
چهارشنبه 01 دی 1389, 22:24 عصر
سلام و خسته نباشید دوستان عزیز
من چند تا سوال در رابطه با دستورات اس کیو ال داشتم
برنامه ای نوشتم که درواقع اطلاعاتی را از طریق تکست باکس میگیرد و داخل جداول اس کیو ال میریزد

سوال اول من این است که می خواهم اطلاعات یکی از فیلدهای جدولی را در جدول دیگر بنویسم آیا دستور زیر درست است؟
البته من دستور را در کتاب چک کردم ولی در اجرا ارور می گیرد
insert into order (gcode) select (gcode) from genuse
سول بعدی من در رابطه با ارور زیر است با اجرای برنامه ارور زیر موقع ثبت اطلاعات صورت میگیرد که البته من نوع فیل هارا هم در جذاول چک کردم یکی هستند ولی باز هم نتوانستم ارور را رفع کنم
"insert error:column name or number of supplied values does not match table difinition"
سوال بعدی هم اینکه در برنامه ام از سه کمبو باکس استفاده کرده ام و می خواهم بعد از انتخاب هر یک از آیتم های هر کمبو باکس اطلاعات مربوط به آن آیتم که در جدولی دیگر است در تکیت لیبلی ریخته شود
در واقع در هر کمبو باکس نام 5 کالا وجود دارد می خواهم با انتخاب هر کالا از هر کدام قیمت هر کالا را در لیبلی که در زیر آن قرار دارد بریزم که قیمت ها در جدولی به نامgenuse است
دستورات زیر را خودم نوشتم ولی اجرا نمی شوند لطفا درست آن را بگویید
cmdstr="select cost from genuse where name='"+ combobox1.selecteditem +"'"
cmd=new sqlcommand(cmdstr,con)
lable1.text=cmd.executenonquery()
خواهش می کنم کمک کنید :ناراحت:
البته برنامه به زبان وی بی دات نت نوشتم

taghi.km
شنبه 04 دی 1389, 10:56 صبح
جدول order فقط يه فيلد كه نداره تو اين دستور بايد تعداد فيلد هاي جداول رعايت بشه خطايي كه ميده بخاطر عدم رعايت تعداد فيلد هاست
پيغام خطاي دومي چي هست

neda esmaeili
یک شنبه 05 دی 1389, 11:18 صبح
سلام
مرسی از این که جواب دادی
در مورد سوال دومی اینه که یه کد نوشتم که اطلاعات رو از تکست باکس می گیره و در بانک میریزه
وقتی اجرا میکنم این ارور رو میده
اگه لازمه کدرو ببینی بگو میزارم اینجا
سوال سومم این که من کد رو عوض کردم
ولی باز اجرا نمیشه
مشکلش چیه؟
con = New SqlConnection(constr)
Try
con.Open()
cmdstr = "select cost from genuse where name='" + ComboBox1.SelectedItem.ToString + "'"
cmdstr2 = "select cost from genuse where name='" + ComboBox2.SelectedItem.ToString + "'"
cmdstr3 = "select cost from genuse where name='" + ComboBox3.SelectedItem.ToString + "'"
da = New SqlDataAdapter(cmdstr, con)
da.Fill(ds, "genuse")
Label11.DataBindings.Add(New Binding("text", ds, "genuse.cost"))
da = New SqlDataAdapter(cmdstr2, con)
da.Fill(ds, "genuse")
Label12.DataBindings.Add(New Binding("text", ds, "genuse.cost"))
da = New SqlDataAdapter(cmdstr3, con)
da.Fill(ds, "genuse")
Label13.DataBindings.Add(New Binding("text", ds, "genuse.cost"))
Catch ex As Exception
Label20.Text = ex.Message
Finally
con.Close()
End Try