Visual Basic - Ayuda por favor

buenas tardes queria dar las gracias a las personas que me han ayudado en este foro de verdad si me han ayudado fullll, estoy empezando a programar y por eso pregunto cuando no entiendo algo y busco ayuda y aqui la he encontrado..... con respecto a la pregunta que hize anteriormente lo del nombre de la tabla aun no lo he resuelto, solo queria aclarar algo yo soy una persona normal y este parrafo que escribrieron de que soy un poco sub-normal no fui yo. aqui se los muestro.

perdona patrisia, pero es como soy un poco sub-normal no me entero bien de los explicaciones.

gracias por tu ayuda yo por mi parte ya lo intentare el seguir lo de las normas.

y gracias patricia por tu ayuda estas gracias si te las doy yo......

espero puedan sequir ayudandome y millll gracias a todos por enseñar por que con ustedes he aprendido muchas cosas......

espero tener de nuevo su ayuda cuando lo necesite...

chao saludos

Pues lo de la tabla, pense que ya estaba resuelto, pero en fin.

Como te comentaron en el anterior mensaje, debes de fijarte bien la sintaxis del CREATE TABLE, ya que como estas concatenando puede que se te pase algo.

Luego despues de tener eso, puedes probar con CN.EXECUTE strSQL

Donde CN es tu instancia CONNECTION y strSQL es una variable string donde tienes tu instruccion.

Espero puedas solucionarlo ya, y con respecto a la USURPACION, pues suele pasar, mas que este foro es libre ( no debes registrarte para nada ), con mayor motivo algun ANIMAL! hace eso, pues hay que dejarlos para eso estaran aqui no?

Cuidate betsy!

Y para los sabiondos o " normales "
" No hay que confundir nunca el conocimiento con la sabiduría.
El primero nos sirve para ganarnos la vida; la sabiduría nos ayuda a vivir. "

Y esta frase la aprendi de este foro XD.

Hola.

db.Open "Provider=Microsoft.Jet.OLEDB.4.0; " & _
"Data Source=" & RutaBD() & ";" & _
"Jet OLEDB:Database Password=1234"

' AQUI ES DONDE ME SALE ESTE ERROR
' DE Syntax in error Create Table statement

Que contenido tiene RutaBD() ?
Saludos.

querido Conejo de indias..

quiza en la linea;

"Data Source=" & RutaBD() & ";

sea:

"Data Source='" & RutaBD() & "';

Gracias edu por su comentario.

Hola Betsy.
Te paso una solución alternativa a tu problema.

Referencias:
Microsoft Data Formatting Object Library
Microsoft DAO 3.51 Object Library

Dim db As Database
Dim NewTable As TableDef
Dim Index1 As DAO.Index
Dim Index2 As DAO.Index
' abres la base de datos
Set db = OpenDatabase(App.Path + "\prueba.mdb") '<-- cambiar x la ruta de tu db (RutaBD()) me parece que usas.
'acá creas la tabla
Set NewTable = db.CreateTableDef(Date) '<-- cambia date, por el nombre de tu tabla (TxtFechaInicial.Text)
On Error Resume Next
'Como es tabla temporal puse acá que eliminara la tabla completa que contenga el mismo nombre, si es que ya existe claro.
db.TableDefs.Delete NewTable.Name
'Creas los campos en la tabla
With NewTable
.Fields.Append .CreateField("cont", dbDouble)
.Fields.Append .CreateField("fechacon", dbDate)
.Fields.Append .CreateField("Nombre1", dbText, 30)
.Fields.Append .CreateField("fechapro", dbDate)
End With
'esto de acá por si quieres indexar el campo cont, sino lo dejas como comentario
'Set Index1 = NewTable.CreateIndex("Cont")
'Index1.Fields.Append Index1.CreateField("Cont")
'NewTable.Indexes.Append Index1
'NewTable.Indexes.Refresh
db.TableDefs.Append NewTable

Espero te sea util
Saludos.

y dices que eres un (poco) sub-normal, acaso no lo serás del todo?

para aprender ve a la escuela, o es que no tienes tiempo, porque andas de pendoneo todo el dia?