Visualizzazione dei risultati da 1 a 5 su 5
  1. #1

    creare cartelle con nome campo access

    Salve a tutti, mi sto impazzendo per trovare un modo, con access e VBA di creare nuove cartelle che abbiano per nome quello che c'è nel campo "nome" di un db access. mi spiego meglio:

    vorrei, se possibile, trovare un modo per esportare da una tabella (nominativi_temp) il contenuto dei vari record per un campo ("nome"), in modo che venga creata una cartella per ogni nome.

    ho provato con tutti i forum del mondo, ci sto dietro dalle 2 di oggi, ma mi sa che faccio qualche errore di sintassi - non sono esperto, ma m'hanno detto che è possibile farlo!

    aiutatemi, vi prego!!!


  2. #2
    Utente di HTML.it L'avatar di nicola75ss
    Registrato dal
    Nov 2004
    Messaggi
    12,923
    In questo forum NON si parla di alcune funzionalità peculiari di Microsoft Access (macro, maschere, report, etc) che continueranno ad essere trattate nel forum "Windows e software"
    In attesa che un moderatore di sezione ti sposti in windows

    codice:
    Private Sub Comando0_Click()
    Dim strSQL As String
    Dim strPath As String
    Dim rst As DAO.Recordset
    strSQL = "select distinct nome from tabella"
    strPath = "C:\path_in_cui_creare_cartelle\"
    Set rst = CurrentDb.openrecordset(strSQL, dbopensnapshot)
    If rst.RecordCount > 0 Then
        rst.MoveFirst
            Do While Not rst.EOF
                MkDir strPath & rst("nome")
                rst.MoveNext
            Loop
    MsgBox "Operazione conclusa"
    End If
    End Sub

  3. #3
    Grazie mille, pensavo chwe fosse la sezione giusta, perdono!
    Funziona tutto!
    alla prox!!!


  4. #4
    Utente di HTML.it
    Registrato dal
    Sep 2006
    Messaggi
    3
    Quote Originariamente inviata da nicola75ss Visualizza il messaggio
    In attesa che un moderatore di sezione ti sposti in windows

    codice:
    Private Sub Comando0_Click()
    Dim strSQL As String
    Dim strPath As String
    Dim rst As DAO.Recordset
    strSQL = "select distinct nome from tabella"
    strPath = "C:\path_in_cui_creare_cartelle\"
    Set rst = CurrentDb.openrecordset(strSQL, dbopensnapshot)
    If rst.RecordCount > 0 Then
        rst.MoveFirst
            Do While Not rst.EOF
                MkDir strPath & rst("nome")
                rst.MoveNext
            Loop
    MsgBox "Operazione conclusa"
    End If
    End Sub

    ciao scusate tutti...sono leggerissimamente principiante...ho provato questa routine e funziona, infatti mi crea una cartella "nome" per ogni record presente in tabella...ma se io volessi creare una cartella per un singolo record? cioè provo a spiegarmi meglio ho creato una maschera per visualizzare il contenuto di un record, vorrei creare una cartella con il nome di un singolo campo presente in un record, ma non ci riesco

    grazie in anticipo

  5. #5
    Moderatore di Javascript L'avatar di ciro78
    Registrato dal
    Sep 2000
    residenza
    Napoli
    Messaggi
    8,514
    ti basta modificare la query ed estrarre solo il record che ti interessa no?
    Ciro Marotta - Programmatore JAVA - PHP
    Preferisco un fallimento alle mie condizioni che un successo alle condizioni altrui.


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.