Crear tabla mysqlv6

silence_off · #1 (**permalink**) 26/05/2006, 10:45

alguien sabe como o no se si se pueda..crear una tabla en mysql desde vb6???

vbx3m · #2 (**permalink**) 26/05/2006, 12:22

Si se puede... Checa este ejemplo

Código:

conn.Execute "CREATE TABLE Tabla " _
    & "(campo1 varchar(10) NOT NULL PRIMARY KEY," _
    & "campo2 varchar(255),campo3 INT," _
    & "campo4 VARCHAR(64) NOT NULL," _
    & "campo5 MEDIUMBLOB NOT NULL)", , adExecuteNoRecords

silence_off · #3 (**permalink**) 26/05/2006, 18:28

y como seria para asignarle de nombre a la tabla el valor de un textbox?

vbx3m · #4 (**permalink**) 27/05/2006, 08:27

Código:

conn.Execute "CREATE TABLE " & Text.Text  _
    & "(campo1 varchar(10) NOT NULL PRIMARY KEY," _
    & "campo2 varchar(255),campo3 INT," _
    & "campo4 VARCHAR(64) NOT NULL," _
    & "campo5 MEDIUMBLOB NOT NULL)", , adExecuteNoRecords

silence_off · #5 (**permalink**) 27/05/2006, 10:12

muchas gracias (y)

silence_off · #6 (**permalink**) 27/05/2006, 17:10

ok, otro problema...

le asigno el valor de la textbox a la tabla para nombrarla.. pero como seria para q los datos se guarden en la tabla con el nombre de la textbox.

ej: nombro mi tabla <clientes>.

y al seleccionar de una lista de tablas la tabla de clientes.. los datos se guarden ahi.

silence_off · #7 (**permalink**) 27/05/2006, 20:40

hasta ahora..esto es lo q hago pero me marca el siguiente error:

Column count doesn't match value count at row 1

----------aqui una parte del codigo.

cmd.ActiveConnection = conn
cmd.CommandType = adCmdText
cmd.CommandText = "insert into " & Text10.Text & "(nss,nombre,direccion,telefono,celular,empleo,mon to,ingreso,fraccionamiento,fc,fpc,cerrador,credito ) values" & "( '" & Text1.Text & "' , '" & Text2.Text & "' , '" & Text3.Text & "', '" & Text4.Text & "', '" & Text5.Text & "', '" & Text6.Text & "', '" & Text7.Text & "', '" & Text8.Text & "', '" & rs("fraccionamiento") & "', '" & rs("fc") & "' , '" & rs("fpc") & "' , '" & List8.Text & "' )"

Set rs = cmd.Execute