title: Funzione mese

author: Lbo da casa

text:
Premesso che non si puo' compilare .mdb in .exe, on Thu, 30 Dec 1999
22:24:24 GMT, "barbi" <
barbi...@libero.it
> wrote:
>Vorrei mettere in una routine una funzione che mi dia il mese in llettere
>partendo dal numero da 1 a 12; ho provato con Month(n) e Month$(n) ma mi
>danno numerini a caso...
public function MeseInLettere(nMese as integer) as string
	meseinlettere=format("1999/" & cstr(nMese) & "/01", "mmmm")
end function
non collaudata e dipendente dalla nazionalizzazione della macchina.
senno':
public function MeseInLettere(nMese as integer) as string
	select case nMese
		case 1
			meseinlettere="Gennaio"
		case 2
			meseinlettere="Febbraio"
[...]
	end select
end function
>se ci fosse, e' possibile avere il mese con un dato formato? ad es. in
>italiano, le prime 3 lettere e punto? ho visto che cosi' lo riconosce, in un
>tipo data
public function MeseInLettere(nMese as integer) as string
	meseinlettere=format("1999/" & cstr(nMese) & "/01", "mmm") &
"."
end function
public function MeseInLettere(nMese as integer) as string
	select case nMese
		case 1
			meseinlettere="Gen."
		case 2
			meseinlettere="Feb."
[...]
	end select
end function
>grazie da barbi
>
>
--------------------------------------------------
ATTENZIONE!
it.comp.database.access diventera' it.comp.appl.access!
cercalo tra i nuovi ng e linkalo!
-----------------------------------
rimuovere NOSPAM. per mandare email
-----------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access


title: Funzione mese

author: Matteo Fortini

text:
Prima di tutto, penso che la chiamata di month() sia
month (date(*data*))
quindi se metti date() e basta, ti dà il mese corrente, altrimenti ti dà quello
della data che gli passi
Ciao,
    Matteo


title: Funzione mese

author: Lorenzo Coronati

text:
Scrisse "barbi" <
barbi...@libero.it
>:
>Vorrei mettere in una routine una funzione che mi dia il mese in llettere
Vedi l'help su Format
Quello che vuoi tu mi pare dovrebbe essere format("mmm",data)
Bai
--
Lorenzo Coronati
--
Quesito a risposta binaria SI/NO:
"Risponderai no a questa domanda?"
--


title: Funzione mese

author: Lbo dall'ufficio

text:
>format("mmm",data)
cos'e', una risata a denti stretti?  :-)
-----------------------------------
ATTENZIONE: il ng it.comp.database.access cambia nome e diventa it.comp.appl.access
linkatelo!



title: Funzione mese

author: Adriano

text:
Lorenzo Coronati <
lore...@tin.it
> wrote in message
386c91e7...@news.libero.it...
> Scrisse "barbi" <
barbi...@libero.it
>:
>
> >Vorrei mettere in una routine una funzione che mi dia il mese in llettere
> Vedi l'help su Format
> Quello che vuoi tu mi pare dovrebbe essere format("mmm",data)
io preferisco in questi casi usare la funzione mounth(data)


title: Funzione mese

author: eMa

text:
Matteo Fortini <
me...@libero.it
> wrote:
> Prima di tutto, penso che la chiamata di month() sia
> month (date(*data*))
>
month (DATA)
dove DATA e' una variabile di tipo data/ora.
Eventualmente, se vuoi il mese corrente, puoi mettere
	month (date() )
pero' e' inutile passare la DATA alla funzione date() (che fra l'altro non so
neanche se si puo') :)
Ah, giusto per la cronaca, si sconsiglia vivamente di dare alle variabili
nomi tipo DATA, che puo' voler dire 100k cose :-(
bye!
--
eMa        <
ece...@penguinpowered.com
>		Auguri a tutti ed a tutti
http://www.penguinpowered.com/~ecesena
		    i PC. Buon Y2k ;-)
Nessun problema e' irrisolvibile.
		-- Dott. Janet Wallace, "The Deadly Years", data astrale 3479.4


title: Valuta, Euro e 2 posizioni

author: Gianni Vba

text:
Impostando un campo come valuta - Euro e 2 cifre decimali
non capisco perchč:
1) Visualizzi 2 cifre ma se vado a cliccare sul valore me ne fa vedere 3
2) Se faccio una ripartizione di una spesa es ? 100 per 5 persone
    mi viene un certo risultato. Se calcolo il totale dei valori ottenuti
    mi viene ad esempio 100,02.
3) Su un altro pc in una query vengono visualizzati i campi in lire
    quando effettivamente sono in euro (almeno nella tabella)
-----
Ciao
  Gianni


title: Valuta, Euro e 2 posizioni

author: Paolo P

text:
"Gianni Vba" <
gianni.s...@libero.it
> ha scritto nel messaggio
news:Lfh88.30224$5M4.9...@twister2.libero.it...
> Impostando un campo come valuta - Euro e 2 cifre decimali
> non capisco perchè:
> 1) Visualizzi 2 cifre ma se vado a cliccare sul valore me ne fa vedere 3
>
> 2) Se faccio una ripartizione di una spesa es ? 100 per 5 persone
>     mi viene un certo risultato. Se calcolo il totale dei valori ottenuti
>     mi viene ad esempio 100,02.
>
> 3) Su un altro pc in una query vengono visualizzati i campi in lire
>     quando effettivamente sono in euro (almeno nella tabella)
>
> -----
> Ciao
>   Gianni
>
>
Per 1 e 2 usa la funzione di arrotondamento di Karl su
www.sitocomune.com
Per 3 se il problema è su una maschera che visualizza la query, devi
impostare il formato nelle proprietà del controllo
Paolo


title: Valuta, Euro e 2 posizioni

author: ZAIM

text:
> >
> Per 1 e 2 usa la funzione di arrotondamento di Karl su
www.sitocomune.com
> Per 3 se il problema è su una maschera che visualizza la query, devi
> impostare il formato nelle proprietà del controllo
> Paolo
>
Serve anche a me, ma non la trovo......
In quale sezione?
Alfio


title: Valuta, Euro e 2 posizioni

text:
> > 3) Su un altro pc in una query vengono visualizzati i campi in lire
> >     quando effettivamente sono in euro (almeno nella tabella)
> Per 3 se il problema è su una maschera che visualizza la query, devi
> impostare il formato nelle proprietà del controllo
> Paolo
No parlo direttamente della query. L'esecuzione della query mi da la lira
In una addirittura mi da su un campo la lira e sull'altro l'euro
Di sicuro tutti i campi (nelle tabelle) sono in euro. Nel report creato
appositamente su questa query
mi da l'euro ma c'è poi l'errore che ti dicevo al numero 2 (arrotondamento
sbagliato sulla
somma della colonna).
Ciao
   gianni


title: Valuta, Euro e 2 posizioni

text:
"ZAIM" <
za...@libero.it
> ha scritto nel messaggio
news:A5i88.30667$5M4.9...@twister2.libero.it...

Sezione Generale (riga 14)
      Arrotondare un numero alla cifra decimale specificata
        Karl Donaubauer


title: VBA Access

author: Simone B

text:
Salve a tutti,
vorrei sapere dove reperire i rudimenti per la programmazione VBA in Access
in internet possibilimente manuale Freeware
Saluti e grazie a tutti SimoneB


title: VBA Access

author: Carlo Costarella

text:
"Simone B" <
berti...@tiscali.it
> ha scritto nel messaggio
news:2nkzd.569059$35.24...@news4.tin.it...

La prima cosa da fare in questi casi è una bella ricerca su internet. I
risultati sono notevoli.
Primi fra tutti:
http://msdn.microsoft.com/vba/default.asp
poi:
http://msdn.microsoft.com/library/ita/default.asp?url=/library/ITA/modcore/html/deovrdevelopingofficesolutions.asp
http://msdn.microsoft.com/library/ita/default.asp?url=/library/ITA/modcore/html/deovrWorkingWithOfficeApplications.asp
Questo un esempio di ricerca:
http://search.microsoft.com/search/results.aspx?st=b&na=88&View=it-it&qu=office+vba
Ciao, Carlo


title: importazione in access

author: Ugo

text:
Ho dovuto riformattare il mio Hard disk. Ho reinstallato Office 2000 e,
quando faccio
in Access un'importazione di un testo scv, il programma non mi
riconosce i carattei, e li segnala come ???? nella finestra di anteprima. Ho
provvisoriamente tappato la buca importando il testo in Excell,  poi
esportandolo come file excell e finalmente importandolo in access, ma
sicuramente non e' la cosa piu' giusta da fare. Ho provato a reinstallare
access, ma niente.
Potete darmi una mano? Grazie. Ugo
 ----------- UgoSoftSystem-------------------------~-~>
Visita il mio sito

http://www.geocities.com/probiviro/index.htm
Decalogo del Perfetto Assenteista
http://www.geocities.com/probiviro/decalogo.htm
Decalogo del Perfetto Impiegato
http://www.geocities.com/probiviro/impiegato.htm
------------UgoSoftSystem-------------------------~-~>


title: importazione in access


title: Si può fare???

author: Spazio Ambiente

text:
Ciao. ho un problema e non so se è possibile risolverlo con una query;
io ho questi dati iniziali (query):
       ID                parti
intervento1        ghiera
intervento1        interruttore
intervento1        puleggia
intervento2        catena
intervento2        spina
La colonna ID identifica un intervento di manutenzione, mentre la colonna
parti è l'identificativo
dei pezzi di ricambio; in pratica non è mai successo che per ogni intervento
di manutenzione ci siano più di 4 pezzi interessati anche se questo può
accadere, ma pure nel caso più drastico ipotizzo di avere al massimo 10
pezzi diversi...
Il risultato che mi interessa è quindi quello di avere il campo ID
(interventi) non duplicato, con indicato a fianco i pezzi di ricambio
interessati, quindi:
       ID               parte1        parte2         parte3.......parte10
(se esiste! il numero di campi è variabile)
intervento1        ghiera     interruttore   puleggia
intervento2        catena        spina
con la query a campi incrociati come viene subito da pensare come soluzione
ottengo invece:
      ID           ghiera    interruttore    puleggia    catena    spina
intervento1   ghiera    interruttore    puleggia
intervento2                                                        catena
spina
che in questo caso non mi è d'aiuto, qualcuno di voi sà come posso fare e
soprattutto se è possibile???


title: Si può fare???

author: Sib

text:
"Spazio Ambiente"
cut
>        ID                parti
>
> intervento1        ghiera
> intervento1        interruttore
> intervento1        puleggia
> intervento2        catena
> intervento2        spina
cut
> Il risultato che mi interessa è quindi quello di avere il campo ID
> (interventi) non duplicato, con indicato a fianco i pezzi di ricambio
> interessati, quindi:
>
>        ID               parte1        parte2         parte3.......parte10
> (se esiste! il numero di campi è variabile)
>
> intervento1        ghiera     interruttore   puleggia
> intervento2        catena        spina
cut
Puoi numerare i pezzi man mano modificando cosi' la tabella d'origine:
        ID            IDParte        parti
  intervento1             1          ghiera
 intervento1             2        interruttore
 intervento1             3       puleggia
 intervento2            1         catena
 intervento2            2           spina
Cosa non difficile (puoi fare una procedura automatica)
Per poi ottenere la query a campi incrociati per come ti serve.
Ciao, Sib


title: Si può fare???

author: Marco Serra

text:
In linea di massima basta che tu aggiunga un campo che numeri con 1,2,3....
le varie righe di uno stesso intervento.
A quel punto la query a campi incrociati puo' essere una soluzione, ma ce ne sono altre,
a seconda di quello che vuoi ottenere.
Se vuoi evitare la creazione di tabelle temporanee, la numerazione di cui sopra credo che sia inevitabile.
Ciao
Marco
PS Mi vengono in mente arzigogoli che forse funzionerebbero, dando un limite alle possibili parti utilizzate,
ma sono cose orrende, che se sono costretto a fare, mi tolgono il sonno la notte.
--
Posted from [212.210.92.253]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Si può fare???

text:
""Marco Serra"" <
Marco...@ausl.bologna.it
> ha scritto nel messaggio
news:00ed01c03378$7459ace0$6702...@internal.ausl.bologna.it...
> In linea di massima basta che tu aggiunga un campo che numeri con
1,2,3....
> le varie righe di uno stesso intervento.
> A quel punto la query a campi incrociati puo' essere una soluzione, ma ce
ne sono altre,
> a seconda di quello che vuoi ottenere.
> Se vuoi evitare la creazione di tabelle temporanee, la numerazione di cui
sopra credo che sia inevitabile.
>
......
Tutto questo è possibile solo con SQL o anche graficamente con access?
Io non conosco l'SQL, è questo il mio problema di fondo...
Ciao e grazie...


title: Si può fare???

author: Michele Amato

text:
Spazio Ambiente <
spazioa...@tin.it
> wrote in message
8s177v$4no$1...@nslave2.tin.it...
> Ciao. ho un problema e non so se è possibile risolverlo con una query;
> io ho questi dati iniziali (query):
>
>        ID                parti
>
> intervento1        ghiera
> intervento1        interruttore
> intervento1        puleggia
> intervento2        catena
> intervento2        spina
>
> La colonna ID identifica un intervento di manutenzione, mentre la colonna
> parti è l'identificativo
> dei pezzi di ricambio; in pratica non è mai successo che per ogni
intervento
> di manutenzione ci siano più di 4 pezzi interessati anche se questo può
> accadere, ma pure nel caso più drastico ipotizzo di avere al massimo 10
> pezzi diversi...
> Il risultato che mi interessa è quindi quello di avere il campo ID
> (interventi) non duplicato, con indicato a fianco i pezzi di ricambio
> interessati, quindi:
>
>        ID               parte1        parte2         parte3.......parte10
> (se esiste! il numero di campi è variabile)
>
> intervento1        ghiera     interruttore   puleggia
> intervento2        catena        spina
>
>
> con la query a campi incrociati come viene subito da pensare come
soluzione
> ottengo invece:
>
>       ID           ghiera    interruttore    puleggia    catena    spina
>
> intervento1   ghiera    interruttore    puleggia
> intervento2                                                        catena
> spina
>
>
> che in questo caso non mi è d'aiuto, qualcuno di voi sà come posso fare e
> soprattutto se è possibile???
>
...e se organizzi la query a campi incrociati impostando i ricambi come
intestazione di righe e ID (intervento) come intestazione di colonne
e conteggio come funzione (trasformabile in Blank e X)?
Otterresti
Parti             |Intervento1|Intervento2|Intervento3...
Ghiera                 X                                   X
Interruttore          X
Puleggia             X                                   X
Catena                                   X
Spina                                     X
Albero                                                       X
Cuscinetto          X                X                X
Gabbia               X                X
Boccola                                                   X
...
Spero di averti dato lo spunto giusto.
Michele Amato
--
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}
Un pò di pubblicità per il mio sito, su
http://utenti.worldonline.it/micheleamato
è possibile trovare una add-in per Access97-2000:
          Access Navigator 2.0
comincia a esserci anche un pò di documentazione...
ho pubblicato anche la prima parte di un TUTORIAL
sull'uso di questo strumento
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}


title: Si può fare???

text:
>Tutto questo è possibile solo con SQL o anche graficamente con access?
>Io non conosco l'SQL, è questo il mio problema di fondo...
Ti diro', non e' banale nemmeno farlo con SQL puro.
Farlo in un  unico passaggio richiederebbe la creazione di una funzione globale in VBA.
Sto' parlando di aggiungere a posteriori un progressivo intervento: 1,2,3....
Cosa intendi con "graficamente con Access"?
Forse il  generatore di query (QBE) ?
Se lo sai usare allora forse qualcosa si puo' fare, ma si tratta di una
sequenza di passaggi da fare a mano. Non una cosa automatizzata.
In breve:
- Ordina la Tab. per IdIntervento
- Aggiungi alla Tab. due campi:
=== NProgr : che conterra' 1,2,3,...
=== IdRow : Campo contatore
- Crea sulla Tab. una query di creazione tabella [Tab2] raggruppata per IdIntervento con anche il Min(IdRow). Questo crea Tab2 con
2 campi: IdIntervento e MinIdRow.
- A questo punto crea una query di aggiornamento che leghi Tab. a Tab2 su IdIntervento,
  e che aggiorni Tab!NProgr con (Tab!IdRow - Tab2!MinIdRow)+1
Fine!
A questo punto ti trovi valorizzato il valore NProgr.
Non copiare le sintassi e' solo per spiegarti.
Se vuoi provare e non hai chiaro qualcosa chiedi pure.
Ciao
Marco



title: Si può fare???

text:
""Marco Serra"" <
Marco...@ausl.bologna.it
> ha scritto nel messaggio
news:01b201c0342a$35ea6b40$6702...@internal.ausl.bologna.it...

Grazie mille... ho fatto come mi hai detto e ci sono riuscito!!!
Ciao, Tiziano


title: Help per Conversione '97 a 2000

author: Fausto

text:
Salve,
in passato avevo letto di problemi, ma non avendo Office2000 non mi sono
interessato più di tanto, pertanto ritengo di farvi una domanda trita e
ritrita, scusate in anticipo.
Ho convertito i miei vecchi database per Access2000, hanno funzionato tutti
correttamente tenendo installati nel PC 97 & 2000 insieme, ora ho
disinstallato '97 e solo un database su sei aprendolo mi dice che c'è un
errore di compilazione o la mancanza di uan libreria nel punto in cui deve
aprire il pannello comandi (generato in automatico dal wizard di 97):
Private Sub Form_Open(Cancel As Integer)
' Riduce a icona finestra database e inizializza maschera.
    Dim dbs As Database
    Dim rst As Recordset
ecc. ecc.
Ho provato a riprendere il vecchio database (nella versione funzionante) ed
convertirlo nuovamente , ma il problema riappare.
Come debbo fare?
Grazie
Fausto


title: Help per Conversione '97 a 2000

author: mario pizzi

text:
caro amico di sventura, io ho avuto il tuo stesso problema con un mio
programma installato su di un computer di un amico. Prima aveva Acces97 e
poi senza dirmi niente ha installato access2000. Non ti dico quando ci sono
andato a mettere le mani per fare alcune modifiche richieste.
Ora, io non ho avuto ancora il tempo di andare da questo mio amico, mi
sembra, dopo aver spulciato le news, che il problema si possa risolvere
costruendo in access2000 un database completamente vuoto, e poi importando
tutte le tabelle, le query ecc.. dal programma in access97.
ciao mario
"Fausto" <
fausto...@libero.it
> ha scritto nel messaggio
news:8mnco7$1lh$1...@serv1.albacom.net...
> Salve,
> in passato avevo letto di problemi, ma non avendo Office2000 non mi sono
> interessato piů di tanto, pertanto ritengo di farvi una domanda trita e
> ritrita, scusate in anticipo.
>
> Ho convertito i miei vecchi database per Access2000, hanno funzionato
tutti
> correttamente tenendo installati nel PC 97 & 2000 insieme, ora ho
> disinstallato '97 e solo un database su sei aprendolo mi dice che c'č un



title: Help per Conversione '97 a 2000

author: damiano

text:
Fausto <
fausto...@libero.it
> wrote in message
8mnco7$1lh$1...@serv1.albacom.net...
> Salve,
> in passato avevo letto di problemi, ma non avendo Office2000 non mi sono
> interessato più di tanto, pertanto ritengo di farvi una domanda trita e
> ritrita, scusate in anticipo.
>
> Ho convertito i miei vecchi database per Access2000, hanno funzionato
tutti
> correttamente tenendo installati nel PC 97 & 2000 insieme, ora ho
> disinstallato '97 e solo un database su sei aprendolo mi dice che c'è un
> errore di compilazione o la mancanza di uan libreria nel punto in cui deve
> aprire il pannello comandi (generato in automatico dal wizard di 97):
>
> Private Sub Form_Open(Cancel As Integer)
> ' Riduce a icona finestra database e inizializza maschera.
>
>     Dim dbs As Database
>     Dim rst As Recordset
>
> ecc. ecc.
>
> Ho provato a riprendere il vecchio database (nella versione funzionante)
ed
> convertirlo nuovamente , ma il problema riappare.
>
> Come debbo fare?
>
> Grazie
>
> Fausto
>
ciao, ho avuto il tuo stesso problema, e andando a verificare le varie
proprietà, mi sono accorto che in access 2000 è precaricato il metodo ADO,
mentre in acces 97 usavo il metodo DAO, per far funzionare il tutto devi
aggiungere il metodoa DAO ad access 2000, e se vuoi togliere il metodo ADO,
io l'ho fatto per non causare problemi di conflitti, dato che per ora non
utilizzo ancora l'ADO
ciao.


title: valori nulli in chiave primaria

author: Paolo opg

text:
lo so, non si può.
esiste un modo per aggirare la cosa?
mi spiego meglio.
devo importare dati da AS400 e in alcuni campi ho dei valori 'blank'
su as non danno problemi e sono valori validi, dato che si tratta di spazi e
non di NULL, su access non riesco a utilizzarli nelle chiavi.
ci sono alternative, oltre a riempire i campi blank con valori non
utilizzati nel db?
tia
    paolo
--
+----
| no reply-to address available
| use the newsgroup
| tnx
+----


title: valori nulli in chiave primaria

author: MegaMax

text:
Magari un valore stringa di lunghezza zero?
Max


title: valori nulli in chiave primaria

text:
MegaMax <
fe...@polaris.it
> wrote in message
ab89nb$b6t$1...@newsreader.mailgate.org...
> Magari un valore stringa di lunghezza zero?
>
è proprio il valore che mi crea problemi...
sull'as tutto ok.
nelle chiavi di access importato in locale, non viene accettato...


title: valori nulli in chiave primaria

text:
"Paolo opg" <
w...@ne.com
> ha scritto nel messaggio
news:ab8gor$peg$1...@fe1.cs.interbusiness.it...

importalo in una tabella temporanea dove quel campo non fa parte della
chiave (crei tu una chiave con un contatore)
poi converti i valori null in qualcosa vche possa stare in una chiave
(magari un certo numero di spazi) e poi metti tutto nella tabella giusta
Max


title: Problema su lettura foglio excell da access...aiuto

author: Francesca Pulitano

text:
Ciao a tutti, il mio problema è questo.
Devo importare in una tabella access dei dati che sono su fogli excell.
Sono riuscita a fargli aprire i fogli ma quest'ultimi sono suddivi in
altri sheets,
come si fa a passare da uno sheets all'altro???
Le uniche cose attinenti che ho trovato sono Worksheets.select,
Worksheets.Count,
Activesheets.Index e Activesheets.Name........ma non funzionano a
dovere.
Grazie 1000
Francesca
--
Posted from
fi1-2.dialup.tiscalinet.it
 [62.11.34.2]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: problema con le espressioni :(

author: Laura

text:
Salve a tutti,
ho un problema e non trovo la soluzione sul mio manuale. Ho creato una
maschera con dei valori, alla fine ho inserito un record con la formula
"somma i valori". Fin qui tutto bene ma quando vado a creare una query e gli
chiedo di estrarre solo il totale dei valori mi da zero! Perche? come faccio
a fargli riportare la somma di tutti valori nella query?
Grazie.
Laura


title: problema con le espressioni :(

author: Sergio de Pretis

text:
Laura ha scritto:

Verifica che non ci siano valori Null fra gli addendi. Se ci sono
trasformali in zero (vedi funzione nz o iif).
Ciao
--------------------------------------------------------------------
Sergio de Pretis                     E-mail
depr...@csgen.it
20127 MILANO -  ITALY


title: problema con le espressioni :(

author: lbo dal portatile

text:
>ho un problema e non trovo la soluzione sul mio manuale. Ho creato una
>maschera con dei valori, alla fine ho inserito un record con la formula
sai che non capisco un accidenti di quello che dici?
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: Selezione Multipla File

author: Galvy

text:
Salve a  tutto il NG.
Vorrei chiedere che qualcuno ha mai avuto a che fare co nuna selezione
multipla da access...???
Io no, però e quello che devo ottenere.
Preticamente da una finestra di selezione dovrei cliccare su + file (ad
esempio tenendo premuto il tasto control) e come risultato dovrei ottenere
un lenco di file (2...infiniti) compresi di percors o fisico sul disco.
Saluti Galvy


title: Selezione Multipla File

author: Potone

text:
"Galvy" <
ga...@libero.it
> ha scritto nel messaggio news:cy3e9.9170$AW6.1...@twister2.libero.it...

Potresti usare Open dei MS Common Dialogs.
Mat.


title: Selezione Multipla File

text:
> Potresti usare Open dei MS Common Dialogs.
> Mat.
>
>
Cioč?? io sino ad ora ho usato questo codice per la selezione di un singoli
file e.
Option Compare Database
Option Explicit
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
Public Function cmdlg_file() As String
   'Autore: Stefano Bettini
   'Restituisce: il percorso completo del file selezionato
   Dim OpenFile As OPENFILENAME
   Dim lReturn As Long
   Dim sFilter As String
   OpenFile.lStructSize = Len(OpenFile)
   'sFilter = "Database di Microsoft Access (*.mdb)" & Chr(0) & "*.mdb" &
Chr(0)
   'sFilter = "Foglio di lavoro Microsoft Excel (*.xls)" & Chr(0) & "*.xls"
& Chr(0)
   sFilter = "Tutti (*.*)" & Chr(0) & "*.*" & Chr(0)
   OpenFile.lpstrFilter = sFilter
   OpenFile.nFilterIndex = 1
   OpenFile.lpstrFile = String(257, 0)
   OpenFile.nMaxFile = Len(OpenFile.lpstrFile) - 1
   'OpenFile.nMaxFile = 10
   OpenFile.lpstrFileTitle = OpenFile.lpstrFile
   OpenFile.nMaxFileTitle = OpenFile.nMaxFile
   OpenFile.lpstrInitialDir = "C:\"
   OpenFile.lpstrTitle = "Seleziona file(s)"
   OpenFile.flags = 0
   lReturn = GetOpenFileName(OpenFile)
   If lReturn = 0 Then
      cmdlg_file = ""
   Else
      cmdlg_file = Left(OpenFile.lpstrFile, InStr(OpenFile.lpstrFile,
Chr$(0)) - 1)
   End If
End Function
Poi nella form su evento click di un pulsante ho messo
Me.nome_file = cmdlg_file
Vorrei invece una selezione multipla e che i flies che ho selezioanto vadano
ea riempire una tabella
Saluti Galvy


title: Selezione Multipla File

author: Giorgio prx

text:
"Galvy" <
ga...@libero.it
> ha scritto nel messaggio
news:bj4e9.9385$AW6.1...@twister2.libero.it...

Io utilizzo lo stesso sistema  mettendo in   -  OpenFile.flags =
ANF_EXPLORER Or ANF_PERMETTESELEZIONEMULTIPLA  - qui sotto ci sino le altre
costanti.
Const ANF_PERMETTESELEZIONEMULTIPLA = &H200
Const ANF_CREAPROMPT = &H2000
Const ANF_EXPLORER = &H80000
Const ANF_ENABLETEMPLATE = &H40
Const ANF_ENABLEHOOK = &H20
Const ANF_FILEDEVEESISTERE = &H1000
Const ANF_NASCONDESOLALETTURA = &H4
Const ANF_NONCAMBIACARTELLA = &H8
Const ANF_COLLEGAMENTIRIFERIMENTONODI = &H100000
Const ANF_NESSUNPULSANTEDIRETE = &H20000
Const ANF_NONRESTITUISCESOLALETTURA = &H8000
Const ANF_NESSUNACONVALIDA = &H100
Const ANF_SOVRASCRIVEPROMPT = &H2
Const ANF_PERCORSODEVEESISTERE = &H800
Const ANF_SOLALETTURA = &H1
Const ANF_MOSTRAGUIDA = &H10
Const ANF_NODEREFERENCELINKS = &H100000
Ciao Giorgio


title: Selezione Multipla File

text:
"Galvy" <
ga...@libero.it
> ha scritto nel messaggio news:bj4e9.9385$AW6.1...@twister2.libero.it...
> > Potresti usare Open dei MS Common Dialogs.
> > Mat.
> >
> >
> Cioč?? io sino ad ora ho usato questo codice per la selezione di un singoli
> file e.
> Option Compare Database
> Option Explicit
[Cut]
> Poi nella form su evento click di un pulsante ho messo
> Me.nome_file = cmdlg_file
>
> Vorrei invece una selezione multipla e che i flies che ho selezioanto vadano
> ea riempire una tabella
> Saluti Galvy
>
Questa routine utilizza i common dialogs, prova a mettere un riferimento diretto alla libreria nel tuo progetto (comdlg32.ocx : la
trovi nella directory del sistema) e poi, tramite il visualizzatore degli oggetti, prova a guardare le proprietą e i metodi degli
oggetti della libreria.
Mat.


title: Selezione Multipla File

text:
> Io utilizzo lo stesso sistema  mettendo in   -  OpenFile.flags =
> ANF_EXPLORER Or ANF_PERMETTESELEZIONEMULTIPLA  - qui sotto ci sino le
altre
> costanti.
>
> Const ANF_PERMETTESELEZIONEMULTIPLA = &H200
> Const ANF_CREAPROMPT = &H2000
> Const ANF_EXPLORER = &H80000
> Const ANF_ENABLETEMPLATE = &H40
> Const ANF_ENABLEHOOK = &H20
> Const ANF_FILEDEVEESISTERE = &H1000
> Const ANF_NASCONDESOLALETTURA = &H4
> Const ANF_NONCAMBIACARTELLA = &H8
> Const ANF_COLLEGAMENTIRIFERIMENTONODI = &H100000
> Const ANF_NESSUNPULSANTEDIRETE = &H20000
> Const ANF_NONRESTITUISCESOLALETTURA = &H8000
> Const ANF_NESSUNACONVALIDA = &H100
> Const ANF_SOVRASCRIVEPROMPT = &H2
> Const ANF_PERCORSODEVEESISTERE = &H800
> Const ANF_SOLALETTURA = &H1
> Const ANF_MOSTRAGUIDA = &H10
> Const ANF_NODEREFERENCELINKS = &H100000
>
> Ciao Giorgio
>
>
OK :) direi che sei + che esauriente ma......
uno o due chiarimenti in + su come utilizzare le costanti?
nella form come utilizzi il comendo per la selezione multipla?
Il tuo post è sin troppo dettagliato ma come usarlo?
Saluti Galvy


title: Selezione Multipla File

text:
Tutto ok, non avevo capito come metter giù la riga di codice...
Grazie...Mille
Saluti Galvy


title: Selezione Multipla File

author: Giorgio

text:
"Galvy" <
ga...@libero.it
> ha scritto nel messaggio
news:rW4e9.10443$%z1.1...@twister1.libero.it...
> Tutto ok, non avevo capito come metter giů la riga di codice...
> Grazie...Mille
> Saluti Galvy
>
>
Scusa se sono stato troppo sintetico.
Ti volevo ricordare che in lpstrFile ti ritorna una stringa con i campi
separati da chr(0) ad eccezione del primo campo che contiene il percorso e
termina con due chr(0) e che devi dimensionare il buffer di ritorno in base
ad una stima dei files da elencare, io lavoro con un buffers di 4089 byte
che mi permette di selezionare almeno 100 files (40 byte stimati per ogni
nome).
OpenFile.lpstrFile = String(4097, 0)
OpenFile.nMaxFile = Len(OpenFile.lpstrFile) - 1
ciao Giorgio.


title: Selezione Multipla File

text:
"Giorgio" <
gior...@tin.it
> ha scritto nel messaggio
news:0r5e9.72861$pX1.2...@news2.tin.it...

Accidenti mi sono collegato con un altro provider sono sempre Giorgio prx
ciao


title: Selezione Multipla File

text:
> >
> > OpenFile.lpstrFile = String(4097, 0)
> > OpenFile.nMaxFile = Len(OpenFile.lpstrFile) - 1
> >
> >
> > ciao Giorgio.
> >
> >
>
> Accidenti mi sono collegato con un altro provider sono sempre Giorgio prx
> ciao
>
>
Usando questo codice mi restituisce un errore "Tipo dati non corrispondente"
hai idea da cosa dipenda?
Il codice che utilizzo +è errato secondo te?
Saluti Galvy


title: Selezione Multipla File

text:
"Galvy" <
ga...@libero.it
> ha scritto nel messaggio
news:mt0f9.506$Oz2....@twister2.libero.it...

Non deve dare errore, in sostanza è stata cambiata la dimensione di
OpenFile.lpstrFile da 257 a 4097, in quale riga ti dà l'errore ??
Ciao Giorgio.


title: Selezione Multipla File

text:
"Giorgio prx" <
giorgio...@tiscalinet.it
> ha scritto nel messaggio
news:alq213$47r$1...@lacerta.tiscalinet.it...

Non mi restituisce un errore a livello di riga semplicemente quando
seleziono + file non mi restiutisce una stringa di testo con nome file e
percorsi relativi  ES  "c:\io.sys""c:\msdos.sys" ma semplicemente "C:\" e se
seleziono un solo file tutto ok,
Saluti Galvy


title: Selezione Multipla File

text:
"Galvy" <
ga...@libero.it
> ha scritto nel messaggio
news:LS7g9.3400$eG6....@twister1.libero.it...
>
> "Giorgio prx" <
giorgio...@tiscalinet.it
> ha scritto nel messaggio
> news:alq213$47r$1...@lacerta.tiscalinet.it...
> >
> > "Galvy" <
ga...@libero.it
> ha scritto nel messaggio
> > news:mt0f9.506$Oz2....@twister2.libero.it...
> > > > >
> >
> Non mi restituisce un errore a livello di riga semplicemente quando
> seleziono + file non mi restiutisce una stringa di testo con nome file e
> percorsi relativi  ES  "c:\io.sys""c:\msdos.sys" ma semplicemente "C:\" e
se
> seleziono un solo file tutto ok,
> Saluti Galvy
>
>
Usando la selezione multipla in OpenFile.lpstrFile viene restituita una
serie si stringhe separate da chr(0) (come un array di stringhe nel
linguaggio C) quindi devi apportare un piccolo cambiamento al codice
altrimenti estrai solo il primo elemento ed esattamente "C:\",  qui sotto
sono riportate le ultime righe del codice che utilizzi.
If  lReturn = 0 Then
    cmdlg_file = ""
Else
    cmdlg_file = Left(OpenFile.lpstrFile, InStr(OpenFile.lpstrFile, Chr$(0)
& Chr(0)) - 1)
End If
Come puoi vedere ho aggiunto il doppio chr(0) nella funzione instr, come
risultato avrai C:\   io.sys   msdos.sys   ecc,  ora devi solo ricomporre i
vari nomi di file.
Ciao Giorgio


title: mi rinfrescate le idee

author: io

text:
Ho 3000 articoli voglio fare un d.b. ogni articolo vorrei avesse la foto.
Parto nella creazione della tabella idprodotto, descrizione,etc etc, e la
foto dove la metto?
E come.
Fatto tutto sto lavoro che è certosino posso pubblicare in internet con
possibilità in base
a criteri selezionati dall'eventuale visitatore del sito il prodotto x????
Grazie Roberto dall'Ufficio


title: mi rinfrescate le idee

author: cidi

text:
"io" <
cattane...@legendcarpets.191.it
> ha scritto nel messaggio
news:bubc7e$nqr$1...@fata.cs.interbusiness.it...

Ciao Roberto dall'ufficio
Gli addetti al rinfresco sono DUE ed entrambi assenti per il week end. :)
Se accetti qualche consiglio puoi:
1) cercare il post di Roberto da casa del 14/01/2004 19.42 come ci si
dovrebbe comportare in un newsgroup.
2) Rinfrescare le tue conoscenze di Access...che versione usi?
3) Ripostare mettendo un subject (oggetto) significato del problema (nel tuo
caso: inserire immagine)
Ciao Daniele


title: Dati da importare ed esportare in tabella con pulsante

author: Simone B

text:
Salve a tutti,
questa che vi vado a chidere è per tutti voi una banalità suppongo solo che
non avendola mai fatta preferirei avere qualche suggerimento prima di
eseguirla.
Ho un DB con una tabella chiamata Prodotti con alcuni campi, questo DB viene
dato in sedi differenti ad alcuni utenti che vanno ad aggiungere i Prodotti
all'interno della tabella e settimana in settimana comunicano alla sede
principale i nuovi prodotti arrivati, la sede principale acquisisce i file
arrivati dalle sedi periferiche e li accoda alla tabella del DB generale.
Per fare questo vorrei rendere il + semplice possibile il lavoro degli
utenti (il mio problema è che non conosco VB e quindi devo fare tutto via
macro e codici predefiniti) ovvero vorrei che loro cliccando su di un
pulsante di una maschera generassero un file contenente la tabella, i
relativi dati registrati, inviassero questa tramite e.mail e al termine di
tutto ciò la tabella venisse svuotata per non inviare sempre gli stessi
dati.
Anche nella sede principale vorrei che ricevuta la mail e copiato il file in
una cartella apposita l'utente commissionato al lavoro cliccando su di un
pulsante avesse la possibilità di acquisire i dati e accodarli in automatico
all'interno della tabella Prodotti del DB generale e che al termine della
procedura il file venisse cancellato.
La mia tabella Prodotti ha i seguenti campi
IdProdotto
Codice
Categoria
Descrizione
Prezzo
DataInserimento
Come posso fare? Saluti SimoneB


title: Ancora report e pdf

author: NAo+

text:
Ciao neswsgroup, scusate ma non riesco ancora ad esportare i miei report in
pdf.
Allora usa office 2000, ed ho anche installato acrobat writer 4.0
Il mio scopo è :
Ho un database che contiene informazioni relative a pezzi meccanici,
filtrando i dati mi trovo una serie di record contenenti diverse info, es
nome pezzo numero archivio e la fotografia (utilizzando il metodo da voi
consigliatomi, cioè quello che passa il nome dell'immaggine alla proprietà
picture).
A questo punto ho i 50 record che mi interessano, io vorrei creare per ogni
record un report, ed esportarlo in pdf.
L'ideale sarebbe (secondo me che non conosco molto di access):
record 1  ->    genera report   ->       esporta report in pdf   -> chiudi
report   ->  record 2  ->    genera report   ->       esporta report in
f   -> chiudi report
e cosi via per tutti i miei 50 o 60 o 20 record che ho ricavato dalla query.
Come posso fare?
Grazie anticipatamente Nadir


title: Ancora report e pdf

author: Matteo Palmieri

text:
"NAo+" <
naon...@inwind.it
> ha scritto nel messaggio
news:b1ir9.39779$RO.9...@twister1.libero.it...
> Come posso fare?
Se ti interessa posso inviarti (in mail, qui non si può) una serie di moduli
da importare nella tua applicazione che ti permettono di creare
automaticamente dei PDF.
Requisiti:
Acrobat 4.0
Windows 98 o sup. (con 95 ho avuto dei problemi, ma ho testato poco)
--
Matteo Palmieri
Cybercreations -
www.cybercreations.it


title: Ancora report e pdf

text:
Certo, te ne sarei grato, se riesci/vuoi mandarmi anche qualche spiegazioni
di come usarli, ti ringrazio doppiamente
Grazie ciao NAdir
"Matteo Palmieri" <
matteo....@cybercreations.it
> ha scritto nel
messaggio news:aokb60$mk7$1...@serv1.albacom.net...



title: Ancora report e pdf

author: Emyr

text:
On Wed, 16 Oct 2002 20:31:04 +0200, "Matteo Palmieri"
<
matteo....@cybercreations.it
> wrote:
>"NAo+" <
naon...@inwind.it
> ha scritto nel messaggio
>news:b1ir9.39779$RO.9...@twister1.libero.it...
>
>> Come posso fare?
>
>
>Se ti interessa posso inviarti (in mail, qui non si può) una serie di moduli
>da importare nella tua applicazione che ti permettono di creare
>automaticamente dei PDF.
>
>Requisiti:
>Acrobat 4.0
>Windows 98 o sup. (con 95 ho avuto dei problemi, ma ho testato poco)
potresti spedirli anche al
sitocomune.com
 ?
Saluti.
Emanuele.


title: Ancora report e pdf

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:2ljsqukuln4icdarc...@4ax.com...
> potresti spedirli anche al
sitocomune.com
 ?
> Saluti.
> Emanuele.
Volentieri. Aspetterei però di rifinire un po' il tutto... adesso come
adesso ci sono ancora un po' di cose troppo farraginose da configurare.



title: esportare report in RTF

author: Nicola

text:
ciao a tutti
nel mio ormai famoso db di gestione ordini-articoli, ho creato una maschera
in cui inserisco i dati relativi all'azienda che effettua l'ordine, e questi
dati vanno a compilare il report con l'ordine.
nella stessa maschera ho i pulsanti che mi permettono di vedere e stampare
il report e 1 che mi consente di salvare su disco il report in formato rtf.
quello che voglio sapere è:
come faccio a salvare il suddetto file con il nome: nomeazienda_data?
ho provato a inserire nella riga vb dell'esportazione, nella parte che
riguarda il nome: c:\ordini\" &azienda & "_" & now() & ".rtf" ma non
funge...
NB: azienda è una casella di testo non associata.
come dovrei cambiare il valore per ottenere il salvataggio corretto???
Grazie 1k a tutti
Nicola


title: esportare report in RTF

author: Maurizio Borrelli

text:
> "Nicola" [...]:
> nel mio ormai famoso db di gestione ordini-articoli,
    Ehm... Fossi in te non conterei troppo sulla permanenza di questo tipo
di informazioni nella memoria di noi niusgruppari: si legge in fretta, si
tende a ricordare la soluzione, piu' che il "problema"... ;-)
> ho creato una maschera
> in cui inserisco i dati relativi all'azienda che effettua l'ordine, e
> questi dati vanno a compilare il report con l'ordine.
> nella stessa maschera ho i pulsanti che mi permettono di vedere e stampare
> il report e 1 che mi consente di salvare su disco il report in formato
> rtf.
> quello che voglio sapere è:
> come faccio a salvare il suddetto file con il nome: nomeazienda_data?
> ho provato a inserire nella riga vb dell'esportazione, nella parte che
> riguarda il nome: c:\ordini\" &azienda & "_" & now() & ".rtf" ma non
> funge...
> NB: azienda è una casella di testo non associata.
> come dovrei cambiare il valore per ottenere il salvataggio corretto???
        Dim sPercorsoNomeFile As String
        sPercorsoNomeFile _
          = Chr$(34) _
          & "c:\ordini\" _
          & Me.azienda.Value & "_" _
          & Format$(Now, "yyyymmddhhnn") _
          & ".rtf" _
          & Chr$(34)
        OUTPUT (Me.azienda.Value="Pippo"):
        "c:\ordini\Pippo_200209190407.rtf"
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: esportare report in RTF

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ambcek$499sj$2...@ID-52090.news.dfncis.de...

ok! mi hai fatto capire che il mio DB, nonostante abbia inviato 23423432 3d
non è famoso :-)
adesso proverò il tuo consiglio e poi ti faccio sapere.
PS: una curiosità!
a che corrisponde CHR$(34)???
Nicola


title: esportare report in RTF

author: Fabrizio

text:
>cut
>
>PS: una curiosità!
>a che corrisponde CHR$(34)???
>
>Nicola
>

Help in linea cerca 'Funzione Chr' poi guarda 'Vedere anche' ( in alto
a sinistra sotto il titolo ) --> Set di caratteri.
Ciao. Fabrizio


title: Elaborazione in corso

author: Maurizio

text:
Salve a tutti del Ng. Ho un problemino banale che non riesco
a risolvere.
Da una maschera "A" cliccando su un pulsante eseguo del codice che
impiega un certo tempo ad essere eseguito.
Voglio che l'utente venga avvisato da una maschera con un messaggio che c'e'
una elaborazione in corso.
Se uso la clessidra va tutto bene, nel senso che prima che venga
eseguito il codice, mi compare la clessidra ed alla fine dell'elaborazione
la clessidra scompare.
Preferirei pero' una maschera con messaggio anziche' la clessidra.
Ho provato in questo modo, ma mentre si esegue il codice, la maschera mostra
solo il bordo ed in trasparenza mi fa vedere cosa c'e' sotto, ma nulla nel
corpo.
Alla fine dell'elaborazione la maschera scompare, ma l'utente non ha visto
alcun messaggio.
Non vorrei mettere il codice nella maschera che mostra il messaggio.
Private Sub Button_Click()
' DoCmd.Hourglass True -- come avevo fatto prima

    DoCmd.OpenForm "banner"
    .... Codice
    DoCmd.Close acForm, "banner"

'DoCmd.Hourglass False -- come avevo fatto prima
End Sub
Se c'e' un altro modo, altrimenti faccio un modulo e poi lo
lancio su caricamento della maschera che contiene il messaggio".
Un grazie anticipato a tutti
Ciao
maurizio.


title: Elaborazione in corso

author: Pablitomf

text:
Maurizio ha scritto:
> Se c'e' un altro modo, altrimenti faccio un modulo e poi lo
> lancio su caricamento della maschera che contiene il messaggio".
Ciao Maurě... bhč un altro modo ci sarebbe, ma mica uno solo... uno č per
esempio evitare una seconda maschera e utilizzarne solo una, quella
principale... potresti aggiungere un Etichetta "ELABORAZIONE IN CORSO" che
rendi visibile all'inizio del codice e invisibile alla sua fine... ovvio
che durante il processo ti conviene bloccare la form per poi sbloccarla
alla fine, almeno all'utente anche se gli gira storto non puň svolgere
nessun operazione durante l'esecuzione.
Fammi sapere.
--
Pablitomf
Lentamente muore chi abbandona un progetto prima di iniziarlo, chi non fa
domande sugli argomenti che non conosce, chi non risponde quando gli
chiedono qualcosa che conosce. (P.Neruda)
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Elaborazione in corso

text:
Pablitomf ha scritto:
> Maurizio ha scritto:
> > Se c'e' un altro modo, altrimenti faccio un modulo e poi lo
> > lancio su caricamento della maschera che contiene il messaggio".
> Ciao Maurě... bhč un altro modo ci sarebbe, ma mica uno solo... uno č per
> esempio evitare una seconda maschera e utilizzarne solo una, quella
> principale... potresti aggiungere un Etichetta "ELABORAZIONE IN CORSO" che
> rendi visibile all'inizio del codice e invisibile alla sua fine... ovvio
> che durante il processo ti conviene bloccare la form per poi sbloccarla
> alla fine, almeno all'utente anche se gli gira storto non puň svolgere
> nessun operazione durante l'esecuzione.
> Fammi sapere.
OPS!!! ti ho risposto, ma ora guardo il Subject del tuo post e vedo che
non č poi molto significativo rispetto alla richiesta fatta... la prossima
volta sii piů specifico.



title: Elaborazione in corso

author: Maurizio Montanari

text:
"Pablitomf" <
pabl...@virgilio.it
> wrote in message
news:ca9ais$2et$
1...@news.newsland.it
> Maurizio ha scritto:
>
> > Se c'e' un altro modo, altrimenti faccio un modulo e poi lo
> > lancio su caricamento della maschera che contiene il messaggio".
>
> Ciao Maurě... bhč un altro modo ci sarebbe, ma mica uno solo... uno č per
> esempio evitare una seconda maschera e utilizzarne solo una, quella
> principale... potresti aggiungere un Etichetta "ELABORAZIONE IN CORSO" che
> rendi visibile all'inizio del codice e invisibile alla sua fine... ovvio
> che durante il processo ti conviene bloccare la form per poi sbloccarla
> alla fine, almeno all'utente anche se gli gira storto non puň svolgere
> nessun operazione durante l'esecuzione.
>
> Fammi sapere.
Grazie, ma non si vede nulla, nel senso che anche se metto come codice
di prova
un paio di loops e prima di questi, form_maschera.etichetta.visible =
true
e poi alla fine del codice form_maschera.etichetta.visible = false
e' come se le 2 istruzioni relative a visible (true e false) venissero
eseguite
entrambe in fondo al codice e non una prima ed una dopo ....
Grazie
maurizio.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Elaborazione in corso

text:
"Pablitomf" <
pabl...@virgilio.it
> wrote in message
news:ca9ais$2et$
1...@news.newsland.it
> Maurizio ha scritto:
>
> > Se c'e' un altro modo, altrimenti faccio un modulo e poi lo
> > lancio su caricamento della maschera che contiene il messaggio".
>
> Ciao Maurě... bhč un altro modo ci sarebbe, ma mica uno solo... uno č per
> esempio evitare una seconda maschera e utilizzarne solo una, quella
> principale... potresti aggiungere un Etichetta "ELABORAZIONE IN CORSO" che
> rendi visibile all'inizio del codice e invisibile alla sua fine... ovvio
> che durante il processo ti conviene bloccare la form per poi sbloccarla
> alla fine, almeno all'utente anche se gli gira storto non puň svolgere
> nessun operazione durante l'esecuzione.
>
> Fammi sapere.
Ho fatto la seguente prova
'---
    DoCmd.Hourglass True

    Me.ELAB.Visible = True
    For i = 0 To 32766 ' PROVA
          For j = 0 To 5000
          Next j
    Next i

    DoCmd.Hourglass False
    MsgBox "FATTO"

    Me.ELAB.Visible = False
Ottengo nell'ordine:
1) - Clessidra ON 2) - Attesa dei fine loops 3) - Comparsa del messaggio
4) - Clessidra OFF 5) - Msgbox "FATTO" 6) - Scomparsa del messaggio
Invece dovrei ottenere 1,3,2,4,5,6
Ciao



title: Elaborazione in corso

text:
Maurizio Montanari ha scritto:
> 1) - Clessidra ON 2) - Attesa dei fine loops 3) - Comparsa del messaggio
> 4) - Clessidra OFF 5) - Msgbox "FATTO" 6) - Scomparsa del messaggio
> Invece dovrei ottenere 1,3,2,4,5,6
Prova un pò...
Dim I As Integer
Dim j As Integer
DoCmd.Hourglass True
Me.elab.Visible = True
DoEvents
Me.Form.Requery
For I = 0 To 32766 ' PROVA
For j = 0 To 5000
Next j
Next I
DoCmd.Hourglass False
MsgBox "FATTO"
Me.elab.Visible = False



title: Elaborazione in corso

text:
"Pablitomf" <
pabl...@virgilio.it
> wrote in message
news:ca9kcj$gh9$
1...@news.newsland.it
Grazie, FUNZIONA perfettamente. Ho letto nell'help il significato
di DoEvents.



title: Elaborazione in corso

author: giorgio

text:
E' possibile utilizzare il codice  da Te scritto per più pulsanti, senza
inserirlo nel codice di ognuno ?
[cut]



title: Elaborazione in corso

text:
giorgio ha scritto:

> [cut]

Un Appunto!!!! Scrivi sempre dopo il Quoting (ovvero dopo il messaggio al
quale rispondi), altrimenti BACCHETTATE.
Cmq, si è possibile, lo rendi Modulo e lo richiami su ogni pulsante.



title: Elaborazione in corso

text:
"Pablitomf" <
pabl...@virgilio.it
> wrote in message
news:cabvi5$hef$1...@news.newsland.it...
> giorgio ha scritto:
>
> > E' possibile utilizzare il codice  da Te scritto per piů pulsanti, senza
> > inserirlo nel codice di ognuno ?
>
> > [cut]
>
> > > Dim I As Integer
> > > Dim j As Integer
> > >
> > > DoCmd.Hourglass True
> > >
> > > Me.elab.Visible = True
> > > DoEvents
> > > Me.Form.Requery
> > >
> > > For I = 0 To 32766 ' PROVA
> > > For j = 0 To 5000
> > > Next j
> > > Next I
> > >
> > > DoCmd.Hourglass False
> > > MsgBox "FATTO"
> > >
> > > Me.elab.Visible = False
> > >
> > >
> > > --
> > > Pablitomf
>
> Un Appunto!!!! Scrivi sempre dopo il Quoting (ovvero dopo il messaggio al
> quale rispondi), altrimenti BACCHETTATE.
>
> Cmq, si č possibile, lo rendi Modulo e lo richiami su ogni pulsante.
>
> --
> Pablitomf
>
> Lentamente muore chi abbandona un progetto prima di iniziarlo, chi non fa
> domande sugli argomenti che non conosce, chi non risponde quando gli
> chiedono qualcosa che conosce. (P.Neruda)
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>
Scusami.Rispondo sempre cosě, ma nel caso specifico ho ritenuto importante
conservare solo il riferimento e ho tagliato sopra e sotto incollando male.
Creando un modulo ok.
Quello che no ho mai fatto č il richiamo nel tasto, cosa devo scrivere ?
grazie
es tasto
Private Sub Command10_Click()
On Error GoTo Err_Command17_Click
    Dim stDocName As String
    stDocName = "ResultC"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
Exit_Command10_Click:
    Exit Sub
Err_Command10_Click:
    MsgBox Err.Description
    Resume Exit_Command10_Click
  End Sub


title: Elaborazione in corso

text:
giorgio ha scritto:
> Scusami.
Perdonato.
> Quello che no ho mai fatto è il richiamo nel tasto, cosa devo scrivere ?
cerca nell'Help l'oggetto "Call"
Se non riesci fammi sapere.



title: Elaborazione in corso

text:
"Pablitomf" <
pabl...@virgilio.it
> wrote in message
news:cacaql$i26$1...@news.newsland.it...

Mi dà errori vari, me , variabile...
Non saprei, se lo metto nel pulsante funziona perfettamente.
grazie


title: Elaborazione in corso

text:
giorgio ha scritto:
> Mi dà errori vari, me , variabile...
> Non saprei, se lo metto nel pulsante funziona perfettamente.
> grazie
Non puoi usare Me. ,questo è un comando "diretto" su un controllo
associato a una form... devi rendere tutto il codice esterno...
Se non hai capito, "dimmi" dei nomi delle form, dei campi, del codice che
usi sul pulsante e del modulo creato.



title: Elaborazione in corso

text:
"Pablitomf" <
pabl...@virgilio.it
> wrote in message
news:cach7g$vff$1...@news.newsland.it...

I pulsanti vanno dall1 al 10 vedi sopra ,eseguono delle query, il form si
chiama pannellocomandi, modulo1, funzione elabora ().
grazie


title: Elaborazione in corso

text:
giorgio ha scritto:
> I pulsanti vanno dall1 al 10 vedi sopra ,eseguono delle query, il form si
> chiama pannellocomandi, modulo1, funzione elabora ().
Bene.
Per i pulsanti, sull'evento clik usi il Call elabora()
Nella funzione elabora non usare riferimenti diretti a campi della form
pannellocomandi (Es. Me.[Tuo_Campo]), ma usane di esterni che raggiungono
comunque i campi su cui devi operare nella form (Es.
Forms![pannellocomandi]![Tuo_Campo] )
Chiaro?
Se non lo è dillo pure, ma a questo punto riportami il codice della
funzione elabora()



title: Elaborazione in corso

text:
"Pablitomf" <
pabl...@virgilio.it
> wrote in message
news:cacin2$gp4$1...@news.newsland.it...

Public Function Elabora()
Dim I As Integer
Dim j As Integer
DoCmd.Hourglass True
Forms![pannellocomandi]!elab.Visible = True
DoEvents
Forms![pannellocomandi]!Requery
For I = 0 To 500 ' PROVA
For j = 0 To 500
Next j
Next I
DoCmd.Hourglass False
MsgBox "FATTO ELABORAZIONE TERMINATA"
Forms![pannellocomandi]!elab.Visible = False
End Function


title: Elaborazione in corso

text:
giorgio ha scritto:
ERRORINO....
> Public Function Elabora()
> Dim I As Integer
> Dim j As Integer
> DoCmd.Hourglass True
> Forms![pannellocomandi]!elab.Visible = True
> DoEvents
> Forms![pannellocomandi]!Requery
> For I = 0 To 500 ' PROVA
> For j = 0 To 500
> Next j
> Next I
> DoCmd.Hourglass False
> MsgBox "FATTO ELABORAZIONE TERMINATA"
> Forms![pannellocomandi]!elab.Visible = False
> End Function
Public Function Elabora()
Dim I As Integer
Dim j As Integer
DoCmd.Hourglass True
Forms![pannellocomandi]!elab.Visible = True
DoEvents
Forms![pannellocomandi].Requery 'QUESTO E' L'ERRORE
For I = 0 To 500 ' PROVA
For j = 0 To 500
Next j
Next I
DoCmd.Hourglass False
MsgBox "FATTO ELABORAZIONE TERMINATA"
Forms![pannellocomandi]!elab.Visible = False
End Function
Fammi sapere



title: Elaborazione in corso

text:
DETTAGLIO:
"Pablitomf" <
pabl...@virgilio.it
> wrote in message
news:cam72a$cnn$1...@news.newsland.it...

La funzione ...Funziona, ma la uso attraverso i pulsanti per lanciare le
rispettive query (i pulsanti sono piů di uno)  "elaborazione in corso", che
hanno  dei tempi variabili di esecuzione.. Dettaglio: ora bisognerebbe fare
in modo che il msg "FATTO ELABORAZIONE TERMINATA "comparisse alla fine
dell'elaborazione e non come ora subito e una volta schiacciato ok parte
l'elaborazione della query .
Grazie


title: Elaborazione in corso

text:
giorgio ha scritto:
> > Public Function Elabora()
> > Dim I As Integer
> > Dim j As Integer
> > DoCmd.Hourglass True
> > Forms![pannellocomandi]!elab.Visible = True
> > DoEvents
> > Forms![pannellocomandi].Requery 'QUESTO E' L'ERRORE
> > For I = 0 To 500 ' PROVA
> > For j = 0 To 500
> > Next j
> > Next I
> > DoCmd.Hourglass False
> > MsgBox "FATTO ELABORAZIONE TERMINATA"
> > Forms![pannellocomandi]!elab.Visible = False
> > End Function
> La funzione ...Funziona, ma la uso attraverso i pulsanti per lanciare le
> rispettive query (i pulsanti sono piů di uno)  "elaborazione in corso", che
> hanno  dei tempi variabili di esecuzione.. Dettaglio: ora bisognerebbe fare
> in modo che il msg "FATTO ELABORAZIONE TERMINATA "comparisse alla fine
> dell'elaborazione e non come ora subito e una volta schiacciato ok parte
> l'elaborazione della query .
> Grazie
Sposta il MsgBox "FATTO ELABORAZIONE TERMINATA" e la visualizzazione
riposta a False di elab dalla Funzione all'evento clik del pulsante dopo
aver lanciato la query e dopo aver messo un bel (se non 2) DoEvents.
Tipo cosě (Clik pulsante)
Call Elabora
DoCmd.SetWarnings False
DoCmd.OpenQuery "Tua_query"
DoCmd.SetWarnings True
MsgBox "FATTO ELABORAZIONE TERMINATA"
elab.Visible = False
Ovviamente poi ricordati di eliminarlo dalla funzione Elabora.
Mň ti piace? funge?



title: Elaborazione in corso

text:
"Pablitomf" <
pabl...@virgilio.it
> wrote in message
news:camfpp$c24$1...@news.newsland.it...

Assai, yes.


title: Archivio documenti con Access

author: Zax

text:
Ho diversi file Word. Nel loro interno contengono informazioni su diversi
prodotti. Vorrei realizzare un "motore di ricerca" in access che mi dia la
possibilità di individuare il file o i file che contengano specifiche sul
prodotto. Magari con una maschera che mi elenca i file e mi dia la
possibilità di di aprirli proprio nel paragrafo dove è l'informazione
(evidenziando in un altro colore il periodo del paragrafo).
Se è possibile realizzare ciò, datemi qualche suggerimento e su cosa dovrei
orientarmi.
Grazie a tutti.


title: Archivio documenti con Access

author: Alessandro Baraldi

text:
"Zax" <
zz...@zzz.com
> wrote in message
news:5toOc.22806$
OH4.5...@twister1.libero.it

Quello che chiedi è l'insieme di MOLTE cose, e come tale vanno
sviluppate
in modo settoriale avendo un'idea dell'obiettivo finale.
Su questo sito nella sezione DownLoad trovi ARCHIDOC
http://www.mantuanet.it/alessandro.baraldi/
Non sviluppa tutti i tuoi concetti ovviamente ma può essere
uno spunto per iniziare a strutturare l'anima del progetto.
Ciao.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Archivio documenti con Access

author: Sergio MAZZA

text:
"Zax" <
zz...@zzz.com
> ha scritto nel messaggio news:5toOc.22806$OH4.5...@twister1.libero.it...
> Ho diversi file Word. Nel loro interno contengono informazioni su diversi
> prodotti. Vorrei realizzare un "motore di ricerca" in access che mi dia la
> possibilitŕ di individuare il file o i file che contengano specifiche sul
> prodotto. Magari con una maschera che mi elenca i file e mi dia la
> possibilitŕ di di aprirli proprio nel paragrafo dove č l'informazione
> (evidenziando in un altro colore il periodo del paragrafo).
>
> Se č possibile realizzare ciň, datemi qualche suggerimento e su cosa dovrei
> orientarmi.
>
> Grazie a tutti.
Cosa devi studiare te l'ha indicato Alessandro Baraldi; io ho pezzi di codice:
Questo codice č per cercare il documento che contiene una frase:
'----------------
Dim i As Integer
With FileSearch
    .NewSearch
    .LookIn = "C:\"
    .SearchSubFolders = True '<-- occhio che cerca in tutte lo sottocartella
    .TextOrProperty = "Frase da cercare"
    .MatchTextExactly = True
'trova tutti i tipi di file word
    .FileType = msoFileTypeWordDocuments
    If .Execute() > 0 Then
        Debug.Print "Trovati " & .FoundFiles.Count & " file"
        For i = 1 To .FoundFiles.Count
            Debug.Print .FoundFiles(i) '<-- nomi file trovati
        Next i
    Else
        MsgBox "Nessun file trovato"
    End If
End With
'----------------
Quest'altro apre un documento word e cerca una frase:
'----------------
Dim oApp As Word.Application
Dim oRange As Word.Range
Set oApp = CreateObject("Word.application")
oApp.Documents.Open "c:\documenti\nomeFile.doc"
Set oRange = oApp.Documents(1).Content
With oRange.Find
    .Text = "frase da cercare"
    .Execute
End With
If oRange.Find.Found Then
    MsgBox "Trovato."
    oRange.Select
Else
    MsgBox "non trovato."
End If
oApp.Visible = True
oApp.Activate
'----------------
Ora assembla il tutto e... Alla via cosě!
Ciao.
--
Sergio MAZZA


title: Archivio documenti con Access

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cedbi2$ptj$1...@canarie.caspur.it...
> "Zax" <
zz...@zzz.com
> ha scritto nel messaggio
news:5toOc.22806$OH4.5...@twister1.libero.it...
> > Ho diversi file Word. Nel loro interno contengono informazioni su
diversi
> > prodotti. Vorrei realizzare un "motore di ricerca" in access che mi dia
la
> > possibilità di individuare il file o i file che contengano specifiche
sul
> > prodotto. Magari con una maschera che mi elenca i file e mi dia la
> > possibilità di di aprirli proprio nel paragrafo dove è l'informazione
> > (evidenziando in un altro colore il periodo del paragrafo).
> >
> > Se è possibile realizzare ciò, datemi qualche suggerimento e su cosa
dovrei
> > orientarmi.
> >
> > Grazie a tutti.
>
> Cosa devi studiare te l'ha indicato Alessandro Baraldi; io ho pezzi di
codice:
>
> Questo codice è per cercare il documento che contiene una frase:

> Ora assembla il tutto e... Alla via così!
>
> Ciao.
>
> --
> Sergio MAZZA
>
>
Grazie! per l'aiuto.


title: Archivio documenti con Access

text:
>
> Questo codice è per cercare il documento che contiene una frase:
> '----------------
> Dim i As Integer
> With FileSearch
>     .NewSearch
>     .LookIn = "C:\"
>     .SearchSubFolders = True '<-- occhio che cerca in tutte lo
sottocartella
>     .TextOrProperty = "Frase da cercare"
>     .MatchTextExactly = True
> 'trova tutti i tipi di file word
>    .FileType = msoFileTypeWordDocuments
>     If .Execute() > 0 Then
>         Debug.Print "Trovati " & .FoundFiles.Count & " file"
>         For i = 1 To .FoundFiles.Count
>             Debug.Print .FoundFiles(i) '<-- nomi file trovati
>         Next i
>     Else
>         MsgBox "Nessun file trovato"
>     End If
> End With
> '----------------
>
Ho utilizzato il codice mettendolo in un pulsante di comando, ho messo una
parola nella proprietà ".TextOrProperty = " racchiusa da virgolette.
Ma mi siblocca lesecuzione della routine sul:
".FileType = msoFileTypeWordDocuments"
perchè?


title: Archivio documenti con Access

text:
"Zax" <
zz...@zzz.com
> ha scritto nel messaggio news:ZOrOc.23104$OH4.5...@twister1.libero.it...
>
> Ho utilizzato il codice mettendolo in un pulsante di comando, ho messo una
> parola nella proprietŕ ".TextOrProperty = " racchiusa da virgolette.
>
> Ma mi siblocca lesecuzione della routine sul:
> ".FileType = msoFileTypeWordDocuments"
> perchč?
Forse manca qualche riferimento nelle librerie; comunque utilizza il valore della constante invece del nome:
msoFileTypeWordDocuments = 3
msoFileTypeTemplates = 8
msoFileTypePowerPointPresentations = 5
msoFileTypeOfficeFiles = 2
msoFileTypeExcelWorkbooks = 4
msoFileTypeDatabases = 7
msoFileTypeBinders = 6
msoFileTypeAllFiles = 1
Ciao.
--
Sergio MAZZA


title: Archivio documenti con Access

text:
>
> Forse manca qualche riferimento nelle librerie; comunque utilizza il
valore della constante invece del nome:
> msoFileTypeWordDocuments = 3
> msoFileTypeTemplates = 8
> msoFileTypePowerPointPresentations = 5
> msoFileTypeOfficeFiles = 2
> msoFileTypeExcelWorkbooks = 4
> msoFileTypeDatabases = 7
> msoFileTypeBinders = 6
> msoFileTypeAllFiles = 1
>
> Ciao.
>
> --
> Sergio MAZZA
>
Ok non mi da più l'errore. Ma sembra che questa fase non funzioni bene:
If .Execute() > 0 Then
        Debug.Print "Trovati " & .FoundFiles.Count & " file"
        For i = 1 To .FoundFiles.Count
            Debug.Print .FoundFiles(i) '<-- nomi file trovati
       MsgBox " print "
        Next i
    Else
Non dovrebbe comparire a video un elenco? C'è da dire che ofatto delle prove
on un file quando la parola nel file è presente non succede niente. Quando
non è presente mi comare: "Nessun file trovato"


title: Archivio documenti con Access

text:
"Zax" <
zz...@zzz.com
> ha scritto nel messaggio news:1lsOc.20959$1V3.4...@twister2.libero.it...
> Ok non mi da più l'errore. Ma sembra che questa fase non funzioni bene:
> If .Execute() > 0 Then
>         Debug.Print "Trovati " & .FoundFiles.Count & " file"
>         For i = 1 To .FoundFiles.Count
>             Debug.Print .FoundFiles(i) '<-- nomi file trovati
>        MsgBox " print "
>         Next i
>     Else
>
> Non dovrebbe comparire a video un elenco? C'è da dire che ofatto delle prove
> on un file quando la parola nel file è presente non succede niente. Quando
> non è presente mi comare: "Nessun file trovato"
Il Debug.Print visualizza l'echo nella finestra di debug; aprila e poi fai girare la routine, vedi lì il risultato...
Ciao.
--
Sergio MAZZA


title: Archivio documenti con Access

text:
> Il Debug.Print visualizza l'echo nella finestra di debug; aprila e poi fai
girare la routine, vedi lě il risultato...
>
> Ciao.
>
> --
> Sergio MAZZA
>
Scusa la mia domanda, ma come si apre la finestra di debug?
Ciao.


title: Archivio documenti con Access

text:
"Zax" <
zz...@zzz.com
> ha scritto nel messaggio news:9TsOc.23214$OH4.5...@twister1.libero.it...

Apri/crea un modulo, menů Visualizza - Finestra Debug...
Ciao.
--
Sergio MAZZA


title: Somma campi in tabelle

author: Albert

text:
Salve,
Mi trovo nella impossibilità a continuare lo sviluppo della mia applicazione
in Access in quanto non riesco ad attuare una somma tra delle tabelle:
La mia applicazione serve a registrare le attività della mia ditta
(consulente contabile) con i clienti.
Mi trovo quindi con una tabella clienti, una impiegati e una attività...
Ho bisogno di sommare le ore che fa un impiegato con un dato cliente in una
certa data...So che mettendo sulla query sui parametri un campo tra [ ] mi
viene richiesto il dato su cui voglio fare la ricerca, ma per fare poi la
somma della colonna ore della query come posso fare?
Grazie
Alberto


title: Somma campi in tabelle

author: LaLo

text:
"Albert" <
al...@alba.com
> ha scritto nel messaggio
news:72f66.12957$FF1.9...@twister1.tin.it...

Prova a spuntare la voce di menu, Visualizza -> Totali e poni la formula
'Somma' sul campo ore.
Ciao
LaLo


title: Stampare numerazione incrementata

author: Happy

text:
Ciao a tutti,
dovrei stampare delle cartoline postali con un numero in sequenza.
Occorre anzitutto inserire il numero iniziale che è composto da 11 cifre es:
09853722005 (che si trova negli adesivi distribuiti dalle poste);
a questo punto con un pulsante di duplicazione pigio ad esempio 10 volte
creando 10 records con il numero incrementato via via di 1 per poi inserire
10 cartoline una alla volta ottenendo la stampigliatura di tali numeri.
Non ci sono problemi sulla procedura salvo che non so come fare ad inserire
il primo numero di partenza magari con lo zero davanti.
Sono certo di potere contare sulla genialità degli amici del ng.
Grazie in anticipo
Antonio


title: Stampare numerazione incrementata

author: ciroteo

text:
"Happy" <
nibb...@tin.it
> ha scritto nel messaggio
news:hXbub.45940$hV.17...@news2.tin.it...
> Ciao a tutti,
> dovrei stampare delle cartoline postali con un numero in sequenza.
> Occorre anzitutto inserire il numero iniziale che č composto da 11 cifre
es:
> 09853722005 (che si trova negli adesivi distribuiti dalle poste);
> a questo punto con un pulsante di duplicazione pigio ad esempio 10 volte
> creando 10 records con il numero incrementato via via di 1 per poi
inserire
> 10 cartoline una alla volta ottenendo la stampigliatura di tali numeri.
> Non ci sono problemi sulla procedura salvo che non so come fare ad
inserire
> il primo numero di partenza magari con lo zero davanti.
> Sono certo di potere contare sulla genialitŕ degli amici del ng.
> Grazie in anticipo
> Antonio
>
>
Credo che se tu vuoi lo zero davanti il campo deve essere di tipo testo e
non numerico ...
per avere un formato specifico del numero potresti crearti un'apposita
maschera di input ...


title: Stampare numerazione incrementata

author: Antonio Biso

text:
"Happy" <
nibb...@tin.it
> ha scritto nel messaggio
news:hXbub.45940$hV.17...@news2.tin.it...
> Ciao a tutti,
> dovrei stampare delle cartoline postali con un numero in sequenza.
> Occorre anzitutto inserire il numero iniziale che è composto da 11 cifre
es:
> 09853722005 (che si trova negli adesivi distribuiti dalle poste);
> a questo punto con un pulsante di duplicazione pigio ad esempio 10 volte
> creando 10 records con il numero incrementato via via di 1 per poi
inserire
> 10 cartoline una alla volta ottenendo la stampigliatura di tali numeri.
> Non ci sono problemi sulla procedura salvo che non so come fare ad
inserire
> il primo numero di partenza magari con lo zero davanti.
Non lo so neanch'io visto che non dici con che criterio lo dovresti
ricavare.
Per lo 0 davanti basta che fai
format(num,"00000000000")
Antonio


title: Stampare numerazione incrementata

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel
cut
scusa ma non mi sono accorto di averti scritto in privato
Antonio


title: sintassi per "un certo campo di una certa tabella relativo a un certo record ... " come si fa?

author: foice

text:
Ho provato le sintassi IDRecord.NomeTabella!NomeCampo e pure
NomeTabella!NomeCampo.IDRecord ma non va nessuna, mi sapete aiutare a
fare questa sintassi per la mia query di aggiornamento che deve
aggiornare il prezzo di un prodotto pescandolo nella tabella coi nuovi
prezzi?
Grazie a tutti.
PS
La sintassi è un argomento un po' bistrattato nella guida di access
non trovate? e pure in quella del VB, ma un po meno dopo che capisce
meglio come cercarci dentro ....
o sono io che non riesco a trovare la roba per access?


text:
"foice" <
fo...@tiscalinet.it
> ha scritto nel messaggio
news:is8pnv0jaru0s31g8...@4ax.com...
> Ho provato le sintassi IDRecord.NomeTabella!NomeCampo e pure
> NomeTabella!NomeCampo.IDRecord ma non va nessuna, mi sapete aiutare a
> fare questa sintassi per la mia query di aggiornamento che deve
> aggiornare il prezzo di un prodotto pescandolo nella tabella coi nuovi
> prezzi?
Devi fare una query di aggiornamento?
e allora lo fai con le query.
Prendi la tua tabella, ci metti il campo da aggiornare con sotto il valore
nuovo, poi prendi il campo ID e sotto, nei criteri ci metti l'ID voluto.
Fine.
> PS
> La sintassi è un argomento un po' bistrattato nella guida di access
> non trovate? e pure in quella del VB, ma un po meno dopo che capisce
> meglio come cercarci dentro ....
> o sono io che non riesco a trovare la roba per access?
Secondo me la seconda che hai detto.
Anche perchè quello che volevi fare c'entra poco con la sintassi visto che
non è codice ma caso mai SQL.
Se mi dici che a volte devi navigare molto per trovare quello che ti serve
magari ok, ma la sintassi c'è sempre, perfetta...
Antonio


text:
Questa è la SQL
UPDATE Prodotti INNER JOIN [Dettagli sugli ordini] ON
Prodotti.IDProdotto = [Dettagli sugli ordini].IDProdotto SET [Dettagli
sugli ordini].PrezzoUnitario = Prodotti!PrezzoUnitario;
e ora funziona!
era solo il caso di ragionare in termini semplici invece che fare un
casino ... grazie


title: Associare immagine di un prodotto ad uno specifico codice

author: Gorillaio

text:
Buongiorno!
Ho creato una tabella per la gestione delle
immagini,idfoto,contatore;Codice,testo;Path_foto,testo;note,testo.
Le immagini risiedono all'esterno de db,chiaramente per ragioni di
pesantezza del db stesso,memorizzo il percorso dell'immagine nel campo
Path_foto e la visualizzo,per poterle ricercare devo scorre
all'interno del record tutte le immagini.
Vengo alla domanda, vorrei poter cercare all'interno della maschera
associando il codice al percorso dll'immagne con una casella combinata.


author: MA

text:

Guarda la proprietà picture
me.TuaCOntrolloImg.picture = me.tuopath
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: invio mail con allegato da codice con windows mail di vista

author: Thomas

text:
Ciao,
qualcuno si è già scontrato con l'esigenza in oggetto?
Non ho nessun problema con Outlook Express (mapi) e con MS Outlook (COM)
ma con WindowsMail di Vista?
ciao, T.


text:
"Thomas" <
tho...@libero.it
> ha scritto nel messaggio
news:4821740d$0$40214$4faf...@reader5.news.tin.it...

C'è da vedere:
http://msdn.microsoft.com/en-us/library/ms709546(VS.85).aspx
Ciao.
--
Sergio MAZZA


title: CREARE MASTER DETAIL SU MASCHERA

text:
Salve a tutti RIFORMULO LA MIA DOMANDA,
Ho due tabelle:
1)"tb_Prodotti" che contiene i campi testo:
"NomeProdotto" (Chiave Primaria ), "Descrizione"
2)"tb_Dettaglio" che contiene i campi testo:
"NomeDettaglio", "idNomeProdotto"
queste sono legate da una relazione:
UNO("NomeProdotto") ----> MOLTI ("idNomeProdotto")
Quello che vorrei fare è questo:
Creare una maschera  in stile Master /Detail
contiene tutte le righe della tabella "tb_Prodotti".
Quindi cliccando sul imbolo + su ciascuna riga vedro il livello
inferiore cioè le righe di "tb_Dettaglio".
ps. non riesco ad adattare l'esempio che ho trovato su sito comune:
sez. FORM -- "3.83 Sfruttare le viste Master_Detail"
ho provato as adattarlo alla mia esigenza, cioè nella maschera master su
apertura ho messo:
********************************************************************
Private Sub Form_Open(Cancel As Integer)

       With Me![fr_Prodotti]

             !Dettaglio.SourceObject = "fr_dettagli"
             .Requery
       End With
End Sub
********************************************************************
!Dettaglio per esempio non ho capito a cosa si riferisce nell'esempio
della
faq.
Mi aiutate per favore??????
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: CREARE MASTER DETAIL SU MASCHERA

author: BFS

text:

perchè non provi ad usare l'autocomposizione delle maschere. quando ti
chiede l'origine dei dati specifichi le due tabelle e sarà access stesso
a proporti la creazione di una maschera master/detail
ciao
BFS


title: CREARE MASTER DETAIL SU MASCHERA

text:
BFS ha scritto:


> ciao
> BFS
Si questo lo so ma io volevo realizzare la stessa struttura della faq su
citata ma non mo ne vengo a capo, mi sapresti dare un input??



title: CREARE MASTER DETAIL SU MASCHERA

author: Geppo

text:
Ciao domy73 wrote:
---cut---
> Si questo lo so ma io volevo realizzare la stessa struttura della faq
> su citata ma non mo ne vengo a capo, mi sapresti dare un input??
Crea una form, all'interno mettici una subform collegata alla tabella
"tb_Prodotti"
ed all'interno della subform ne metti un'altra collegata alla tabella
"tb_Dettaglio",
poi scegli come visualizzazione predefinita "Foglio Dati" per la subform
collegata alla
"tb_Prodotti".
--
Ciao
Geppo


title: movefirst and move next

text:
Salve a tutti,
ho scritto questo codice per scaricare quella famosa scheda tecnica di cui
ai post di una settimana fa (finalmente mi son potuto dedicare _quasi_ sul
serio.
se è un solo articolo che deve lancire le due query fa bene che mi
aggiungono e aggiornano dei record ad un tbl: ma se sono più record non mi
restituisce nessun record.
credo che il problema sia nel passaggio al next. Dareste un occhiatina al
codice??
Grazie MAssimiliano
Private Sub Comando8_Click()
Dim rst As Dao.Recordset
Dim criterio, operazione
criterio = "select vendite.* from vendite where [Vendite]![rif_ricevuta] = "
& Me![id_velina_vendita]
Me.Elenco11.RowSource = criterio
Set rst = CurrentDb.OpenRecordset(criterio)
Do Until rst.EOF
rst.Edit
operazione = "accoda_temp"
DoCmd.OpenQuery operazione, acViewNormal, acEdit
operazione = "aggiorna_quantità"
DoCmd.OpenQuery operazione, acViewNormal, acEdit
rst.Update
rst.MoveNext
Loop
Set rst = Nothing
End Sub
--------------------------------
Inviato via
http://usenet.libero.it


title: movefirst and move next

author: Sib

text:
"MA" <
kk...@kksrl.com
> ha scritto nel messaggio
cut
> se è un solo articolo che deve lancire le due query fa bene che mi
> aggiungono e aggiornano dei record ad un tbl: ma se sono più record non mi
> restituisce nessun record.
???
> Private Sub Comando8_Click()
> Dim rst As Dao.Recordset
> Dim criterio, operazione
>
> criterio = "select vendite.* from vendite where [Vendite]![rif_ricevuta] =
"
> & Me![id_velina_vendita]
> Me.Elenco11.RowSource = criterio
---
 Me.Elenco11.Requery
---
> Set rst = CurrentDb.OpenRecordset(criterio)
>
> Do Until rst.EOF
> rst.Edit
> operazione = "accoda_temp"
> DoCmd.OpenQuery operazione, acViewNormal, acEdit
> operazione = "aggiorna_quantità"
> DoCmd.OpenQuery operazione, acViewNormal, acEdit
> rst.Update
> rst.MoveNext
Cosa dovrebbe fare questa parte di codice?
Sib


title: movefirst and move next

text:
> > se è un solo articolo che deve lancire le due query fa bene che mi
> > aggiungono e aggiornano dei record ad un tbl: ma se sono più record non
mi
> > restituisce nessun record.
> ???
ciao e anzitutto grazie per il tuo interessamento.
in buona sostanza io ho una normale distinta di vendita di alcuni articoli.
alcuni di questi articoli sono formati da alcuni componenti, altri sono
pezzi unitari. Se vendo 10 pezzi degli articoli composti dovrò scaricare le
quantità necessarie per comporlo per i 10 pezzi.
Dunque commento ciò credevo di fare
>
>
> > Private Sub Comando8_Click()
> > Dim rst As Dao.Recordset
> > Dim criterio, operazione
> >
> > criterio = "select vendite.* from vendite where [Vendite]![rif_ricevuta]
=
> "
> > & Me![id_velina_vendita]
mi scelgo i record che mi interessano da definire poi con rst (è un
passaggio in + che non crea problemi)
> > Me.Elenco11.RowSource = criterio
> ---
> Me.Elenco11.Requery
questo va bene ma è un di più che mi sono creato per vedere immediatamente
cosa mi sono aperto. Nella vers. definitiva scomparirà.
> ---
> > Set rst = CurrentDb.OpenRecordset(criterio)
apro il rst e qui ho dimenticato di riportare
rst.findfirst
> >
> > Do Until rst.EOF
> > rst.Edit
mi metto in modalità edit
> > operazione = "accoda_temp"
> > DoCmd.OpenQuery operazione, acViewNormal, acEdit
lancio una prima query che prende i dati della scheda tecnica filtrati per
il rst
> > operazione = "aggiorna_quantità"
> > DoCmd.OpenQuery operazione, acViewNormal, acEdit
lancio una seconda che moltiplica x i 10 pezzi
> > rst.Update
salvo il tutto
> > rst.MoveNext
>
Loop
poi vado in loop _anche questo l'avevo dimenticato di trascrivere =B-§
qui dovrei andare al prossimo record ma .... ciccia!!! :-(
Non va!!!

e poi dovrebbe passare al secondo recor di vendita
> Cosa dovrebbe fare questa parte di codice?
>
> Sib
>
Mi dici dove sbaglio (limitati solo al codice... ti prego!!!)
ciao MAssimiliano



title: movefirst and move next

text:
"MA" <
kk...@kksrl.com
> ha scritto nel messaggio
cut
> in buona sostanza io ho una normale distinta di vendita di alcuni
articoli.
> alcuni di questi articoli sono formati da alcuni componenti, altri sono
> pezzi unitari. Se vendo 10 pezzi degli articoli composti dovrò scaricare
le
> quantità necessarie per comporlo per i 10 pezzi.
Ora e' piu' chiaro.
cut
> > > Do Until rst.EOF
> > > rst.Edit
>
> mi metto in modalità edit
>
> > > operazione = "accoda_temp"
> > > DoCmd.OpenQuery operazione, acViewNormal, acEdit
>
> lancio una prima query che prende i dati della scheda tecnica filtrati per
> il rst
cut
L'esecuzione di query non richiede l'apertura del recordset con tanto di
metodo edit.
il metodo edit serve solo se devi lavorare sul recordset "manualmente".
In pratica hai unito due operazioni indipendenti.
o usi il recordset (con relativo metodo edit) per compilare da codice la
lista o prepari delle query da lanciare per eseguire l'operazione.
Sib


title: Ancora Report Scusate

author: Andrea

text:
Scusate ancora ma non riesco a venire a capo del problema.
Devo stampare su un foglio prestampato 18,8 cm di larghezza e 20,3 cm di
lunghezza, nei vari moduli di pagina previsti da Microsoft Access 97 non
esiste il modulo personalizzato, quindi non riesco ad ovviare al problema.
Preciso inoltre che il report contiene una Intestazione di Pagina, che deve
comparire all' inizio di ogni pagina, ed un sottoreport che contiene i dati
del corpo del documento.
Per favore aiutatemi, non so come risolvere il problema.
Grazie mille a tutti.
Andrea


title: Ancora Report Scusate

author: Federico Luciani

text:

Ti hanno gia' risposto nell'altro thread (ven 17.46).
Se la risposta non e' chiara, per favore, dillo in quel thread.
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: VENDO VCD GUNDAM

text:
Allora, si tratta dell'intera edizione in lingua italiana composta da  13 cd
con un totale di 39 puntate di Gundam. Le dimensioni in PIXEL sono 352x288x
(larghezza X altezza). Per visionare i cd è indispensabile
almeno Window 98 e naturalmente bisogna avere un cd-rom o un DVD. La qualità
audiovideo  è buona/ottima, in ogni caso
ho fatto molte copie e  nessuno si è mai lamentato. Per quanto riguarda i
prezzi, il costo di ogni cd sarebbe di 10000 perciò 13 x 10000 = 130000. La
spedione dipende da te, si può scegliere contrassegno postale che è il più
sicuro sia nei miei che nei tuoi confronti ma purtroppo è il più oneroso
costa infatti 20000 e naturalmente è a tuo carico. Se invece ti fidi puoi
mandarmi i soldi con un vaglia postale in anticipo ad un indirizzo che poi
ti dirò e io ti spedirò i cd in posta prioritaria e questo costa poche lire.
130000 potranno essere molte ma tieni conto che io per averle ho speso molto
di più e in giro in rete la stessa serie che ti offro  la paghi non meno di
230000  che secondo me è un furto. Spero di essermi spiegato correttamente,
in ogni caso aspetto di avere tue notizie .
Questi sono i titoli delle puntate:
VCD N.1
Ep.1 "Il grande Gundam" m
Ep.2 "Distruggete Gundam" m
Ep.3 "Il maggiore Scia attacca Gundam" m
VCD N.2
Ep.4 "Fuga su Luna Due" m
Ep.5 "Rientro sulla terra" m
Ep.6 "Garma contro Gundam" m
VCD N.3
Ep.7 "Peter Rei pilota il Core Fighter" m
Ep.8 "La battaglia del deserto salato" tf
Ep.9 "Gundam vola" tf
VCD N.4
Ep.10 "Garma muore!" taer
Ep.11 "Vendetta!" m
Ep.12 "La minaccia di Jion" m
VCD N.5
Ep.13 "Una bella notizia per Peter Rei" m
Ep.14 "Gundam è invincibile" m
Ep.15 "Una battaglia per Gundam" m
VCD N.6
Ep.16 "Seira guida Gundam" m
Ep.17 "Peter Rei abbandona Gundam" m
Ep.18 "L'arma segreta di Kirisha" m
VCD N.7
Ep.19 "Ramba Ral attacca!" m
Ep.20 "La rivincita di Peter Rei" m
Ep.21 "La vendetta di Hamon" m
VCD N.8
Ep.22 "Makube contro Gundam" m
Ep.23 "Senza tregua" m
Ep.24 "L'attacco dei Draghi Volanti" tc
VCD N.9
Ep.25 "Gundam:Operazione Odissea" m
Ep.26 "Il ritorno di Scia" tc
Ep.27 "Una spia sulla Base Bianca" tc (m)
VCD N.10
Ep.28 "Guerra sugli oceani" tc
Ep.29 "Agguato mortale" tc
Ep.31 "Gundam attacca!" tc
VCD N.11
Ep.32 "Assalto alla Base Bianca" tc
Ep.34 "Brava Flammet!" tc
Ep.35 "Una dura battaglia" tc
VCD N.12
Ep.36 "Lo spaventoso Big Zam" tc
Ep.37 "Gundam deve vincere" tc
Ep.38 "Gundam è invicibile" tc
VCD N.13
Ep.41 "I nemici di Gundam" telecity
Ep.42 "Bravo Gundam!" tc
Ep.43 "Nessuno è più forte di Gundam!" tc


title: Formattazione Condizionale nelle maschere continue

author: maurizio

text:
Ciao a tutti,
ho studiato e poi adattato alle mie esigenze la routine di Silvio Savoldi -
Lorenzo Coronati.
Nell'esempio scaricato vedo delle aste ([[[..[ ingrandite - 20 come
dimensione crt) colorate in sottofondo e in primo piano il valore. Penso che
sia il massimo si riesca (se potete darmene conferma vi sono grato).
L'ho applicato al mio problema. In una maschera continua che visualizza
l'elenco delle fatture e note credito legate al fornitore selezionato e mi
permette d'inserire i nuovi documenti; ho evidenziato in rosso solo la
scritta "nota credito"  (il solo controllo TipoDocumento che puo' contenere
la scritta "fattura" o "nota credito").
Questo controllo e' una combo (non so se puo' importare). Funziona
perfettamente !!Grazie a Silvio e a Lorenzo.
Credo d'avere applicato lo stesso sistema ad un'altra maschera e non riesco
a venirne fuori.In questo caso si tratta di una normale casella di testo
dove puo' esserci solo "FAT." o "N.C." e come prima, vorrei evidenziare in
rosso solo "N.C.". Sfasando i 2 controlli sovrapposti vedo la N.C. colorata
ma se li sovrappongo vedo solo FAT. o N.C. neri. Qualcuno mi puo' dire dove
sta la cavolata ? TIA.
Maurizio


title: Fw: caselle di controllo, records ecc.ecc.

author: norica

text:
----- Original Message -----
From: "norica" <
nor...@libero.it
>
To: <
it.comp.a...@mailgate.org
>
Sent: Sunday, June 17, 2001 2:12 AM
Subject: caselle di controllo, records ecc.ecc.
> Ho un problemino : ho una maschera basata su una tabella; su questa
tabella
> ci sono 2 caselle di controllo(tipo Sě/No) che si chiamano "Cliente" e
> "Fornitore" e che compaiono anche sulla maschera; vorrei che lo stato di
> queste caselle mi abiliti o meno l'uso di due pulsanti chiamati "Tariffe
> Cliente" e "Tariffe fornitore" ovvero:
> se č selezionata la casella "Fornitore" il pulsante "tariffe fornitore"
sia
> abilitato (mentre l'altro disabilitato)
> se č selezionata la casella "Cliente"    il pulsante "tariffe cliente"
> sia abilitato (mentre l'altro disabilitato)
> e sto discorso deve funzionare per tutti record presenti nella tabella
> quando mi sposto da un record all'altro nella maschera.
>
> GRAZIE MILLE.
>
> ah....dimenticavo....se sono selezionate ambedue le caselle, ambedue i
pulsanti saranno abilitati altrimenti il contrario.
RIGRAZIE MILLE.
>
>
--
Posted from
smtp3.libero.it
 [193.70.192.53]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: 56 report

text:
Devo generare 56 report di rispettivamente 56 tabelle indipendenti (non
hanno relazioni tra loro).
I report hanno una impostazione grafica ovviamente simile (ma molto
differente dal report
standard).
Come posso fare senza creare tutto a mano? Vi ringrazio anticipatamente


title: 56 report

author: Fabio Chiaro

text:
"C1P8" <
c1...@despammed.com
> wrote in message
news:qruUb.25901$VS6....@tornado.fastwebnet.it...

Dipende cosa c'è di diverso tra loro; eventualmente in un modulo dichiari
una variabile di tipo Report e fai un ciclo
Ciao, Fabio
--
____________________________________________________
Ci sono 10 tipi di persone:
quelle che capiscono i numeri binari e quelle che non li capiscono


title: 56 report

text:
> Dipende cosa c'è di diverso tra loro; eventualmente in un modulo
> dichiari una variabile di tipo Report e fai un ciclo
di diverso ci sono alcuni campi. Puoi postare quando hai tempo e voglia un
codice d'esempio?
Grazie mille!!!!!!!!!!!!!!!!! :))


title: 56 report

text:
"C1P8" <
c1...@despammed.com
> wrote in message
news:hgvUb.26011$VS6....@tornado.fastwebnet.it...

Non mi aiuti molto:
L'origine record è la stessa?
I controlli sono gli stessi ma l'origine dello stesso controllo può essere
un campo diverso per ogni report?
I nomi degli eventuali controlli o campi da salvare sono gli stessi?



title: 56 report

author: ALESSANDRO Baraldi

text:
"C1P8" <
c1...@despammed.com
> ha scritto nel messaggio
news:qruUb.25901$VS6....@tornado.fastwebnet.it...

Report standard cos'è per te...?
A parte il fatto di avere 56 tabelle non relazionate cosa che implicherebbe
chiarire come gestisci questo mostro....... !
Se i Report sono uguali allora hai commesso un errore di progettazione
lato Tabelle, di conseguenza come nel tuo Post precedente non si capisce
assolutamente quale sia il problema e quale sia l'origine.
Se non spieghi vagamente la struttura dati come facciamo ad aiutarti....?
Mi verrebbe da dirti di replicare il Report e cambiare l'associazione della
Tabella Origine e di conseguenza l'associazione dei Controlli, ma sarebbe
una risposta banale che implicherebbe l'errore di progettazione di cui
sopra.
@Alex.


title: 56 report

text:
> L'origine record č la stessa?
no... sono 56 tabelle tutte diverse con dei record diversi.
č simile (ma NON uguale) la struttura delle tabelle (i campi, ecc.).
> I nomi degli eventuali controlli o campi da salvare sono gli stessi?
I campi uguali si, hanno lo stesso nome MA per ogni tabella ci sono dei
campi in piů / in meno.
Grazie per l'aiuto! :)


title: 56 report

text:
> Report standard cos'è per te...?
Quello che si crea con il pulsantino in automatico ;)
> A parte il fatto di avere 56 tabelle non relazionate cosa che
> implicherebbe chiarire come gestisci questo mostro....... !
Il database non è mio. Mi hanno chiesto di fare "solo" i report ;)
> Se i Report sono uguali allora hai commesso un errore di progettazione
> lato Tabelle, di conseguenza come nel tuo Post precedente non si
> capisce assolutamente quale sia il problema e quale sia l'origine.
Il database non l'ho progettatio io, purtroppo.
Il problema è questo: ho 56 tabelle e devo ottenere 56 report.
I report rispecchiano un modello generale ma ogni tabella è leggermente
diversa.
> Se non spieghi vagamente la struttura dati come facciamo ad
> aiutarti....? Mi verrebbe da dirti di replicare il Report e cambiare
> l'associazione della Tabella Origine e di conseguenza l'associazione
> dei Controlli, ma sarebbe una risposta banale che implicherebbe
> l'errore di progettazione di cui sopra.
Purtroppo non lo posso fare perché ogni tabella ha dei campi in più o in
meno.


title: Inserimento (o modifica o eliminazione) record direttamente su tabella

author: Roberto

text:
E' possibile intercettare l'inserimento (o modifica o eliminazione) di
record se questa "azione" è svolta direttamente sulla tabella (in
pratica se la modifica non è effettuta tramite maschera)?
Se si, esiste della "documentazione"?
Roberto


author: Marco Papo

text:
"Roberto" <
erre...@yahoo.it
> ha scritto nel messaggio
news:1183981451.2...@q75g2000hsh.googlegroups.com...

Roberto
Ciao,
se la tua base dati è su SQL, si! puoi utilizzare i triggers. Help On Line
di SQL.
se la tua base dati è access. Non so. Però una domanda, se quello che vuoi
evitare è l'alterazione dei dati usa la sicurezza di access. Se esponi il
motivo è più facile pensare un soluzione.


text:
> se la tua base dati è access. Non so. Però una domanda, se quello che vuoi
> evitare è l'alterazione dei dati usa la sicurezza di access. Se esponi il
> motivo è più facile pensare un soluzione.
ho creato un "applicativo" access che nel corso degli anni è stato
modificato selvaggiamente senza guardare la forma
risultato --> è un gran casino
problemi --> l'inserimento (modifica o eliminazione) viene fatto
attraverso vari "canali": form, query di aggiornamento o eliminazione,
codice vba oppure inserimento diretto in tabella
necessità --> creare un file di log
idea --> se intercetto le modifiche direttamente sulle tabelle il log
è già fatto ... altrimenti diventa molto complesso (chie è causa del
proprio mal ...)


text:
ho creato un "applicativo" access che nel corso degli anni è stato
modificato selvaggiamente senza guardare la forma
risultato --> è un gran casino
problemi --> l'inserimento (modifica o eliminazione) viene fatto
attraverso vari "canali": form, query di aggiornamento o eliminazione,
codice vba oppure inserimento diretto in tabella
necessità --> creare un file di log
idea --> se intercetto le modifiche direttamente sulle tabelle il log
è già fatto ... altrimenti diventa molto complesso (chie è causa del
proprio mal ...)
Risposta:
Beh, se ti interessa sul sito comune ho visto esserci un esempio di come
gestire un log.
Su come intercettare le modifiche sulle tabelle...in access non saprei
proprio.
Mi spiace...cmq la spiegazione che mi hai dato sarà utile a qualcun altro
per aiutarti.
Ciao.


text:
> Risposta:
> Beh, se ti interessa sul sito comune ho visto esserci un esempio di come
> gestire un log.
grazie per l'interessamento: ho visto l'esempio ma funzia con le form
e non con le tabelle


author: PBsoft

text:
> ho creato un "applicativo" access che nel corso degli anni è stato
> modificato selvaggiamente senza guardare la forma
> risultato --> è un gran casino
> problemi --> l'inserimento (modifica o eliminazione) viene fatto
> attraverso vari "canali": form, query di aggiornamento o eliminazione,
> codice vba oppure inserimento diretto in tabella
> necessità --> creare un file di log
> idea --> se intercetto le modifiche direttamente sulle tabelle il log
> è già fatto ... altrimenti diventa molto complesso (chie è causa del
> proprio mal ...)
Direi che, vista la problematica che devi affrontare, la soluzione migliore
è quella di passare la base dati su SQL Server e collegarlo poi tramite ODBC
ad Access.
In questo modo puoi evitare che gli utenti vadano a mettere le mani direttamente
sulle tabelle e, soprattutto, puoi gestire un LOG tramite i trigger.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


text:
> Direi che, vista la problematica che devi affrontare, la soluzione migliore
> è quella di passare la base dati su SQL Server e collegarlo poi tramite ODBC
> ad Access.
purtroppo sono costretto a rimanere con access quindi questa soluzione
non è praticabile


title: Tabelle collegate per file .DBF da codice (Access 97)

author: ever

text:
Ho scritto il seguente codice per collegare delle tabelle .DBF ma mi da il
seguente errore:
err.number=3044 err.description="C:\PROVADBF\PROVA100.DBF' non č un percorso
valido. Assicurarsi che il nome del percorso sia corretto e di essere
collegati al server in cui si trova il file."
Se do un percorso realmente non valido (inesisteente) mi da ugualmente
l'errore 3044.
Riporto qui di seguito il codice utilizzato, che prima collega una tabella
di access (funziona correttamente) e poi la tabella DBF che da l'errore
sopra riportato:
    Set dbs = CurrentDb
    Set tdf = dbs.CreateTableDef("Clienti")
    tdf.Connect = ";DATABASE=" & "C:\DATI\EURAY.MDB"
    tdf.SourceTableName = "Clienti"
    dbs.TableDefs.Append tdf
    Set tdf = dbs.CreateTableDef("PROVA100")
    tdf.Connect = "dBASE IV;DATABASE=C:\PROVADBF\PROVA100.DBF"
    ''''''Provato anche con queste istruzioni ma da lo stesso errore
    ''''''tdf.Connect = "dBASE IV;DATABASE=C:\PROVABAD\PROVA100.DBF"
    ''''''tdf.Connect = "dBASE III;DATABASE=C:\PROVADBF\PROVA100.DBF"
    ''''''tdf.Connect = "dBASE 5;DATABASE=C:\PROVADBF\PROVA100.DBF"
    tdf.SourceTableName = "PROVA100"
    dbs.TableDefs.Append tdf        'qui da errore ---> err.number=3044
err.description="C:\PROVADBF\PROVA100.DBF' non č un percorso valido.
Assicurarsi che il nome del percorso sia corretto e di essere collegati al
server in cui si trova il file."
    Set dbs = Nothing
    flagok = True
Qualcuno puņ aiutarmi dicendomi dove sbaglio o indicarmi/inviarmi un esempio
di collegamento di tabella .DBF.
Grazie in anticipo
Ever


author: Bruno Campanini

text:
"ever" <
depr...@csgen.it
> wrote in message
news:dbZlf.19983$z_6....@tornado.fastwebnet.it...
> Ho scritto il seguente codice per collegare delle tabelle .DBF ma mi da il
> seguente errore:
> err.number=3044 err.description="C:\PROVADBF\PROVA100.DBF' non è un
> percorso valido. Assicurarsi che il nome del percorso sia corretto e di
> essere collegati al server in cui si trova il file."
> Se do un percorso realmente non valido (inesisteente) mi da ugualmente
> l'errore 3044.
> Riporto qui di seguito il codice utilizzato, che prima collega una tabella
> di access (funziona correttamente) e poi la tabella DBF che da l'errore
> sopra riportato:
>
>    Set dbs = CurrentDb
>    Set tdf = dbs.CreateTableDef("Clienti")
>    tdf.Connect = ";DATABASE=" & "C:\DATI\EURAY.MDB"
>    tdf.SourceTableName = "Clienti"
>    dbs.TableDefs.Append tdf
>
>    Set tdf = dbs.CreateTableDef("PROVA100")
>    tdf.Connect = "dBASE IV;DATABASE=C:\PROVADBF\PROVA100.DBF"
>    ''''''Provato anche con queste istruzioni ma da lo stesso errore
>    ''''''tdf.Connect = "dBASE IV;DATABASE=C:\PROVABAD\PROVA100.DBF"
>    ''''''tdf.Connect = "dBASE III;DATABASE=C:\PROVADBF\PROVA100.DBF"
>    ''''''tdf.Connect = "dBASE 5;DATABASE=C:\PROVADBF\PROVA100.DBF"
>    tdf.SourceTableName = "PROVA100"
>    dbs.TableDefs.Append tdf        'qui da errore ---> err.number=3044
> err.description="C:\PROVADBF\PROVA100.DBF' non è un percorso valido.
> Assicurarsi che il nome del percorso sia corretto e di essere collegati al
> server in cui si trova il file."
>    Set dbs = Nothing
>    flagok = True
>
> Qualcuno può aiutarmi dicendomi dove sbaglio o indicarmi/inviarmi un
> esempio di collegamento di tabella .DBF.
>
> Grazie in anticipo
> Ever
Col codice seguente (una riga) colleghi il File "Ancona.DBF"
(formato DBIII) che si trova in "C:\Document\DBASE",
alla tabella "t_Ancona" di Access (che non deve essere
preventivamente creata):
====================================
DoCmd.TransferDatabase _
            TransferType:=acLink, _
            DatabaseType:="dBase III", _
            DatabaseName:="C:\Document\DBASE", _
            ObjectType:=acTable, _
            Source:="Ancona.dbf", _
            Destination:="t_Ancona", _
            StructureOnly:=False
===================================
Se cambi AcLink in acImport (acExport) importi
(esporti) da (a).
Ciao
Bruno


title: blocco di un record

author: ecla

text:
Ciao a tutti.
Ho una sottomaschera in un DB in Access in cui ho necessità di bloccare solo
il primo record che viene automaticamente alimentato dal sistema che lo
acquisisce da un'altra sottomaschera precedentemente compilata.
Per questo motivo, visto che sono informazioni già inserite in un'altra
sottomaschera, nella sottomaschera in cui vanno copiate dal sistema, non
devono essere modificate dall'utente.
Nelle proprietà della sottomaschera c'é "blocca record" ma consente di
bloccare o tutti i record o quelli modificati! Non é il mio caso!
Qualcuno può aiutarmi???
Grazie a tuttti e ciao.
Ecla

--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: blocco di un record


title: blocco di un record

author: MA

text:
"ecla" <
ecla....@inwind.it
> ha scritto nel
messaggio
news:80Z207Z190Z140Y...@usenet.libero.it...
> Ciao a tutti.
> Ho una sottomaschera in un DB in Access in cui
ho necessità di bloccare solo
> il primo record che viene automaticamente
alimentato dal sistema che lo
> acquisisce da un'altra sottomaschera
precedentemente compilata.
> Per questo motivo, visto che sono informazioni
già inserite in un'altra
> sottomaschera, nella sottomaschera in cui vanno
copiate dal sistema, non
> devono essere modificate dall'utente.
> Nelle proprietà della sottomaschera c'é "blocca
record" ma consente di
> bloccare o tutti i record o quelli modificati!
Non é il mio caso!
> Qualcuno può aiutarmi???
> Grazie a tuttti e ciao.
> Ecla
Inserisci un flag che il sitema setterà a vero
e permetti la modifica solo di quelli non flagati
MAssimiliano


title: blocco di un record

text:

Il Flag però mi blocca a livello di oggetto e non di record!!!
La mia domanda é se esiste una funzione che permetta di bloccare il singolo
record!
Ciao



title: blocco di un record

text:

No il falg lo devi inserire nel record
su current
If tuoflag = -1  then
tutti_gli_altri_controlli.locked = true
MAssimiliano


title: blocco di un record

text:

Come si inserisce nel record? Come accedo alle proprietà del singolo record?
In genere lavoro sulle proprietà di maschere o cotrolli.
Il locked non va cmq sui singoli controlli ma sui record.



title: blocco di un record

text:

Guarda che è più facile di quello che credi.
Aggiungi un campo sì/no (booleano) alla tabella e
lo chiami pippo
Fatto.


title: Query is too complex!

author: Matteo Ferrari

text:
Ciao a tutti.
Ho scritto una query che deve girare sia sotto MySQL che sotto Access.
Il problema e' che sotto Access come risposta alla mia query
ricevo:"Query is too complex." mentre sotto MySQL funziona bene.
Qualcuno ha qualche idea di come potrei fare tenendo conto che devo
scrivere appunto delle query compatibili?
Grazie
Teo
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Query is too complex!

author: Luciano (DOC)

text:
"Matteo Ferrari" <
te...@libero.it
> ha scritto nel messaggio
news:2392a698f4491f54c7...@mygate.mailgate.org...
> Ho scritto una query che deve girare sia sotto MySQL che sotto Access.
> Qualcuno ha qualche idea di come potrei fare tenendo conto che devo
> scrivere appunto delle query compatibili?
Le differenze sono molte, l'unico modo e' scrivere due query e far partire
l'una o l'altra a seconda dei casi.
Saluti.
Luciano