Hola, continúo con ADOX...
Código:
objFirstTable.Columns.Append "Campo 1", adInteger
La línea anterior inserta un campo llamado
Campo 1 como Integer en una tabla.
Código:
Dim Nombre_de_Campo, Tipo_de_campo
Nombre_de_Campo = Request.Form("nombre")
Tipo_de_campo = Request.Form("tipo") 'contiene adInteger
objFirstTable.Columns.Append Nombre_de_Campo, Tipo_de_campo
Debería funcionar a la perfección, no los parece??
Pero no lo hace. Error: No coinciden los tipos: 'Append' (maldito... me hizo perder un par de horas dándole vueltas al tema)
Ahora resulta que esto SI funciona y en teoría es lo mismo!!
Código:
If TipoCampo = "adInteger" then
objFirstTable.Columns.Append NombreCampo, adInteger
End if
If TipoCampo = "adVarWChar" then
objFirstTable.Columns.Append NombreCampo, adVarWChar
End if
' y un IF por cada tipo de dato...
A alguno se le ocurre por qué hace esto???
Es sólo para quitarme la duda ya que, al parecer, no se puede meter una variable en la definición del tipo de datos y no lo voy a hacer.
te odio ADOX... lástima que te necesito