O que pode estar errado nisso?

 

db.Execute("ALTER TABLE Caminhoes ADD COLUMN ComObs text(50)")

 

Dá o seguinte erro:

Incorrect syntax near the keyword 'COLUMN'.

Uso MSSQLServer... se aguém puder dar uma ajuda, agradeço, pois já verifiquei no help e a sintaxe é essa.

 

Tente assim

    db.Execute("ALTER TABLE Caminhoes ADD ComObs char(50)")

fiz um teste com este código e funcionou 

 

Option Explicit
Dim Conn As ADODB.Connection
Dim Rs   As ADODB.Recordset

Private Sub Command1_Click()
    Set Conn = New ADODB.Connection
    Conn.Provider = "SQLOLEDB"
    Conn.ConnectionString = "server=silvio;database=db_bo;uid=sa"
    Conn.Open
    Set Rs = New ADODB.Recordset
    Set Rs = Conn.Execute("ALTER TABLE Caminhoes ADD ComObs char(50)")
    Set Rs = Nothing

    set Conn = Nothing
End Sub