mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: OpenArgs non funziona?

Ho due maschere - frmUtente e frmTelefono.
frmUtente ha come origine record tblClienti
frmTelefono ha come origine record tblTelefono.
tblClienti ha i campi:
idCliente - contatore, PK
Nome - testo
Cognome - testo
Telefono - testo
tblTelefono ha i campi:
idTelefono - contatore, PK
idCliente - numerico, EK
Telefono - testo
frmUtente ha una casella di testo 'Telefono' associata al campo
tblUtenti.Telefono.
Sull'evento DblClick() della casella di testo c'è il seguente codice:
Private Sub Telefono_DblClick(Cancel As Integer)
DoCmd.OpenForm "frmTelefono", , , , , , Me!idCliente
End Sub
perchè vorrei che frmTelefono mostri i telefoni dell'utente corrente
nell'altra maschera.
Il problema è che invece frmTelefono mostra sempre il primo record di
frmUtenti.
Dove sbaglio?

 ha scritto nel messaggio 
news:1118316252.5...@f14g2000cwb.googlegroups.com...


tblClienti ha i campi:

tblTelefono ha i campi:




End Sub


Dove sbaglio?
ciao,
OpenArgs non ha una funzione di filtro, bensì ti consente di inviare un 
parametro alla maschera (testo/numero/quello che ti pare) da poter 
utilizzare, per esempio, all'apertura.
Quello che ti serve in questo caso è l'uso della "condizione Where"
prova con
DoCmd.OpenForm "frmTelefono", , , "IDCliente=" & Me!idCliente
così facendo è come se aggiungessi Where alla query di origine dei dati 
della maschera, filtrandola.
ciao,
Mat.

Il problema è che io sono uno stupido e faccio le cose con
superficialità.
C'è scritto nei paramentri infatti :D ed infatti ora funziona :D
Grazie mille :)

 ha scritto nel messaggio 
news:1118318162.8...@g43g2000cwa.googlegroups.com...

Grazie mille :)
Niente stupido,
da noi si dice "fà balà l'öch" (fai ballare l'occhio).
Usa l'F1 (tasto...).
Ciao,
Mat.
Newsgroup: it.comp.appl.access
Titolo: Office 2007 e query non piu' funzionanti

Ciao a tutti,
Ho una query che non funziona piu' da quando ho installato Office
2007. La seguente query e' contenuta in una sottomaschera e filtra una
tabella contenente delle fatture in base alla data di aggiornamento e
alla valuta
Me.Maschera1.Controls.Item(NSubmask).Controls.Item
(0).Form.RecordSource = "SELECT Tbl_Invoices.*,
Tbl_Invoices.Update_date, Tbl_Invoices.Currency,
Tbl_Invoices.Overdue_Date FROM Tbl_Invoices WHERE
Tbl_Invoices.Update_date = #" & Format(Date, "mm/dd/yyyy") & "# And
Tbl_Invoices.Currency = " & Me!
SubMaskCurrencies.Form.RecordsetClone.Fields("currency") & " ORDER BY
Tbl_Invoices.Overdue_Date;"
Fino a quando sulla mia macchina era istallato Office 2003 il tutto
funzionava ma adesso non piu'.
Non riesco pero' a capire cosa sia successo perche' il valore di
ritorno della query mi da' giustamente:
SELECT Tbl_Invoices.*, Tbl_Invoices.Update_date,
Tbl_Invoices.Currency, Tbl_Invoices.Overdue_Date FROM Tbl_Invoices
WHERE (Tbl_Invoices.Update_date = #08/25/2009#) And
(Tbl_Invoices.Currency = 'EUR') ORDER BY Tbl_Invoices.Overdue_Date;
pero' sembra non considerare la parte finale "And
(Tbl_Invoices.Currency = 'EUR')"
Sulle altre macchine dove e' istallato Office 2003 e' tutto ok.
ho provato ad aggiungere un requery a togliere o aggiungere parentesi
ma il risultato non cambia.
Potreste aiutarmi ?
Grazie 1000
Stay alive !
Pio Pio

 ...
Dopo tutto questo non vuoi rivelare cosa succede?
Ricevi un messaggio di errore o succede niente o...?
Se fai la prova con il tuo sospetto:
debug.print _
Me!SubMaskCurrencies.Form.RecordsetClone.Fields("currency")
Cosa vedi nella finestra debug?
Forse funziona un metodo meno complicato:
Me!SubMaskCurrencies.Form!currency
Secondo me mancano anche gli apici prima e dopo la stringa, cio�:
...
Tbl_Invoices.Currency = '" &
Me!SubMaskCurrencies.Form!currency & "' ORDER BY
...
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 ...
Nono, gli apici ci sono. Ho provato con e senza ma con lo stesso
risultato.
Penso che il problema fondamentale sia il fatto che la stringa SQL non
viene cambiata.



Ho fatto alcune prove e sembra proprio che recordsource in questa
situazione non possa essere cambiato.
Qualcuno mi sa dire perche' ? Solitamente non ho problemi con questo
tipo di assegnazione. Ho provato a creare una procedura di test ed
assegnato ad un pulsante il cambiamento di recordsource e in questo
caso me lo ha fatto.
E' cambiato qualcosa con la versione 2007 di Access che riguarda i
recordsource ? Ho guardato l'help ma non ho trovato nulla del genere.
Grazie 1000 comunque per il vostro aiuto



Mi rispondo da solo.
Dopo un po' di giorni dove ho provato di tutto ho trovato la
soluzione:
Bastava anteporre  Me.Maschera1.Controls.Item(NSubmask).Controls.Item
(0).Form.RecordSource ="" alla istruzione che riassegna il valore
della query.
Pero' la domanda mi rimane: perche' con Access 2003 non era necessaria
questa riga supplementare ?

Newsgroup: it.comp.appl.access
Titolo: Query di accodamento tra database diversi.

Salve, ho la necessità di fare una query di accodamento tra database
diversi. Ho effettuato le connessioni ADO tra i due database. Mi succede che
quando uso Execute con il comando INSERT TO, il driver OBDC vede credo
giustamente solo la tabella della rispettiva connessione e non riesce a
trovare l' altra tabella che appartiene all' altra connessione. In
particolare i database sono DB2 e ACCESS. E' possibile fare una query di
accodamento tra tabelle appartenenti a DB diversi ?
Grazie, saluti.

 ha scritto nel messaggio
news:L434b.27579$w8.2...@news.edisontel.com...

Hai provato a usare le tabelle collegate e ad inserire i record in/da quelle
invece che usare ADO?
Namor

Newsgroup: it.comp.appl.access
Titolo: per Roberto da casa

Be ... Se tanti ti stanno a fà gli auguri mi sa che dovrai passà ancora
parecchio tempo davanti alla tastiera Robbè....
perciò tieni duro e in bocca alo lupo.
Marceme
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Marceme
Grazie
Roberto


Sono contento che posti
Maurizio

Newsgroup: it.comp.appl.access
Titolo: Collegare 2o+record sulla stessa tabella....

Salve a tutti....
ho un problemino semplice da risolvere per Voi...non alrettanto semplice per
me:
Classica situazione.....
Tabella fornitori --> 1 a molti -->tabella articoli....
quindi gli articoli dei vari fornitori si trovano tutti su un'unica
tabella...
Poblema: il fornitore x ha un articolo "sedia peppa" identico a quello del
fornitore y "sedia giovanna"....
(eventualmente anche uguale alla "sedia dondolo" di un altro fornitore.....)
solo che "sedia peppa" costa meno!!!!
Dovrei quindi riuscire ad avere una situazione in cui....
quando apro la maschera del dettaglio articolo...dove c'è la descrizione...
una sottomaschera o un controllo o quello che volete dovrebbe informarmi
che appunto ci sono altri articoli simili di altri fornitori con costi
diversi...
da dove comincereste?!


Tutto stat a strutturare bene la base.
Il concetto è tu hai un codice prodotto
AAA000 che si chiama Pippo
Il tuo fornitore X lo chiama A111
Il tuo fornitore Z lo chiama 123AAA
Tu non devi prendere il loro codice ed inserirlo nella tabella articoli, ma
annotarlo nella tabella acquisti, insieme al costo e a tutto il resto.
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it


Grazie per l'attenzione;
diciamo che il db è fatto.....
quindi ho 50 fornitori, 1500 articoli , e 4000 varianti
diciamo che i prezzi sono gia inseriti....sempre nella tabella "articoli"
mi stai dicendo che per mettere in relazione quelli uguali devo per forza
fare un'altra tabella.....?
una soluzione tipo una casella di riepilogo con selezione multipla....
seleziono ad esempio 4 o 5 record poi premento un pulsante
access dovrebbe dargli un numero in comune....


NOn è comodissima la tua impostazione, se hai salvato nell'anagrafica
dell'articolo anche fornitore e costo
per te sono articoli diversi e li puoi gestire con uansemplice combo, ma
ripeto li presenti come articoli diversi anche se non lo sono.

Newsgroup: it.comp.appl.access
Titolo: Stampa unione

Ragazzi ho usato la stampa unione di Access che mi stampa "n" documenti
Word a partire da una query o da una tabella.
Vi risulta se e' possibile salvare gli stessi documenti stampati in una
cartella come file *.doc ?
Grazie per l'aiuto.
Antonio Passaro

Newsgroup: it.comp.appl.access
Titolo: ridimensione automatica del report

Caio a tutti del NG.
Ho un quesito da esporvi:
Ho creato un db con una maschera tramite cui inserisco dei dati. Poi ho 
creato un report tramite cui visualizzo e stampo una petizione.
Bene, all'interno del report ci sono dei controlli(che contengone degli 
indirizzi) che non sempre devono essere stampati.
Quando un controllo non deve essere stampato, non viene visualizzato nel 
report pero', comunque rimane lo spazio vuoto.
Io stavo cercando di fare in modo che lo spazio non venga visualizzato 
quando l'indirizzo non deve essere compreso nella petizione.
Come potrei fare?
Grazie a chiunque mi da una mano ad imparare.
Ciao 

 ha scritto nel messaggio 
news:Ffk%h.27876$uJ5.4...@twister2.libero.it...

Ciao access
prova a mettere i controlli con altezza 0,1 e la proprietà
Espandibile a Si.
Daniele 

"CIDI" <dadonziNO@Spam_tin.it> ha scritto nel messaggio 
news:463de227$0$10620$4faf...@reader2.news.tin.it...

Magico Daniele, ho risolto.
Effettivamente impostando i valori da te indicati ed allineando i controlli 
in maniera da essere abbastanza vicini ottengo proprio l'effetto che volevo.
Grazieee 10000000000000000
Ciao

Newsgroup: it.comp.appl.access
Titolo: Attesa

Ciao a tutti.
Una domanda.
esiste in access VB un istruzione di attesa tipo wait 3 (3 secondi) che non 
sia un ciclo
tipo for next ???
Grazie a tutti 

Nativa no, ma puoi usare Sleep Api:
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Sleep 3000
Ciao
@Alex

 ha scritto nel messaggio 
news:1129371324....@z14g2000cwz.googlegroups.com...

Scusami ma come la uso....
Enrico 

Questa dichiarazione la metti in un Modulo:
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
La chiamata la metti dove vuoi venga eseguito il ritardo:
Sleep 3000
Non capisco il dubbio...!
@Alex

 ha scritto nel messaggio 
news:1129374546....@o13g2000cwo.googlegroups.com...

"Sub o function non deffinita"
Questo è l'errore che mi viene sempre restituito. 

Fai questa prova, metti tutto in una Form ed inserisci un
Command Button chiamato Command1.
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
       Sleep 5000
       Msbox "Ho dormito per 5 secondi"
 End Sub
Non è possibile che non vada.
@Alex

 ha scritto nel messaggio 
news:1129385590.4...@g49g2000cwa.googlegroups.com...
Fai questa prova, metti tutto in una Form ed inserisci un
Command Button chiamato Command1.
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Command1_Click()
       Sleep 5000
       Msbox "Ho dormito per 5 secondi"
 End Sub
Non č possibile che non vada.
@Alex
O.k Risolto
Grazie Tante
Newsgroup: it.comp.appl.access
Titolo: Come fare?

Salve a tutti.
Mi piacerebbe da matti capire ed utilizzare access, ma non ho mai avuto 
l'opportunit� di seguire un corso o, meglio, avere un conoscente che potesse 
spiegarmelo.
So, per�, che ci� che a me serve si potrebbe fare con access. Vengo al 
punto.
Avendo un elenco di dipendenti devo inserire per ciascuno tutti i 
riferimenti dei corsi da loro seguiti. I dati sono relativi alla tipologia 
del corso, alla data di conseguimento ed alla data di refresh.
Cosa pi� importate in relazione alla data di refresh il programma dovrebbe 
segnalarmi a ridosso di tale data, con un allert visivo o sonoro o con 
entrambi le tipologie, che il giorno "x" il Sig. Paperino deve effettuare 
l'aggiornamento.
Esiste qualcosa di free in rete che posso utilizzare? Chi pu� aiutarmi?
Grazie a tutti.
Aliele 


con questo post hai espresso 3 punti
1) vuoi imparare access
2) vuoi costruire un db dipendenti corsi
3) vuoi trovarlo free in rete
per� poi lo hai chiesto qu�, per cui la prima cosa da fare � leggerti la 
netiquette di questo NG... cos� potrai approcciare ai problemi in maniera 
opportuna, tipo usando un Subject adatto al problema trattato... ;)
Newsgroup: it.comp.appl.access
Titolo: access e pdf

Consentitemi ancora una domanda.
E' possibile esportare un report in formato pdf?
se si, come?
grazie come sempre.

 ha scritto nel messaggio
news:Hmvz5.19897$OI2.5...@news.infostrada.it...


 grazie come sempre.
Nulla di piú banale se hai Acrobat writer: selezioni per default la
stampante Acrobat PDF writer, se proprio vuoi evitare di selezionarla da
programma, e stai a posto.
Paolo

 grazie come sempre.
Come ti hanno già scritto la soluzione più semplice è appunto l'acquisto
della
corretta versione dell'Acrobat, oppure:
(copio ed incollo un messaggio di tempo fà)
se vuoi realizzare un documento PDF senza
acquistare nulla, fai così (non è farina del mio sacco, è preso da un msg
apparso su it.comp.lang.visual-basic parecchio tempo fa):
######################################
1 - Installa una stampante PostScript. Non importa che tu non ce l'abbia,
basta che carichi i driver di stampa di una PostScript. Prova con qualcuna
(ricorda che se vuoi fare dei PDF a colori, devi installare il driver di
una laser PS a colori).
Come installare il driver?
- vai a "avvio - impostazioni - stampanti"- clicca su "aggiungi stampante"
- clicca su "avanti"
- spunta "stampante locale", quindi clicca "avanti"; si crea la lista delle
stampanti di cui possiede i driver e poi te la propone
- a questo punto scorri la lista e scegli una marca (io ho selezionato
Lexmark, ma non e` obbligatorio)
- scegli una stampante con la sigla PS (es. Lexmark Optra C PS, che e` a
colori); clicca su "avanti"- ti chiedera` di scegliere la porta; va bene
LPT1, clicca su "avanti"
- ancora "avanti"- a  questo punto dovrebbe avere completato
l'installazione.
2 - installa GhostScript e Gostview (freeware) che troverai qui:
http://www.cs.wisc.edu/~ghost/aladdin/get550.html
 . Il file gsv27550.exe li
contiene tutti e due. Se il download e` lento, installa Download
Accelerator ( 
www.lidan.com
 )
A questo punto sei pronto. Carica il tuo documento, 
p.es
. un file di Word
(ma la procedura funziona con TUTTI i programmi di Windows),
vai a file - stampa, scegli come stampante la PS, e spunta la voce "Stampa
su file". Ti verra` chiesto il nome da dare al file e dove salvarlo.
Poi lancia GhostView e vai a file - open e seleziona il file .prn appena
prodotto. Dopo che l'hai aperto, vai a file - print. Nella finestra che
apparira` scegli come Device "pdfwrite", scegli la risoluzione, spunta la
casella "Print to file" e scegli il nome da dargli (con estensione .pdf) e
il percorso. E voila`, ecco il tuo PDF. La procedura non e` delle piu`
lineari, ma e` gratis.
... inoltre potrai trovare della "grafica" delle operazioni a questo
indirizzo: 
http://209.1.224.12/CapeCanaveral/Lab/6562/general/pdf.html
 .
######################################
Cià
RoDAgo
Newsgroup: it.comp.appl.access
Titolo: Maschera di immissione : aiuto

Ciao a tutto l' N.G. . Premetto di essere un novellino del VBA e quindi
scusate l'ingenuita' delle richieste.
Allora il mio problema e' questo : Ho una maschera di immissione dati Con
diciamo sei controlli :
A B C D E F. Per me e' importante che l'utente immetta sempre qualcosa nei
controlli A B C mentre puo' tralasciare C D E . Io vorrei che se questo
avviene all'utente venga impedito (con messaggio) sia il passaggio ad un
record precedente o successivo attraverso i tasti di spostamento che ho
creato , sia la chiusura della maschera (attraverso tasto da me creato o
attraverso quello preesistente nella maschera.)
Ho cercato di fare da solo ma mi trovo sempre in qualche caso strano che
sfugge al mio controllo.
Per esempio se l'utente apre la maschera , poi invece cambia idea e la
richiude senza scrivere niente mi succede che mi appare lo stesso il
messaggio e mi impedisce l'uscita se non forzandola .
Ringrazio chiunque provera' ad aiutarmi e saluto tutti augurandovi un buon
Week-end

 ha scritto nel messaggio
news:VjOA8.4910$US3.1...@twister1.libero.it...

Sulla tabella, per i campi A B C, imponi a Sģ la proprietą "richiesto".
Ciao, Salvatore
Newsgroup: it.comp.appl.access
Titolo: Access 97 in rete

Il mio DBMS sta in rete (NT) in una cartella accessibile in
lettura/scrittura
da soli tre utenti. Tutti e tre riescono a lavorarci contemporaneamente
senza problemi.
Quando però un quarto utente, che ha abilitata la stessa cartella ma in sola
lettura, tenta di aprire il db che è in quel momento uso da uno dei primi
tre utenti;
oppure
mentre il quarto utente sta usando il db e uno dei primi tre utenti
cerca di aprirlo a sua volta:
viene visualizzato il messaggio di errore
"Impossibile usare 'prova.mdb'. File già in uso" e il db non si apre.
Penso che sia un problema di rete perché utilizzando il db su di una
cartella
accessibile a tutti in lettura/scrittura il problema non c'é.
Qualcuno mi ha suggerito che è tutto dovuto al fatto che il file di access
con estensione ldb per permettere l'apertura del db deve essere accessibile
per tutti in lettura e scrittura?
Se così fosse è possibile abilitare letture e scrtittura di quel solo file
in una cartella abilitata alla sola lettura?
Grazie in anticipo.
PS
Se pensate che il problema sia un altro non esitate a scrivere.

non sono sicuro, ma credo che il problema stia nel fatto che avendo accesso
in sola lettura non è in grado di creare il file ".ldb" o di aggiornarlo in
caso esista già.

 wrote in message
news:96986342...@jes-srv.fastnet.it...


E' proprio così.
Se acces non  riesce a creare il file ldb nella stessa directory nella quale
è contenuto il dbase, lo marca come aperto con accesso esclusivo... e
...fine del film.
Nel dubbio io ho adottato una soluzione un pò macchiavellica ma
funzionale... ho abilitato in R-W la cartella che contiene il file mdb per
gli utenti e gruppi che dovevano accedervi, poi sono andato a modificare le
permission nella scheda security del file mdb ed ho diviso gli stessi utenti
e gruppi ponendo a sola R alcuni di questi ed a R-W gli altri. in questo
modo tutti gli utenti possono aprire il database e lavorare in multiutenza,
ma solo alcuni possono apportarvi modifiche.
Ciao! Maurizio

Newsgroup: it.comp.appl.access
Titolo: Tasto shift (perchè a volte funziona e a volte, anzi quasi sempre no)

Ho un grossissimo problema con questo maledetto tasto shift
ho cercato di risolverlo mettendo in esecuzione dalla macro autoexec questa
funzione, presa dal sitocomune:
Public Function bypassKey(bolVal As Boolean, Optional strMdb As String) As
Boolean
'Autore: Federico Luciani
'Accetta:
' bolVal = True: abilita; False: disabilita
' strMdb = [Opz.] percorso+nome del database
'Restituisce: True l'operazione e' stata eseguita correttamente
On Error GoTo bypass_Err
    Dim wrk
    Dim dbs
    Set wrk = DBEngine.Workspaces(0)
    If strMdb = "" Then
        Set dbs = CurrentDb()
    Else
        Set dbs = wrk.OpenDatabase(strMdb)
    End If
    dbs.Properties("AllowBypassKey") = bolVal
    bypassKey = True
    Set dbs = Nothing
    Set wrk = Nothing
    Exit Function
bypass_Err:
    If Err = 3270 Then
        Dim prp As Property
        Set prp = dbs.CreateProperty("AllowBypassKey", dbBoolean, True)
        dbs.Properties.Append prp
        Resume
    Else
        MsgBox Err.Number & " - " & Err.Description
        bypassKey = False
    End If
End Function
Alcune volte funziona altre volte no, poi la cosa strana se la importo su un
altro db Non funziona affatto e in avvio mi da errore
Vi prego aiutatemi non so prů come togliermi questo maledetto shift dalla
schiena (pesa proprio tanto)
Claudio

[CUT]
preso dal Sitocomune io uso questa procedura.
ricordati che la modifica delle proprietà ha valore dal successivo riavvio della procedura (per
essere sicuro potresti dunque anche su chiusura della proedura avviare la modifica della prorpietà)
'Funzione per disabilitare il tasto shift della tastier
'Ricordati di fare back up del mdb per poter aprire il
'database.
Function ChangeProperty(strPropName As String, varPropType As Variant, varPropValue As Variant) As
Integer
    Dim dbs As Object, prp As Variant
    Const conPropNotFoundError = 3270
    Set dbs = CurrentDb
    On Error GoTo Change_Err
    dbs.Properties(strPropName) = varPropValue
    ChangeProperty = True
Change_Bye:
    Exit Function
Change_Err:
    If Err = conPropNotFoundError Then    ' Property not found.
        Set prp = dbs.CreateProperty(strPropName, _
            varPropType, varPropValue)
        dbs.Properties.Append prp
        Resume Next
    Else
        ' Unknown error.
        ChangeProperty = False
        Resume Change_Bye
    End If
End Function
Function shift(val as boolean)
Const DB_Text As Long = 10
Const DB_Boolean As Long = 1
        ChangeProperty "AllowBypassKey", DB_Boolean, val
End Function

 essere sicuro potresti dunque anche su chiusura della proedura avviare la
modifica della prorpietà)
Grazie Neo, shift disabilitato :))
speriamo regga ;)
Claudio
Newsgroup: it.comp.appl.access
Titolo: Control premuto come capirlo? è possibile?

Come faccio nel gestire un evento click (su un etichetta) a capire se è
stato generato mentre si stava premendo il tasto control?
Ho cercato un po' in giro sui vari siti ma non ho trovato niente che mi
mettesse sulla strada giusta.
Grazie per l'aiuto.
Simone


E' tanto che lo chiedi...che ci siamo commossi.
A parte gli scherzi eccoti un esempio di codice.
In un modulo pubblico:
Declare Function MapVirtualKey Lib "user32" Alias "MapVirtualKeyA" (ByVal
wCode As Long, ByVal wMapType As Long) As Long
Declare Function GetKeyNameText Lib "user32" Alias "GetKeyNameTextA" (ByVal
LParam As Long, ByVal lpBuffer As String, ByVal nSize As Long) As Long
Nella maschera sull'evento Tasto Giů del controllo che ti interessa:
Private Sub MiaCasella_KeyDown(KeyCode As Integer, Shift As Integer)
Dim dummy&
    Dim scancode&
    Dim keyname As String * 256
    scancode& = MapVirtualKey(KeyCode, 0)
    dummy = GetKeyNameText(scancode& * &H10000, keyname, 255)
    MsgBox "E' stato premuto " & keyname
End Sub
Ovviamente č solo un esempio ma ti assicuro che puoi farne quello che vuoi.
Ciao, Carlo

, 
rik...@katamail.com
 says...

Prova a utilizzare l'evento MouseDown.
Ciao.
-- 
JBad
Newsgroup: it.comp.appl.access
Titolo: esportare set di dati filtrati

Buongiorno,
 
sto cercando di esportare un set di dati filtrati utilizzando la 
funzione DoCmd.TransferSpreadsheet ma c'è qualcosa che non va con la 
striga dove recupero i record.
 
a me sembra che str sia scritto bene ma il comando non funziona, ho 
provato a sostituirlo "check_temp" e funziona prendendo tutti i record
l'ho sostituito con "& str &" ma non ne vuole sapere.
cosa sto sbagliando?
 
 
Private Sub Comando160_Click()
Dim GetDBPath As String
Dim str As String
 
GetDBPath = CurrentProject.Path
str = "select * from check_temp where categoria=""" & Me.Testo81 & """"
 
DoCmd.TransferSpreadsheet acExport, , str, "d:\amodio\" & Me.Testo81 & 
".xlsx"
 
End Sub
 
 
grazie
 
-- 
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus
 
 

 
 
 
Stai usando una Parola RISERVATA....!!!! [str] è una funzione del VBA.
Chiamala [strSQL] fai un Debug.Print strSQL prima di eseguire leggi se il predicato è corretto e vai in EXPORT.
 
Dubbio... ma filtri per [Nome Categoria] e non per IdCategoria come normalmente si fa...? Strano...
 
@Alex

 @Alex



ho provato questo cambiamento ma ho cambiato solo errore che è passato a 
2498
 
Dim GetDBPath As String
Dim strsql As String
Dim rs As DAO.Recordset
 
GetDBPath = CurrentProject.Path
strsql = "select * from check_temp where categoria=""" & Me.Testo81 & """"
 
Set rs = CurrentDb.OpenRecordset(strsql)
'Debug.Print strsql
DoCmd.TransferSpreadsheet acExport, , rs, "d:\amodio\" & Me.Testo81 & 
".xlsx"
 
 


 ".xlsx"
 
Il metodo Transferspreadsheet nel parametro TableName acceta solo il 
nome di una tabella o query salvata, non una stringa SQL o un recordset.
 
Se non puo salvare la stringa come query fissa puo usare una dummy 
qryExport con qualsiasi contenuto e cambiare la sua proprietà SQL:
 
Dim strSQL As String
 
strSQL = "SELECT *" & _
	" FROM check_temp" & _
         " WHERE categoria=""" & Me!CasellaConNomeDescrittivo & """"
 
CurrentDb.QueryDefs("qryExport").SQL = strSQL
 
DoCmd.TransferSpreadsheet acExport, , "qryExport", ...
 
Ciao
Karl
*********
Access News: 
https://youtu.be/kUkLjfYwgg8
 
Access DevCon: 
http://AccessDevCon.com
 
Access FAQ: 
https://www.donkarl.com/it
 


grazie 1000 per l'aiuto, non sapevo che fosse necessario avere una 
tabella gia salvata
 
problema risolto
 
Akery

Newsgroup: it.comp.appl.access
Titolo: Cancellare valore da campo

Scusate , vorrei sapere come fare con l'ausilio di un pulsante
a  cancellare il Valore "si" in un campo  Si/No
 DoCmd.RunSQL "DELETE ..................????
Un aiuto Grazie
Giuseppe

 ha scritto nel messaggio
news:hslwc.288208$hc5.12...@news3.tin.it...

I controlli Sě/No, Vero/Falso o -1/0 possono avere un solo valore o Sě o No.
Non hai bisogno di "cancellare" ma di cambiare valore o stato.
Voglio dire che se "cancelli" Sě, il controllo assume il valore di No e
viceversa.
Al click: Me.TuoNomeControlloSěNo = False
Ciao, Carlo

 ha scritto nel
messaggio news:AfBwc.415329$rM4.17...@news4.tin.it...

Grazie
Ciao Giuseppe

 ha scritto nel
messaggio news:AfBwc.415329$rM4.17...@news4.tin.it...

Faaaaattttto
Cosě
 Me.Stampa = False
Me.Stampa.SetFocus
Me.Requery
cambio il valore da Si a No del controllo  Stampa in una
sottomaschera  a maschere continue  su un record alla volta,
Per portare il valore a No su tutti i record  con un solo clic ?
Ciao
Giuseppe

 ha scritto nel messaggio
news:lNCwc.290443$hc5.12...@news3.tin.it...

Probabilmente una query di aggiornamento č la via piů semplice. Per esempio:
UPDATE FattureOrdini SET FattureOrdini.Cumulativa = False
WHERE (((FattureOrdini.Cumulativa)=True));
Salva la query (modificandola opportunamente) e mandala in esecuzione per
esempio al click di un pulsante cosě:
DoCmd.SetWarnings False
'imposta i messaggi a non visibili
    DoCmd.OpenQuery "TuaQueryCambiaVeroFalso"
'esegue la query
    DoCmd.SetWarnings True
'imposta i messaggi a visibili
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: transfertext

Non riesco ad usare il metodo transfertext. A seconda dei casi segnala:
Campo F1 inesistente (???)
tipo non corrispondente (???)
lo stesso file testo con autocomposizione  riesco a importarlo
tranquillamente.
Il campi sono delimitati da ";" ma con Tab è la stessa cosa
Uso l'istruzione:
docmd.transfertext  "ANA", "c:\ana.txt"
Credo sia  qualcosa nella sintassi, ma nell'help non c'è un exempio preciso
per questo caso.
Ciao, Sandro

docmd.transfertext  "ANA", "c:\ana.txt"
DoCmd.TransferText acExportDelim, , "Nometabelladaesportare",
"c:\nomefile.txt"
quindi qualcosa del tipo:
DoCmd.TransferText acExportDelim, , "ANA", "c:\ana.txt"

 ha scritto nel messaggio
news:9glrfvg44483ovrrm...@4ax.com...

La sintassi che ho usato è giusta (quella che ho messo è l'ultima prova che
mi ha dato l'ennesimo errore) a parte che a me serve acImportDelim.
La nuova prova che ho fatto è stata quella di "mettere la riga di
intestazione con il nome dei campi", e quindi sembra che non abbia effetto
come si imposta il 5° parametro (se non impostato dovrebbe leggere i campi
nell'ordine in cui sono impostati in struttura)
Nell'help non è chiaro cosa si intenda per secondo parametro e non si
capisce dalla sintassi se la  virgola sia necessaria o no. Da una ricerca su
internet di siti in ingkese sembra di capire che dovrebbe essere una
specifica di impostazione memorizzata facendo l'autocomposizione...........
Secondo me è una prova ulteriore che le istruzioni di Microsoft fanno acqua
da tutte le parti e che queste news siano quanto di più utile perché frutto
del lavoro sul campo, titto sta a trovare qualcuno che abbia avuto lo stesso
problema e lo abbia risolto!
Grazie e buon proseguimento.
Ciao, Sandro

 specifica di impostazione memorizzata facendo l'autocomposizione...........
forse e' l'unica cosa chiara che c'e' ;<)
La specifica viene conservata sulle tabelle msysimexspecs e
msysimexcolumns e diventa il "file" di guida per una importazione (o
esportazione) controllata.
Generalmente ha sempre ragione Access.
Talvolta i file di input sono "sporchi" o non hanno un tracciato
corretto per cui e' facile "prendere" errori per tipo non
corrispondente, e' un classico sui dati numerici o sulle date.
Personalmente quando uso il transfertext utilizzo sempre la specifica di
importazione. Le sto usando proprio in questo periodo e vanno una
"favola", c'e' l'unico problema, spero qualcuno mi smentisca, che si e'
obbligati a lavorare su tabelle locali (non collegate)
[cut]
--
a.cara
togli qualcosa dall'email

 [cut]
Grazie dell'indicazione che potrebbe essermi utile.
Per il problema delle tabelle locali, io credo che se tu apri un un nuovo
oggetto Access.Application poi apri il database come corrente il database
dove ci sono le tabelle, puoi a questo punto farci ciň che vuoi.
Ciao, Sandro
Newsgroup: it.comp.appl.access
Titolo: Query-criteri/operatori di confronto

Salve a tutti.
Sara' banale ma purtroppo dopo un'ora e passa di tentativi ho gettato la
spugna.
Semplificando, il mio problema e' questo:
A97, da una casella di testo di una maschera dovrei impostare dei valori che
rappresentano criteri per una query di selezione.
Ora se nella casella ti testo digito PIPPO la query mi restituisce tutti i
record con PIPPO. Ma cosa dovrei digitare per avere tutti i record diversi
da PIPPO ?
Ho provato con:  <> "PIPPO" ma non funziona.
Ringrazio in anticipo chiunque vorra' darmi un suggerimento e con
l'occasione auguro un buon 2001 a tutti.
Gabriele

 Ho provato con:  <> "PIPPO" ma non funziona.
E' sulla Query di selezione che dovresti inserire l'operatore ...
<>[Forms]![NomeForm]![NomeControllo]
Sul controllo della maschera digiti solo la stringa ...
Ciao
Buon Anno anche a te
OndaMax

 wrote in message
nct36.211856$hk4.8...@news.infostrada.it...

Ringrazio per il suggerimento.
Purtroppo nell'espressione che debbo usare non funziona.
L'espressione che ho digitato nei criteri della query e' la seguente:
Like
IIf(([Forms]![SelezArticoli]![Cornice13])=2;<>[Forms]![SelezArticoli]![ChPro
pr];IIf([Forms]![SelezArticoli]![Cornice13]=1;[Forms]![SelezArticoli]![ChPro
pr];"*"))
questa espr. mi restituisce i dati giusti nella condizioni:  = 1 e = 3 ma
non funziona nell'ipotesi = 2.
Debbo dire che dopo aver confermato l'espressione nella query
automaticamente viene trasformata in:
Like
IIf(([Forms]![SelezArticoli]![Cornice13])=2;([DatiGener].[Propr])<>[Forms]![
SelezArticoli]![ChPropr];IIf([Forms]![SelezArticoli]![Cornice13]=1;[Forms]![
SelezArticoli]![ChPropr];"*"))
viene cioe' aggiunto: ([DatiGener].[Propr]) davanti all'operatore <>
(penso che la parte che viene aggiunta dovrebbe essere il riferimento alla
tabella e al campo).
Non riesco a capire dove e' sbagliato e perche' non funziona.
Ringrazio di nuovo e cordialmente saluto
Gabriele

 wrote in message
92n9vl$l60$1...@lacerta.tiscalinet.it...

Problema risolto.
Comunque grazie per l'interessamento.
Saluti.
Gabriele

Newsgroup: it.comp.appl.access
Titolo: Directory struttura ad albero.

Salve a tutti , posso chiedervi un consiglio???
Il mio problema è il seguente: devo realizzare una struttura ad albero di
directory (stile gestione del computer), leggendo un file che contiene
A)nome directory B)eventuale sottodirectory. Quindi ogni volta che in questa
tabella viene aggiunta una voce che sia A deve creare una directory mentre
se è B deve creare la relativa sottodirectory di A, e di conseguenza
visualizzarla nella struttura ad albero. Secondo la Vostra esperienza (visto
che io ne ho ben poca) è possibile riuscire a fare qualcosa del genere con
A2000??? Grazie a tutti quelli che vorranno aiutarmi.


si 
Gestione di un treeview e utilizzo di mkdir
--
a.cara 
Togli qualcosa dall'email
Newsgroup: it.comp.appl.access
Titolo: inserimento in report di campo non facente parte dell'origine dati

Ciao, ho una ventina di reporto con altrettante quuery di origine con un 
comune denominatore: la firma del capo ufficio e la sede di appartenneza di 
quest'ultimo.
Fino ad ora ho con due caselle di testo risolto il problema ma 
l'avvicendarsi di tre caoi nel giro di pochi mesi, e l'esportazione del 
programma in una diversa filiale, mi hanno indotto a creare una nuova 
tabella Filiale con due campi ed un solo record: campo capoufficio = pinco e 
campo sede = new york
L'idea è quella che in caso di variazione di capo o di sede con una sola 
operazione sulla tabella i report siano aggiornati automaticamente senza 
dovere modificarli ad uno ad uno.
Ho provato ad inserire la tabella fra quelle della query di origine del 
report ma, pur non essendo relazionata con le altre, ho vari problemi nella 
visualizzazione dei record.
E' possibile fare riferimento con una casella non associata ad un record 
specifico (univoco) di una tabella esterna alla query di origine del report?
Grazie
M.-Bardi 

 M.-Bardi
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: impossibile nascondere il controllo che ha lo stato attivo

ciao a tutti
su current e in dopo aggiornamento di una maschera ho inserito questo codice
 
If Not IsNull(Me!IdCliente) Then
    Me!Comando_x.Visible = True
    Me!Comando_1.Visible = False
    Me!Comando_2.Visible = False
End If
 
If Not IsNull(Me!IdFornitore) Then
    Me!Comando_x.Visible = False
    Me!Comando_1.Visible = True
    Me!Comando_2.Visible = False
End If
 
If Not IsNull(Me!IdTrasp) Then
    Me!Comando_x.Visible = False
    Me!Comando_1.Visible = False
    Me!Comando_2.Visible = True
End If
 
poi con tre pulsanti, uno per ciascun Id (idCliente, IdFornitore e IdTrasp)
apro tre diversi report.
con questo codice, dove avro' come   stDocName "Fatture", "Fatture_1", 
"Fatture_2"
 
    Me.Dirty = False
    Dim stDocName As String
 
    If Me!Dettaglio1.Form.Recordset.RecordCount = 0 Then
        MsgBox "Il Report non contiene dati!!!"
    Else
        stDocName = "Fatture"
        DoCmd.OpenReport stDocName, acPreview, , "IdFattura =" & 
Me!IDFattura
    End If
 
il problema � che in alcune circostanze ho questo errore:
impossibile nascondere il controllo che ha lo stato attivo
 
Grazie per l'aiuto 
 
 

 ha scritto nel messaggio 
news:520cad7d$0$1349$4faf...@reader2.news.tin.it...

ho aggirato l'errore con
Err_Form_AfterUpdate:
    If Err.Number = 2165 Then Exit Sub
 
ed anche su current
 
ma non so se � una buona idea 
 
 

 impossibile nascondere il controllo che ha lo stato attivo
 
quell'errore non avviene "in alcune circostanze" avviene quando il 
cursore (focus) sta su un controllo  che vuoi nascondere
nel tuo caso uno di questi tre:
 >      Me!Comando_x.Visible = False
 >      Me!Comando_1.Visible = True
 >      Me!Comando_2.Visible = False
 
 
In entrata della routine
controllocherimanevisibile.setfocus
 
e poi fai il resto
 
 
-- 
 
ac (x=y-1)


grazie Alessandro
p.e. in questo modo?
 
 
If Not IsNull(Me!IdCliente) Then
    Me!Comando_x.setfocus
 
    Me!Comando_x.Visible = True
    Me!Comando_1.Visible = False
    Me!Comando_2.Visible = False
End If
 
If Not IsNull(Me!IdFornitore) Then
    Me!Comando_1.setfocus
 
    Me!Comando_x.Visible = False
    Me!Comando_1.Visible = True
    Me!Comando_2.Visible = False
End If
 
ecc.
 
 
 
 

cut

niente, cosi' non va 
 
 


 
 
-- 
 
ac (x=y-1)

 ha scritto nel messaggio 
news:uSkPt.521$tE4...@tornado.fastwebnet.it...

bene
grazie

Newsgroup: it.comp.appl.access
Titolo: Consiglio su installazione

Ciao a tutti
Se su un pc c'è già installato Access, ovviamente evito di installare il
Runtime,
ma se sotto sotto si è capito che questo Access è uno di quelli a scrocco,
come tutto l'office!!
Può nascere qualche problema?
Grazie
Pino


Non credo. In definitiva se tu dai il cd diinstallazione con l'opzione di
installare o meno il runtime,
spiegando dove ce n'è bisogno e perchè, è lui che poi lo installa.
-- 
_ _
Ciao
MAssimiliano Amendola
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:  
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: campo data

Ciao a tutti! scusate l'inesperienza
ho un problema che non riesco a risolvere, ho due campi DATAINIZIO e 
DATAFINE e vorrei che dopo aver aggionato DATAINIZIO la DATAFINE riporti in 
automatico un incremento di 14 giorni . Ho provato:
Private Sub DATAINIZIO _AfterUpdate()
Me.DATAFINE = DateAdd("a", 14, [DATAINIZIO] )
End Sub
Ma non funziona 


Se il campo DataFine è semplicemente frutto della somma di 14+DataInizio
perchè
ritieni di dover salvare questo valore nella tabella...?
I Campi che possono essere fonte di Calcolo di norma non si registrano nel
DB, poi fai come credi.
Per quanto riguarda il malfunzionamento della tua istruzione non hai dato
elementi per
capire cosa non vada.... ma ti suggerisco di leggere l'help in linea in
merito a quel parametro "a" che da quanto
capisco hai messo a caso...
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


In effetti hai ragione!
un campo calcolato al volo č senz'altro piů indicato, l'ho facevo solamente 
per agevolare le query ed eventuali filtri.
La funzione la sbagliavo perché avrei dovuto usare il parametro "d" per 
indicare i giorni, ho interpretato male Help. Il problema del non 
aggiormanto penso che risieda anche nel fatto che ho usato il modulo con la 
funzione Calendario pubblicato sul "sitocomune":
Me!DataInizio = InputCalendario(Nz(Me!DataInizio, 0), "Data inizio.")
tale Funzione perň non mi aggiorna in automatico il campo DataFine alla 
modifica del campo DataInizio
Grazie per l'aiuto

Newsgroup: it.comp.appl.access
Titolo: A97: Protezione Database e Disabilitazione tasto Shift

Ciao a tutti.
che voi sappiate, ci sono problemi a disabilitare il tasto
shift su un database (mde) con protezione a livello
utente?
Mi restituisce il seguente errore:
"Database o percorso non validi"
grazie
Riccardo

 ha scritto nel messaggio
news:9d5on0$8j4$1...@news.panservice.it...

Hai provato a dare uno sguardo nel Sito Comune (link qui sotto)?
Se non ricordo male nella Sezione General ci sono almeno tre FAQ che parlano
di come disabilitare il tasto Shift.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 wrote in message
DPxJ6.32407$UW4.2...@news.infostrada.it...

______
io utilizzo il programmino Bypasskey che sta sul sito comune...
ma mi da quell'errore...
sai per caso perchč?
grazie
Riccardo

 Riccardo
non so se funziona o no, pero' puoi sempre disabilitarlo nell'mdb e poi
trasformarlo in mde tramite la funzioncina:
'Convertire da codice un file MDB in MDE.' presente nella sez General
del SC
-- 
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


No, non lo so.

Newsgroup: it.comp.appl.access
Titolo: OT FAQ 9 Links

Salve a tutti cospiratori.
Sul 
www.donkarl.com/it
 nel capitolo 9 ho "convertito" l'elenco
dei link. Certo ho lasciato perdere quasi tutti siti in tedesco.
Avete proposte per siti importanti in italiano?
Dovete anche segnalarmi dei sbagli linguali che ho fatto
nel sito. p.e. non sono siccuro se in italiano
- si usa un plurale per "link". Links?
- si usa cosě frequente un abbreviazione "info" per "informazioni"
come facciamo in tedesco, o suona strano per un italiano?
-- 
cu
Karl
*********
Access FAQ: 
www.donkarl.com/it

 come facciamo in tedesco, o suona strano per un
italiano?
Info va benissimo


 come facciamo in tedesco, o suona strano per un italiano?
Suona bene ;)
SunRex


 e Giorgio Rancati
Hai un link? Non vedo qc nel suo sig.


 Hai un link? Non vedo qc nel suo sig.
a casa ho il link. Qui in ufficio non me lo trovo.
--
rgrds
SC
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Hai un link? Non vedo qc nel suo sig.
Giorgio Rancati:
http://web.tiscali.it/giorgiorancati/msaccess.htm


 ha scritto
nel messaggio news:2kvjp4F...@uni-berlin.de...

A me lo trova.
MAssimilaino

 
http://web.tiscali.it/giorgiorancati/msaccess.htm
tnx
Prima di linkare (o come si dice in italiano;-) di solito chiamo
l'accordo del admin.
Non ho visto Alessandro da qualche giorno. Forse è in vacanza.
Giorgio posso chiamare nel NG mpioa.


 ha scritto
nel messaggio news:2l2a62F...@uni-berlin.de...

Sì Karl, il tapino è in vacanza credo fino a
questo fine settimana.
L'ho chiamato e mi ha detto che sarebbe felice che
tu lo inserissi.
Cmq sarà online lunedì
MAssimiliano

 L'ho chiamato e mi ha detto che sarebbe felice che tu lo inserissi.
Ok.
-- 
tnx


 Essendo di origine inglese io userei Links.
Ehem...
Le parole straniere usate nell'italiano corrente NON devono essere
coniugate, quindi si userà il link e i link
Antonio

 coniugate, quindi si userà il link e i link
Se questo veramente non è solo una specialità regionale ;-)
devo anche cambiare "downloads", che uso spesso, a i "download".


 > coniugate, quindi si userà il link e i link
Cof... cof
Declinato non conigato...
MAssimiliano

 Declinato non conigato...
Ahh, perfetto, se si tratto solo della declinazione posso
continuare di usare:
io linko e downloado
tu linki e downloadi
...
ho linkato e downloadato
ecc.
-- 
;-)


 devo anche cambiare "downloads", che uso spesso, a i "download".
Non è regionale...
Antonio
Newsgroup: it.comp.appl.access
Titolo: Nuova Tabella

Salve a Tutti
Utilizzo Access 2002
Ho in un vecchio DataBase Access97 una tabella con vari campi uno dei quali 
con nome "Via", in questo è memorizzato un codice numerico proveniente da 
un'altra tabella "Strade" che ha due campi: "Codice" e "NomeVia".
Vorrei creare una nuova tabella, partendo dalla tabella suddetta e con tutti 
i campi di questa, dove però nel campo "Via" non venga visualizzato il 
codice ma il nome della via riferito al codice attualmete memorizzato e 
considerando che ci sono record dove detto campo è vuoto.
E' possibile fare questo, e come, con una query.
Grazie
Franco

 ha scritto nel messaggio 
news:4pCPk.19$kP...@nntpserver.swip.net...

Ciao Franco,
fai una query di creazione tabella e come dati di input usi le due 
tabelle unite in LEFT JOIN sul campo Codice  selezioni i campi che ti 
interessano dalla tabella principale e dalla  tabella Strade selezioni 
il campo "NomeVia".
-- 
Cinzia [Office Access MVP]
_______________________
 
www.riolab.org
http://accessdaziacin.spaces.live.com
----------------------------------------> 

Grazie per la risposta veloce.
Solo che  la cosa diventa più complessa.
Infatti ho visto che i campi sono due cioè "Via" e "Via2" con codice 
numerico
dalla tabella "Strade" (campi: "Codice"  e "NomeVia").
Problema: è possibile visualizzare il nomedella strada, sia riferito al 
codice del campo "Via" che quello riferito al codice del campo "Via2", 
considerando che ci sono record che hanno i campi via/via2 vuoti oppure il 
codice può essre solo nel campo "Via" o in entrambi.
Grazie 

 Grazie
Ciao Franco,
si pui farlo nella tua query metti due volte la tabella strade e le 
poni sempre in Left JOIN con la tabella "principale, la query di 
selezione sarà simile a:
SELECT Nome, Cognome, Strade.NomeVia, Strade2.NomeVia as ViaDue  FROM 
TuaTabella
LEFT JOIN Strade on TuaTabella.Via=Strade.Codice LEFT JOIN Strade2
ON TuaTabella.Via2=Strade2.Codice



Srade con i campi Codice e Via (il nome della via).
quindi nella modalità struttura della query visualizzo la tabella 
Protocollo, e inserisco i campi di questa
e due volte la tabella strade inserendo il campo via.
L'istruzione SQl che ottengo è questa:
SELECT Proto2000.Anno, Proto2000.Oggetto, Proto2000.DataReg, Proto2000.Via, 
Proto2000.Via2, Strade.Via, Strade_1.Via
FROM Proto2000, Strade, Strade AS Strade_1;
Come procedo?
Grazie e scusa l'insistenza.
Franco 

 Franco
Ciao Franco,
tu hai inserito le 2 tabelle strade ma non hai collegato il campo Via 
Di Proto2000 al campo codice di Strade e il camo Via2 di Proto2000 al 
campo codice di strade_1. Collegale, poi clicca con il dx sulla linea 
che unisce i campi e scegli Proprietà del Join dalla maschera che 
compare scegli la seconda Opzione. Se hai fatto tutto per bene il 
codice SQL che otterrai sarà più o meno di questo tipo:
SELECT Proto2000.Anno, Proto2000.Oggetto, Proto2000.DataReg, 
Proto2000.Via,
  Proto2000.Via2, Strade.Via, Strade_1.Via
  FROM Proto2000 LEFT JOIN Strade ON Proto2000.Via=Strade.Codice
LEFT JOIN  Strade AS Strade_1 ON Proto2000.Via2=Strade_1.Codice;


Perfetto.
Grazie
Franco
Newsgroup: it.comp.appl.access
Titolo: come importare dati .db di WATCOM ?

Come da oggetto vorrei importare da un dbase creato da un programmino da
supermercato.
Il mio amico ci ha registrato tre anni di movimenti di cassa (5000 righe
circa) e adesso mi chiede se posso trasferirgliele in un MDB.
Ho guardato con un editor HEX e nell'unico file di dati è chiara all'inizio
la dicitura WATCOM. L'estensione è .DB, ma non è un file di FOXPRO, (almeno
così mi dice EXCEL, che ho utilizzato per prova). Ma la domanda è generale:
oltre ai formati riconosciuti da ACCESS, ed inseriti in elenco, come si può
aggiungere filtri per altre basi dati?


Hai provato ad aprirlo con blocco note?
Se ce la fai, poi č semplice importrlo
MAssimiliano


Si ho provato! Per un attimo mi pareva di poterlo recuperare con qualche
struttura, ma invece è proprio un file organizzato con tutti i crismi. Anzi
a ben guardarci ho scoperto che viene gestito da PC ANYWHERE. Quindi ho
provato a scaricare la versione TRY, giusto per aprire il mio file. Ma poi
non ci ho capito molto .. mi sembra un gestore di dati tra terminali
distanti, ma non ho trovato nulla che mi permettesse di guardare nel mio
file. Insomma ... ho capitolato!
Il mio amico dovrà, se vuole, ricostruire i tre anni passati (reimmettendoli
!). Io per contro gli ho preparato una struttura in access che gli
permetterà di non avere in seguito questo problema. Almeno da qui potrà
esportare i dati in mille modi diversi !
comunque Grazie
Ivan