sql server - VB.NET database data passing error -

-

i error message

"error while inserting record o table… incorrect syntax near keyword ‘return’.incorrect syntax near ‘,’ ."

public class form10     dim con new sqlclient.sqlconnection     dim cmd, com new sqlclient.sqlcommand     dim sqlda new sqlclient.sqldataadapter     dim ds new dataset    private sub form10_load(byval sender system.object, byval e system.eventargs) handles mybase.load         try             con.connectionstring = "data source=.\sqlexpress;initial catalog =pharmacy;integrated security =true"         catch ex exception             messagebox.show(ex.message, "connection error", messageboxbuttons.retrycancel, messageboxicon.error)         end try     end sub       private sub btnclear_click(byval sender system.object, byval e system.eventargs) handles btnclear.click         txtdcode.text = ""         txtrinvo.text = ""         txtcreg.text = ""         txtprice.text = ""         txtqty.text = ""         txttamount.text = ""         datetimepicker1.text = ""     end sub       private sub btnsearch_click(byval sender system.object, byval e system.eventargs) handles btnsearch.click         con.open()         try             sqlda = new system.data.sqlclient.sqldataadapter("select * return r_invoice_no='" & txtrinvo.text & "'", con)             ds.clear()             sqlda.fill(ds, "return")             txtdcode.text = ds.tables("return").rows(0).item(0)             txtcreg.text = ds.tables("return").rows(0).item(1)             txtprice.text = ds.tables("return").rows(0).item(2)             txtqty.text = ds.tables("return").rows(0).item(3)             txttamount.text = ds.tables("return").rows(0).item(4)             datetimepicker1.text = ds.tables("return").rows(0).item(5)              progressbar1.visible = true             progressbar1.minimum = 0             progressbar1.maximum = 10000             progressbar1.value = 0              dim integer             = progressbar1.minimum progressbar1.maximum                 progressbar1.value =             next              progressbar1.visible = false          catch ex indexoutofrangeexception             msgbox("type correct return invoice number search.." & ex.message, msgboxstyle.critical, "try again")                     con.close()         end try     end sub    private sub btnadd_click(byval sender system.object, byval e system.eventargs) handles btnadd.click         con.open()         try             if txtdcode.text = "" or txtrinvo.text = "" or txtcreg.text = "" or txtprice.text = "" or txtqty.text = "" or txttamount.text = "" or datetimepicker1.text = ""                 msgbox("you must have fill book details.")             else                  dim strinst string = "insert return(drug_code,c_reg_no,sale_price,qty,tot_amount,date,r_invoice_no)values('" & txtdcode.text & "','" & txtcreg.text & "','" & txtprice.text & "','" & txtqty.text & "','" & txttamount.text & "','" & datetimepicker1.text & "','" & txtrinvo.text & "')"                 dim cmd_insert new system.data.sqlclient.sqlcommand(strinst, con)                 cmd_insert.executenonquery()                  progressbar1.visible = true                 progressbar1.minimum = 0                 progressbar1.maximum = 10000                 progressbar1.value = 0                  dim integer                 = progressbar1.minimum progressbar1.maximum                     progressbar1.value =                 next                  msgbox("new recored has been added", msgboxstyle.information)                  progressbar1.visible = true                  txtdcode.text = ""                 txtrinvo.text = ""                 txtcreg.text = ""                 txtprice.text = ""                 txtqty.text = ""                 txttamount.text = ""                 datetimepicker1.text = ""              end if         catch ex exception              messagebox.show("error while inserting record on table..." & ex.message, "error inserting")                     con.close()         end try      end sub    private sub btnupdate_click(byval sender system.object, byval e system.eventargs) handles btnupdate.click         try             con.open()             com.connection = con             com.commandtext = "update return set drug_code ='" & txtdcode.text & "',c_reg_no='" & txtcreg.text & "',sale_price='" & txtprice.text & "',qty='" & txtqty.text & "',tot_amount='" & txttamount.text & "',date='" & datetimepicker1.text & "'"             com.executenonquery()              progressbar1.visible = true             progressbar1.minimum = 0             progressbar1.maximum = 10000             progressbar1.value = 0              dim integer             = progressbar1.minimum progressbar1.maximum                 progressbar1.value =             next              msgbox("your rocord has been updated", msgboxstyle.information, "update records")              progressbar1.visible = false              txtdcode.text = ""             txtrinvo.text = ""             txtcreg.text = ""             txtprice.text = ""             txtqty.text = ""             txttamount.text = ""             datetimepicker1.text = ""          catch ex exception             messagebox.show("error while updating password on table..." & ex.message, "insert records")                      con.close()         end try     end sub    private sub btndelete_click(byval sender system.object, byval e system.eventargs) handles btndelete.click         try             con.open()              com.connection = con             com.commandtext = "delete return r_invoice_no=" & txtrinvo.text             com.executenonquery()              progressbar1.visible = true             progressbar1.minimum = 0             progressbar1.maximum = 10000             progressbar1.value = 0              dim integer             = progressbar1.minimum progressbar1.maximum                 progressbar1.value =             next              msgbox("records deleted return invoice number..." & txtrinvo.text, msgboxstyle.information, "record  deleted.")              progressbar1.visible = false              txtdcode.text = ""             txtrinvo.text = ""             txtcreg.text = ""             txtprice.text = ""             txtqty.text = ""             txttamount.text = ""             datetimepicker1.text = ""          catch ex invalidcastexception             messagebox.show("error while retrieving records on table..." & ex.message, "load records")                      con.close()         end try     end sub  end class

change line:

dim strinst string = "insert return(drug_code,c_reg_no,sale_price,qty,tot_amount,date,r_invoice_no)values('" & txtdcode.text & "','" & txtcreg.text & "','" & txtprice.text & "','" & txtqty.text & "','" & txttamount.text & "','" & datetimepicker1.text & "','" & txtrinvo.text & "')"

to this:

dim strinst string = "insert [return](drug_code,c_reg_no,sale_price,qty,tot_amount,date,r_invoice_no)values('" & txtdcode.text & "','" & txtcreg.text & "','" & txtprice.text & "','" & txtqty.text & "','" & txttamount.text & "','" & datetimepicker1.text & "','" & txtrinvo.text & "')"

notice square brackets around table name. return reserved word in sql server, causing error. recommend change name of table. if not possible, stuck adding square brackets every time use table.


Comments

Post a Comment

Popular posts from this blog

java - Jmockit String final length method mocking Issue -

-
using jmockit 1.2 jar, trying mock string's length method getting unexpected invocation exception: failed: test java.lang.illegalstateexception: missing invocation mocked type @ point; please make sure such invocations appear after declaration of suitable mock field or parameter @ stringdemo.testa$1.<init>(testa.java:17) @ stringdemo.testa.test(testa.java:13) i using testng: @test public void test() throws exception { new expectations() { @mocked("length") string astring; { astring.length(); result = 2; } }; system.out.println(a.showa("test")); } } actual class a: public class { public static int showa(string str){ int a= str.length(); return a; } } this wrong way of recording expected results. shouldn't mock , record string's length() method, record showa() instead. here solution @suppresswarnings("unused...
Read more

What is the difference between data design and data model(ERD) -

-
i have google question , find answer in day. know, data design many many table have list column,and mark pk , fk. why er-diagram have find this? data design process of designing database. main output of data design detailed logical data model of database. some people data design includes of needed logical , physical design choices , physical storage parameters needed generate design in data definition language. technically, database analysis, database analysts (dbas) trained do. while person can both data design , database analysis, these 2 different tasks. data design models data. database analysis takes model , applies 1 or more database engines (relational, hierarchical, nosql). a logical data model 1 of main outputs of data design. data model represented entity relationship diagram, or er diagram.
Read more

ios - Can NSManagedObject conform to NSCoding -

-
i need transfer single object across device. right converting nsmanagedobject dictionary , archiving , sending nsdata. upon receiving unarchiving it. transfer nsmanagedobject archiving , unarchiving instead of creating intermediate data object. @interface test : nsmanagedobject<nscoding> @property (nonatomic, retain) nsstring * title; @end @implementation test @dynamic title; - (id)initwithcoder:(nscoder *)coder { self = [super init]; if (self) { self.title = [coder decodeobjectforkey:@"title"]; //<crash } return self; } - (void)encodewithcoder:(nscoder *)coder { [coder encodeobject:self.title forkey:@"title"]; } @end nsdata *archivedobjects = [nskeyedarchiver archiveddatawithrootobject:testobj]; nsdata *objectsdata = archivedobjects; if ([objectsdata length] > 0) { nsarray *objects = [nskeyedunarchiver unarchiveobjectwithdata:objectsdata]; } the problem above code is. crashes @ self.title in initwithcoder sa...
Read more