title: OT Traduzione FAQ 6.19

text:
*************************
6.19 Pass the Database Password
Problem
You want to open another MDB in a new instance of Access via code
and also pass the database password, so that it doesn't have to be
typed in.
Solutions
Note: For the DB password other than for user name and user password
there is no possibility to pass it by a command line parameter in a link.
If you want to open a MDB from another MDB via code then (until A00)
the only official way to hand over the password is to open the db in the
invisible way with OpenDatabase. e.g.
DBEngine.Workspaces(0).OpenDatabase _
        ("C:\Foo\My.mdb", False, False,";PWD=MyPassword")
Concerning the visible way to open a DB in a new instance via code
starting with AX the methode OpenCurrentDatabase has a new
parameter for the password. e.g.
Dim appAcc As Access.Application
Set appAcc = CreateObject("Access.Application")
appAcc.OpenCurrentDatabase, "C:\Foo\My.mdb", False, "MyPassword"
For versions prior to AX there's the following trick by Günther Ritter:
Private Sub cmdOpen_Click()
  Dim db As DAO.Database
  Dim strDb As String
  'create another instance of Access
  Dim acc As New Access.Application
  Const strPWD As String = ";pwd=123456"
  strDb = "C:\DbWithPassword.mdb"
  'open the database with password
  Set db = acc.DBEngine.OpenDatabase(strDb, False, False, strPWD)
  acc.OpenCurrentDatabase strDb
  'necessary in order to maximize the application
  acc.RunCommand acCmdAppRestore
  acc.RunCommand acCmdAppMaximize
  acc.DoCmd.Maximize
  db.Close
End Sub
****************************
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it


title: OT Traduzione FAQ 6.19

author: sv

text:
Karl Donaubauer ha scritto:
> *************************
> 6.19 Pass the Database Password
> Problem
> You want to open another MDB in a new instance of Access via code
> and also pass the database password, so that it doesn't have to be
> typed in.
> Solutions
> Note: For the DB password other than for user name and user password
> there is no possibility to pass it by a command line parameter in a link.
> If you want to open a MDB from another MDB via code then (until A00)
> the only official way to hand over the password is to open the db in the
> invisible way with OpenDatabase. e.g.
> DBEngine.Workspaces(0).OpenDatabase _
>         ("C:FooMy.mdb", False, False,";PWD=MyPassword")
> Concerning the visible way to open a DB in a new instance via code
> starting with AX the methode OpenCurrentDatabase has a new
> parameter for the password. e.g.
> Dim appAcc As Access.Application
> Set appAcc = CreateObject("Access.Application")
> appAcc.OpenCurrentDatabase, "C:FooMy.mdb", False, "MyPassword"
> For versions prior to AX there's the following trick by Günther Ritter:
> Private Sub cmdOpen_Click()
>   Dim db As DAO.Database
>   Dim strDb As String
>   'create another instance of Access
>   Dim acc As New Access.Application
>   Const strPWD As String = ";pwd=123456"
>   strDb = "C:DbWithPassword.mdb"
>   'open the database with password
>   Set db = acc.DBEngine.OpenDatabase(strDb, False, False, strPWD)
>   acc.OpenCurrentDatabase strDb
>   'necessary in order to maximize the application
>   acc.RunCommand acCmdAppRestore
>   acc.RunCommand acCmdAppMaximize
>   acc.DoCmd.Maximize
>   db.Close
> End Sub
> ****************************
6.19 Passare la Password di un Database
Problema
Vuoi aprire via codice un altro file MDB in una nuova istanza di
Access e in aggiunta passare la password, cosģ che non la si debba
digitare.
Soluzioni
Nota: Per la password del DB, eccetto  per il nome e la password utente,
non esiste alcuna possibilitą di passarla tramite un parametro di una riga
di comando in un collegamento, .
Se vuoi aprire via codice un MDB da un altro MDB , allora (fino ad
A2000) l'unico modo per passare la password, č quello di aprire il
database in modo invisibile con OpenDatabase.
Ad esempio:
DBEngine.Workspaces(0).OpenDatabase _
("C:\MyFolder\MyDb.mdb", False, False,";PWD=MyPassword")
Per quanto riguarda  il modo visibile per aprire un DB in una nuova
istanza via codice, iniziando da Access XP, il metodo OpenCurrentDatabase
ha un nuovo parametro per la password.
Ad esempio:
Dim appAcc As Access.Application
Set appAcc = CreateObject("Access.Application")
appAcc.OpenCurrentDatabase, "C:\MyFolder\MyDb.mdb", False,"MyPassword"
Per versioni antecedenti Access XP c'č il seguente trucco di Günther
Ritter:
Private Sub cmdOpen_Click()
Dim db As DAO.Database
Dim strDb As String
'crea un'altra istanza di Access
Dim acc As New Access.Application
Const strPWD As String = ";pwd=123456"
strDb = "C:\DBConPassword.mdb"
'apre il database con password
Set db = acc.DBEngine.OpenDatabase(strDb, False, False, strPWD)
acc.OpenCurrentDatabase strDb
'massimizza l'applicazione
acc.RunCommand acCmdAppRestore
acc.RunCommand acCmdAppMaximize
acc.DoCmd.Maximize
db.Close
End Sub
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: OT Traduzione FAQ 6.19

author: Roberto dalla campagna

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:2t7eucF...@uni-berlin.de...

*************************
6.19 Passare la Password del Database
Problema
Tu vuoi aprire attraverso codice VBA un altro MDB in una nuova istanza di
Access e vuoi anche passare la password del databse, così che tu non debba
digitarla in una finestra di dialogo.
Soluzione
NB: Per la password del database, al contrario di quanto avviene per il nome
e la password utente, non c'è la possibilità di passarla tramite un
parametro di una riga di comando in un collegamento.
Se vuoi aprire un MDB da un altro MDB usando il codice VBA, allora (sino ad
Access 2000) l'unico modo possibile per passare la password è quello di
aprire il database in modo non visibile con OpenDatabase, per esempio:
DBEngine.Workspaces(0).OpenDatabase _
         ("C:\MiaCartella\MioDatabase.mdb", False, False,";PWD=MiaPassword")
Circa il metodo visibile per aprire un database in una nuova istanza
attraverso il codice VBA, operando con Access XP il metodo
OpenCurrentDatabase ha un nuovo parametro per la password, per esempio:
Dim appAcc As Access.Application
Set appAcc = CreateObject("Access.Application")
appAcc.OpenCurrentDatabase, "C:\MiaCartella\MioDatabase.mdb", False,
"MiaPassword"
Per versioni di Access precedenti ad Access XP c'è il seguente trucco di
Günther Ritter:
Private Sub cmdOpen_Click()
   Dim db As DAO.Database
   Dim strDb As String
   'crea un'altra istanza di Access
   Dim acc As New Access.Application
   Const strPWD As String = ";pwd=123456"
   strDb = "C:\DBConPassword.mdb"
   'apri il database con password
   Set db = acc.DBEngine.OpenDatabase(strDb, False, False, strPWD)
   acc.OpenCurrentDatabase strDb
   'necessario allo scopo di massimizzare l'applicazione
   acc.RunCommand acCmdAppRestore
   acc.RunCommand acCmdAppMaximize
   acc.DoCmd.Maximize
   db.Close
 End Sub
****************************
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Conferma Inserimento

author: Giorgiom

text:
Salve
Come posso fare affinche in una maschera prima di inserire un record mi
visualizzi il messaggio:
sei sicuro di inserire il record
si  no
con la possibilita' di scegliere si/no
Grazie
Giorgio
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Conferma Inserimento

author: Gaspare

text:
[CUT]
Ciao,
ti riferisci x caso al seguente?
http://www.donkarl.com/it/AccessFAQ.htm?/it/FAQ/FAQ9Link.htm
 ->32 Chiedere
prima di salvare un record


title: Conferma Inserimento

author: MA

text:
Giorgiom wrote:
> Salve
>
> Come posso fare affinche in una maschera prima di inserire un record
> mi visualizzi il messaggio:
>
>
> sei sicuro di inserire il record
> si  no
>
>
> con la possibilita' di scegliere si/no
>
> Grazie
> Giorgio
www.sitocomune.com
In pratica cmq devi mettere su
Form_beforeUpdate
il tuo msg e nel caso fai un me.undo
ma ti ripeto sul sito è soiegato per bene
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Conferma Inserimento

author: Karl Donaubauer

text:

È la FAQ numero 4.32.
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it
+ Conferenza Italiana per Sviluppatori di Access (CISA)


title: Conferma Inserimento

text:

NOn citvo questo ma in pratica è come dicevo



title: Conferma Inserimento

text:
{CUT]
Con il copia ed incolla ho dimenticato il 4 :-(


title: Conferma Inserimento

text:
[CUT]
Non avevo letto la risposta -> non sò xchè ma qualcosa non va
nell'inserimento dei messaggi nella news-letter :-(


title: Conferma Inserimento

text:
[CUT]
Boh...che dirti? Non riesco ad inserire i messaggi e  li visualizzo dopo
tutti insieme...mah
Buona giornata :-)


title: avvio di un mdb senza la prima finestra

author: Francesco Castellaneta

text:
Non mi ricordo più come si fà per non far apparire la prima maschera di
access cioè : quella che visualizza il numero seriale e immagine grafica di
access, quando si fà partire l'mdb con un collegamento .
per intenderci la riga di comando
grazie chiunque voglia rispondermi


title: avvio di un mdb senza la prima finestra


title: avvio di un mdb senza la prima finestra

author: Calogero Di Lorenzo

text:
mi sa che non si puo fare,
invece puoi sostituire il logo iniziale sostituendolo con una tua bmp,
che dovrai chiamare con il nome dell'mdb e
naturalmente farla risiedere nella cartella di lavoro dell'mdb.
--
Cordialità
Calogero Di Lorenzo
Francesco Castellaneta <
f.caste...@esa-group.it
> wrote in message
10p3l04$3u6$1...@fe2.cs.interbusiness.it...



title: OT : Occhio ai virus

author: Sergio Della Giora

text:
Mi è arrivato un msg da Antonio Biso con un allegato chiamato
You_Are_fat.mp3.scr contenente un virus chiamato Beltran...
Fate attenzione!
Saluti
Sergio Della Giora


title: OT : Occhio ai virus

author: warp

text:
"Sergio Della Giora"
> Mi è arrivato un msg da Antonio Biso con un allegato chiamato
> You_Are_fat.mp3.scr contenente un virus chiamato Beltran...
> Fate attenzione!
Ad Antonio Biso o al virus?  ;-))
Ciao: warp


title: OT : Occhio ai virus

author: Luciano (DOC)

text:
"Sergio Della Giora" <
sergio_d...@infinito.it
> ha scritto nel
messaggio news:9u254r$5k68j$1...@ID-84518.news.dfncis.de...
> Mi è arrivato un msg da Antonio Biso con un allegato chiamato
> You_Are_fat.mp3.scr contenente un virus chiamato Beltran...
L'ho ricevuto anch'io, da Biso e da altri del NG. Contiene un falso mp3 in
allegato quindi si tratta probabilmente una variante del code red.
Saluti.
Luciano


title: OT : Occhio ai virus

author: Antonio Biso

text:
Sergio Della Giora <
sergio_d...@infinito.it
> wrote in message
9u254r$5k68j$1...@ID-84518.news.dfncis.de...
> Mi è arrivato un msg da Antonio Biso con un allegato chiamato
> You_Are_fat.mp3.scr contenente un virus chiamato Beltran...
> Fate attenzione!
Mi sono ripulito e ho attivato il controllo antivirus automatico anche per
gli allegati. 'Sto cornuto infatti sfrutta il bug di IE che, con header MIME
incorretto, gli allegati vengono eseguiti direttamente senza scelta
dell'utente!!!
Antonio


title: OT : Occhio ai virus

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:Tu2N7.192627$sq5.9...@news.infostrada.it...
> gli allegati. 'Sto cornuto infatti sfrutta il bug di IE che, con header
MIME
> incorretto, gli allegati vengono eseguiti direttamente senza scelta
> dell'utente!!!
Anto', so' 3 mesi che e' uscita la patch....
Saluti.
Luciano


title: OT : Occhio ai virus

text:
Luciano (DOC) <
lucia...@sitocomune.com
> wrote in message
9u2dn3$5l02g$1...@ID-86073.news.dfncis.de...

Ma il virus che sfrutta il bug è uscito da 3 giorni.
Antonio


title: OT : Occhio ai virus

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:V43N7.192804$sq5.9...@news.infostrada.it...
> Ma il virus che sfrutta il bug è uscito da 3 giorni.
Perche' secondo te la cura esce prima del male....
Saluti.
Luciano


title: OT : Occhio ai virus

text:
Luciano (DOC) <
lucia...@sitocomune.com
> wrote in message
9u2ej9$5nub0$1...@ID-86073.news.dfncis.de...

Delle volte mi chiedo se ci sei o ci fai...
Il bug di IE è a prescindere dal virus, cioè tutti gli allegati vengono
eseguiti se l'header mime è sbagliato. Quindi hanno fatto la patch a
prescindere dal problema virus.
Poi, che qualche tuo amichetto abbia pensato di preparare un virus che
sfrutta questo bug, è un altro discorso...
Antonio


title: OT : Occhio ai virus

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:mc3N7.192844$sq5.9...@news.infostrada.it...
> Delle volte mi chiedo se ci sei o ci fai...
Anto', anto'....ma che dici....:-)
> Il bug di IE è a prescindere dal virus, cioè tutti gli allegati vengono
> eseguiti se l'header mime è sbagliato. Quindi hanno fatto la patch a
> prescindere dal problema virus.
La patch e' stata fatta a settembre quando e' uscito il code red che
funzionava in quel modo. Chi si e' infettato in quel periodo non poteva
essere a conoscenza del bug. Chi invece si infetta adesso, del code red o di
altri virus che usano il medesimo principio, e' perche' non ha applicato la
patch di un bug che ora si conosce.
Come definire costui? Poco attento?:-)
Saluti.
Luciano


title: OT : Occhio ai virus

text:
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:9u2fam$5o72s$1...@ID-86073.news.dfncis.de...

Vabbè... in sostanza state all'occhio... c'è un virus in giro...OK?
Saluti
Sergio Della Giora


title: OT : Occhio ai virus

text:
Luciano (DOC) <
lucia...@sitocomune.com
> wrote in message
9u2fam$5o72s$1...@ID-86073.news.dfncis.de...
>
> altri virus che usano il medesimo principio, e' perche' non ha applicato
la
> patch di un bug che ora si conosce.
> Come definire costui? Poco attento?:-)
oooohhh... sei proprio di Roma...
io a civitavecchia lascio il borsello in macchina e ce lo ritrovo!!!
Antonio


title: OT : Occhio ai virus

author: Riccardo

text:
Antonio Biso <
ch...@etruria.net
> wrote in message
i_8N7.195019$sq5.9...@news.infostrada.it...

__________
Beato a te!
qui a Latina va a fini' che non trovi neanche la macchina!
:-)
Riccardo


title: OT : Occhio ai virus

author: Sib dal portatile

text:
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
> "Sergio Della Giora" <
sergio_d...@infinito.it
> ha scritto nel
> > Mi è arrivato un msg da Antonio Biso con un allegato chiamato
> > You_Are_fat.mp3.scr contenente un virus chiamato Beltran...
>
> L'ho ricevuto anch'io, da Biso e da altri del NG. Contiene un falso mp3 in
> allegato quindi si tratta probabilmente una variante del code red.
No, e' Badtrans. Assicurato. L'ho avuto.
Sib


title: OT : Occhio ai virus

author: Roberto da casa

text:
"Sib dal portatile" <
sibN...@iol.it
> ha scritto nel messaggio
news:njeN7.198698$sq5.9...@news.infostrada.it...

Presuppongo di aver ricevuto anche io messaggi "impestati".
Come ci si accorge se il virus è annidato ne proprio PC?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: OT : Occhio ai virus

text:
"Riccardo" <
ricc...@free.panservice.it
> ha scritto nel messaggio
news:9u367e$mkf$1...@news.panservice.it...

>Anto'..non lo di' tanto forte...senno ce ritrovamo la nostra ridente
cittadina piena di gente che viene a rubarti il borsello
kikko


title: OT : Occhio ai virus

author: Silvio Berruti

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:CEeN7.198877$sq5.9...@news.infostrada.it...
>
> Presuppongo di aver ricevuto anche io messaggi "impestati".
> Come ci si accorge se il virus è annidato ne proprio PC?
>
Si aggiorna un buon antivirus e si fa una scansione completa del sistema.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: OT : Occhio ai virus

author: Sergio MAZZA

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:CEeN7.198877$sq5.9...@news.infostrada.it...
>
> Presuppongo di aver ricevuto anche io messaggi "impestati".
> Come ci si accorge se il virus č annidato ne proprio PC?
>
> --
> Roberto
>
> ---------------------------------------------
> il Sito Comune di it.comp.appl.access:
>
http://www.sitocomune.com
> ---------------------------------------------
>
Ho trovato nei sistemi NT wk (i 2000 non l'ho ancora trovati infettati) la
presenza di due file: kdll.dll e kernel32.exe. Del primo non ho trovato la
corrispondenza in altri pc con lo stesso s.o. mentre il secondo esiste ma
non in versione exe ma dll.
Sostituendolo con la versione originale e ripassando l'antivirus non viene
segnalato piů nessun file infettato...
Ciao.
--
- - - - - - - - - - - - - - -
Sergio MAZZA
- - - - - - - - - - - - - - -


title: OT : Occhio ai virus

text:
Roberto da casa <
r.ma...@libero.it
> wrote in message
CEeN7.198877$sq5.9...@news.infostrada.it...
>
> Presuppongo di aver ricevuto anche io messaggi "impestati".
> Come ci si accorge se il virus è annidato ne proprio PC?
Leggiti questa pagina ed alcuni pagine collegate
http://www.mcafee.com/anti-virus/viruses/badtrans/
Antonio


title: OT : Occhio ai virus

author: Roberto dal portatile

text:
"Silvio Berruti" <
sber...@libero.it
> ha scritto nel messaggio
news:2pmN7.200079$sq5.9...@news.infostrada.it...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:CEeN7.198877$sq5.9...@news.infostrada.it...
> >
> > Presuppongo di aver ricevuto anche io messaggi "impestati".
> > Come ci si accorge se il virus è annidato ne proprio PC?
> >
>
> Si aggiorna un buon antivirus e si fa una scansione completa del sistema.
>
> --
>
> Silvio
>
Grazie!



title: OT : Occhio ai virus

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9u4vlh$nb5$1...@canarie.caspur.it...

Grazie!



title: OT : Occhio ai virus

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:ZypN7.201022$sq5.9...@news.infostrada.it...

Grazie!



title: OT : Occhio ai virus

text:
Kikko60 <
kik...@libero.it
> wrote in message
ovjN7.199720$sq5.9...@news.infostrada.it...

Ok, smentisco tutto!!!
Antonio


title: OT : Occhio ai virus

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> "Sib dal portatile" <
sibN...@iol.it
> ha scritto nel messaggio
> > "Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
> > > "Sergio Della Giora" <
sergio_d...@infinito.it
> ha scritto nel
> >
> > > > Mi è arrivato un msg da Antonio Biso con un allegato chiamato
> > > > You_Are_fat.mp3.scr contenente un virus chiamato Beltran...
> > >
> > > L'ho ricevuto anch'io, da Biso e da altri del NG. Contiene un falso
mp3
> in
> > > allegato quindi si tratta probabilmente una variante del code red.
> >
> > No, e' Badtrans. Assicurato. L'ho avuto.
> >
> > Sib
> >
>
> Presuppongo di aver ricevuto anche io messaggi "impestati".
> Come ci si accorge se il virus è annidato ne proprio PC?
Mi hanno tolto il piacere della risposta :-(
Ma te lo dico pure io!
Kernel32.exe e Kdll.dll sono i due pezzi del virus badtrans.
Non trascurare di eliminare la chiave di registro che fa riferimento al file
Kernel32.exe
Ciao
Sib


title: OT : Occhio ai virus

text:
"Sib dal portatile" <
sibN...@iol.it
> ha scritto nel messaggio
news:YDuN7.203224$sq5.9...@news.infostrada.it...

Grazie anche a te! :)
Ciao
Roberto


title: OT : Occhio ai virus

text:
"Carlo Filippini" <carlo.f...@NOSPAMtiscalinet.it> ha scritto nel
messaggio news:r4kf0ussamc9l8jon...@4ax.com...
>
> kernel32.dll e' il kernel di windows; a causa di un bug e' molto
> importante NON ripristinare questo file utilizzando il controllo file
> di sistema contenuto in win98 prima versione.
>
> Ciao.
> --
> Carlo Filippini
> ---
Io non ho citato il kernel32.dll ma kernel32.exe che è il virus; e neanche
il win98 ma win'NTwk...



title: OT : Occhio ai virus

author: Roberto

text:
La riedizione di badtrains (mi pare si chiamasse cosě) che va diffondendosi in
questi giorni, ho letto che crea una kdll.dll e la K starebbe per Killer.
Bene facesti...
R.
In article <
r4kf0ussamc9l8jon...@4ax.com
>,
carlo.f...@NOSPAMtiscalinet.it says...
>
>On Thu, 29 Nov 2001 10:40:01 +0100, "Sergio MAZZA"
><
sergi...@tiscalinet.it
> wrote:
>
>> Ho trovato nei sistemi NT wk (i 2000 non l'ho ancora trovati infettati) la
>> presenza di due file: kdll.dll e kernel32.exe. Del primo non ho trovato la
>> corrispondenza in altri pc con lo stesso s.o. mentre il secondo esiste ma
>> non in versione exe ma dll.
>> Sostituendolo con la versione originale e ripassando l'antivirus non viene
>> segnalato piů nessun file infettato...
>



title: Cornice oggetto

author: Davide

text:
Salve a tutti.
Sto cercando di creare una maschera dove ad ogni record corrisponda
un'immagine .jpg (da visualizzare in un controllo immagine) ed un oggetto
.pdf (da visualizzare in un controllo cornice oggetto)
Ho quindi due campi ("Campo1" di tipo testo dove salvo il nome del file .jpg
e "Campo2" di tipo testo dove salvo il nome del file .pdf), un controllo
immagine ("Immagine") ed un controllo cornice oggetto ("Oggetto").
Sull'evento "Su corrente" della maschera ho impostato:
Immagine.Picture = MioPercorso & Campo1.value   'MioPercorso è un percorso
predefinito dove sono salvate tutte le immagini .jpg ed i file .pdf
Oggetto.SourceDoc = MioPercorso & Campo2.value
Tuttavia, mentre le immagini .jpg vengono aggiornate correttamente quando
passo da un record ad un altro, l'immagine del controllo oggetto invece non
si aggiorna.
Dove sto sbagliando?
Il controllo oggetto è di tipo "Non associato" e ha le seguenti proprietà:
Classe OLE: Adobe Acrobat 8.0
Tipo Visualizzazione: Contenuto
Opzioni aggiornamento: Automatico
Tipo OLE: Collegato
Classe: AcroExch.Document.7
Documento Origine:
Elemento Origine:
Attivazione Automatica: Doppio clic
Verbo: 0
Tenete presente che non vorrei incorporare l'oggetto nella maschera o
salvare l'oggetto nel database, ma salvare solo il nome del file .pdf


title: Cornice oggetto

author: Carlo Costarella

text:
"Davide" <
davide...@alice.it
> ha scritto nel messaggio
news:4995386f$0$848$4faf...@reader5.news.tin.it...

Io inserisco nella maschera un controllo del tipo:
C:\Programmi\File comuni\Adobe\Acrobat\ActiveX\AcroPDF.dll
che nell'elenco dei controlli ActiveX è indicato come "Adobe PDF Reader".
Poi su corrente della maschera gli passo il percorso del file:
Me.AcroPDF0.LoadFile ("PercorsoFile.pdf")
Ci sono anche altre soluzioni.
Ciao, Carlo


title: Cornice oggetto

text:
"Carlo Costarella"  ha scritto nel messaggio
news:gn3h6j$ef1$1...@tdi.cu.mi.it...
>
> "Davide"  ha scritto nel messaggio

Grazie Carlo.
Però qualcosa non funziona.
Ho inserito nella maschera il controllo che mi hai consigliato con una
dimensione di 10x20 cm, ma quando apro la maschera compare solo, nella parte
in alto a sinistra del controllo e con una dimensione di circa 3x5 cm, una
immagine che mostra (per quel che puo starci nell'area di 3x5 cm) le barre
degli strumenti del programma Acrobat reader. Non vedo niente del disegno.
Mi sembra quindi di capire che questo controllo non mostra solo il documento
ma l'intero programma acrobat reader.
Hai altre soluzioni per visualizzare solo il documento o per risolvere il
problema che ti ho appena descritto?
Ciao


title: Cornice oggetto

text:
"Davide" <
davide...@alice.it
> ha scritto nel messaggio
news:49955bb6$0$1118$4faf...@reader4.news.tin.it...

Prova così e...mi raccomando...leggi sempre bene i metodi e le proprietà di
un controllo:
Me.AcroPDF0.setPageMode ("none")
Me.AcroPDF0.setShowScrollbars (False)
Me.AcroPDF0.setShowToolbar (False)
Me.AcroPDF0.setLayoutMode ("DontCare")
Me.AcroPDF0.LoadFile ("PercorsoFile.pdf")
Trovi delle indicazioni qui:
http://www.janus-flash.com/help/index.html?adobereader_setpagemode.html
Ciao, Carlo


title: Cornice oggetto

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:gn3nav$lo6$1...@tdi.cu.mi.it...

Ciao Carlo, ti ringrazio per il codice che mi hai inviato, e scusa se lo
faccio così in ritardo ma ho provato solo ora.
Il codice che mi hai inviato funziona perfettamente (l'ho inserito nella
routine "su corrente"), però funziona solo all'aperture della maschera.
Quando passo ad un record successivo
setShowScrollbars (False)  e setShowToolbar (False)  non funzionano più e
vengono visualizzate sia le toolbar che la scrollbar.
Ho provato a leggere la guida all'indirizzo che mi hai inviato, ma niente.
Cosa devo fare?


title: Cornice oggetto

text:
"Davide" <
davide...@alice.it
> ha scritto nel messaggio
news:499d30f1$0$1118$4faf...@reader3.news.tin.it...

 Cosa devo fare?
Come faccio inoltre a:
- nascondere anche il pannello di navigazione ancorato a sinistra
- chiudere un file (quando un record non ha associato un file pdf il
controllo visualizza il file associato al record precedente). Esiste forse
un metodo "AcroPDF0.close" ? ho provato con  Me.AcroPDF0.LoadFile ("none")
oppure con Me.AcroPDF0.LoadFile ("") ma non funziona


title: Cornice oggetto

text:
"Davide" <
davide...@alice.it
> ha scritto
cut
> Ciao Carlo, ti ringrazio per il codice che mi hai inviato, e scusa se lo
> faccio così in ritardo ma ho provato solo ora.
> Il codice che mi hai inviato funziona perfettamente (l'ho inserito nella
> routine "su corrente"), però funziona solo all'aperture della maschera.
> Quando passo ad un record successivo
> setShowScrollbars (False)  e setShowToolbar (False)  non funzionano più e
> vengono visualizzate sia le toolbar che la scrollbar.
> Ho provato a leggere la guida all'indirizzo che mi hai inviato, ma niente.
>
> Cosa devo fare?
> Come faccio inoltre a:
> - nascondere anche il pannello di navigazione ancorato a sinistra
> - chiudere un file (quando un record non ha associato un file pdf il
> controllo visualizza il file associato al record precedente). Esiste forse
> un metodo "AcroPDF0.close" ? ho provato con  Me.AcroPDF0.LoadFile ("none")
> oppure con Me.AcroPDF0.LoadFile ("") ma non funziona
>
Se non vado errato, una volta aperto il pdf, la prima volta, se fai clic
sulla barra (tasto destro) e imposti quello che ti serve, compreso renderlo
invisibile, alla successiva riapertura mantiene le impostazioni.
Ciao, Carlo


title: Cornice oggetto

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:gnjjqj$tgd$1...@tdi.cu.mi.it...

Per quanto riguarda le barre degli strumenti in effetti funziona come dici,
invece se nascondo il pannello di navigazione ancorato sulla sinistra (mi
pare esista solo nelle ultime versioni di AdobeReader), alla riapertura si
ripresenta.
Comunque forse è meglio non fasciarsi troppo la testa; ho ingrandito un po
di più il controllo e, anche se la barra di scorrimento ed il pannello sulla
sinistra portano via un pò di spazio, il contenuto del file si vede
abbastanza bene.
Per quanto riguarda il file che non riesco a "scaricare dalla memoria del
controllo" quando passo ad un record senza file associati, ho risolto
mettendo Me.AcroPDF0.visible=False
Per me così è sufficiente e ti ringrazio nuovamente per avermi aiutato a
risolvere i problemi di visualizzazione iniziale che erano i più importanti.
Ciao, Davide


title: Cornice oggetto

text:
> Per me così è sufficiente e ti ringrazio nuovamente per avermi aiutato a
> risolvere i problemi di visualizzazione iniziale che erano i più
> importanti.
> Ciao, Davide
Grazie a te per il feedback.
Ciao, Carlo


title: Parametro query

author: Roberto Spinella Esteban

text:
Ho un campo che può contenere i numeri da 1 a 7 (giorni della settimana LU=1
DO=7)
Vorrei effettuare una query di selezione che mi riporta tutti i record che
contengono il o i valori immessi in un campo di una maschera
Se il campo è null tutti i record
Se il campo è "1" =>    1,12,15,1234567 etc
se il campo è 14 =>    14, 147, 145
Ho provato con Like ma non funziona
Avrei bisogno di qualcosa tipo INSTR
Qualche idea ?
Grazie Roberto Spinella


title: Parametro query

author: Roberto dalla campagna

text:
"Roberto Spinella Esteban" <
rs...@polispin.it
> ha scritto nel messaggio
news:432557ed$0$8483$5fc...@news.tiscali.it...

Se il campo su cui effettui la selezione è di tipo testo, nel sui criteri
scrivi
Like "*1*"
oppure
Like "*14*"
> Grazie Roberto Spinella
Prego
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: connection error su ADP

author: acMad

text:
Ragazzi sto lavorando su un progetto ADP
(mai fatto prima)
in pratica ho fatto l'upsize wizard su sql express (che risiede su server
dedicato), mi ha fatto tutto correttamente...
faccio ieri un po' di prove e sembra funzionare...
oggi vado per metterci le mani (devo sistemare query e beep vari..)
e mi da un errore di connessione...
[DBNETLIB][ConnectionOpen (PreLoginHandshake()).] Run-time error 11
ho fatto una ricerca e sembra che questo errore sia dovuto a timeout o
cose simili.. ma il server e' up, funziona e ci accedo via remote desktop
senza probs...
nella finestra che riporta tutte le tabelle (nel file ADP) vedo nella
title bar di fianco al nome dell'app. (disconnect) questo significa che
non si e' connesso proprio...
cosa puo' essere?
roba da settare extra?
(tra le altre cose su sql express i log sono stranamente vuoti!?!?)
qualsiasi idea e' benvenuta..!
grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: connection error su ADP

text:
acMad ha scritto:
> Ragazzi sto lavorando su un progetto ADP
> (mai fatto prima)
> in pratica ho fatto l'upsize wizard su sql express (che risiede su server
> dedicato), mi ha fatto tutto correttamente...
> faccio ieri un po' di prove e sembra funzionare...
> oggi vado per metterci le mani (devo sistemare query e beep vari..)
> e mi da un errore di connessione...
> [DBNETLIB][ConnectionOpen (PreLoginHandshake()).] Run-time error 11
> ho fatto una ricerca e sembra che questo errore sia dovuto a timeout o
> cose simili.. ma il server e' up, funziona e ci accedo via remote desktop
> senza probs...
> nella finestra che riporta tutte le tabelle (nel file ADP) vedo nella
> title bar di fianco al nome dell'app. (disconnect) questo significa che
> non si e' connesso proprio...
> cosa puo' essere?
> roba da settare extra?
> (tra le altre cose su sql express i log sono stranamente vuoti!?!?)
giusto per aggiungere qualche altra info per i luminari del gruppo.
da Data Link Properties dell'adp (File -> Connections) -non so in italiano
come si chiama- non va la connessione!!
il server lo vede nella lista dei computer.. ma quando provo a scrollare
sulla lista dei DB mi fallisce.. :(
come autenticazione uso quella di Win.. visto che qui in ufficio siamo in
roaming profile quindi se sono loggato con le mie credenziali al mio desk,
posso loggarmi con le stesse credenziali anche a quel server e a qualsiasi
altro desk...  (cosi' come e' configurato il mio remote desktop che
funziona alla grande)
i firewall sono tutti disattivati sia del server che del mio desk.
non so cos'altro fare..



title: connection error su ADP

text:
> acMad ha scritto:







> > cosa puo' essere?







faccio un uppettino...
nessuna idea?
aggiungo che ho ricontrollato permessi/utenti/ecc.. e sembra tutto ok..
spero che qualcuno riesca a darmi un suggerimento.. sto impazzendo..



title: AIUTO:Importazione file di testo

author: Guitar

text:
Ciao, non riesco più ad importare file di testo.
Ho installato office 97 sr2 ita con tutti i componenti (ho selezionato
quindi anche i driver per i file di testo).
Ora se provo ad importare un file di testo in una tabella, nell'elenco dei
tipi file disponibili non mi mostra il tipo file .txt.
Se vado in aggiungi/rimuovi componenti di office - accesso ai dati - driver
di database, vedo spuntati ma in grigetto (quindi solo in parte) la voce
driver di testo e html.
Il problema è che se clicco su seleziona tutti non me lo seleziona per
niente !
Un Grazie a chi mi aiuterà.
--
Guitar (o)==#
pac...@netics.net


title: AIUTO:Importazione file di testo

author: Sergio Giudici

text:
Anch'io ho lo stesso problema e non trovo il modo per risolverlo, ho provato
a reinstallare office 97 ma non è cambiato niente.
Sei riuscito a risolvere il problema ?   come devo fare ?
Ciao e Grazie.
Guitar <
pac...@netics.net
> wrote in message
866nnh$6hq$1...@fe1.cs.interbusiness.it...



title: Re: Creazione Automatica PDF

text:
"Marco Antonioli" <
in...@echovr.it
> ha scritto nel messaggio
news:a8af1593b9fff844af8...@mygate.mailgate.org...
> Buongiorno a tutti.
> Ho dato un'occhiata al sito comune ma non ho trovato esempi che
> risolvano il mio problema.
> Dovrei salvare automaticamente (nessun intervento operatore , nessuna
> conferma), un report in formato PDF passando come argomenti nome file e
> path di destinazione.
> Uso la versione A2K
> Si può ?
> Grazie+
> MArco
Nel prossimo aggiornamento del Sito Comune verrà pubblicata una FAQ di
Walter Negrinelli che risolve il tuo problema; nel frattempo se cerchi nei
vecchi thread del NG troverai molti messaggi che danno una soluzione al tuo
quesito.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Re: Creazione Automatica PDF

author: Marco Antonioli

text:
Buongiorno a tutti.
Ho dato un'occhiata al sito comune ma non ho trovato esempi che
risolvano il mio problema.
Dovrei salvare automaticamente (nessun intervento operatore , nessuna
conferma), un report in formato PDF passando come argomenti nome file e
path di destinazione.
Uso la versione A2K
Si puň ?
Grazie+
MArco
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Re: Creazione Automatica PDF

author: ALESSANDRO Baraldi

text:
"access il top" <
negrinelliw...@yahoo.it
> ha scritto nel messaggio
news:41f4b67f$0$135$5fc...@news.tiscali.it...
>
> "Marco Antonioli" <
in...@echovr.it
> ha scritto nel messaggio
> news:a8af1593b9fff844af8...@mygate.mailgate.org...
> > Buongiorno a tutti.
> > Ho dato un'occhiata al sito comune ma non ho trovato esempi che
> > risolvano il mio problema.
> > Dovrei salvare automaticamente (nessun intervento operatore , nessuna
> > conferma), un report in formato PDF passando come argomenti nome file
> e
> > path di destinazione.
> > Uso la versione A2K
> > Si puņ ?
> > Grazie+
> > MArco
> >
> >
> > --
> > Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG
> >
>
> forse lo metteranno a breve,
>
> comunque se dai uno sguardo ai post vecchi della settimana scorsa c'č
> tanto tanto materiale anche da me discusso.
Il nuovo aggiornamento del Sito conterrą il tuo demo.
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Re: Creazione Automatica PDF

author: access il top

text:
"Marco Antonioli" <
in...@echovr.it
> ha scritto nel messaggio
news:a8af1593b9fff844af8...@mygate.mailgate.org...
> Buongiorno a tutti.
> Ho dato un'occhiata al sito comune ma non ho trovato esempi che
> risolvano il mio problema.
> Dovrei salvare automaticamente (nessun intervento operatore , nessuna
> conferma), un report in formato PDF passando come argomenti nome file
e
> path di destinazione.
> Uso la versione A2K
> Si può ?
> Grazie+
> MArco
>
>
> --
> Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG
>
forse lo metteranno a breve,
comunque se dai uno sguardo ai post vecchi della settimana scorsa c'è



title: Re: Creazione Automatica PDF

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:41f4b714$0$8209$5fc...@news.tiscali.it...
> "access il top" <
negrinelliw...@yahoo.it
> ha scritto nel
messaggio
> news:41f4b67f$0$135$5fc...@news.tiscali.it...
> >
> > "Marco Antonioli" <
in...@echovr.it
> ha scritto nel messaggio
> > news:a8af1593b9fff844af8...@mygate.mailgate.org...
> > > Buongiorno a tutti.
> > > Ho dato un'occhiata al sito comune ma non ho trovato esempi che
> > > risolvano il mio problema.
> > > Dovrei salvare automaticamente (nessun intervento operatore ,
nessuna
> > > conferma), un report in formato PDF passando come argomenti nome
file
> > e
> > > path di destinazione.
> > > Uso la versione A2K
> > > Si può ?
> > > Grazie+
> > > MArco
> > >
> > >
> > > --
> > > Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG
> > >
> >
> > forse lo metteranno a breve,
> >
> > comunque se dai uno sguardo ai post vecchi della settimana scorsa
c'è
> > tanto tanto materiale anche da me discusso.
>
> Il nuovo aggiornamento del Sito conterrà il tuo demo.
GRAZIE!!!!!
sono contento che hai trovato utile qualcosa che avete fatto soprattutto
voi e io ho solo copiato tagliato provato eliminato ecc ecc ecc fino a
che ha funzionato....



title: Re: Creazione Automatica PDF

text:
"Roberto da casa" <
r.masso...@libero.it
> wrote in message
news:p03Jd.6516$
5k5.1...@twister2.libero.it
> .... nel frattempo se cerchi nei
> vecchi thread del NG troverai molti messaggi che danno una soluzione al tuo
> quesito.
Grazie



title: Re: Creazione Automatica PDF

text:
"access il top" <
negrinelliw...@yahoo.it
> wrote in message
news:41f4b67f$0$135$
5fc...@news.tiscali.it
>
> forse lo metteranno a breve,
>
> comunque se dai uno sguardo ai post vecchi della settimana scorsa c'è
> tanto tanto materiale anche da me discusso.
Ottimo!
E funziona da subito !
Grazie davvero
Marco



title: Report -sottoreport e caselle di testo

author: Dan

text:
Ciao a tutti,
il sottoreport non e' collegato a niente con il report contenitore.
Il sottoreport nell'evento format del corpo ha delle linee di codice su
delle caselle di testo
dentro al sottoreport: da solo funziona, inserito nel report
contenitore mi dice ciùhe l'oggetto e' chiuso o nn modificabile!!!
E' un po' che ci sto sbattendo la testa ma niente
Grazie.
Ps dato che nel sottoreport ci sta solo il corpo e nn le intestazioni,
devo "creare" una sezione/ intestazione nel report contenitore
affinche' in ogni pagina stampata nel corpo del report contenitore
(dove c'e' il sottoreport) mi appaia all'inizio della pagina un valore
calcolato.
ES.
REPORT:
 Intestazione                                       REGIONE  CITTA'
corpo
SOTTOREPORT
corpo
                                                        Lombardia
........................................................................Pavia
........................................................................Bergamo
........................................................................Lecco
                                                         Piemonte
Torino
.......................................................................Novara
Devo aggiungere:                    Paese
(intest. pag del rep cont.)          Italia
                                                        Lombardia
.........................................................................Como
.........................................................................Brescia
.........................................................................Lecco
                                                         Piemonte
Torino
.........................................................................Novara
                                           Francia
                                                         etc.
E lo posso fare solo calcolandolo dalla casella di testo del
sottoreport cioe' nella casella di testo ha valori del tipo: 01, 02, 03
etc quindi se 01 = Italia, stampa sul controllo etichetta
nell'intestazione pagina del report contenitore: Risultato mi stampa la
1a pagina con la sezione Italia e Lombardia e il resto nelle altre pag.
ciccia!!!
Ancora grazie


title: Report -sottoreport e caselle di testo

text:
Trovata la soluzione!!!
Sull'intestazione pagina del rep contenitore gli dico: Intestazione
pagina= su ogni pagina!!!
E tolgo l'intestazione report del sottoreport che mi stampa una sola
volta all'inizio e poi mai piu', d'altronde non sa, il sottorep.,
quando finisce la pagina!!!
Domani lo provo al lav!
Dite che funzionera'?
Mah...
Dan ha scritto:



title: Report -sottoreport e caselle di testo

text:
Tanto per stare in tema di sbattimenti:
le griglie nei reports, allineare i controlli o usare excel come ole..
oppure?
Ciaux!
Dan ha scritto:



title: Report -sottoreport e caselle di testo

author: MA

text:
Dan wrote:
> Tanto per stare in tema di sbattimenti:
> le griglie nei reports, allineare i controlli o usare excel come ole..
> oppure?
> Ciaux!
Scrivi DOPO le risposte, anche se sono tutte tue
Decisamente la prima soluzione

--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Confronto tra campi

author: Pino

text:
Ho una campo ordini1 dove ci sono degli elementi e un altro campo
ordini2 dove ce ne sono altri (alcuni sono presenti in anche in
ordini1). Il problema è il seguente: devo trovare gli elementi di
ordini2 che NON fanno parte dell'insieme degli elementi di ordini1.
Quale query posso creare per far ciò?
Grazie.


title: Confronto tra campi

author: Antonio Biso

text:
"Pino" <
ngi...@gmail.com
> ha scritto nel messaggio
news:1170080476.7...@h3g2000cwc.googlegroups.com...

Devi definire meglio la tua struttura dati e che intendi per elementi
Antonio


title: Confronto tra campi

text:
On 29 Gen, 19:39, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> Devi definire meglio la tua struttura dati e che intendi per elementi
Allora io ho due campi in cui sono contenuti i seguenti valori
ordini 1 ordini2
3          9
5          2
7          4
9          5
11        7
13        3
Vorrei una query che mi individuasse i valori di ordini2 che NON sono
presenti in ordini1 e cioè 2 e 4. Ho fatto un esempio numerico ma può
valere anche se i campi sono testo.


title: Confronto tra campi

text:
"Pino" <
ngi...@gmail.com
> ha scritto nel messaggio
news:1170108403.4...@q2g2000cwa.googlegroups.com...




Fermo restando che a lume di naso la tua struttura dati non è normalizzata
come database relazionale, la query deve contenere due volte la stessa
tabella (la seconda sarà TUATAB_1)
Poi metti in join il campo Ordini2 della prima tabella con il campo Ordini1
della prima, facendo sì che il join abbia la freccia dalla prima alla
seconda tabella.
A questo punto prendi tutti i campi della prima tabella e metti il campo
Ordini1 della seconda tabella. Sotto questo campo ci metti il criterio Is
Null.
Il significato della freccia è:
prendi tutti i record della prima tabella e solo quelli che verificano le
condizioni di join. Siccome tu metti il criterio is null, significa che
prendi quelli che NON agganciano il join, cioè i record che non hanno quel
valore nel primo campo
Antonio


title: Risulto Ricerca mese corrente.......

author: Gianni

text:
Salve ragazzi eccomi qui come sempre,ad esporre un'altra curiosità.........
Ho una Maschera continua collegata ad una query,con origini dati da una
tabella,ora la mia curiosità è questa.....
ho un campo data (gg;m.aaaa) non so se si scrive cosi ..... comunque nella
maschera collegata alla query con parametri vorrei che mi mostrasse solo il
record del mese corrente.....è possibile???
È la prima volta che mi sono imbatuto in questa curiosità.....
Grazie come sempre a tutti per il vostro aiuto.....
è auguro a tutti voi Buone ferie, perchè Sabato scappo al mare.....
Ciao  a tutti
Gianni.


title: Risulto Ricerca mese corrente.......

author: Emyr

text:
On Wed, 24 Jul 2002 20:05:39 +0200, "Gianni" <
giian...@bluewin.ch
>
wrote:

crei un campo month:data & year(data) oppure format (mm/yy)
e poi ci metti il criterio mm/yy
Saluti.
Emanuele.


title: Mandare in stampa un Report con una nostra Form

text:
Salve,
assieme al classico Docmd.OpenReport "NomeReport",acViewPreview
ho aperto una maschera di dialogo per scegliere quante copie del Report aperto stampare.
Pensavo di utilizzare Docmd.PrintOut (che mi pare abbia tra le opzioni, la scelta del numero di pagine) ma PrintOut stampa L'OGGETTO CORRENTE.
D'altra parte Docmd.OpenReport non ha le opzioni per decidere il numero di copie da stampare.
Come fare?


text:
Prima apri il report in anteprima... così diventa corrente... poi PRINTOUT poi chiudi.

DoCmd.OpenReport "<Name of report>", acViewPreview
DoCmd.SelectObject acReport, "<Name of report>", False
DoCmd.PrintOut , , , , <Number of copies>
DoCmd.Close acReport, "<Name of report>"

Alternativa oggetto Printer

Public Sub PrintReport(sRepName As String, iCopies As Integer)
   DoCmd.OpenReport sRepName, acViewPreview
   Reports(sRepName).Printer.Copies = iCopies
   DoCmd.Close acReport, sRepName, acSaveYes
   DoCmd.OpenReport sRepName, acViewNormal
End Sub

Alternativa fai un ciclo 1 to n ed all'interno apri il report in stampa... DoEvents nel ciclo.

@Alex


text:
Grazie Alex.
Prima di capire il comportanto del codice de te suggerito,(non sono al pc),
voglio farti notare il codice non fa riferimento alla form creata in cui ci sono appunto le due opzioni di scelta:
Opz1 = stampa una copia
Opz2= stampa due copie
Più il pulsante Stampa (il senso della form di dialogo è quindi quello di fare una scelta ed avere a portata di mano il tasto Stampa senza andarlo a prendere dal menu File).
Al momento della scelta l'oggetto corrente è la suddetta Form.


text:
Cosa c'entra quello che dici....?
Prima guarda e comprendi il codice... meglio.

@Alex


text:

io penso che c'entrasse ciò che dicevo... :-)
Ad ogni modo, grazie a qualche tua dritta ho risolto:

If Me.CasellaDiControllo = 2 Then
    DoCmd.SelectObject acReport, "NomeReport", False  'tua dritta
    DoCmd.PrintOut , , , , 1
    DoCmd.Close acReport, "NomeReport"
Else
 .......
Ciao Grazie....come sempre


text:

Intendevo che i dettagli specifici della tua applicazione li gestirai tu... e che il mio suggerimento era mirato all'Oggetto della stampa multipla...

Saluti
@Alex


title: Recordset non aggiornabile.

author: Nao

text:
Ho creato una form basata su una query, che filtra data presi da 7 tabelle.
Il filtraggio dei dati è ok, ottengo proprio quello che mi serve, il
problema è che cercando di modificare i dati od inserirne di nuovi, la form
mi dice recordset non aggiornabile.
Cosa significa? Come posso fare per rendere il recordset aggiornabile?
grazie Nadir
--------------------------------
Inviato via
http://arianna.libero.it/usenet


title: Recordset non aggiornabile.

author: Roberto da casa

text:
"Nao" <naon...@iol.itOOO> ha scritto nel messaggio
news:212Z159Z223Z113Y...@usenet.libero.it...
> Ho creato una form basata su una query, che filtra data presi da 7
tabelle.
> Il filtraggio dei dati è ok, ottengo proprio quello che mi serve, il
> problema è che cercando di modificare i dati od inserirne di nuovi, la
form
> mi dice recordset non aggiornabile.
>
> Cosa significa? Come posso fare per rendere il recordset aggiornabile?
>
>
> grazie Nadir
Leggiti cosa dice l'help ricercando l'argomanto Quando aggiornare dati da
una query.
Sicuramente la tua query appartiene ad uno di quey tipi (indicati in
quell'articolo dell'help) che producono un recordset non aggiornabile; a
seconda del caso, se esiste, è indicata anche una soluzione possibile.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: ??Collegare + DATABASE??

author: Marco Fontana

text:
Ciao a tutto il presente NG e BUON NATALE.
Vi chiedo, se c'e' la possibilita' di prelevare dati di un database gia'
presente per inserirli in una tabella di un mio nuovo database ed usarli
con maschere, report, query ecc come se fossero parte del mio nuovo
database.
il motivo della richiesta e: io ho gia' un database di access fatto da
qualcun altro, che posso modificare ma non voglio perche' deve rimanere
cosi'.
Dovrei pero' usare i dati contenuti li' per usarli in un  mio database
che li manipoli e li presenti in altro modo.
Si puo'?
GRAZIE in anticipo
Marco
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: ??Collegare + DATABASE??

author: Salvatore

text:
"Marco Fontana" <
ilport...@iol.it
> ha scritto nel messaggio
news:b83d094d0edee8faffc...@mygate.mailgate.org...

Menu file==>carica dati esterni==>collega tabelle/importa.
Ciao
Salvatore


title: ??Collegare + DATABASE??

text:
Ti ringrazio per l'aiuto...
Ho risolto.
Ciao



title: Rappresentazione dati

author: BS

text:
Ho una tabella con i campi Operatore e Lavoro.
Vorrei rappresentarli in una  maschera nel seguente modo:
Operatore1
        Lavoro1
        Lavoro2
        ... ecc...
Operatore2
        Lavoro3
        Lavoro4
        ... ecc...
...ecc...
La maschera dovrebbe essere un modulo continuo.
E' possibile realizzarla?
Grazie
Un saluto
Francesco


title: Rappresentazione dati

text:
"BS" <
b...@tiscalinet.it
> ha scritto nel messaggio
news:9e6agj$cap$1...@lacerta.tiscalinet.it...

L'impostazione grafica che vuoi usare è più propria di un report raggruppato
per Operatore che di una maschera: se poi vuoi vedere le informazioni sul
video potresti fare l'anteprima del report.
Comunque, se vuoi usare le maschere, devi usare la tecnica della
maschera/sottomaschera.
Ipotizziamo che la tua tabella si chiami Tabella1.
Creati prima una query  di raggruppamento chiamata Query1 e  che abbia il
seguente codice SQL:
SELECT Tabella1.Operatore
FROM Tabella1
GROUP BY Tabella1.Operatore;
A questo punto creati una maschera con visualizzazione a Maschera singola e
che abbia come origine record Query1.
Detta maschera dovrà contenere una sottomaschera con visualizzazione a
Maschere continue che abbia come origine record Tabella1 e che contenga un
solo controllo , quello associato al campo Lavoro.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Rappresentazione dati

author: Ansi C

text:
"BS" <
b...@tiscalinet.it
> ha scritto nel messaggio
news:9e6agj$cap$1...@lacerta.tiscalinet.it...
> Ho una tabella con i campi Operatore e Lavoro.
> Vorrei rappresentarli in una  maschera nel seguente modo:
> Operatore1
>         Lavoro1
>         Lavoro2
>         ... ecc...
> Operatore2
>         Lavoro3
>         Lavoro4
>         ... ecc...
> ...ecc...
> La maschera dovrebbe essere un modulo continuo.
> E' possibile realizzarla?
Con una maschera in visualizzazione continua con una sottomaschera anch'essa
in visualizzazione continua.


title: Rappresentazione dati

author: NaF

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:KzBN6.9433$Ql3.4...@news.infostrada.it...

Nel controllo del campo Lavoro vedo tutti i lavori della tabella.
Come posso associare ad ogni Operatore solo i lavori che gli corrispondono?
Un saluto
Francesco


title: Rappresentazione dati

text:
"Ansi C" <
glen....@tin.it
> ha scritto nel messaggio
news:T8KN6.379$5_6....@news2.tin.it...

Se creo tutte e due le maschere di tipo continuo ottengo il massaggio di
errore:
"Impossibile impostare a Maschere continue la proprietą Visualizzazione
Predefinita di una maschera contenente una sottomaschera."
Un saluto
Francesco


title: Rappresentazione dati

text:
"NaF" <
nfr...@t.it
> ha scritto nel messaggio
news:9e8dae$srk$1...@lacerta.tiscalinet.it...

Come ti ho già spiegato: il campo Operatore di Query1 associato ad un
controllo di una maschera che contiene una sottomaschera contenente un solo
controllo associato al campo Lavoro della tabella. Nella sottomaschera ti
compariranno solamente i lavori dell'operatore presente nella maschera.



title: Rappresentazione dati

text:
"Ansi C" <
glen....@tin.it
> ha scritto nel messaggio
news:T8KN6.379$5_6....@news2.tin.it...

Una sottomaschera può essere contenuta solamente in una maschera con
visualizzazione a Maschera singola.



title: Rappresentazione dati

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:yxPN6.13196$Ql3.5...@news.infostrada.it...
>
> "Ansi C" <
glen....@tin.it
> ha scritto nel messaggio
> news:T8KN6.379$5_6....@news2.tin.it...
> >
> > "BS" <
b...@tiscalinet.it
> ha scritto nel messaggio
> > news:9e6agj$cap$1...@lacerta.tiscalinet.it...
> > > Ho una tabella con i campi Operatore e Lavoro.
> > > Vorrei rappresentarli in una  maschera nel seguente modo:
> > > Operatore1
> > >         Lavoro1
> > >         Lavoro2
> > >         ... ecc...
> > > Operatore2
> > >         Lavoro3
> > >         Lavoro4
> > >         ... ecc...
> > > ...ecc...
> > > La maschera dovrebbe essere un modulo continuo.
> > > E' possibile realizzarla?
> >
> > Con una maschera in visualizzazione continua con una sottomaschera
> anch'essa
> > in visualizzazione continua.
>
> Una sottomaschera può essere contenuta solamente in una maschera con
> visualizzazione a Maschera singola.
>
> --
> Roberto
è vero, me n'ero dimenticato!
Allora che ne dite di una ListBox all'interno di una maschera in
visualizzazione continua?


title: Rappresentazione dati

author: Roberto dal portatile

text:
"Ansi C" <
glen....@tin.it
> ha scritto nel messaggio
news:s38O6.387$Ei7....@news2.tin.it...
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:yxPN6.13196$Ql3.5...@news.infostrada.it...
> >
[CUT]
>
> è vero, me n'ero dimenticato!
> Allora che ne dite di una ListBox all'interno di una maschera in
> visualizzazione continua?
>
Mi sembra una soluzione.



title: Rappresentazione dati

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:xxPN6.13195$Ql3.5...@news.infostrada.it...
>
> "NaF" <
nfr...@t.it
> ha scritto nel messaggio
> news:9e8dae$srk$1...@lacerta.tiscalinet.it...
> >
> > "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> > news:KzBN6.9433$Ql3.4...@news.infostrada.it...
> > >
> > > "BS" <
b...@tiscalinet.it
> ha scritto nel messaggio
> > > news:9e6agj$cap$1...@lacerta.tiscalinet.it...
> > > > Ho una tabella con i campi Operatore e Lavoro.
> > > > Vorrei rappresentarli in una  maschera nel seguente modo:
> > > > Operatore1
> > > >         Lavoro1
> > > >         Lavoro2
> > > >         ... ecc...
> > > > Operatore2
> > > >         Lavoro3
> > > >         Lavoro4
> > > >         ... ecc...
> > > > ...ecc...
> > > > La maschera dovrebbe essere un modulo continuo.
> > > > E' possibile realizzarla?
> > > >
> > > > Grazie
> > > >
> > > > Un saluto
> > > > Francesco
> > > >
> > >
> > >CUT

Grazie. Ora funziona.
Ho avuto dei problemi prima di capire che i campi master e secondari del
controllo sottomaschera non si possono collegare se sono di tipo Memo.
Un saluto
Francesco


title: Rappresentazione dati

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:xxPN6.13195$Ql3.5...@news.infostrada.it...
>
> "NaF" <
nfr...@t.it
> ha scritto nel messaggio
> news:9e8dae$srk$1...@lacerta.tiscalinet.it...
> >
> > "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> > news:KzBN6.9433$Ql3.4...@news.infostrada.it...
> > >
> > > "BS" <
b...@tiscalinet.it
> ha scritto nel messaggio
> > > news:9e6agj$cap$1...@lacerta.tiscalinet.it...
> > > > Ho una tabella con i campi Operatore e Lavoro.
> > > > Vorrei rappresentarli in una  maschera nel seguente modo:
> > > > Operatore1
> > > >         Lavoro1
> > > >         Lavoro2
> > > >         ... ecc...
> > > > Operatore2
> > > >         Lavoro3
> > > >         Lavoro4
> > > >         ... ecc...
> > > > ...ecc...
> > > > La maschera dovrebbe essere un modulo continuo.
> > > > E' possibile realizzarla?
> > > >
> > > > Grazie
> > > >
> > > > Un saluto
> > > > Francesco
> > > >
> > >
> > >CUT

Grazie. Ora funziona.



title: Disabilitare un campo in base ad una condizione

author: castrol

text:
Salve a tutti, premetto di essere un autodidatta nell' utilizzo di access, quindi abbastanza limitato.
Vorrei sapere se č possibile (con il metodo piů semplice), all'apertura di una maschera, abilitare o disabilitare un campo in base allo stato di una casella di controllo (ammesso che non sia una str...ta) oppure tramite un checkbox, considerando che non so assolutamente nulla di vba. Grazie.
--
castrol
------------------------------------------------------------------------
View this thread:
http://www.itsistemi.net/viewtopic-757732.html
Inviato via
http://www.itsistemi.net


author: Marco Tosto

text:
"castrol" <
castrol...@no-mx.itsistemi.net
> ha scritto nel messaggio
news:castrol...@no-mx.itsistemi.net...
>
> Salve a tutti, premetto di essere un autodidatta nell' utilizzo di access,
> quindi abbastanza limitato.
> Vorrei sapere se č possibile (con il metodo piů semplice), all'apertura di
> una maschera, abilitare o disabilitare un campo in base allo stato di una
> casella di controllo (ammesso che non sia una str...ta) oppure tramite un
> checkbox, considerando che non so assolutamente nulla di vba. Grazie.
>
>
> --
> castrol
nella routine evento "form open"
if casellacontrollo=valore1 then
    campo.enabled=true
else
    campo.enabled=false
end if
ciao


author: Marco Pizzamiglio

text:
castrol ha scritto:
> Salve a tutti, premetto di essere un autodidatta nell' utilizzo di access,
quindi abbastanza limitato.
> Vorrei sapere se è possibile (con il metodo più semplice), all'apertura di
una maschera, abilitare o disabilitare un campo in base allo stato di una
casella di controllo (ammesso che non sia una str...ta) oppure tramite un
checkbox, considerando che non so assolutamente nulla di vba. Grazie.
Non dici se vuoi che il campo venga riabilitato o meno quando cambi il
valore della casella di controllo.
Se si, da Access 2000 in poi lo puoi fare con la formattazione
condizionale, senza usare vba.
(Menù Formato/Formattazione condizionale)
Se no puoi usare la soluzione che ti hanno già postato.
In A97 devi farlo per forza da vba.
-Marco-
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Alessandro Baraldi

text:
"Marco Tosto" <marcotosto(nospam)@
email.it
> wrote in message
news:43ce379b$0$1082$
4faf...@reader3.news.tin.it
[CUT]
> nella routine evento "form open"
>
> if casellacontrollo=valore1 then
>     campo.enabled=true
> else
>     campo.enabled=false
> end if
>
> ciao
Non è adeguato usare l'evento Open, funzionerebbe solo
all'apertura.
Con l'uso dell'Evento Current funzionerebbe sempre, anche
spostandosi di Record, ad eccezione delle Form Continue.
Private Sub Form_Current()
  Me!NomeControllo.Enabled=Me!nomeCheckBox
End Sub
Saluti
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
>
>
> Non è adeguato usare l'evento Open, funzionerebbe solo
> all'apertura.
>
> Con l'uso dell'Evento Current funzionerebbe sempre, anche
> spostandosi di Record, ad eccezione delle Form Continue.
si ok, era solo un instradamento... verso una possibile soluzione.


author: Potone

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio news:5ad7cddb1608812c33...@mygate.mailgate.org...
> "Marco Tosto" <marcotosto(nospam)@
email.it
> wrote in message
> news:43ce379b$0$1082$
4faf...@reader3.news.tin.it
>
> [CUT]
> > nella routine evento "form open"
> >
> > if casellacontrollo=valore1 then
> >     campo.enabled=true
> > else
> >     campo.enabled=false
> > end if
> >
> > ciao
>
>
> Non è adeguato usare l'evento Open, funzionerebbe solo
> all'apertura.
>
> Con l'uso dell'Evento Current funzionerebbe sempre, anche
> spostandosi di Record, ad eccezione delle Form Continue.
>
> Private Sub Form_Current()
>   Me!NomeControllo.Enabled=Me!nomeCheckBox
ciao Alex,
questa sintassi non da errore su record nuovo?
Mat.



author: MA

text:
Potone wrote:
> "Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
> news:5ad7cddb1608812c33...@mygate.mailgate.org...
>> "Marco Tosto" <marcotosto(nospam)@
email.it
> wrote in message
>> news:43ce379b$0$1082$
4faf...@reader3.news.tin.it
>>
>> [CUT]
>>> nella routine evento "form open"
>>>
>>> if casellacontrollo=valore1 then
>>>     campo.enabled=true
>>> else
>>>     campo.enabled=false
>>> end if
>>>
>>> ciao
>>
>>
>> Non è adeguato usare l'evento Open, funzionerebbe solo
>> all'apertura.
>>
>> Con l'uso dell'Evento Current funzionerebbe sempre, anche
>> spostandosi di Record, ad eccezione delle Form Continue.
>>
>> Private Sub Form_Current()
>>   Me!NomeControllo.Enabled=Me!nomeCheckBox
> ciao Alex,
> questa sintassi non da errore su record nuovo?
> Mat.
>
>> End Sub
>>
Giusto
perchè nomecheck è null e enabled non accetta null
Bravo Mat
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


author: Sandro

text:
                    Il 18 Gen 2006, 13:42, "Marco Tosto" <marcotosto(nospam)@
email.it
> ha
scritto:
>
> nella routine evento "form open"
>
> if casellacontrollo=valore1 then
> campo.enabled=true
> else
> campo.enabled=false
> end if
Perchè provate questo moderato schifo nei confronti della formattazione
condizionale? Eppure funzionerebbe (al contrario di questa soluzione) anche
nelle form continue ...
Ciao, Sandro.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


author: Sergio MAZZA

text:
"Sandro" <
sandro...@yahoo.com
> ha scritto nel messaggio
news:212Z210Z230Z103Y...@usenet.libero.it...
>
> Perchè provate questo moderato schifo nei confronti della formattazione
> condizionale? Eppure funzionerebbe (al contrario di questa soluzione)
> anche
> nelle form continue ...
>
> Ciao, Sandro.
Un esempio?
Leggi il messaggio di Flavio con oggetto: access 2003 del 16/01/2006
18:39...
Ciao.
--
Sergio MAZZA


text:
"MA" <
mas...@massimilianoamendola.it
> wrote in message
news:dqnpct$3m5$
1...@area.cu.mi.it
[CUT]
> Giusto
> perchè nomecheck è null e enabled non accetta null
> Bravo Mat
Sbagliato, Bocciati entrambi.
Non si lasciano le cose al caso serve sempre impostare
il valore predefinito, non l'ho detto perchè è una pratica
normale, anzi è un grave errore non pconsiderare queste cose.
Fate attenzione prima di accusarmi, sono permaloso, anche perchè
sbaglio pochissimo, e quando succede non è colpa mia..!
;-)
> Ciao
> MAssimiliano Amendola
www.accessgroup.it
> Cisa - Conferenza Italiana per Sviluppatori Access
> Info:
www.donkarl.com/it



text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio news:63306692185c273188...@mygate.mailgate.org...
> "MA" <
mas...@massimilianoamendola.it
> wrote in message
> news:dqnpct$3m5$
1...@area.cu.mi.it
>
> [CUT]
> > Giusto
> > perchè nomecheck è null e enabled non accetta null
> > Bravo Mat
>
> Sbagliato, Bocciati entrambi.
>
> Non si lasciano le cose al caso serve sempre impostare
> il valore predefinito, non l'ho detto perchè è una pratica
> normale, anzi è un grave errore non pconsiderare queste cose.
>
io non lo imposto mai di proposito perchè sono affezionato al "nonvalore" null...
> Fate attenzione prima di accusarmi, sono permaloso, anche perchè
> sbaglio pochissimo, e quando succede non è colpa mia..!
che sei permaloso non lo avrei proprio mai detto... :-P
ciao
Mat



text:

Ok. Capisco.
Ma non puoi tagliarti i testicoli per paura di mettere incinta la tua
morosa. Cioè, voglio dire, nominalmente la fc funziona correttamente, è
comoda, offre opportunità che è praticamente impossibile da ottenere con
masturbazioni vba. Normalmente (a meno di problemi) andrebbe usata senza
tanti patemi d'animo.
Io, francamente, la uso molto spesso. Problemi con AXP non ne ho
praticamente mai avuti; qualche stranezza l'ho avuta con A2003, ma ho di
volta in volta sistemato con qualche trucchismo e ricorrendo alla kb di
microsoft.



text:
"Potone" <mborr...@SPAMinwind.it> wrote in message
news:dqoheb$n4t$
1...@area.cu.mi.it
> > [CUT]
> io non lo imposto mai di proposito perchè sono affezionato al "nonvalore" null...
E' un grave rischio e formalmente non è corretto a meno di non
gestire il triplo stato, ma non si deve usare un Campo associato
di tipo Si/No.
Prevenire questi errori è la cosa fondamentale.

> che sei permaloso non lo avrei proprio mai detto... :-P
> ciao
> Mat
Infatti non lo sono.



text:
Scusate, forse sono un pò rintronato, ho provato la soluzione
Me!N°_Fattura.Enabled = Me!Proposta nell' evento su corrente della maschera ma non succede nulla, ho trovato quest'altra soluzione
If Me!Proposta.Enabled = False Then
Me!N°_Fattura.Enabled = True
Else
Me!N°_Fattura.Enabled = False
End If
funziona in parte, una volta ceccato il checkbox il campo fattura viene disabilitato ma qualsiasi intervento successivo sul checkbox, non sortisce nessun effetto e in più nel passaggio al record successivo, il campo disabilitato rimane tale.
Ho provato anche a ripetere il codice opportunamente variato negli eventi del checkbox ma nulla.
Che posso fare ?
Grazie a tutti.



text:
"Sandro" <
sandro...@yahoo.com
> ha scritto nel messaggio
news:212Z210Z230Z103Y...@usenet.libero.it...
>
> Ok. Capisco.
>
> Ma non puoi tagliarti i testicoli per paura di mettere incinta la tua
> morosa. Cioè, voglio dire, nominalmente la fc funziona correttamente, è
> comoda, offre opportunità che è praticamente impossibile da ottenere con
> masturbazioni vba. Normalmente (a meno di problemi) andrebbe usata senza
> tanti patemi d'animo.
>
> Io, francamente, la uso molto spesso. Problemi con AXP non ne ho
> praticamente mai avuti; qualche stranezza l'ho avuta con A2003, ma ho di
> volta in volta sistemato con qualche trucchismo e ricorrendo alla kb di
> microsoft.
>
> Ciao, Sandro.
Intendiamoci; non volevo dire di epurare l'access da quella funzione, io ho
solo risposto ad una tua giustissima domanda.
Io per ora non ne ho avuto bisogno ma metto in archivio la tua positiva
esperienza...
Ciao.
--
Sergio MAZZA


title: Impossibile avviare Access

author: Sergio Giudici

text:
Oggi ho disintallato office 97 professional "aggiornamento" e poi l'ho
reinstallato, tutto funziona al meglio ma ciň che piů mi interessa non
funziona infatti quando avvio access mi esce questo errore:
"Impossibile avviare Microsoft Access. Non č stata concessa la licenza d'uso
su questo computer."
Questo č un bel guaio perchč in questo fine settimana volevo sistemare un
applicativo che dovrei consegnare al piů presto, qualche anima pia mi
saprebbe dire cosa potrebbe essere successo.........


title: Impossibile avviare Access

author: sib

text:
> "Impossibile avviare Microsoft Access. Non è stata concessa la licenza
d'uso
> su questo computer."
> qualche anima pia mi
> saprebbe dire cosa potrebbe essere successo.........
>
>
L'anima pia la trovi sul sito comune (vedi anche i link)
Ciao, Sib
--
------------------------------------------------------
Non e' grave non capire; grave e' occuparsi di cio' che non si capisce.
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: Aiuto per vero neofita

author: Daniele Dellapiana

text:
Buon giorno a tutti, il mio problema è il seguente:
Dovrei preparare un report per una tabella con (ad esempio 4 campi)
1) id
2) data inserzione
3) codice
4) descrizione
  Mi viene richiesto di preparare un report all'avvio del quale si apre una
maschera con Data inizio e Data Fine dove si deve digitare appunto le date
di riferimento per la ricerca e la stampa.
Grazie in anticipo e saluti a tutti


title: Aiuto per vero neofita

author: Esteban

text:
"Daniele Dellapiana" <
dell...@tin.it
> wrote in message
news:DgyP6.12422$VT1.1...@news1.tin.it...

Imposta una query per il report in cui sia scritto:
[data inserzione] between [Dal] and [Al]
Poiché nè Dal, nè Al sono campi della tabella, allora ti viene richiesto di
inserire le date con due finestre che verranno aperte in successione. Una volta
inserite le date ti si apre il report con l'intervallo richiesto.
Ciao!
Esteban
Hosted by
www.seber.it


title: da Works4.5 a access2000

text:
ho un archivio .mdb creato con Microsoft Works 4.5. vorrei riportarlo su
Access2000, come posso fare? purtroppo non c'è nel "salva col nome" alcuna
"nuova estensione" che mi possa aiutare.
ivan


title: da Works4.5 a access2000

author: The-real-Isaac

text:
"iv105" <
iva...@supereva.it
> ha scritto nel messaggio
news:uVlw7.51183$0Y2.4...@news.infostrada.it...
> ho un archivio .mdb creato con Microsoft Works 4.5. vorrei riportarlo su
> Access2000, come posso fare? purtroppo non c'č nel "salva col nome" alcuna
> "nuova estensione" che mi possa aiutare.
>
> ivan
>
>
Io l'ho fatto qualche tempo fa, non mi ricordo con quale versione di Works
mi pare ... ho incollato i dati in Excel e da lě li ho importati in Access;
č un po' macchinoso ma se lo devi fare una tantum ...
ciao
--
Alberto


title: da Works4.5 a access2000

author: Silvio Berruti

text:
"iv105" <
iva...@supereva.it
> ha scritto nel messaggio
news:uVlw7.51183$0Y2.4...@news.infostrada.it...
> ho un archivio .mdb creato con Microsoft Works 4.5. vorrei riportarlo su
> Access2000, come posso fare? purtroppo non c'è nel "salva col nome" alcuna
> "nuova estensione" che mi possa aiutare.
Hai la scelta tra
- testo e punti e virgola;
- testo e tabulazioni;
- dBase IV;
- dBase III.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: (Access XP) disabiilitare il tasto SHIFT

author: Raffaele

text:
Non so come fare a disabilitare il tasto Shift con Access Xp, con il 2000
funziona tranquillamente ma con XP mi visualizza cmq la finestra del
database, qualcuno potrebbe darmi qualche dritta?
Grazie mille.


author: Karl Donaubauer

text:

Nel elenco dei riferimenti dev'essere selezionato fra l'altro:
Microsoft DAO 3.6 Object Library
Vedi FAQ 7.1 "Riferimenti" sul sito indicato qui sotto.
Se non aiuta:
Si tratta di un MDB (non ADP)?
Quale codice e metodo usi per disabilitare il tasto?
Cosa succede? Un errore o niente?
Vedi anche FAQ 1.8 Impedire l'uso del tasto shift all'avvio
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


text:
> Se non aiuta:
> Si tratta di un MDB (non ADP)?
> Quale codice e metodo usi per disabilitare il tasto?
> Cosa succede? Un errore o niente?
> Vedi anche FAQ 1.8 Impedire l'uso del tasto shift all'avvio
>
Scusa, in effetti mi sono espresso male, il file è un .mde fatto con A2000,
lo stesso file, che ha lo shift disabilitato, sotto A2000 funziona
egregiamente mentre sotto AXP no, infatti quando lo apro mi visualizza
direttamente la finestra del database insieme con la finestra iniziale che
richiamo con una macro autoexec.
Spero di essere stato più chiaro e ti ringrazio dell'interessamento.
Saluti Raffaele
P.S. per disabilitare il tasto utilizzo l'mdb presente su
www.sitocomune.com


title: Copia dei record

author: TORE MOLISSO

text:
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!!!


title: Copia dei record

author: Roberto da casa

text:
"TORE MOLISSO" <
fmo...@tin.it
> 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
---------------------------------------------


title: contatore fatture

text:
Ho scaricato un db da internet per fatture e fin qui tutto va bene solo
che vorrei gestirlo con più aziende ed ho inserito netta tabella fatture
l’IDazienda e nella maschera delle fatture una casella combinata per la
scelta dell’azienda legata all’idazienda
Il contatore originale era così
=IIf((DMax("Num";"[FATTURE]";"YEAR(datafatt) =" &
[dat]));DMax("Num";"[FATTURE]";"YEAR(datafatt) =" & [dat]);0)
Io in base alle variazioni l’ho cambiato in questo modo però non funziona
=IIf((DMax("Num";"[FATTURE]";"YEAR(datafatt) =" & [dat]) And
("IDAZienda";"FATTURE"=[azienda]));DMax("Num";"[FATTURE]";"YEAR(datafatt)
=" & [dat] And ("IDAZienda";"FATTURE"=[azienda]));0)
In cosa sbaglio grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: contatore fatture

text:
Ho scaricato un db da internet per fatture e fin qui tutto va bene solo
che vorrei gestirlo con più aziende ed ho inserito netta tabella fatture
l’IDazienda e nella maschera delle fatture una casella combinata chiamata
azienda per la scelta di quest'ultima legata all’idazienda



title: contatore fatture

text:

molto a occhio e croce
dopo and manca un Dlookup
F.


title: contatore fatture

text:
al...@libero.it
 ha scritto:


> F.
non funziona mi da errore
--
questo articolo e` stato inviato via web dal servizio gratuito



title: nulla a che fare con Access, messaggio agli amici di Bologna

text:
Il 9 aprile sarò a Bologna per motivi di famiglia. Cortesemente, potreste
indicarmi un albergo che sia ad una passeggiata dalla stazione FS e dal
prezzo sotto le 200 mila? Infinite grazie.
--
Cordiali saluti
Nunzio Santini


author: Antonio Biso

text:
sanzio55 ha scritto nel messaggio <8c5dkh$p3g$
2...@serv1.albacom.net
>...
>Il 9 aprile sarň a Bologna per motivi di famiglia. Cortesemente, potreste
>indicarmi un albergo che sia ad una passeggiata dalla stazione FS e dal
>prezzo sotto le 200 mila? Infinite grazie.
Magari con tutte i NG della gerarchia reticiviche.bologna, sarebbe stato
meglio postare lě...
Antonio


text:
> Magari con tutte i NG della gerarchia reticiviche.bologna, sarebbe stato
> meglio postare lě...
>
Frequentare il NG per me č come frequentare il bar dove incontro gli amici
con i quali amo chiacchierare su un argomento comune che č Access. Se
desidero avere una informazione e so che tra gli amici c'č qualcuno che me
la potrebbe fornire, non mi passa per la testa di andare in un altro "bar".
Comunque grazie e chiedo perdono a chi si č risentito di questa mia
"uscita".



title: Ultimo giorno del mese

author: Gian Luca

text:
Salve a tutti,
se ho una data del tipo 12/03/2004 com posso ricavare che l'ltimo giorno del
mese č il 31 piuttosto che con una data 15/04/2004 l'ultimo giorno č il
30??. Ci sono funzioni e/o metodi particolari?
Ciao e grazie anticipatamente
Gian Luca


title: Ultimo giorno del mese

text:
Gian Luca ha scritto:
> se ho una data del tipo 12/03/2004 com posso ricavare che l'ltimo giorno
> del mese è il 31 piuttosto che con una data 15/04/2004 l'ultimo giorno è
> il 30??. Ci sono funzioni e/o metodi particolari?
DateSerial(Year(Date());Month(Date())+1;0)
per il giorno attuale o se parli di un campo di tipo data
DateSerial(Year([TuoCampoData]);Month([TuoCampoData])+1;0)
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: Ultimo giorno del mese

author: fidirico

text:
"Gian Luca" <
gbas...@aliceposta.it
> ha scritto nel messaggio
news:Brq4c.37861$z23.1...@news3.tin.it...

Cerca il primo del mese successivo e diminuisci di uno; prova con la funzione
DateSerial (v. help) ad utilizzare un codice simile al seguente:
Dim MyDate As Date
MyDate = DateSerial(2004, 3, 1 - 1)
MsgBox MyDate
Come potrai vedere, la msgbox ti restituirą la data del 29/02/04 (anno bisestile).
Ciao
Galliano.


title: Ultimo giorno del mese

text:
Grazie 1000. Ciao
"fidirico" <
galSENZAMA...@libero.it
> ha scritto nel messaggio
news:MOq4c.65100$Kc3.2...@twister2.libero.it...



title: Ultimo giorno del mese

text:
Grazie 1000. Ciao
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:c2tci6$20ob4i$1...@ID-46617.news.uni-berlin.de...
> Gian Luca ha scritto:
> > se ho una data del tipo 12/03/2004 com posso ricavare che l'ltimo giorno
> > del mese č il 31 piuttosto che con una data 15/04/2004 l'ultimo giorno č



title: problemi con data

author: felixx

text:
Dopo aver reinstallato Access 2007-2010, ho dei problemi con la funzione data, ad esempio in una maschera con il valore predefinito in un campo Date() mi dà #Nome?, oppure in query con la presenza della data mi dà "errore di compilazione", mentre in precedenza funzionava tutto bene.
Qualcuno mi sa suggerire una soluzione?
grazie,
felixx


title: problemi con data

author: BFS

text:

controlla che ci siano tutti i riferimenti nel tuo progetto

ciao
BFS


title: problemi con data

text:
Il 21/03/2017 11:31, felixx ha scritto:

> già controllato, ma non ci sono riferimenti mancanti, i riferimenti disponibili (flaggati) sono:
>
> Visual Basic for Applications
> Microsoft Access 14.0 Object Library
> Microsoft Forms 2.0 Object Library
> OLE Automation
> Microsoft Office 14.0 Access database engine Object Library
>
> Devo aggiungere qualcosa?
>

ma quando debugghi il codice ti da errore?


title: problemi con data

text:
Il giorno martedì 21 marzo 2017 11:19:17 UTC+1, BFS ha scritto:

già controllato, ma non ci sono riferimenti mancanti, i riferimenti disponibili (flaggati) sono:

Visual Basic for Applications
Microsoft Access 14.0 Object Library
Microsoft Forms 2.0 Object Library
OLE Automation
Microsoft Visual Basic for Applications Extensibility 5.3
Microsoft Office 14.0 Access database engine Object Library

Devo aggiungere qualcosa?
Grazie,
felixx


title: problemi con data

author: Simone Calligaris

text:
"felixx"

già controllato, ma non ci sono riferimenti mancanti, i riferimenti
disponibili (flaggati) sono:

Visual Basic for Applications
Microsoft Access 14.0 Object Library
Microsoft Forms 2.0 Object Library
OLE Automation
Microsoft Visual Basic for Applications Extensibility 5.3
Microsoft Office 14.0 Access database engine Object Library

>
>

Togli Forms 2.0 object Library e "extensibility 5.3".

Hai ancora il problema?

Saluti


title: problemi con data

text:

Ho verificato che il problema è questo codice:
---
Private Declare Function GetOpenFileName Lib "comdlg32.dll" Alias _
"GetOpenFileNameA" (pOpenfilename As OPENFILENAME) As Long

Private Type OPENFILENAME
lStructSize As Long
hWndOwner As Long
hInstance As Long
lpstrFilter As String
lpstrCustomFilter As String
nMaxCustFilter As Long
nFilterIndex As Long
lpstrFile As String
nMaxFile As Long
lpstrFileTitle As String
nMaxFileTitle As Long
lpstrInitialDir As String
lpstrTitle As String
flags As Long
nFileOffset As Integer
nFileExtension As Integer
lpstrDefExt As String
lCustData As Long
lpfnHook As Long
lpTemplateName As String
End Type

---
con la parola "function" evidenziata in rosso.

E mi appare questo errore di compilazione:
Il codice del progetto deve essere aggiornato per l'utilizzo in sistemi a 64 bit. Esaminare le istruzioni Declare, quindi contrassegnarle con l'attributo PtrSafe.

Eliminando questo codice le date funzionano tutte.


title: problemi con data

author: pfm

text:
Comdlg32.dll
C'è  sul pc?
In che cartella?


title: problemi con data

text:

guarda che devi avere

- suppongo che tu abbia windows 64 bit e access a 32

comdlg32.ocx e comdlg32.dll
in C:\Windows\SysWOW64

e registrare l'ocx

cmd (come amministratore)
e digitare
regsvr32 C:\Windows\SysWOW64\comdlg32.ocx


title: problemi con data

text:
....
>
> E mi appare questo errore di compilazione:
> Il codice del progetto deve essere aggiornato per l'utilizzo in sistemi a 64 bit. Esaminare le istruzioni Declare, quindi contrassegnarle con l'attributo PtrSafe.
>
> Eliminando questo codice le date funzionano tutte.

Quel codice che usi è INUTILE...!!!!
Possibile che avendo a disposizione il FileDialog anche in modalità LATEBINDING si debbano usare le API per il CommonDialog...?

Mi pare si vada molto alla CIECA....!

Prova questa, è VERSION INDIPENDENT da Access 2007 in avanti... non necessita di Riferimenti a Lib...!

Function mFileDialog() As String
    Dim fDialog As Object

    Set fDialog = Application.FileDialog(3)

    With fDialog

        .AllowMultiSelect = False

        .Title = "Seleziona il DATABASE ORIGINE..."
        .ButtonName = "Select"
        .Filters.Clear
        ' Esempio
        .Filters.Add "Access Databases", "*.MDB"
        .Filters.Add "New Access Databases", "*.ACCDB"
        .Filters.Add "All Files", "*.*"

        If .Show = True Then

            mFileDialog = .SelectedItems.Item(1)

        Else

            mFileDialog = vbNullString

        End If
    End With
End Function

Saluti
@Alex


title: problemi con data

text:
Può darsi che il codice sottostante non funzioni con Access Runtime: tu hai
provato?



title: problemi con data

text:
Sicuramente non funziona... con il Runtime, ma la premessa è che ha installato A2007-2010, ed a queste INFO mi sono rifatto...!

Dove sbaglio...?

;-)

@Alex


title: problemi con data

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:54130ad0-e13a-4f9c...@googlegroups.com...

Tu non sbagli mai!    :-)
Ma il fatto che quella feature non funzioni in modalità Runtime (se non
faccio confusione) costituirebbe un buon motivo per utilizzare le vecchie
API.

Ciao!


title: problemi con data

text:
...
> Tu non sbagli mai!    :-)

Quello è morto qualche gg fa... e poi si è rialzato... l'altro giorno...
;-)

> Ma il fatto che quella feature non funzioni in modalità Runtime (se non
> faccio confusione) costituirebbe un buon motivo per utilizzare le vecchie
> API.

Assolutamente si, e siamo confidenti che Felixx sia esaustivo nel caso.
Le premesse tuttavia lasciano margini... e magari nel suo caso non servendo il Runtime con queste poche righe risolve.

> Ciao!

Ciao
@Alex


title: Disabilitare apertura con Shift

author: Nao+

text:
Da qualche parte avevo letto come impedire l'apertura del database tenendo
premutoo shift, soltanto che non riesco piu a trovare queste informazioni.
Potete indicarmi dove trovarle, ho guardato anche il sitocomune ma non
riesco a trovarlo.
Grazie Nadir
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Disabilitare apertura con Shift

author: Neo

text:
"Nao+" <
XXXnaon...@iol.it
> ha scritto nel messaggio
news:212Z159Z223Z113...@usenet.libero.it...

cerca sul sitocomune nella sezione general.
usa la funzione trova del browser
e trovi l'esempio


title: Disabilitare apertura con Shift

text:
"Nao+" <
XXXnaon...@iol.it
> ha scritto nel messaggio
news:212Z159Z223Z113...@usenet.libero.it...
> Da qualche parte avevo letto come impedire l'apertura del database tenendo
> premutoo shift, soltanto che non riesco piu a trovare queste informazioni.
> Potete indicarmi dove trovarle, ho guardato anche il sitocomune ma non
> riesco a trovarlo.
> Grazie Nadir
E' evidente che nel Sito Comune non hai cercato bene, visto che nella
Sezione General ci sono ben tre FAQ che parlano di come risolvere questo
problema e più precisamente:
1) Disabilitare/abilitare l'effetto del tasto shift di Davide Pigoni
2) Disabilitare/abilitare l'effetto del tasto shift all'avvio (solo
amministratori) di Federico Luciani
3) Disabilitare/abilitare l'effetto del tasto shift all'avvio di Federico
Luciani.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Disabilitare apertura con Shift

author: ALESSANDRO Baraldi

text:
"Nao+" <
XXXnaon...@iol.it
> ha scritto nel messaggio
news:212Z159Z223Z113...@usenet.libero.it...
> Da qualche parte avevo letto come impedire l'apertura del database tenendo
> premutoo shift, soltanto che non riesco piu a trovare queste informazioni.
> Potete indicarmi dove trovarle, ho guardato anche il sitocomune ma non
> riesco a trovarlo.
> Grazie Nadir
>
Abilita i riferimenti DAO, quindi
metti in un Modulo  quanto segue, per disabilitare ti basta chiamare:
ShiftKey False da qualsiasi parte, quindi ShiftKey True per riabilitare.
Public Function ShiftKey(State as boolean)
    Call ChangeProperty("AllowBypassKey", dbBoolean, State )
End Function
Private Function ChangeProperty(strPropName As String, varPropType As
Variant, varPropValue As Variant) As Boolean
  Dim prp As DAO.property
  On Error GoTo Change_Err
  If Len(varPropValue) > 0 Then
    CurrentDb.Properties(strPropName) = varPropValue
  Else
    CurrentDb.Properties.Delete strPropName
  End If
  ChangeProperty = True
Change_Bye:
  Set prp = Nothing
Exit Function
Change_Err:
  Select Case Err
    Case 3265 'Item not found in this collection.
      'Do Nothing
      Resume Next
    Case 3270   'prop not found
      With CurrentDb
        Set prp = .CreateProperty(strPropName, varPropType, varPropValue)
        .Properties.Append prp
      End With
      Resume Next
    Case Else
      'unknown error
      ChangeProperty = False
      Resume Change_Bye
  End Select
End Function
Ciao.
@Alex.


title: Buon Natale

author: Marina Buonanno

text:
... a tutti e Buon Anno
Marina


title: Buon Natale

author: Roberto D'Agostino

text:
Tantissimi Auguri anche a te :-)))))))))))
*@*Merry Xmas & Happy New Year*@*
Ciao
RoDAgo
Marina Buonanno <marb...@NOSPAMtin.it> wrote in message
8400oo$qp$1...@nslave1.tin.it...



title: Buon Natale

author: Roberto Castaldo

text:
Anche a te, e a tutti gli amici del newsgroup.
Roberto



title: Buon Natale

author: Battistin Umberto

text:
Mi unisco per formulare a tutti buon Natale e felice anno nuovo
Umberto



title: CREARE TABELLA CON DUE CASELLE COMBINATE

author: ceci

text:
CIAO A TUTTI
VORREI CREARE UNA TABELLA SCEGLIENDO I CAMPI DA DUE TABELLE COMBINATE
HO DUE TABELLE: 1° TAB PRDOTTI CON ID PRODOTTO E DESCRIZIONE
                                    2° TAB COLORE
VORREI CREARE UNA TERZA TABELLA ARTICOLI CON: ID PRODOTTO, DECRIZIONE E
COLORE
HO CREATO UNA MASCHERA CON LE DUE CASELLE COMBINATE CON ORIGINE RECORD
TABELLA ARTICOLI MA NON MI AGGIUNGE IL RECORD CON LE SCELTE FATTE.
DOVE SBAGLIO?
SPERO DI ESSERE STATA CHIARA GRAZIE DEL VS. AIUTO
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


author: IgnazioC

text:
ceci ha pensato forte :

la prox volta posta in minuscolo, sui newgroup il maiuscolo equivale a
GRIDARE!!.
per quanto riguarda il tuo mex penso che tu ti riferisca ad una query
(visualizzazione)piuttosto che ad una tabella.
*se hai definito correttamente la relazione delle tabelle* puoi creare
una quesry anche con la creazione guidata.
 dalla finestra del database scegli "query" poi "crea una query
mediante creazione guidata".
nella maschera che ti appare selezioni la prima tabella e sposti tutti
i campi a dx usando il pulsante >> . poi selezioni la tabella 2 e
ripeti la stessa cosa.
salvi la query ed il gioco è fatto
--
ignazioc


author: Ceci

text:
Il 10 Nov 2007, 10:27, IgnazioC
<
ignazioc_togliti_...@email.it
> ha scritto:

Ti ringrazio della risposta e dell'avertimento ..per il tipo di carattere da
usare - non lo sapevo.
Comunque io vorrei creare una tabella da due caselle combinate collegate ad
altre due tabelle
Ho creato una maschera di immissione con le due caselle combinate e vorrei
creare una terza tabella con la scelta delle caselle combinate
Ciao
Ceci



text:
Dopo dura riflessione, Ceci ha scritto :

ma questa 3a tabella la devi proprio *creare* oppure devi aggiungervi
dei record?
se la devi creare dai uno sguardo a questo codice:(al posto di
"nome_campo" inserisci il qualcosa tipo me.miacasellacombinata )
Dim db As DAO.Database
Dim tdf As DAO.TableDef
Dim fld As DAO.Field
Set db = CurrentDb
Set tdf = db.CreateTableDef("nometabellanuova")
Set fld = tdf.CreateField("nome_campo", dbText)
tdf.Fields.Append fld
db.TableDefs.Append tdf
--
ignazioc


text:
IgnazioC ha usato la sua tastiera per scrivere :

oppure puoi fare tutto direttamente da codice sql
il codice  in questione è di questo tipo
CREATE TABLE Nome_Tabella
(
  Nome_Colonna1 Tipo_di_Dato(lunghezza),
  Nome_Colonna2 Tipo_di_Dato(lunghezza),
  etc...
)
puoi eseguirlo tramite il comando vba docmd.runsql("codice")
--
ignazioc


text:
Il 10 Nov 2007, 14:32, IgnazioC
<
ignazioc_togliti_...@email.it
> ha scritto:

grazie ci sono riuscita



title: Creare Barra di Progressione

author: EmMeCi - Style

text:
Devo creare una barra di progressione da legare ad una funzione che popola
con un codice casuale il campo ID della tabella tblConcorrente e lavora su
circa 10.000 record.
A seconda delle situaizoni impiega tra i 5 e i 7 minuti, questo perchè
ricerca codici duplicati e li rigenera per mantenere l'univocità all'interno
del campo.
Vorrei creare\adattare una Barra di Progressione ma ... non ne ho mai fatta
una ... questo è il primo caso in cui ne ho l'esigenza e anche se ho dato
una veloce controllata agli esempi del SC non so bene da dove cominciare.
Potete darmi una mano per cortesia?
Grazie.
--
**********
EmMeCi
**********


title: Creare Barra di Progressione

author: MA

text:

Usa la barra di stato
Dim art As DAO.Recordset
Dim imax As Long
Dim ret As Variant
Dim i As Long
Dim OraInizio As String
OraInizio = Format(Now, "hh:nn")
Set art = CurrentDb.OpenRecordset("Select * from articoli order by codice")
With art
    .MoveLast
    .MoveFirst
    imax = .RecordCount
    i = 1
Qui fai quello che vuoi...
 ret = SysCmd(acSysCmdInitMeter, "numero Articoli " & i & " di " & imax & "
Codice " & art!codice & "  Inizio: " & OraInizio, imax)
 ret = SysCmd(acSysCmdUpdateMeter, i)
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Creare Barra di Progressione

author: MIX

text:
Vai su "casella degli strumenti" e su "altri controlli".
"EmMeCi - Style" <
mcs...@email.it
> ha scritto nel messaggio
news:07Kcf.22$rQ4...@news.it.colt.net...
> Devo creare una barra di progressione da legare ad una funzione che popola
> con un codice casuale il campo ID della tabella tblConcorrente e lavora su
> circa 10.000 record.
>
> A seconda delle situaizoni impiega tra i 5 e i 7 minuti, questo perchč
> ricerca codici duplicati e li rigenera per mantenere l'univocitą
all'interno
> del campo.
>
> Vorrei creare\adattare una Barra di Progressione ma ... non ne ho mai
fatta
> una ... questo č il primo caso in cui ne ho l'esigenza e anche se ho dato



title: Creare Barra di Progressione

author: Alessandro Baraldi

text:
"EmMeCi - Style" <
mcs...@email.it
> wrote in message
news:07Kcf.22$
rQ4...@news.it.colt.net

A me pare che 5 minuti per popolare 10000 records siano troppi.
Se il campi ID è chiave primaria no serve controllare nulla
basta gestire l'errore nel caso usi DAO oppure nulla del tutto
in caso di SQL(query INSERT).
Per la barra di progressione direi che nel SC trovi miriadi
di demo sulla barra...!!!
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Creare Barra di Progressione

text:
Ciao Alex, purtroppo ID non è chiave primaria perchè di default lo trovo
valorizzato a 0 (è comunque un campo di tipo testo).
Non posso nemmeno metterlo in chiave primaria.
Questo è il codice con cui popolo tale campo:
Private Sub CambiaPSW_Click()
On Error GoTo Err_Sostituire
Dim MiaTabella As Recordset
Dim VCode As String
Dim Psword As String
Dim K As Integer
    MessaggioOK = "ATTENZIONE SI STA PER ATTRIBUIRE UN CODICE VIRTUALE " & _
                  "A TUTTI I PARTECIPANTI, VUOI PROCEDERE ????? !!!!!"
    VCode = Me.VCode_Tipo.Value
    Call ProgressBar
   Set MioDB = CurrentDb()
   Set MiaTabella = MioDB.OpenRecordset("tblConcorrente", dbOpenDynaset)
   Do Until MiaTabella.EOF()
      MiaTabella.Edit
RiCalcola:
      Psword = MkPwd(5, VCode)
      If DCount("[ID]", "tblConcorrente", "[ID] = '" & Psword & "'") = 0
Then
      MiaTabella!ID = Psword
      Else
      GoTo RiCalcola
      End If
      MiaTabella.Update
    MiaTabella.MoveNext
   Loop
    MiaTabella.Close
    Set MiaTabella = Nothing
    MioDB.Close
MsgBox "TERMINATO!"
Exit_Sostituire:
    Exit Sub
Err_Sostituire:
        MsgBox Err.Description
    Resume Exit_Sostituire
End Sub
e facendo un estratto di tale codice credo che il rallentamento derivi da
questa porzione dati:
RiCalcola:
      Psword = MkPwd(5, VCode)
      If DCount("[ID]", "tblConcorrente", "[ID] = '" & Psword & "'") = 0
Then
      MiaTabella!ID = Psword
      Else
      GoTo RiCalcola
      End If
... tu come mi consiglieresti di procedere invece per ottimizzare i tempi?
Ciao e grazie
--
**********
EmMeCi
**********


title: Creare Barra di Progressione

text:
[cut]
ho provato cosě ma non funziona ... dove ho sbagliato?
Private Sub CambiaPSW_Click()
On Error GoTo Err_Sostituire
Dim MiaTabella As Recordset
Dim VCode As String
Dim Psword As String
Dim iMax As Integer, ret As Variant, i As Integer
    VCode = Me.VCode_Tipo.Value
    iMax = DCount("[codConcorrente]", "tblConcorrente")
    ret = SysCmd(acSysCmdInitMeter, "Creazione Virtual Code Partecipanti in
corso:", iMax)
    i = 1
   Set MioDB = CurrentDb()
   Set MiaTabella = MioDB.OpenRecordset("tblConcorrente", dbOpenDynaset)
   Do Until MiaTabella.EOF()
      MiaTabella.Edit
RiCalcola:
      Psword = MkPwd(5, VCode)
      If DCount("[ID]", "tblConcorrente", "[ID] = '" & Psword & "'") = 0
Then
      MiaTabella!ID = Psword
      Else
      GoTo RiCalcola
      End If
      MiaTabella.Update
      ret = SysCmd(acSysCmdUpdateMeter, i)
      i = i + 1
    MiaTabella.MoveNext
   Loop
    MiaTabella.Close
    Set MiaTabella = Nothing
    MioDB.Close
    ret = SysCmd(acSysCmdClearStatus)
MsgBox "TERMINATO!"
Exit_Sostituire:
    Exit Sub
Err_Sostituire:
        MsgBox Err.Description
    Resume Exit_Sostituire
End Sub
grazie!
--
**********
EmMeCi
**********


title: Creare Barra di Progressione

text:
EmMeCi - Style wrote:
> Ciao Alex, purtroppo ID non è chiave primaria perchè di default lo
> trovo valorizzato a 0 (è comunque un campo di tipo testo).
> Non posso nemmeno metterlo in chiave primaria.
>
> Questo è il codice con cui popolo tale campo:
>
> Private Sub CambiaPSW_Click()
> On Error GoTo Err_Sostituire
> Dim MiaTabella As Recordset
> Dim VCode As String
> Dim Psword As String
> Dim K As Integer
>
>     MessaggioOK = "ATTENZIONE SI STA PER ATTRIBUIRE UN CODICE
>                   VIRTUALE " & _ "A TUTTI I PARTECIPANTI, VUOI
> PROCEDERE ????? !!!!!"
>
>
>     VCode = Me.VCode_Tipo.Value
>
>     Call ProgressBar
>
>    Set MioDB = CurrentDb()
>    Set MiaTabella = MioDB.OpenRecordset("tblConcorrente",
>    dbOpenDynaset) Do Until MiaTabella.EOF()
>       MiaTabella.Edit
> RiCalcola:
>       Psword = MkPwd(5, VCode)
>       If DCount("[ID]", "tblConcorrente", "[ID] = '" & Psword & "'")
> = 0 Then
Togli il dcount, apri un rst e valuti se è pieno o no

--



title: Creare Barra di Progressione

text:
[cut]
grazie MA, volevo comunque, prima di tentare il recordset (ottimo consiglio)
risolvere il problema che ho esposto subito dopo in risposta sempre ad
Alessandro Baraldi ... dove nel vba ho aggiunto i parametri per gestire una
Progress Bar...che ovviamente parte ... mi mostra le prime due tacchette e
poi ... il nulla fino al termine dell aprocedura quando questa scompare
vergognosamente senza essersi popolata (riempita) ... o come meglio lo si
puň definire!!!
Grazie!
--
**********
EmMeCi
**********


title: Creare Barra di Progressione

text:
EmMeCi - Style wrote:
> [cut]
>
> ho provato cosě ma non funziona ... dove ho sbagliato?
>
> Private Sub CambiaPSW_Click()
> On Error GoTo Err_Sostituire
> Dim MiaTabella As Recordset
> Dim VCode As String
> Dim Psword As String
> Dim iMax As Integer, ret As Variant, i As Integer
>
>
>
>     VCode = Me.VCode_Tipo.Value
>     iMax = DCount("[codConcorrente]", "tblConcorrente")
>     ret = SysCmd(acSysCmdInitMeter, "Creazione Virtual Code
> Partecipanti in corso:", iMax)
Manca i
>     i = 1
ret = SysCmd(acSysCmdInitMeter, "Creazione Virtual Code Partecipanti in
corso:" & i, iMax)
e cmq lo devi mettere all'interno del ciclo do Loop altriemnti non ci passi
mai
Mnaca

--



title: Creare Barra di Progressione

text:

ancora una volta ti dico che tu la chiami fuori dal ciclo quindi non puň
incrementarsi
Non č che funziona con tu la chiami da qualche parte e lei č in "ascolto".
La devi incrementare tu nel ciclo



title: Creare Barra di Progressione

text:
[cut]
grazie, ho fatto come dicevi tu e ora funziona molto bene!
Buona giornata!
--
**********
EmMeCi
**********


title: Creare Barra di Progressione

text:
Riporto un estratto di codice
 ret = SysCmd(acSysCmdInitMeter, "Creazione Virtual Code Partecipanti in
corso:" & " " & i & " " & "di" & " " & iMax, iMax)
      '***
      ret = SysCmd(acSysCmdUpdateMeter, i)
      i = i + 1
con il codice sopra riportato oltre alla progress bar vedo l'incremento
numerico dei miei dati.
Ora vorrei inserire anche una percentuale progressiva, forse superfluo, ma
più indicatori mostro e meglio è.
Cosa devo aggiungere al codice per poter creare anche questo incremento
percentuale nella progress bar?
Grazie
--
**********
EmMeCi
**********


title: Creare Barra di Progressione

text:

i/imax & "%"



title: Creare Barra di Progressione

text:
>> Grazie
> i/imax & "%"
>
i = 1
iMax = 9822
Non ottengo 100% al termine della procedura ma 1 ... inoltre ho molti
decimali ...
... scusami se ti stņ esaurendo, ma credimi, mi stai insegnando molto con i
tuoi aiuti e ti ringrazio (seppur magra consolazione credo sia meglio di
niente no?!!)
Ciao.
--
**********
EmMeCi
**********


title: Creare Barra di Progressione

text:
Risolto
100*(i/iMax)
ciao!
--
**********
EmMeCi
**********


title: Creare Barra di Progressione

text:
EmMeCi - Style wrote:
>>> Grazie
>> i/imax & "%"
>>
> i = 1
>
> iMax = 9822
>
> Non ottengo 100% al termine della procedura ma 1 ... inoltre ho molti
> decimali ...
round(i/imax,0) & "%"
> ... scusami se ti stņ esaurendo, ma credimi, mi stai insegnando molto
> con i tuoi aiuti e ti ringrazio (seppur magra consolazione credo sia
> meglio di niente no?!!)
Cosa? che ad insegnarti sia solo io???
E chi vorresti Sergio???
Lo sai che lui si concede solo al suo Gasparetto!!!!
;-)
>
> Ciao.



title: Creare Barra di Progressione

text:
>> ... scusami se ti stň esaurendo, ma credimi, mi stai insegnando molto
>> con i tuoi aiuti e ti ringrazio (seppur magra consolazione credo sia
>> meglio di niente no?!!)
> Cosa? che ad insegnarti sia solo io???
> E chi vorresti Sergio???
> Lo sai che lui si concede solo al suo Gasparetto!!!!
> ;-)
>
nooooooooooooo non riferito ai tuoi insegnamenti, la magra consolazione č il
mio ringraziarti!!!
;o)
ciao e ... gia che ci sei ... stň facendo impazzie Karl pochi post piů in
alto ... tu cosa pensi debba fare per ... farla finita con il mio
problema?!!!
--
**********
EmMeCi
**********