Error Create Table "Incorrect Syntax near..."
Publicado por Zunea (18 intervenciones) el 31/05/2012 01:30:51
Gracias de antemano a quien me pueda ayudar con esta duda:
Lo que pretendo es crear una nueva tabla a partir de un código digitado por el usuario en TextBoxCod.Text.
Pero sale el siguiente erro: Incorrect Syntax near "202012".
Donde 202012 es el código digitado por el usuario.
He tratado de muchas manera, pero ya me no tengo cabeza para ese error.
Adjunto el código que uso y muchas gracias.
_________________________________________________________________________
Try
Dim cn As New SqlConnection
Dim query As New SqlCommand
cn.ConnectionString = "Data Source=FILIAFLOREZVALE\SQLEXPRESS1;Initial Catalog=SMSQL;Integrated Security=True"
cn.Open()
query.CommandType = Data.CommandType.Text
query.CommandText = "Create Table'" + TextBoxCod.Text + "'(id int,fecha date,tipo numeric(1,0))"
query.Connection = cn
query.ExecuteNonQuery()
LblInfo.Visible = True
LblInfo.Text = "Base de Datos " + TextBoxCod.Text + "creada Ok!"
cn.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
________________________________________________________________________
Gracias.
Lo que pretendo es crear una nueva tabla a partir de un código digitado por el usuario en TextBoxCod.Text.
Pero sale el siguiente erro: Incorrect Syntax near "202012".
Donde 202012 es el código digitado por el usuario.
He tratado de muchas manera, pero ya me no tengo cabeza para ese error.
Adjunto el código que uso y muchas gracias.
_________________________________________________________________________
Try
Dim cn As New SqlConnection
Dim query As New SqlCommand
cn.ConnectionString = "Data Source=FILIAFLOREZVALE\SQLEXPRESS1;Initial Catalog=SMSQL;Integrated Security=True"
cn.Open()
query.CommandType = Data.CommandType.Text
query.CommandText = "Create Table'" + TextBoxCod.Text + "'(id int,fecha date,tipo numeric(1,0))"
query.Connection = cn
query.ExecuteNonQuery()
LblInfo.Visible = True
LblInfo.Text = "Base de Datos " + TextBoxCod.Text + "creada Ok!"
cn.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try
________________________________________________________________________
Gracias.
Valora esta pregunta


0