Adding a New Money type Field to an Existing Table : Table Column Field « Access « VBA / Excel / Access / Word






  1. VBA / Excel / Access / Word
  2. Access
  3. Table Column Field

Adding a New Money type Field to an Existing Table

 
Sub AddNewField()
    Dim conn As ADODB.Connection
    Dim strTable As String
    Dim strCol As String

    On Error GoTo ErrorHandler
    Set conn = CurrentProject.Connection

    strTable = "myTable"
    strCol = "newColumn"

    conn.Execute "ALTER TABLE " & strTable & " ADD COLUMN " & strCol & " MONEY;"
ExitHere:
    conn.Close
    Set conn = Nothing
    Exit Sub
ErrorHandler:
    Debug.Print Err.Number & ":" & Err.Description
    Resume ExitHere
End Sub








Related examples in the same category

1.Append new columns to new table
2.Delete a column
3.Adding a New Field to a Table
4.Removing a Field from a Table
5.Set column properties by using ADOX.Table
6.Listing Field Properties
7.Get field properties
8.Listing Tables and Their Fields Using the OpenSchema Method
9.Adding a Field with SQL command
10.Changing the Field Data Type with SQL command
11.Changing the Size of a Field with SQL command
12.Deleting a Field from a Table with SQL command
13.Setting a Default Value for a Field with SQL command
14.Changing the Start (Seed) Value of the AutoNumber Field with SQL command
15.Read record in recordset by referening the field name with '!'
16.Open a table and read data by column
17.Show field name, type and value data type
18.Read specific columns from Recordset
19.Checking for Existence of a Field