SQL update statement in VB

[Mac]

I am trying to update price with cost times 100.

I am getting an error.

I would appreciate if someone please correct my code.

Thx


strcnn = "DRIVER=SQL SERVER; SERVER=" & SQLSVRSTR & ";" & _
"UID=sa;PWD=TEST;DATABASE=" & SQLDBStr & ";"
Set cn = New ADODB.Connection
cn.Open strcnn
mprodcl = prod.txtpclass
markup = 100
strsql = "Update mytable SET mytable.price = " & mytable.cost & "*" & markup
& ""
cn.Execute strsql

[Al Reid]

"Mac" <ma*@hotmail.com> wrote in message news:1X6ee.7511$db7.5870@trnddc01...

I am trying to update price with cost times 100.

I am getting an error.

I would appreciate if someone please correct my code.

Thx


strcnn = "DRIVER=SQL SERVER; SERVER=" & SQLSVRSTR & ";" & _
"UID=sa;PWD=TEST;DATABASE=" & SQLDBStr & ";"
Set cn = New ADODB.Connection
cn.Open strcnn
mprodcl = prod.txtpclass
markup = 100
strsql = "Update mytable SET mytable.price = " & mytable.cost & "*" & markup
& ""
cn.Execute strsql

strsql = "Update mytable SET mytable.price = mytable.cost * " & markup

[Bob Butler]

"Mac" <ma*@hotmail.com> wrote in message
news:1X6ee.7511$db7.5870@trnddc01

I am trying to update price with cost times 100.

I am getting an error.

I would appreciate if someone please correct my code.

Thx


strcnn = "DRIVER=SQL SERVER; SERVER=" & SQLSVRSTR & ";" & _
"UID=sa;PWD=TEST;DATABASE=" & SQLDBStr & ";"
Set cn = New ADODB.Connection
cn.Open strcnn
mprodcl = prod.txtpclass
markup = 100
strsql = "Update mytable SET mytable.price = " & mytable.cost & "*" &
markup & ""
cn.Execute strsql

strsql = "Update mytable SET mytable.price = mytable.cost * " & cstr(markup)

--
Reply to the group so all can participate
VB.Net: "Fool me once..."