Εμφάνιση ενός μόνο μηνύματος
  #3  
Παλιά 22-07-18, 00:12
th3_b3st Ο χρήστης th3_b3st δεν είναι συνδεδεμένος
Όνομα: Πέτρος
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 03-10-2014
Μηνύματα: 22
Προεπιλογή

Καλησπέρα Γιώργο και σε ευχαριστώ πολύ για την απάντηση σου.
Δυστυχώς το ζητούμενο δεν είναι το να το κάνω εγώ γιατί αυτο ακριβώς που είπες κάνω ο ίδιος μου. Θέλω αυτοί που δουλεύουν την εφαρμογή και τους δίνω την αναβάθμιση να ενημερώνετε η βάση δεδομένων τους με τις αλλαγές που έχω κάνει χωρίς να μπαίνω σε διαδικασία να τους πώ πώς θα το κάνουν ή να πρέπει να είμαι ο ίδιος.
Δοκίμασα με τον παρακάτω τρόπο αλλα δεν δουλεύει λόγω διαχωρισμένης βάσης.

Public Sub addColumn()
Dim strField As String
Dim curDatabase As Object
Dim tblTest As Object
Dim fldNew As Object

Set curDatabase = CurrentDb
Set tblTest = curDatabase.TableDefs("Test")

strField = "TestColumn"

Set fldNew = tblTest.CreateField(strField, dbLong)
tblTest.Fields.Append fldNew
End Sub

Ευχαριστώ εκ των προτέρων!
Απάντηση με παράθεση