Hola a todos:
Queria saber porque me da error cuando inserto la orden system.guid, si me pueden decir para que sirve y como puedo llegar a solucionarlo, les dejo el codigo:
Function Addartic(ByVal codigodearticulo As System.Guid, ByVal detalle As String, ByVal stock As Integer, ByVal stockMinimo As Integer) As Integer
Dim connectionString As String = "server='localhost'; trusted_connection=true; Database='art'"
Dim sqlConnection As System.Data.SqlClient.SqlConnection = New System.Data.SqlClient.SqlConnection(connectionStri ng)
Dim queryString As String = "INSERT INTO [Artic] ([Codigo de articulo], [Detalle], [Stock], [Stock Minimo]) VA"& _
"LUES (@Codigo de articulo, @Detalle, @Stock, @Stock Minimo)"
Dim sqlCommand As System.Data.SqlClient.SqlCommand = New System.Data.SqlClient.SqlCommand(queryString, sqlConnection)
sqlCommand.Parameters.Add("@Codigodearticulo", System.Data.SqlDbType.UniqueIdentifier).Value = codigodearticulo
sqlCommand.Parameters.Add("@Detalle", System.Data.SqlDbType.Text).Value = detalle
sqlCommand.Parameters.Add("@Stock", System.Data.SqlDbType.Int).Value = stock
sqlCommand.Parameters.Add("@StockMinimo", System.Data.SqlDbType.Int).Value = stockMinimo
Dim rowsAffected As Integer = 0
sqlConnection.Open
Try
rowsAffected = sqlCommand.ExecuteNonQuery
Finally
sqlConnection.Close
End Try
Return rowsAffected
End Function
Sub Button1_Click(sender As Object, e As EventArgs)
If Addartic(txtcodigo.Text, txtdetalle.Text, txtstock.text, txtstockminimo.text) > 0
Message.Text = "Success"
Else
Message.Text = "Failure"
End If
End Sub
