Visualizzazione dei risultati da 1 a 5 su 5
  1. #1
    Utente di HTML.it
    Registrato dal
    Sep 2007
    Messaggi
    1,171

    apertura database access

    buongiorno
    ho un database access 2010 e vorrei aprire il database e le tabelle per l'inserimento dei dati
    tramite vba di access.
    Come si fa??

  2. #2
    Moderatore di Programmazione L'avatar di LeleFT
    Registrato dal
    Jun 2003
    Messaggi
    17,315
    Puoi riformulare e magari argomentare un po' di più? Io non ho assolutamente capito cosa vuoi fare...
    "Perchè spendere anche solo 5 dollari per un S.O., quando posso averne uno gratis e spendere quei 5 dollari per 5 bottiglie di birra?" [Jon "maddog" Hall]
    Fatti non foste a viver come bruti, ma per seguir virtute e canoscenza

  3. #3
    Utente di HTML.it
    Registrato dal
    Sep 2007
    Messaggi
    1,171
    mi spiego meglio
    ho provato cosi:
    Dim conn As ADODB.Connection
    Dim rs As ADODB.Recordset
    nomedb = "F:\database.accdb"
    Dim StringaDiConnessione
    StringaDiConnessione = "{Microsoft Access Driver (*.mdb, *.accdb)};Dbq=" & nomedb & " Persist Security Info=False;"
    conn.Open StringaDiConnessione
    ma mi da errore sull'ultima istruzione
    'Variabile oggetto o variabile del blocco With non impostata

  4. #4
    Moderatore di Programmazione L'avatar di LeleFT
    Registrato dal
    Jun 2003
    Messaggi
    17,315
    Ed ha ragione... hai dichiarato una variabile "conn" (prima riga) ma non l'hai inizializzata da nessuna parte e tenti di usarla nell'ultima riga.

    Nel frattempo sposto nel forum per il linguaggio VBA.


    Ciao.
    "Perchè spendere anche solo 5 dollari per un S.O., quando posso averne uno gratis e spendere quei 5 dollari per 5 bottiglie di birra?" [Jon "maddog" Hall]
    Fatti non foste a viver come bruti, ma per seguir virtute e canoscenza

  5. #5
    Utente di HTML.it L'avatar di Misterxxx
    Registrato dal
    Oct 2003
    Messaggi
    3,704
    temo ti manchino le basi per vba, comunque prova qualcosa come (è un codice incompleto):

    Dim conn As ADODB.Connection
    Dim rs As ADODB.Recordset
    nomedb = "F:\database.accdb"
    Dim StringaDiConnessione
    StringaDiConnessione = "{Microsoft Access Driver (*.mdb, *.accdb)};Dbq=" & nomedb & " Persist Security Info=False;"
    Set conn = New ADODB.Connection
    conn.ConnectionString = StringaDiConnessione
    conn.Open
    Ultima modifica di Misterxxx; 07-12-2016 a 16:37
    Io ne ho viste cose che voi umani non potreste immaginare. Navi da combattimento in fiamme al largo dei bastioni di Orione e ho visto i raggi B, balenare nel buio vicino le porte di Tannhäuser. E tutti quei momenti ... andranno ... perduti nel tempo, come lacrime nella pioggia. È tempo di morire. (Roy Batty).

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.