mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: DoCmd.OpenForm Errore di run time2501

Da una maschera tento di lanciare una popup ma il metodo in oggetto mi
restituisce sempre l'errore di run time2501
L'azione OpenForm è stata annullata.
Il fatto è che la maschera da aprire è chiusa avendo controllato lo stato
con una funzione.
Posto il codice per eventuali suggerimenti
SunRex
Private Sub cmdPrezzi_Click()
Dim strSQL As String
Dim strForm As String
strSQL = "SELECT * FROM tblPrezziAnalisi WHERE IDAnalisi = " & lngAnalisi &
";"
Set rsPrezzi = db.OpenRecordset(strSQL)
If rsPrezzi.BOF And rsPrezzi.EOF Then
    MsgBox "Nessun riferimento presente", vbInformation, "Virtual Lab"
    rsPrezzi.Close
    Set rsPrezzi = Nothing
    Exit Sub
Else
    rsPrezzi.Close
    Set rsPrezzi = Nothing
    strForm = "frmSchedaPrezzi"
    'If FormIsOpen(strForm) Then
   ' MsgBox "Aperta"
   ' Else
   ' MsgBox "Chiusa"
   ' End If
    DoCmd.OpenForm strForm
End If
End Sub

 ha scritto nel messaggio
news:sd2ntv41a3lab2vrd...@4ax.com...

La funzione FormIsOpen mi dice che la frm in questione è chiusa.
SunRex

 >
[CUT]
Ho risolto.
Praticamente l'errore veniva generato perchè nel codice della popup avevo
la dichiarazione di Option Explicit scritta due volte cosa che ho scoperto
compilando tuti i moduli.
SunRex

 ha scritto nel messaggio
news:ulHCb.88972$AX1.3...@news1.tin.it...



[CUT]
Non mi ricordo dove l'ho pescata cmq eccola qui
Public Function FormIsOpen(FormName As String) As Boolean
   FormIsOpen = (SysCmd(acSysCmdGetObjectState, acForm, FormName) And
acObjStateOpen) <> False
End Function
P.S.
Rispondi dopo il messaggio.
Ciao
SunRex

Newsgroup: it.comp.appl.access
Titolo: Ordinare una sottomaschera

Non riesco a visualizzare il contenuto di una maschera (continua) in
maniera ordinata, il bello e' che se apro la maschera singolarmente
(con apri...) i dati risultano ordinati, se invece viene inclusa in
una maschera no......
Suggerimenti?
Grazie!


Utilizza la proprieta' OrderBy
Me.OrderBy = ... (campi per l'ordinamento)
e poi non dimenticarti ...
Me.OrderyByOn = true
Questo da codice altrimenti la puoi impostare a mano dalla proprieta' della
maschera:
Dati -> Ordina per ...

Meade <mba...@NOSPAMMMMlibero.it> wrote in message
3d6de6a1...@powernews.libero.it...

Usa, come origine record della sottomaschera, una query basata sull'oggetto
che è attualmente origine record della sottomaschera; ordina la query per il
campo o i campi che ti interessano.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Tabelle come fogli di calcolo. Si può?

E' possibile utilizzare una tabella come se fosse una specie di foglio di
calcolo?
Mi spiego: ho due colonne Lire e Euro. Come dovrei fare se volessi che ad
ogni valore di "lire" corrispondesse nella colonna "euro" il valore:
 "lire"/1936,27
PS: uso access 97

Zampalunga ha scritto:

sulla tabella, poiche euro e' un valore calcolato , potrebbe non
servire. Se poi il fase di visualizzazione (maschera) vuoi vedere l'euro
basta che leghi il valore del controllo al calcolo che hai citato
a livello di query basta fare
select lire, lire*1936,27 as euro 
e ottieni la stessa cosa
bye a.cara

Newsgroup: it.comp.appl.access
Titolo: Come ordinare una query in base al valore di un campo

Ho un problema:
ho una query ottenuta unendo 2 tabelle. 
Avrei la necessità di stampare un report ordinato secondo i valori di un
campo.
Non potendo usare l'odinamento crescento o decrescente come posso fare?
Sono un neofita percui siate chiari per piacere!!!!!
Per essere piu specifici ho bisgno di stampare il personale:
prima i "medici" poi tutti gli "specializzandi" e quindi gli
"infermieri".
Grazie a tutti.
Avrei pure un altro problame ma lo metto in un altro post! 
Augusto
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 "infermieri".
L'ordinamento nei report si gestisce dai raggruppamenti (c'e' un pulsante in
visualizzazione struttura che ha piu' o meno questo aspetto:  =]
o era al contrario? [=
Sib

 Sib
Grazie a quello riesco a ragruppare secondo i gruppi ma non posso far
stampare prima un certo gruppo rispetto ad un altro... o no?


 stampare prima un certo gruppo rispetto ad un altro... o no?
Te lo sto dicendo.
Sib


    Giusto, Sib, ma mi sa che e' la gerarchia che lo frega. Per esempio
la "i" di infermieri viene prima della "m" di medico... ;-)
    Julius, aggiungi un campo, numerico, che indichi l'ordine di stampa
per categoria ed ordina il report in base a quello.
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
--
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.appl.access
Titolo: formato password per un campo non associato

è possibile visualizzare il classico formato password (asterischi) ad un campo di testo non
associato in una form?
grazie


[CUT]
Trovato!!! :-)
basta impostare la maschera di inserimento a password :-)
grazie cmq a tutti!!!
Newsgroup: it.comp.appl.access
Titolo: per Sib, specificazione di un post precedente

 >SELECT [Tab_1].id_1, [Query].sp, [Tab_1].ti, [Tab_1].Cat, [Tab_1].sg
 >FROM Query RIGHT JOIN Tab_1 ON [Query].Cod_ti=[Tab_1].id_1
 >WHERE ([Tab_1].Cat= "A");
al posto del where, che estrae solo in base ad un valore ci devo
mettere piu' valori di un campo di una tabella, come si fa?
n.b. non voglio usare l'operatore AND, ma il Select campo sulla tabella
(mi serve il select perché dalla tabella
i valori del campo li devo estrarre usando l'operatore where)
Scusa sib, il tuo suggerimento è giusto, pero' mi interessava
sostituire la riga del where con un select: cioè devo ripassargli i
valori che ho tutti dentro
a un campo (che quindi dovro' tirar fuori con un slelect).
Mi sono dimenticato di specificare questo, in quanto lo avevo già
scritto
nel post iniziale.
Ipotizzo che forse serve un join o qualcosa di simile;
(Soluzione sib usando il where pero' con l'operatore AND
WHERE [Tab_1.Cat]="A" AND Tab_1.ti="B" AND ecc. ecc.)
di nuovo grazie a tutti

 mettere piu' valori di un campo di una tabella, come si fa?
cut
...
WHERE [Tab_1].Cat IN (SELECT Tab2.TuoCampo FROM Tab2)
Sib

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

Access mi da un problemino...
faccio una copia del FE del mio DB
prendo questa copia e faccio Strumenti, Utilità database, Crea copia di file
MDE e mi dice che è impossibile....
mi manca un plugin di Access??
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Hai provato a compilare il tutto prima di
convertirlo?
MAssimiliano

 mi manca un plugin di Access??
Hai sicuramente qualche errore nel codice...segui il consiglio di MA.
-- 
Pablitomf (Maurizio Facciuti)
“Quando non ti eserciti ricorda che qualcuno in qualche posto si sta
allenando e, quando lo incontrerai, ti batterà”.
Ed Macauley 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Creato MDE
ma pensavo che non si potesse aprire il file con ALT premuto invece lo apro
lostesso, non ho la possibilità di toccare le form e i i moduli vedo le
query e i collegamenti al BE
Vabbe me lo tengo cosi :-)


 Vabbe me lo tengo cosi :-)
Non ti conviene.
-- 
Pablitomf (Maurizio Facciuti)
“Quando non ti eserciti ricorda che qualcuno in qualche posto si sta
allenando e, quando lo incontrerai, ti batterà”.

Newsgroup: it.comp.appl.access
Titolo: Disabilitare l'evento Su Uscita

Ho creato una maschera in cui sull'evento Su Uscita di una casella di testo
(NOME) ho inserito del codice che effettua dei controlli.
Se questi non sono rispettati non riesco ad uscire e fin qui tutto bene.
Sulla maschera è presente un pulsante per la sua chiusura.
Ho notato che se sono sul controllo (NOME) e provo a chiudere la maschera
scatta l'evento Su Uscita della casella di testoe se i controlli non hanno
esito positivo non mi fa uscire..
E' possibile disabilitare in qualche modo l'evento Su Uscita?
Se non è possibile qualcuno sa come posso risolvere il problema?
Grazie a tutti!!

 ha scritto nel messaggio
news:fvKC8.46$8b4...@nreader1.kpnqwest.net...

Quando chiudi una maschera, se lo stato attivo è sul controllo "NOME", si
verifica prima  l'evento "Su Uscita" del controllo e poi "FormClose".
Questo spiega perchè viene eseguito prima il codice del controllo.
Ci sono molte possibili soluzioni che prevedono, per esempio, di spostare il
codice in un modulo pubblico e creare una variabile booleana che se "Vera"
abilita o disabilita l'esecuzione del codice.
Una soluzione molto semplice può essere la seguente:
"Su Uscita" del controllo "NOME" e dopo aver eseguito le tue verifiche, se
le verifiche danno esito negativo,  potresti porre una domanda del tipo:
Dim msg As Integer
msg = MsgBox("Il risultato è errato, vuoi proseguire ugualmente?", vbYesNo,
"Proseguire?")
    If msg = 6 Then ' ha risposto sì
        Exit Sub
    Else
        Cancel = True
    End If
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: passare 2 stringhe a google maps da access

mi spiego meglio, possiedo un db con tutti i comuni d'italia, � possibile 
aprire una pagina google maps passando come parametro i  2 comuni nei campi 
DA e A e in qualche modo scatenare l'evento "CALCOLA PERCORSO" nella pagina 
di google maps?
 
grazie a tutti. 
 

Sono riuscito
 
    Dim StringaPercorso As String
    StringaPercorso = "
https://maps.google.com/maps?saddr=
" & 
comune1.Column(1) & "&daddr=" & comune2.Column(1)
    ApriGoogleMaps StringaPercorso
 
ApriGoogleMaps esegue execbrowser
 
stranamento per� google chrome blocca l'avvio da access del browser mentre 
internet explorer funziona senza problemi.
 
spero possa essere utile anche a voi.
Newsgroup: it.comp.appl.access
Titolo: Cicli su connection esterne ADO vs DAO

Salve a tutti,
correggetemi se sbaglio , ma il ciclo per avere i nomi delle tabelle ( ad
esempio) con Ado su una Connection esterna ad esempio un altro mdb, mi è
risultato un pò più lenta rispetto alla stessa procedura utilizzando pero
Dao.
Ad esempio
# If Dao
Dim CurrDb As DAO.Database
Dim DB As DAO.Database
Dim area As DAO.Workspace
Set area = DBEngine.Workspaces(0)
Set CurrDb = area.Databases(0)
Set DB = area.OpenDatabase(Source)
For j = 0 To DB.TableDefs.Count - 1
etc
next j
'****************************************************
# Else Ado
Dim cat As New ADOX.Catalog, tbl As ADOX.Table
    Dim ltables As Long, lcount As Long
    Dim Cnn As ADODB.Connection
 Set Cnn = New ADODB.Connection
 Cnn.ConnectionString = _
    "Provider=Microsoft.jet.OLEDB.4.0;" & _
    "Data Source=" & _ source
   Cnn.Open
    Set cat.ActiveConnection = Cnn
ltables = cat.Tables.Count
For lcount = 0 To ltables - 1
        Set tbl = cat.Tables(lcount)
           Next lcount
Chiedo il parere dei più esperti, comunque di chi sta eventualmente
"aggiornando il proprio codice" in un ottica futura a Dao.
P.S.  Naturalmente è soggettiva la potenza del PC che viene utilizzato
Saluti
Mak
--
Access 2000 SR1


Se usi ACCESS non ha molto senso convertire in ADO, perchč DAO
č un motore studiato appositamente per ACCESS.
Per questo risulta piů performante, ACCESS per moltissime cose
usa DAO anche se non ti accorgi della cosa, addirittura per alcune
primitive, quando
usi ADO viene reinterpretato il codice in DAO...........!!!(Considerazioni
solo per ACCESS).
@Alex.

 solo per ACCESS).
Dipende, con gli Access Data Projects DAO non esiste proprio.
Ciao.

 ha scritto nel messaggio
news:MxFK9.13702$Ou4.4...@twister2.libero.it...

Ciao Oscar.....!
Si, ma č tutt'altro discorso....... non credi......!!!
Ciao
@Alex.
Newsgroup: it.comp.appl.access
Titolo: ottimizzare l'uso della memoria quando il db diventa enorme

sto realizzando un db che contiene davvero moltissime form tabelle query
ec.. a volte durante le modifiche al codice esce il messaggio di windows
memoria esaurita, questo a volta capita anche aprende dei report, forse non
c'è memoria abbastanza quindi ad esempio non mi mostra il logo.jpg
sapete se ci sono delle procedure o accorgimenti per ottimizzare l'uso della
memoria ?
comprimo regolrmente il db ogni volta. altre cose?
Grazie a tutti.

 comprimo regolrmente il db ogni volta. altre cose?
A volte capita durante lo sviluppo, passando frequentemente da Design a
"normale".
Prima di distribuire l'.mde, reimporta tutto in un nuovo .mdb.
Bye


Oltre al suggerimento di Simba883, potresti dividere l'mdb in piů parti;
magari con una certa logica operativa...
Ciao.
--
Sergio MAZZA

 tutte le variabili oggetto vengano chiuse (set obj=nothing).
Access modifica "ON THE FLY" in modo NATIVO le immagini da JPG a BMP.
L'unica cosa saggia da fare è disabilitare la barra di caricamento nei
Registri
poichè spesso è proprio quella che genera l'errore......!!!!
HKEY_LOCAL_MACHINE\Software\Microsoft\ Shared Tools\Graphics
Filters\Import\JPEG\Options
Volendo si fa anche tramite codice nel caso si debba distribuire
l'applicazione.
@Alex.

 l'applicazione.
Non basta: anche disabilitando tale progress bar i problemi di risorse
rimangono, proprio per la conversione a Runtime che accennavi.
Bye


Secondo me in ogni caso questa opzione è bene impostarla a 0 in modo
da evitarla.
HKEY_LOCAL_MACHINE\Software\Microsoft\ Shared Tools\Graphics
Filters\Import\BMP\Options
Il caricamento anche BMP mi provocava l'esaurimento della Memoria
virtuale, sto però parlando di Foto a media risoluzione da qualche MB...!
Quando ho disabilitato il caricamento tutto OK.
@Alex.

 
E' possibile in ogni caso far lavorare Access direttamente con JPG
senza passare per la conversione in BMP sfruttando le librerie
INTEL(Gratuite e già inserite) che permettono di ByPassare
il tutto.
Veloce e funzionante...!
Ciao.
@Alex.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Veloce e funzionante...!
Librerie Intel?
Fammi capire come...
Ciao ;-)

 wrote in message
news:ie6nb.69059$
vO5.2...@twister1.libero.it

Non mi sono inventato nulla, solo mi ricordavo di aver letto
ed ho cercato...... trovando l'esempio:
http://www.lebans.com/loadsavejpeg.htm


 
http://www.lebans.com/loadsavejpeg.htm
Adesso capisco ... sì, avevo scaricato pure io quegli esempi dal sito di
Lebans: davvero notevoli!
Bye
Newsgroup: it.comp.appl.access
Titolo: errore query parametrica

salve. ho un problema con una query.
se la lancio senza parametro funziona tutto.
se inserisco il parametro forms! maschera!anno e leggo i risultati con openrecordset mi dà errore: parametri insufficienti. previsto 1.
La cosa buffa è che se apro il report la cui origine dati è la stessa query parametrica va tutto bene!
avete idea di quale possa essere il problema?

 ...
 
Parametri insufficienti
http://www.donkarl.com/it?FAQ6.4
 
 
-- 
Ciao
Karl
*********
http://www.AccessDevCon.com
 
Access FAQ: 
http://www.donkarl.com/it
 
 
 
 


grazie!! 
chissà perché non riuscivo a trovare questa soluzione da nessuna parte!


ma mi consigli di cambiare tutte le mie query parametriche, anche se non mi danno errori?

 ma mi consigli di cambiare tutte le mie query parametriche, anche se non mi danno errori?
 
No, solo se è necessario per un accesso concreto con DAO come 
OpenRecordset o Execute.



grazie ancora!

scusa se ne approfitto, ma non sai rispondere all'altro mio quesito?
non sono stato chiaro?

Newsgroup: it.comp.appl.access
Titolo: Aggiungere campi ad una tabella con VB

Salve amici del Ng,
ho necessità di aggiungere ed eliminare dei campi da una tabella che 
contiene già diversi record. Ho provato con TableDef ma non ci sono 
riuscito. Potreste darmi una mano?
Vi ringrazio,
Antonio

riuscito. Potreste darmi una mano?
Dim miatabella As TableDef
Dim db As Database
Set db = CurrentDb
Set miatabella = db.TableDefs("T_nomi")
miatabella.Fields.Append miatabella.CreateField("indirizzo", dbText, 50)
miatabella.Fields.Delete ("indirizzo")
Saluti.
Luciano

Newsgroup: it.comp.appl.access
Titolo: Stampa file di testo da access usando il drive windows "generica solo testo"

Ciao a tutti,
Mi sapete indicare come posso fare per stampare da Visual Basic di Access 
2000 un file di testo impiegando il drive di windows "Generica Solo 
Testo"?
I margini devono essere impostati tutti a zero.
N.B. non posso usare un comando del tipo "oBj.CopyFile "C:\LBS_MAT.TXT", 
"COM1", False" perché la stampante non stampa correttamente.
Grazie, ciao

 ha scritto nel messaggio
news:A84L7.149299$sq5.7...@news.infostrada.it...
Ciao a tutti,
Mi sapete indicare come posso fare per stampare da Visual Basic di Access
2000 un file di testo impiegando il drive di windows "Generica Solo
Testo"?
non stamparlo, esportalo con    docmd.transfertext
Max
Newsgroup: it.comp.appl.access
Titolo: impedire modifica record

ciao a tutti
 
Axp sp3   Wxp sp3
 
maschera singola con: consenti Modifiche = NO
all'apertura visualizza tutti i record.
modifico il record corrente e chiudo la maschera viene accettata la 
modifica.
 
modifico il record corrente e premo ESC annulla la modifica e i controlli
non consentono modifiche.
perchè?
mi sto perdendo nel solito bicchiere...? :-)
 
grazie per i suggerimenti che vorrete darmi
 
Daniele
 
 

 modifica.
 
Altolà!
Qual'è il "record corrente"?
 
Con "Consenti Modifiche" a No non puoi modificare i dati di un record 
che già esiste. Però puoi aggiungere e modificare un nuovo record finché 
non viene salvato.
 
Se invece puoi cambiare un record salvato forse cambi l'impostazione nel 
codice di un evento "iniziale" della maschera o nel commando che apre la 
maschera.
 
In questo caso prova di aprire la maschera direttamente dalla finestra 
di database e controlla il codice dei eventi apertura, caricamento, 
corrente ecc.
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
Access Lobby: 
http://www.AccessDevelopers.org
 

 corrente ecc.
nessun cambiamento! avevo provato e riprovato
per completare le info posso aggiungere che la maschera ha anche una 
sottomaschera...
 
ciao Karl
grazie per la risposta
 
Daniele
 
 

 sottomaschera...
 
Se non trovi la causa forse puoi estrarre la maschera e 2-3 record in un 
piccolo mdb e caricarlo come zip in qualche luogo per riprodurre il 
problema.



 
ho rifatto la maschera ed ho inserito il codice su Corrente e Apertura 
una routine alla volta.
questo è il codice che non permette di non modificare i record:
If Me.Conto = Me.Testo49 Then
Me.attivo = True
Me.Etichetta46.Caption = "Conto chiuso"
Else
Me.attivo = False
Me.Etichetta46.Caption = "Conto Attivo"
End If
dove testo49 è un riferimento alla sottomaschera.
tolto questo funziona perfettamente.
dovrò trovare altro sistema per fare riferimento oppure annullare il codice.
 
ciao Karl
sempre grato per la tua cortesia
 
Daniele
 
 
 
 


su Corrente ho aggiunto a:
If Me.NewRecord Then
  'Me.IDProgetto.Enabled = True
'Me.IDFornitore.Enabled = True
...
else
'Me.IDProgetto.Enabled = False
'Me.IDFornitore.Enabled = False
 
funziona!...anche se si perde un pochino la visibilità della maschera.
saranno sempre gradite alternative.
 
Daniele
Newsgroup: it.comp.appl.access
Titolo: Stampa report a colonne fronte retro

ho realizzato un report a 2 colonne per stampare tipo delle tessere.
su un foglio A4 ne vanno 8, 4 a destra e 4 a sinistra.
il mio problema e che vorrei stampare una i dati anagrafici da un lato e
altri dati dall'altra.
e' possibile realizzare un report del genere
grazie a tutti x il vostro aiuto.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 grazie a tutti x il vostro aiuto.
Hai due possibilità:
1) La stampante che usi prevede in maniera intrinseca la possibilità di
stampa fronte/retro: in questo caso apri la struttura del report e dal menu
File scgli Imposta pagina.. e dalla finestra di dialogo che si apre imposta
quell'opzione della stampante, quindi chiudi la finestra di dialogo e salva
e chiudi la struttura del report.
2) La stampante che usi prevede in maniera intrinseca la possibilità di
stampa fronte/retro: vai sul Sito Comune (link qui sotto) e nella Sezione
Reports leggi la FAQ di Federico Luciani intitolata "4.2 Stampare
fronte-retro".
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------

 fronte-retro".
-- 
questo articolo e` stato inviato via web dal servizio gratuito 


 spero di essermi spiegato
Scusami ma non avevo riflettuto sul fatto che stampi su piů colonne. In
questo caso non ho da suggerirti una soluzione chiavi in mano.
[CUT]

Newsgroup: it.comp.appl.access
Titolo: Esportare tutti i record da maschera in word

Ciao,
il mio problema è che vorrei esportare tutti i record caricati nella
maschera in word senza usare l'automazione presente da access. ho trovato
sul sito codice per esportare il record corrente e eventuali sue
sottomaschere attraverso un modlello, ma non so come fare per espoortare
tutti i record filtarati visualizzati sulla maschera attiva.
Qualcuno sa darmi una mano?
Grazie
Tz
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Grazie
esporta la query cui la maschera sottende.
Davide
-- 
www.gestionedati,com

Newsgroup: it.comp.appl.access
Titolo: [OT] Cercare lavoro a Roma...

Secondo voi, con quanta semplicità un programmatore Access/Vb e Sistemista
può trovare lavoro in Roma? Quanto può guadagnare?
(sto vagliando l'idea di trasferirmi)
grazie
--
<***********************************>
Vigna Federico...CED L'Abbondanza
Email: 
in...@labbondanza.it
Http: 
www.labbondanza.it
<***********************************>

 (sto vagliando l'idea di trasferirmi)
Nel caso fatti sentire!:-)
Saluti.
Luciano
PS Ma ora dove stai? Se stai in una localita' amena potremmo fare uno
scambio!:-)

Newsgroup: it.comp.appl.access
Titolo: Calendario:come impostare la data corrente.

Ho una maschera che contiene il controllo Activex  "calendario" .
Non sono ancora riuscito a impostare la data corrente alla sua
apertura.
Hai idea di come fare?
Bach

...

nomecontrollocalendario=date()


Me.CtlActiveX0 = Date mi ritorna l'errore
Impossibile assegnare un valore all' oggetto.
Bach

Me.CtlActiveX0 = Date mi ritorna l'errore
prova con
Me.CtlActiveX0.value = Date
Gianluca


Già fatto, stesso esito.
Forse c' è qualche proprietà del tipo Locked da controllare?
Bach

Me.CtlActiveX0.Object.Value = Date 
non da errore , ma non funziona!
Bach

 Bach
e se inserisci le parentesi.... = Date() ?
ciao Santini

...

io metto questo nel form open della mascera conenente il controllo e
funziona
Private Sub Form_Open(Cancel As Integer)
Me![CtlCalendario].SetFocus
Me![CtlCalendario].Value = Date
End Sub

 wrote:
Funziona
Grazie
Bach

e se inserisci le parentesi.... = Date() ?
Non cambia niente :-(
Bach
Newsgroup: it.comp.appl.access
Titolo: VBA: impostare maschera su un record...

Salve a tutti,
ho costruito una mascherina per ricercare i clienti e
vorrei cliccando su uno di essi posizionare una seconda maschera
sul relativo cliente....
Utilizzo l'espressione:
Forms!Anagrafico_cliente!codice = me.id_cli
secondo mè il problema è che "codice" è di tipo
contatore e VBA non mi permette di assegnarli il valore....
come posso ovviare al problema?
grazie
sdamy

 wrote in message
news:a6a509$2in$1...@pegasus.tiscalinet.it...

Al di la che quello che hai scritto serve, non per posizionarsi, ma
per IMPOSTARE un VALORE, cosa che non devi assolutamente fare.
Prova a verificare il codice dietro l'AUTOCOMPOSIZIONE della
ricerca tramite una COMBO_BOX:
Sub CasellaCombinata12_AfterUpdate()
    ' Trova il record corrispondente al controllo
    Me.RecordsetClone.FindFirst "[Nome] = '" & Me![CasellaCombinata12] &
"'"
    Me.Bookmark = Me.RecordsetClone.Bookmark
End Sub
Invece di applicare questa procedura alla FORM Me sulla
FORM=Anagrafico_cliente
Come...???
Sub CasellaCombinata12_AfterUpdate()
    ' Trova il record corrispondente al controllo
    Forms("Anagrafico_cliente").RecordsetClone.FindFirst "[Nome] = '" &
Me![CasellaCombinata12] & "'"
    Forms("Anagrafico_cliente").Bookmark =
Forms("Anagrafico_cliente").RecordsetClone.Bookmark
End Sub
Ciao.
Alessandro.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:0a7f98cc641021b825...@mygate.mailgate.org...

Grazie
adesso mi "avventuro"....
ciao ciao
sdamy

Newsgroup: it.comp.appl.access
Titolo: Filtrare una casella combinata

Salve a tutti avrei un problemino;
ho una maschera con due caselle combinate
Famiglia_utensile e Codice utensile
Entrambe recuperano i dati da due tabelle distinte vorrei fare in modo che 
scegliendo una famiglia nella prima casella combinata vengano filtrati i 
dati della seconda .
Grazie infinite 

 dati della seconda .
Dipendenza delle caselle combinate/riepilogo
www.donkarl.com/it/?FAQ4.36
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: Maledetta Rotellina!





Oh mia fonte di sapere!!!


VVVi chiedo se è possibile disabilitare la 
rotellina del mouse tra gli eventi della maschera in quanto 
mi fa passare da un record all'altro della stessa senza che io 
riesca a controllarne l'evento.


Ringrazio anticipatamente chiunque mi vorrà 
aiutare.



Con Thierry si è cercato di disabilitare il tasto destro del mouse e non so
come è finita. Credo che una soluzione al tuo problema sia quello di agire
sul driver del mouse che dovrebbe permettere la modifica della funzionalità
della rotellina. Te lo dico perché ho un mouse "scrollpoint" che al posto
della rotellina ha un "mini joystick" e tramite il driver lo posso
"programmare" o disabilitare...
Ciao.


Ehm, ehm. Con il sottoscritto Thierry, non è finita! Per la semplice ragione
che non ho ancora provato :-))
Appena avrò un pò di tempo, proverò è magari ci faccio una bella
comunicazioni che descriverà i punti "salienti" dell'avventura :-))
Ciao
Thierry


Ah! Quindi non demordi!
Ciao.

 aiutare.
io ho risolto impostando la proprietà cycle della forma (la terza della
tab altro, tanto per capirci) a current record, in questo modo non è
possibile scorrere tutti i record passando da un campo all'altro con il
tab, ma si impedisce alla rotellina di scorrere indesideratamente i
record associati alla maschera
saluti paolo

> Ah! Quindi non demordi!
Diciamo che ho dei buoni denti :-)
Ciao
Thierry

Newsgroup: it.comp.appl.access
Titolo: VISUALIZZAZIONE IMMAGINI SU REPORT

ho creato una maschera in cui incorporo una immagine mediante la finestra di
ricerca file di office (getFileName), poi ho creato un report collegato alla
maschera, solo che non riesco a vedere sul report l'immagine che c'è sulla
maschera.
Mi potreste dare qualche suggerimento ? ve ne sarei grato. Grazie.
(premetto che so anche da solo di essere grezzo come un osso buco)

 ha scritto nel messaggio
news:qD8nc.221280$rM4.9...@news4.tin.it...

Fai una ricerca con google in questo NG, l'argomento è stato già trattato
molte volte...
Ciao.
-- 
Sergio MAZZA

 ha scritto nel messaggio
news:_Qbnc.165013$hc5.7...@news3.tin.it...



(regola di questo NG) scrivi alla fine del testo del messaggio precedente,
come faccio io; grazie.
Inserisci un controllo immagine associato (associa un qualsiasi file
immagine), poi nell'evento "su formattazione" del corpo inserisci:
Me!nomeControlloImmagine.Picture = "C:\documenti\immagini\" & Me!file
Ciao.
--
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Ordinamento dei controlli

Vorrei richiamare i controlli di una maschera tramite Me.Controls(i) ma non 
mi e' chiaro qual e' l'ordinamento dei controlli. Non e' l'ordine di 
tabulazione (.tabIndex) ma e' diverso, ho controllato visualizzando 
Me.Controls(i).
E' l'ordine con cui mi muovo col tasto tab in visualizzazione struttura, ma 
non ho ancora capito che ordine e' e come eventualmente modificarlo se 
necessario
il barbi 


L'ordine ï¿œ quello della creazione. Puoi solo modificarlo con cancellare
e ricreare i controlli p.e. con Taglia/Incolla.
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

il barbi ha scritto:

Su controls, la mia e' logica, che e' una collezione (insieme) i vari 
elementi vengono addizionati in ordine naturale, cioe' man mano che 
vengono creati (metodo add della collezione), e sono accedibili 
attraverso l'indice (i) o attraverso il "name".
Per averli nella sequenza che desideri devi cancellarli e ricrearli 
secondo l'ordine che vorresti.
--
ac


quindi non posso richiamare un controllo in base al suo TabIndex?
il barbi 

 
volendo si
set CtlxTabIndex = getControl(n)   dove n e' iltabindex
Function getControl( i as long)
    for each ctl in me.controls
	if ctl.tabindex = n then
	   set getControl = ctl
	   exit getControl		
	end if
    next
end function
si puo' fare in modo piu' furbo ma richiede qualche riga in piu'.
Essenzialmente creando una collezione "indexando" per il tabindex  e poi 
usarla al posto di controls.
--
ac

        exit getControl 
	exit function
--
ac

 poi usarla al posto di controls.
o un array con i nomi dove l'indice del array = TabIndex:
On Error GoTo myError
Dim ctl As Control
Dim strArr() As String
Dim i As Long
ReDim strArr(Me.Controls.Count - 1)
For Each ctl In Me.Controls
        strArr(ctl.TabIndex) = ctl.Name
Next ctl
For i = 0 To UBound(strArr) - 1
    If Not strArr(i) = "" Then
        Debug.Print i, strArr(i)
    End If
Next i
myExit:
    Exit Sub
myError:
    Select Case Err.Number
        Case 438 ' controllo non ha un TabIndex
            Resume Next
        Case Else
            MsgBox Err.Number & " " & Err.Description
            Resume myExit
    End Select

Newsgroup: it.comp.appl.access
Titolo: [OT]: Libri per ontabilità

Salve a tutti, da alcuni anni realizzo applicazioni per piccole aziende
artigiane o commerciali che non necessitano di una contabilità interna
completa.
Esempio: bilancio, mastrini ecc ecc.
Non avendo grosse conoscenze in campo contabile o di ragioneria vorrei
trovare dei testi che mi aiutino in modo SEMPLICE e chiaro a capire di che
cosa una piccola o media impresa può aver bisogno per gestire autonomamente
la propria contabilità interna.
Escluderei dalla lista testi universitari.....
Grazie Luca


Se vuoi scrivere un programma di contabilita' interna (forse se ho
capito dovrebbe essere la *prima nota*) credo che ti serva un libro di
ragioneria informatica.
se invece non e' la prima nota che ti serve ma una vera contabilita'
credo che piu' dei testi universitari ti serva un team di persone che
conoscano ragioneria, fisco, ecc... oltre ad un team di programmatori.
un programma di contabilita' non e' uno scherzo se ci sono errori di
programma che portano ad errori nelle dichiarazioni dei redditi sono
dolori.
-- 
Ciao
Andrea Malfatti

Newsgroup: it.comp.appl.access
Titolo: criptare asimmetrica con vba

salve
 
mi chiedono di criptare asimmtricamente una stringa
 
e' possibile con VBA?
 
Grazie anticipatamente


Prova a vedere questo:
https://bytes.com/topic/access/insights/906850-aes-encryption-algorithm-vba-vbscript
 
 
Personalmente però userei le API.
https://stackoverflow.com/questions/40748130/adapt-crypto-api-vba-to-use-with-access-2010-64-bit
 
 
 
@Alex
http://www.freevbcode.com/ShowCode.asp?ID=804
 

 
https://stackoverflow.com/questions/40748130/adapt-crypto-api-vba-to-use-with-access-2010-64-bit
 
Se usi le vespe non devi cambiare alveare...
ad ogni versione di Access... ;-) ;-) ;-)
 
Bruno

 Bruno
 
@Alex
Newsgroup: it.comp.appl.access
Titolo: aprire una maschera all'interno di un'altra maschera

Volevo chiedere al ns. se è possibile e come far si che premendo un 
determinato tasto si apra una maschera all'irteno di un'altra maschera.
Ma la cosa singolare è che vorrei riuscire a dare ...."tipo le coordinare" 
di dove aprire la maschera...
il comando
Docmd.OpenForm(NomeMaschera, Visualizzazione, NomeFiltro, CondizioneWHERE, 
ModalitàDati, ModalitàFinestra, ArgomentiApertura)
devo modificare i parametri ModalitaFinestra? e come 


Puoi aprire la maschera lasciandola nascosta, quindi utilizzi il metodo
Move per spostarla dove ti serve, quindi la rivisualizzi.
-- 
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


All'interno....????
Puoi usare una SubForm, e gestirne la proprietà Visible... ?
Di quella poi la puoi spostare.
Si può anche fare in modo che la Form si apra all'interno... ma è
meglio non intraprendere questa strada....
@Alex

Puoi usare una SubForm, e gestirne la proprietą Visible... ?
Di quella poi la puoi spostare.
Non so come si faccia una sub form. Ho gią la maschera che mi si "apre" alla 
pressione di un tasto. Mi basterebbe solo trovare il modo di "dire" 
all'applicativo di aprirla in una determinata posizione(tipo coordinate)
 

 all'applicativo di aprirla in una determinata posizione(tipo coordinate)
Hai provato a seguire il mio precedente consiglio (metodo Move) ?


Newsgroup: it.comp.appl.access
Titolo: Ricerca su casella combinata

Ciao,
ho una casella combinata ,in un controllo struttura a scheda ,
la casella ha come origine il nominativo dei dipendenti della tabella
anagrafico, vorrei che quando seleziono un nome dalla casella combinata
mi trovasse il record corrispondente.
ho speso quasi tutta la mattina con gli esempi sul sito comune, ma non sono
riuscito a venirne a capo
mi date una mano ???
grazie !

Pensa che bastava leggere le opzioni del Wizzard di
AUTOCOMPOSIZIONE...!
Riprova.
@Alex


ok :)
io provo con :
' Trova il record corrispondente al controllo
   DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[N] = '" & Me![Testo5] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
Mi di errore di run-time : 3022
L'apporto modifiche non è riuscito in quanto si è cercato di duplicare i
valori nell'indice, nella chiave primaria o nella relazione.
:(

Hai la chiave primaria impostata nella tabella..?
@Alex

 Hai la chiave primaria impostata nella tabella..?
si è il campo Matricola.
ciao.

Scusa ma non è che la Casella Combinata è associata vero..?
Devi renderla NON ASSOCIATA.
@Alex

Devi renderla NON ASSOCIATA.
grazie !!!!

 valori nell'indice, nella chiave primaria o nella relazione.
DoCmd.ApplyFilter , "[CampoTabellaInForm]=" & [Combo1]
ovvero
DoCmd.ApplyFilter , "[CampoTabellaInForm]='" & [Combo1] & "'"
se campo testo.
FilterOn = False
per eliminare il filtro.
Ciao
Bruno
Newsgroup: it.comp.appl.access
Titolo: catturare la videata e crrare un bitmap

qulacuno di voi sa come catturare la videata ad esempio quando premo un
tasto e trasformarla in immagine bitmap?
come se premessi stamp dalla tastiera e aprissi paint facendo poi incolla,
ho reso l'idea?
grazie a tutti.

 ha scritto nel messaggio
news:c762jm$3qr$1...@lacerta.tiscalinet.it...

In passato ho usato un activex e se ti devo dire la verità non mi ricordo
come, vedi qui se c'e qualcosa che puo' andare
http://www.softuarium.com/downloads.php
ciao


non ho trovato nulla grazie lo stesso
io vorrei simulare le seguenti operazioni ma in modo trasparente
1. l'utente che preme il tasto stamp su tastiera
2. l'utente apre paint
3. l'utente clicca su incolla
4. l'utente salva l'immagine
secondo voi è fattibile in modo trasparente?

 ha scritto nel messaggio
news:c762jm$3qr$1...@lacerta.tiscalinet.it...

Prova a vedere qui
http://www.dosadi.com/eztwain1.htm
Ciao

Simba883 ha scritto:




Ci sarebbe, se non erro il Paint Shop Pro, oppure qualcosa di freeware.
Tra l'altro dovrei preparare anch'io un HelpFile.
Se trovo qualcosa ti informo.
--
rgrds
SC
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 SC
Trovato questo: 
http://www.wisdom-soft.com/products/screenhunter.htm
Ho provato la versione 4.0 che è free. 


 > SC
no ma io non intendo programmi che lo facciano ma io che da codice vba
utilizzando l'oggetto clipboard in access riesca a catturare la scheramata e
salvarla in bitmap
chiedo troppo ad access?

 ha scritto nel
messaggio
news:c78loe$4vt$1...@lacerta.tiscalinet.it...

Usa sendkeys e pigia R sist Stamp, poi lo gestisci
come vuoi.
Sappi però che se lo vuoi usare come error log,
lui lo salva in bitmap, per inviartelo lo devi
prima comprimere (e diventa pochissimi k)
MAssimiliano

 MAssimiliano
si ma come salvo l'immagine dopo lo stamp?

 ha scritto nel
messaggio
news:c7an2n$kti$1...@lacerta.tiscalinet.it...

Se non ricordo male sul sitocomune ci dovrebbe
essere qualcosa per gestire un'immagine salvata in
memoria.
E comunque c'è anche il programam di gestione fax
di Roberto che utilizza qualcosa del genere.
MAssimiliano
Newsgroup: it.comp.appl.access
Titolo: Con la SP 1 di WinXP Access va uno schifo ...

Ho appena installato la SP 1 di WinXP.
Da questo momento in poi la mia applicazione Access 2000 (front-end a MySQL)
va una vera chiavica. Le maschere master-detail e i report ci mettono una
vita a comporsi, le scroll-bar fanno piantare per alcuni (lunghissimi)
secondi l'applicazione, le combo che sono guai ad aprirle... Insomma,
inutilizzabile.
Le elaborazioni pesanti (quelle fatte dal server) vanno a razzo come al
solito.
Ho deinstallato l'aggiornamento e, magicamente, tutto torna a funzionare
perfettamente.
Qualche suggerimento?
TIA, Sandro.
--------------------------------
Inviato via 
http://usenet.libero.it

Qualche suggerimento?
Macchina pulita: installa win 'XP, installa SP-1, installa il resto del software (Access compreso).
Ciao, warp
Newsgroup: it.comp.appl.access
Titolo: Problema con Macro e Importazione

il mio scopo è quello di importare un file di testo in una tabella access.
ho già creato una specifica di importazione.
per farlo in maniera automatica, ho creato una Macro e come azione gli ho
messo TrasferisciTesto e gli ho messo tutti i parametri.
vorrei però rendere automatica l'importazione. quindi ho creato una maschera
in Access in cui c'è un campo in cui scrivere dove si trova il file di testo
da importare, per esempio c:\testo.txt
a questo punto, un pulsante sempre della maschera, dovrebbe eseguire la
Macro.
l'Azione trasferisciTesto della macro, tra i parametri, ha "Nome File".
dovrebbe corrispondere alla casella che c'è sulla maschera (c:\prova.txt) ,
giusto ? cioè forms![nomemaschera]![nomecampo]
peccato che mi dice che il nome non è valido.
spero di essere stato + chiaro di prima.
grazie ancora.



non puoi usare il codice?
docmd.transfertext?
Saluti.
Emanuele.

Newsgroup: it.comp.appl.access
Titolo: [CISA] Abbiamo il periodo

Salve a tutti,
anche quest'anno ci sar� la CISA, l'unico evento italiano per sviluppatori 
Access.
Stiamo preparando l'agenda e gi� abbiamo molti relatori.
Argomenti saranno come al solito VBA, T-SQL, SQL Server, .NET
Quest'anno siete invitati a presentare dei vostri progetti nell'angolo 
workshop, contattatemi se siete interssati.
Microsoft ci ha appena comunicato che abbiamo la sala nella loro sede di 
Segrate per luglio.
Se siste interessati come relatori, partecipanti, uditori etc. contattatemi
Su AccessGroup.it man mano verranno annunciate le novit�
-- 
--
MA
www.AccessGroup.it
C.I.S.A - Conferenza Italiana Sviluppatori Access 

 
a tal proposito il cisa 2009 non è presente sul sito, non è mai stato 
svolto?
Il materiale di CISA 2008 e 2006 non è disponibile sul sito?
Sarebbe interessante poterlo consultare.
ciao

 Sarebbe interessante poterlo consultare.
I download di 2005 e 2006 trovi su 
http://www.donkarl.com/it/
,
nella sezione CISA.
-- 
cu
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 
grazie mille! mi fiondero' a leggerli appena possibile...
qulacuno ha notizie del 2008 e del 2009?
un saluto al NG

 ha scritto nel messaggio 
news:peLnn.147400$9f6.1...@twister1.libero.it...

il sito di riferimento della CISA è  
www.accessgroup.it
ciao
Daniele 

 Il materiale di CISA 2008 e 2006 non è disponibile sul sito?
per il 2008 abbiamo avuto un problema con un hard disk su ci c'era la 
documentazione
per il 2006 vedi 
www.donkarl.com/it


 
Peccato, non c'e' nessuna che ne dispone una copia?

 ha scritto nel messaggio 
news:hnlomm$cf4$1...@tdi.cu.mi.it...

Presente!...attendo i giorni cos� mi organizzo!
-- 
Roberto da Parma 

 anche quest'anno ci sar laCISA, l'unico evento italiano per sviluppatori

Ciao Massimiliano Facci sapere le date per tempo, in modo da
organizzarci per il meglio.. cmq conto di esserci!
Newsgroup: it.comp.appl.access
Titolo: Copia dei record

Ciao, ho il seguente problema:
utilizzo un amschera per la gestione degli oridni. Tutti i dati dell'ordine
provengono da una query su piu' tabelle e vengono visualizzati in un' unica
maschera con sottomaschera annessa. Il problema è che a fine anno vorrei
archiviare gli ordini vecchi in una tabella in cui ogni record sia formato
dai dati della query su piu' tabelle,
cioe vorrei copiare i dati degli ordini come semplice testo senza che
dipendano dalla relazioni  come faccio?
tutto il problema nasce dal fatto che una volta cancellato ad esempio un
cliente non posso pi visualizzare i suoi oridini mediante la query e la
maschera anche se nella tabella sono ancora presenti. Il fatto è ceh voglio
poter cancellare un cliente senza perdere la possibilità di visualizzare i
suoi ordini effettuati prima dell'eliminazione. Già fatte prove con
l'integrità referenziale e via dicendo
ciao e grazie!!!

 ha scritto nel messaggio
news:BLus6.29326$x3.5...@news2.tin.it...

Se non ho capito male il tuo problema, copiati la tua query cambiandole
nome; apri la struttura  della nuova query e trasforma la query in una query
di creazione tabella. Eseguila la nuova query di comando.
A questo punto degli oggetti sui quali era basata la query originale ne puoi
fare l'uso che vuoi.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: access e dati in word

Ciao a tutti,
ecco il mio problema:
Io dovrei creare una maschera che mi permetta di inserire nome e
cognome(successivamente verrà ampliata con altri dati) per poi in automatico
access deve compilarmi i dati da me inseriti in un template di word che ho
creato.
Mi servirebbe visualizzare i dati in anteprima ed eventualmente stampare il
documento di word.
Secondo voi è possibile?
come potrei fare?
Grazie a tutti e buone vacanze
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


- stampa unione in word;
- esempio su sito comune (
www.sitocomune.com
);
- ricerca con google in questo NewsGroup;
Ciao.
-- 
Sergio MAZZA

 ha scritto nel messaggio
news:ceqoil$f4h$1...@canarie.caspur.it...

ciao luca, esistono diversi 3d aperti in questo ng relativi al problema in
oggetto.
Io grazie all'aiuto di namor ho avuto modo di sperimentare positivamente
l'utilizzo dell'accoppiata access - word.
In tal senso ti chiedo di cercare intorno a gennaio un msg avente per
oggetto word e database.
Tramite google è semplicissimo.!

Newsgroup: it.comp.appl.access
Titolo: access e win2000

ho creato una form nuova con access2000ho inserito un pulsante di
spostamento record  e ricevo un errore
ho tralasciato qualcosa nella configurazione di access2000
lo ho installato ora su un pc poratile con win 2000 professional
Grazie

 ha scritto nel messaggio
news:O4CX8.60278$Jj7.1...@news1.tin.it...

Newsgroup: it.comp.appl.access
Titolo: Errore di run time 3219

Sto provando ad aprire una qry parametrica da vba e ricevo sempre questo
errore (3219).Domanda è possibile
eseguire da vba una qry di creazione tabella con parametri?Ed inoltre a che
si riferisce questo errore?
Grazie
Giuseppe


ha provato a fare debug.print err.description?
--
a.cara 
Togli qualcosa dall'email

 a.cara
Mi da Operazione non valida.
Ma il costrutto della qry che faccio in vba è identico a quello che faccio
sulla visualizzazione struttura delle qry.

 ha scritto nel messaggio
news:rIQ3a.252679$AA2.9...@news2.tin.it...

Sarebbe bene che tu postassi il codice VBA che hai usato per aprire la tua
query parametrica.
Certo è che non può essere simile a quello usato per aprire una query non
parametrica.
Per maggiori chiarimenti vai sul Sito Comune (link qui sotto) e nella
Sezione Queries leggi la FAQ di Federico Luciani intitolata "Aprire una
query parametrica da codice VBA".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Grazie Roberto ma ho risolto utilizzando la qry direttamente senza fargli
creare la tbl.
Ciao
Giuseppe
Newsgroup: it.comp.appl.access
Titolo: Proteggere importazione

Ciao a tutti, vi ringrazio in anticipo per l'aiuto.
Avrei bisogno di sapere se esiste un modo per impedire 
di importare i dati di un database dall'esterno.
Mi spiego meglio: ho un database con tabelle, query etc
e vorrei impedire che da un altro database (tramite la 
funzione di importa dati) si possa accedere alla struttura
del database.
Una soluzione potrebbe essere la password del database ma 
in questo caso dovrei dirla agli utilizzatori mentre dovrei
conoscerla solo io. Esiste altrimenti un modo per avviare 
un database protetto da password inserendola in qualche modo
tramite codice?
Ciao
Paolo
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:30811910630ab3cd455...@mygate.mailgate.org...

Hai già dato un'occhiata nelle opzioni del menù: Strumenti - Avvio?
Ciao.
--
Sergio MAZZA

Grazie per aver risposto.
Forse perň ho spiegato male il mio problema. 
Devo trovare un sistema per impedire l'importazione
degli oggetti del database dall'esterno. E' un
database per un terzo ma non voglio che possa
vederne la struttura (tbl, qry, form, report).
Dal menů strumenti/avvio posso mettere la pwd al database
e questa soluzione risolve in parte il problema, perchč 
se provo ad entrare nel database mi chiede la pwd.
Questa soluzione perň non fa al caso mio perchč dovrei far
sapere la pwd all'utilizzatore.
Le soluzioni sono 2:
1) Fare partire un database protetto da pwd inserendo la pwd
tramite codice 
DIM DBS AS DATABASE
SET DBS = OPEN DATABASE ("MIO.MDB",false,false,";pwd=pippo")
ma non so come inserire il codice prima che mi chieda la pwd
2)Trovare il modo di impedire l'importazione dei dati dall'esterno
(ma non ho altre soluzioni se non la pwd al database)
Se hai qualche idea/consiglio, fammi sapere.


 ha scritto nel messaggio
news:5226bdbaaf4035f249e...@mygate.mailgate.org...

Prova con SendKeys (vedi help)...
Ciao.
--
Sergio MAZZA

 Sergio MAZZA
L'idea di SendKeys è ottima ma non so come fare ad utilizzare il
comando in quanto la prima cosa che fa all'apertura è chiedermi
la pwd. Come posso fare per lanciare una routine con SendKeys,
da dove posso lanciarla?



Come arrivi alla richiesta di input della password? Il comando lo dai tu o
cosa?
Ciao.
--
Sergio MAZZA

 
Scusami tanto ma faccio fatica a capire. Io non do alcun comando all'
apertura del database. La richiesta di pwd è automatica perchè la 
preimposto tramite il menu strumenti/protezione/password database.
Quando apro, la prima cosa che fa è chiedermi la pwd in una maschera di
sistema (non creata da me) che non so come poter gestire.
Sii paziente...perdona la mia ignoranza.
Secondo la tua conoscenza esiste un modo migliore di questo  per 
impedire all'utente finale di poter vedere la struttura del dbase,
oppure è questa la via giusta? 
Ciao Paolo


 Ciao Paolo
Ciao.
--
Sergio MAZZA