text:
smorc wrote:
> MA ha scritto:
>
>> smorc wrote:
>>> E' possibile copiare tramite una macro il contenuto di un controllo(
>>> magari anche non associato) da una maschera ed incollarlo in
>>> un'altra?Se cosě fosse quali comandi macro devo utilizzare in
>>> sequenza?
>>> Un grazie di cuore
>>
>> Non usare la macroma un pň di codice: non ti preoccupare non č
>> difficile Se devi copiare il controllo "Pippo" della maschera
>> "formA" nel controllo "Pluto" della maschera "formB"
>> creati un pulsane o associalo all'evento che ti serve
>> forms!formB!Pluto = forms!formA!Pippo
>>
>>
>> --
>
> Ok perň credo che non funzioni devo dettagliare meglio la situazione:
> Ho una sottomaschera di un prodotto che descrive l'evasione del
> prodotto a fronte di vari ordini.
> Nella sottomaschera lo stesso ordine puň comparire + volte
> Nel controllo della sottomaschera dove compare l'ordine vorrei
> generare un evento che mi apra la maschera ordini,che nel mio caso č
> fatta da un controllo non associato (casella di riepilogo) e una
> struttura a schede multiple con varie sottomaschere sottostanti.
E perchč non dovrebbe funzionare??



title: Problem DatePart

author: Rino Ferrari

text:
Come da Oggetto
il problema si riferisce alla fun. DatePart
come mai non accetta l'operatore and
es: Filtro su   - DataDocumento -
DatePart("q";[DataDocumento])=1And DatePart("q";[DataDocumento])=4)
o meglio non riesce a filtrare cio che va dal 1 trim al 4 trim(che e
cio di cui ho bisogno)
cosi - DatePart("q";[DataDocumento])=1 - funge.
Ths........
Ferrari Rino


title: Problem DatePart

author: Cinzia

text:
"Rino Ferrari" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:1161099794.3...@e3g2000cwe.googlegroups.com...

Ciao Rino,
 se tu vuoi filtrare dal primo al quarto trimestre non devi usare AND  con
quelle condizioni ma
DatePart("q";[DataDocumento])>=1And DatePart("q";[DataDocumento])<=4
a parte che non capisco che senso ha filtrare dal primo al quarto trimestre
ma  non indaghiamo...
--
Cinzia
---------------------------------------
|
http://www.riolab.org
  |
--------------------------------------->


title: Problem DatePart

text:
Cinzia ha scritto:
> "Rino Ferrari" <
rinof...@virgilio.it
> ha scritto nel messaggio
> news:1161099794.3...@e3g2000cwe.googlegroups.com...
> > Come da Oggetto
> > il problema si riferisce alla fun. DatePart
> > come mai non accetta l'operatore and
> > es: Filtro su   - DataDocumento -
> > DatePart("q";[DataDocumento])=1And DatePart("q";[DataDocumento])=4)
> > o meglio non riesce a filtrare cio che va dal 1 trim al 4 trim(che e
> > cio di cui ho bisogno)
> > cosi - DatePart("q";[DataDocumento])=1 - funge.
> >
> >
> > Ths........
> > Ferrari Rino
>
>
> Ciao Rino,
>
>  se tu vuoi filtrare dal primo al quarto trimestre non devi usare AND  con
> quelle condizioni ma
>
> DatePart("q";[DataDocumento])>=1And DatePart("q";[DataDocumento])<=4
>
> a parte che non capisco che senso ha filtrare dal primo al quarto trimestre
> ma  non indaghiamo...
>
> --
> Cinzia
Ola Cinzia Come va!!!!!!!!!!!!!
Beh.......... delucido la tua curiosità forse ne viene fuori qualcosa
di meglio
di quello a cui ho pensato.
l'esigenza deriva dal fatto che:
Mettiamo il caso si vogli gestire l'IVA per periodi trimestrali
la funz. DatePart e ottimale per periodo,  primo trim, secondo trim ,
ecc ...
Ma se l'esigenza sarebbe quella di impostare un intervallo di tempo per
trimenstri come x esempio dal secondo trim  al quarto trim.
Altri sugerimenti in merito?
Ciao
Rino


title: Problem DatePart

text:
Rino Ferrari wrote:
> Cinzia ha scritto:
>
>> "Rino Ferrari" <
rinof...@virgilio.it
> ha scritto nel messaggio
>> news:1161099794.3...@e3g2000cwe.googlegroups.com...
>>> Come da Oggetto
>>> il problema si riferisce alla fun. DatePart
>>> come mai non accetta l'operatore and
>>> es: Filtro su   - DataDocumento -
>>> DatePart("q";[DataDocumento])=1And DatePart("q";[DataDocumento])=4)
>>> o meglio non riesce a filtrare cio che va dal 1 trim al 4 trim(che e
>>> cio di cui ho bisogno)
>>> cosi - DatePart("q";[DataDocumento])=1 - funge.
>>>
>>>
>>> Ths........
>>> Ferrari Rino
>>
>>
>> Ciao Rino,
>>
>>  se tu vuoi filtrare dal primo al quarto trimestre non devi usare
>> AND  con quelle condizioni ma
>>
>> DatePart("q";[DataDocumento])>=1And DatePart("q";[DataDocumento])<=4
>>
>> a parte che non capisco che senso ha filtrare dal primo al quarto
>> trimestre ma  non indaghiamo...
>>
>
> Ola Cinzia Come va!!!!!!!!!!!!!
Ciao Rino!, tutto OK grazie
>
> Beh.......... delucido la tua curiosità forse ne viene fuori qualcosa
> di meglio
> di quello a cui ho pensato.
>
>
> l'esigenza deriva dal fatto che:
> Mettiamo il caso si vogli gestire l'IVA per periodi trimestrali
> la funz. DatePart e ottimale per periodo,  primo trim, secondo trim ,
> ecc ...
> Ma se l'esigenza sarebbe quella di impostare un intervallo di tempo
> per
>
> trimenstri come x esempio dal secondo trim  al quarto trim.
Ok,  in questo caso direi che va bene così era solo l'esempio usato che mi
suonava male, dal primo al quarto vuol dire prendere tutto l'anno ..
Io in generale preferisco chel'utente  metta le date per esteso, così decide
lui se vuole le cose mensili, bimestrali... settimanali... o come
preferisce..., preferisco non ingessarli troppo...
ciao!



title: Problem DatePart

author: SystemsoftwareŽRinoFerrari

text:
>>
>> Ola Cinzia Come va!!!!!!!!!!!!!
> Ciao Rino!, tutto OK grazie
>>
>> Beh.......... delucido la tua curiosità forse ne viene fuori qualcosa
>> di meglio
>> di quello a cui ho pensato.
>>
>>
>> l'esigenza deriva dal fatto che:
>> Mettiamo il caso si vogli gestire l'IVA per periodi trimestrali
>> la funz. DatePart e ottimale per periodo,  primo trim, secondo trim ,
>> ecc ...
>> Ma se l'esigenza sarebbe quella di impostare un intervallo di tempo
>> per
>>
>> trimenstri come x esempio dal secondo trim  al quarto trim.
>
> Ok,  in questo caso direi che va bene così era solo l'esempio usato che mi
> suonava male, dal primo al quarto vuol dire prendere tutto l'anno ..
> Io in generale preferisco chel'utente  metta le date per esteso, così
> decide
> lui se vuole le cose mensili, bimestrali... settimanali... o come
> preferisce..., preferisco non ingessarli troppo...
>
>
> ciao!
> --
> Cinzia
Si Cinzia e vero troppi parametri non sono sempre il megilio mah........
purtroppo ce qualcuno non sa che il trimeste e a gruppi di tre mensilita
partendo da 1 gennaio ;-))))))))))))))))
quindi il fine giustifica i mezzi o no?
Un Salutone
Rino


title: docmd.OpenQuery vs dbs.execute

text:
Ciao a tutti e Auguri di Buon Natale, intanto. Come da oggetto: come mai se eseguo il docmd la query viene eseguita (e anche da qbe) invece invocando il metodo execute ho errore di 'tipo non corrispondente', come se avessi fatto un join tra tipi di dati diversi?
Grazie


title: docmd.OpenQuery vs dbs.execute

author: Karl Donaubauer

text:
Fair87 ha scritto:
> ...come mai se eseguo il docmd la query viene eseguita (e anche da qbe) invece invocando il metodo execute ho errore di 'tipo non corrispondente', come se avessi fatto un join tra tipi di dati diversi?

Senza vedere l'SQL della query non si puo dire molto.

Sono metodi abbastanza diversi e DAO (Execute) p.e. ha problemi con
riferimenti a oggetti di Access come Forms!...

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it

Access Lobby:
http://www.AccessDevelopers.org


title: docmd.OpenQuery vs dbs.execute

text:

ciao Karl. Questo è un esempio di codice SQL

INSERT INTO LibriW ( EAN, AUTORE, TITOLO, COLLANA, NuInCollana, PREZZO, EDITORE, Sconto, IdClassificazione, Recensione, IdDisp, TipoMateriale, AnnoPubb, DataIns, IdSoggetto, Volume, Settore, Scaffale, SpecialPrice )
SELECT QryArchivio.EAN, QryArchivio.AUTORE, QryArchivio.TITOLO, QryArchivio.COLLANA, QryArchivio.COLLANA_N, QryArchivio.PREZZO, QryArchivio.EDITORE, QryArchivio.ScontoPercentuale, QryArchivio.Class, QryArchivio.RECENSIONE, QryArchivio.Disp, QryArchivio.TIPO_MATERIALE, QryArchivio.ANNO_ED, Now() AS Ins, QryArchivio.Sogg, QryArchivio.VOLUME, QryArchivio.Settore, QryArchivio.Scaffale, QryArchivio.SpecialPrice
FROM QryArchivio LEFT JOIN LibriW ON QryArchivio.EAN = LibriW.EAN
WHERE (((LibriW.EAN) Is Null));

La chiamata da vba è

Dbs.Execute ("QryArchivioIns"), dbSeeChanges + dbFailOnError

Preferisco questo per poter accedere a dbs.RecordsAffected, ma a volte devo forzatamente usare

DoCmd.OpenQuery "QryArchivioIns", acViewNormal, acEdit

E non capisco perchè, visto che l'oggetto è sempre quello

Grazie


title: docmd.OpenQuery vs dbs.execute

text:
Salve,

Fair87 ha scritto:
>>> ...come mai se eseguo il docmd la query viene eseguita (e anche da qbe) invece invocando il metodo execute ho errore di 'tipo non corrispondente', come se avessi fatto un join tra tipi di dati diversi?
>
> ...Questo č un esempio di codice SQL
>
> INSERT INTO LibriW ( EAN, AUTORE, TITOLO, COLLANA, NuInCollana, PREZZO, EDITORE, Sconto, IdClassificazione, Recensione, IdDisp, TipoMateriale, AnnoPubb, DataIns, IdSoggetto, Volume, Settore, Scaffale, SpecialPrice )
> SELECT QryArchivio.EAN, QryArchivio.AUTORE, QryArchivio.TITOLO, QryArchivio.COLLANA, QryArchivio.COLLANA_N, QryArchivio.PREZZO, QryArchivio.EDITORE, QryArchivio.ScontoPercentuale, QryArchivio.Class, QryArchivio.RECENSIONE, QryArchivio.Disp, QryArchivio.TIPO_MATERIALE, QryArchivio.ANNO_ED, Now() AS Ins, QryArchivio.Sogg, QryArchivio.VOLUME, QryArchivio.Settore, QryArchivio.Scaffale, QryArchivio.SpecialPrice
> FROM QryArchivio LEFT JOIN LibriW ON QryArchivio.EAN = LibriW.EAN
> WHERE (((LibriW.EAN) Is Null));
>
> La chiamata da vba č
>
> Dbs.Execute ("QryArchivioIns"), dbSeeChanges + dbFailOnError
>
> Preferisco questo per poter accedere a dbs.RecordsAffected, ma a volte devo forzatamente usare
>
> DoCmd.OpenQuery "QryArchivioIns", acViewNormal, acEdit
>
> E non capisco perchč, visto che l'oggetto č sempre quello

Nell'enunciato non vedo un sospetto ovvio.
Resta la prova di riduzione:

Se il problema si pone (e certo con una copia del db o della tabella di
destinazione) cancella una colonna dalla query e prova con Execute, poi
un altra colonna ecc. fino a quando trovi la colpevole.



title: docmd.OpenQuery vs dbs.execute

text:

Grazie Karl, proverò


title: controllare se una voce fattura contiene una certa stringa

author: mario rossi

text:
sto provando cosi ma senza successo

If DCount("id", "fatturevoci", "idfattura=" & IdFattura & " and (InStr(descrizione, "Operazione dichiarazione intento") = 0)") = 0 Then

in pratica vorrei verificare se esiste già questa riga per la fattura in esame ed evitare di aggiungere la frase 2 volte

qualche consiglio?


author: GiorgioDaPrato

text:

qualcosa sono in grado di dire:

NON va bene (certamente !) che all'interno di una espressione stringa si usino le virgolette come separatori di stringa di una variabile interna alla stringa stessa (occorre l'apice)

NON è una buona idea quella di dare nome descrizione a un campo (di descrizione): si può non avere risposta dal VBA

E' migliorativo (più performante), con Dcount, l'utilizzo di "*" come primo argomento

SE, nonostante l'esperienza già maturata, pensi sia ancora opportuno dover riscontrare "de visu" il risultato di una funzione di dominio (umiltà, predicava Arrigo Sacchi) è più opportuno assegnare quel risultato ad una variabile per poterlo controllare (direttamente o con un msgBox)
l'esito


title: sottomaschera....grafica....

author: Enrico Virginio

text:
Volevo chiedere una cosina....
Ho visto un programma che si appoggia ad un db di access e l' eseguibile
(.exe) mi puzza molto di VB6...
Ho notato dei controlli tipo sottomaschere o listbox che però sono molto
carini in quanto le singole righe (records) sono colorate in maniera
differente...(una gialla,una azzurra...)
Sapete dirmi se esiste un controllo simile (ActiveX, OCX) anche in
Access2000 ?
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Verificare controlli vuoti in form (di Alex Baraldi)

author: Announced

text:
Ho preso l'esempio proposto sul SitoComune (3.95) da Alex relativo
all'oggetto.
Non riesco però ad adattarla ad una form "Maschere continue". Mi
servirebbe che evidenziasse gli evenutali campi lasciati vuoti solo dei
record incriminati.
Alex, potresti aiutarmi in questa impresa?
Grazie, anche se ci fossero altri aiuti...
Ciao
Paolo


author: Alessandro Baraldi

text:
"Announced" <
paolosc...@alice.it
> wrote in message
news:1123079712.8...@g43g2000cwa.googlegroups.com

Innanzitutto quell'esempio funziona solo sull'evento Prima di Aggiornare
relativamente al Record Corrente ...!
Per fare quello che chiedi tu non serve usare quella tecnica
ma devi usare la Formattazione Condizionale disponibile dalla
versione di A2000 in poi.
Ciao.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
Alessandro Baraldi ha scritto:
> Innanzitutto quell'esempio funziona solo sull'evento Prima di Aggiornare
> relativamente al Record Corrente ...!
> Per fare quello che chiedi tu non serve usare quella tecnica
> ma devi usare la Formattazione Condizionale disponibile dalla
> versione di A2000 in poi.
>
> Ciao.
> @Alex
>
>
> --
> Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG
Potresti darmi qualche suggerimento in più in merito alla
Formattaizone Condizionale? Non credo di avere ancora nozioni
sufficienti in merito...
Ti ringrazio
Paolo


text:
"Announced" <
paolosc...@alice.it
> wrote in message
news:1123097226.9...@g14g2000cwa.googlegroups.com
[CUT]
> Potresti darmi qualche suggerimento in più in merito alla
> Formattaizone Condizionale? Non credo di avere ancora nozioni
> sufficienti in merito...
>
> Ti ringrazio
>
> Paolo
Sinceramente è abbastanza banale essendo Nativa...!
Seleziona il controllo TextBox dalla modalità struttura
quindi seleziona il menù "Formato"--->"Formattazione Condizionale"
Ora imposta il criterio per il quale desideri che il controllo
venga formattato, nel tuo caso Len(nomecontrollo)=0
Per altri dettagli dai un'occhiata all'Help
Ciao



text:
> Seleziona il controllo TextBox dalla modalità struttura
> quindi seleziona il menù "Formato"--->"Formattazione Condizionale"
>
> Ora imposta il criterio per il quale desideri che il controllo
> venga formattato, nel tuo caso Len(nomecontrollo)=0
>
> Per altri dettagli dai un'occhiata all'Help
Ho interrogato l'Help e visto anche Post precedenti di tale argomento,
ma credo di avere ancora bisogno di aiuto...
A me servirebbe che premendo un button (per registrare il tutto), mi
vengano evidenziati i controlli vuoti dei vari record.
Nella Formattazione Condizionale da menù, non mi propone questa
condizione e inoltre non riesco a capire dove inserire
Len(nomecontrollo)=0 nel mio caso...
Ti ringrazio
Paolo


author: Gaspare

text:
[CUT]
Ho interrogato l'Help e visto anche Post precedenti di tale argomento,
ma credo di avere ancora bisogno di aiuto...
A me servirebbe che premendo un button (per registrare il tutto), mi
vengano evidenziati i controlli vuoti dei vari record.
Nella Formattazione Condizionale da menù, non mi propone questa
condizione e inoltre non riesco a capire dove inserire
Len(nomecontrollo)=0 nel mio caso...
Ti ringrazio
Paolo
---------
Ciao,
ogni textbox (ogni controllo in generale...), se visualizzi la maschera in
modalità "disegno", ha una proprietà "nome" ed è tramite essa che viene
identificato.
Se vuoi controllare la lunghezza di un textbox ed eventualmente
evidenziarlo -> facendo tutto all'interno dell'eveto click di un pulsante
puoi scrivere:


text:
[CUT]
Private Sub Pulsante_Click()
If IsNull(Me.NomeControllo) Then
  Me.NomeControllo.BackColor = 255
  Me.NomeControllo.SetFocus
End If
End Sub
Il codice come vedi è abbastanza semplice...
Buona giornata
Gaspare


text:
"Gaspare" <
break...@email.it
> wrote in message
news:M0mIe.32596$
2U1.1...@news3.tin.it

Ti devo contraddire.
L'oggetto riguarda una Maschera in visualizzazione Continua
pertanto quanto da te suggerito non và bene, colorerebbe
tutti i Records.
E' d'obbligo la formattazione condizionale, che trovo
estremamente semplice ed intuitivo...!
Non capisco la difficoltà...!
Un esempio Semplice da adattare all'Evento Click ed inserire
in un Ciclo For each...Next per i controlli che devi formattare:
NomeControllo.FormatConditions.Add acExpression, , CRITERIO
'Questa solo se devi modificare il 1° Criterio già esistente
'NomeControllo.FormatConditions(0).Modify acExpression, , NUOVOCRITERIO
NomeControllo.FormatConditions(0).BackColor = vbRed
NomeControllo.FormatConditions(0).ForeColor = vbWhite
L'indice della FORMATCONDITIONS è ZEROBASED
Saluti



text:
[CUT]
Ciao @Alex,
sai benissimo che quando mi "contraddici" va più che bene...così imparo
qualcosa in più ! ;-)
Non utilizzo sempre "access" per cui spesso le sparo...penso che sia meglio
di "non partecipare"! :-)
Buona giornata
Gaspare


text:
Credo che mi sto avventurando in qualcosa di più grande delle mie
conoscenze ad oggi.
Ho fatto dei tentativi con le tue indicazioni, ma non riesco proprio a
farlo funzionare.
Se puoi darmi ancora un suggerimento te ne sarei davvero grato...
Paolo


text:
"Gaspare" <
break...@email.it
> wrote in message
news:e7oIe.33019$
2U1.1...@news3.tin.it
> [CUT]
>
> Ciao @Alex,
> sai benissimo che quando mi "contraddici" va più che bene...così imparo
> qualcosa in più ! ;-)
>
> Non utilizzo sempre "access" per cui spesso le sparo...penso che sia meglio
> di "non partecipare"! :-)
Assolutamente si, altrimenti io come potrei contraddirti..! ;-)
> Buona giornata
>
> Gaspare
Ciao Gaspare.



text:
"Announced" <
paolosc...@alice.it
> wrote in message
news:1123159801.6...@g14g2000cwa.googlegroups.com

Sinceramente mi pare di averti scritto tutto...!
Ora quello che devi fare è impostare un Criterio per le TextBox
alle quali inserire la Formattazione condizionata.
Nel caso fosse solamente UNA il codice che ti ho passato
è già funzionante e da mettere(opportunamente corretto con i
nomi dei controlli tuoi) nell'EVENTO_CLICK di quel famigerato
Button da inserire nel Pie di pagina.
Sinceramente non saprei come altro aiutarti.



text:
Ho provato in questo modo, ma...
Private Sub Esci_Click()
For Each ctr In Section(0).Controls
                   If ctr.ControlType = acTextBox Or ctr.ControlType =
acComboBox Then
ctr.FormatConditions.add acExpression, , MioCampo& "=" & Null
ctr.FormatConditions(0).BackColor = vbRed
ctr.FormatConditions(0).ForeColor = vbWhite
End If
Next ctr
End Sub
...dove sbaglio?
Grazie
Paolo


text:
"Announced" <
paolosc...@alice.it
> wrote in message
news:1123229534.1...@g43g2000cwa.googlegroups.com
[CUT]
> Grazie
> Paolo
Prova cosě:
ctr.FormatConditions.add acExpression, , MioCampo.Name & "=IsNull"



text:
...continua a darmi: errore di run time '7966' Il numero di condizione
di formato specificato è maggiore del numero di condizioni formato
disponibili...


text:
"Announced" <
paolosc...@alice.it
> wrote in message
news:1123237593....@f14g2000cwb.googlegroups.com
> ...continua a darmi: errore di run time '7966' Il numero di condizione
> di formato specificato è maggiore del numero di condizioni formato
> disponibili...
Togli l'= dall'espressione ed aggiungi lo Spazio...mi è scappato!
@Alex



text: Mi spiace disturbarti oltre modo, ma non ce n'è... ancora non funzia...


text:
"Announced" <
paolosc...@alice.it
> wrote in message
news:1123244289.3...@z14g2000cwz.googlegroups.com
> Mi spiace disturbarti oltre modo, ma non ce n'è... ancora non funzia...
Innanzitutto non hai dichiarato la variabile Oggetto ctr
che ovviamente non troverà, presumo tu non stia nemmeno usando
l'option Explicit per le dichiarazioni e che tu non abbia nemmeno
compilato il codice per la ricerca errori.
Private Sub Esci_Click()
   Dim ctr As Access.Control
   For Each ctr In Section(0).Controls
       If ctr.ControlType = acTextBox Or ctr.ControlType = acComboBox
Then
         ctr.FormatConditions.Add acFieldValue, acNotEqual, Chr(34) &
"IsNull" & Chr(34)
         ctr.FormatConditions(ctr.FormatConditions.count - 1).BackColor
= vbRed
         ctr.FormatConditions(ctr.FormatConditions.count - 1).ForeColor
= vbWhite
      End If
   Next
End Sub
Prova a vedere se funziona, da me va ottimamente..!
Ovvio che se leggi l'Help riesci a capire come adattare
eventuali modifiche della condizione di formattazione.
Saluti



text:
Subito, mi ha funziononato Alex, al contrario di come mi serviva (nel
senso che colorava i campi pieni e non quelli vuoti), ma funzionava...
poi ha ricominciato a darmi il solito errore postato sopra... boh, non
so...
Comunque ti ringrazio per la pazienza e da qui in poi proverò a
cavarmela da solo sull'argomento... non ti voglio più tediare:-)
Saluti
Paolo


text:
"Announced" <
paolosc...@alice.it
> wrote in message
news:1123335655.7...@o13g2000cwo.googlegroups.com

Si devi studiarla un pò meglio.
Modifica questo:
acNotEqual
in
acEqual
Ciao



title: Gestione calendario in form

text:
Come potrei fare ad intercettare l'evento su_clic in una casella di un calendario activex inserito in una form?

In pratica dovrei vedere un calendario mensile e cliccando su un tal giorno mi si apre un'altra form .... ed eventualmente, se si verificano certe condizioni il tal giorno è colorato diversamente.


title: errore access xp ha smesso di funzionare su uscita db in windows vista

author: Nicolas

text:
qualcuno sa dirmi da cosa dipende questo errore
quando chiudo il db esce questo messaggio
"errore access xp ha smesso di funzionare"


author: Sergio MAZZA

text:
"Nicolas" <
nico...@email.it
> ha scritto nel messaggio
news:49b6b159$0$1110$4faf...@reader2.news.tin.it...
> qualcuno sa dirmi da cosa dipende questo errore
>
> quando chiudo il db esce questo messaggio
>
> "errore access xp ha smesso di funzionare"
Non č direttamente per access ma potrebbe indicarti la "via"
http://www.m-link.it/m-link_news/Microsoft_Office_Word_ha_smesso_di_funzionare_-_Vista_con_Office_2003.asp
Ciao.
--
Sergio MAZZA


title: Gestione immagini e spazio su disco...

author: Epidermic

text:
Ciao a tutti.. č la prima volta che scrivo perchč ho bisogno essenziale di
aiuto.
Mi sono fatto un database dove per ciascun record ho bisogno di allegare una
o piů immagini ( max 40kb l'una).
Dopo aver aggiunto poco meno di un centinaio di immagini, la dimensione del
database ( compresso e compattato ) č schizzata oltre i 200 MB... sapevo per
certo che Access non tratta allo stesso modo i dati, ma una discrepanza di
dimensioni tali non č possibile ed il mio database diventa completamente
inutilizzabile in questi termini.
Ovviamente ho provato a collegare o incorporare le immagini, senza
differenze sostanziali.... non č ammissibile l'uso del collegamento esterno.
A questo punto mi chiedo e vi chiedo se ci sia un modo per poter abbassare
sensibilmente le dimensioni oppure consigliatemi un altro programma in grado
di poter gestire al meglio le mie esigenze.
Grazie.


title: Gestione immagini e spazio su disco...

author: MA

text:

Ho paura che tu non possa sensibilmente abbattere le dimensioni. Lo puoi
fare perň drasticamente.
Non usare i campi OLE e vai su
www.sitocomune.com
 e guarda i 3 articoli che
parlano della gestione delle immagini. In buona sostanza dovrai richiamarne
solo il persorso.
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


title: SQL in VBA: Tipo non corrispondente

author: Mario Puglisi

text:
Salve. Chi mi può dare una mano?
Il mio rompicapo è il seguente:
Lavoro con Access 2000 VBA.
BOLLE è la Tabella da cui devo creare un recordset
che però deve essere prima  filtrato da strSQL.
IdClienti è un controllo associato numerico
Data1 e Data2 sono controlli non associati con formato Data
strSQL = "Select * From Bolle WHERE (([IdClienti] = " & Me!idClienti & " )
And ([DataBolla] Between" & Forms![Fatture1]![Data1] And
[Forms]![Fatture1]![Data2] & "))"
Mi da l'errore "Tipo non corrispondente". Dov'è l'errore ?
.E dopo?... Come apro strSQL? Nel modo seguente?:
  Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
rs.Open "strSQL", CurrentProject.Connection, adOpenDynamic, adLockOptimistic
???
                    Un Grazie anticipato.


title: SQL in VBA: Tipo non corrispondente

text:
Mario Puglisi ha scritto:...
> Il mio rompicapo è il seguente:
> Lavoro con Access 2000 VBA.
> BOLLE è la Tabella da cui devo creare un recordset
> che però deve essere prima  filtrato da strSQL.
> IdClienti è un controllo associato numerico
> Data1 e Data2 sono controlli non associati con formato Data
>
> strSQL = "Select * From Bolle WHERE (([IdClienti] = " & Me!idClienti & " )
> And ([DataBolla] Between" & Forms![Fatture1]![Data1] And
> [Forms]![Fatture1]![Data2] & "))"
>
> Mi da l'errore "Tipo non corrispondente". Dov'è l'errore ?
Prova con:
strSQL = "Select * From Bolle WHERE IdClienti = " & Me!idClienti & _
" And DataBolla Between " & clng(Forms!Fatture1!Data1) & _
" And " & clng(Forms!Fatture1!Data2)
> .E dopo?... Come apro strSQL? Nel modo seguente?:
>   Dim rs As ADODB.Recordset
> Set rs = New ADODB.Recordset
> rs.Open "strSQL", CurrentProject.Connection, adOpenDynamic,
adLockOptimistic
rs.Open strSQL, CurrentProject.Connection, adOpenDynamic, adLockOptimistic
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: Filtrare una tabella

author: Simone Pilan

text:
Ciao a tutti,
In una query, per filtrare una tabella solamente se compilo un casella di
testo presente in una maschera, ho inserito fra i criteri la seguente
istruzione:
Between (IIf([FORMS]![INTE_PRES]![D09A1] Is
Null;"aaaaaa";[FORMS]![INTE_PRES]![D09A1])) And
(IIf([FORMS]![INTE_PRES]![D09A1] Is
Null;"zzzzzz";[FORMS]![INTE_PRES]![D09A1]))
Il problema è che non tutti i record hanno il campo D09A1 valorizzato, per
cui quando lascio la casella di testo vuota, per selezionare tutti i dati,
mi vengono visualizzati solamente quelli che hanno un valore nel campo.
Come posso fare per visualizzare tutti i record?
Premetto che se il campo è vuoto non posso inserirgli un valore a caso.
Ciao


title: Filtrare una tabella

text:

www.donkarl.com/it
 FAQ 3.14 Criterio che restituirà tutti i record
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Repost - Riepilogo Protezione

text:
Saluti a tutti!
Ho un database piuttosto complesso a livello di protezione, nel senso che ci
sono diverse tabelle con diversi livelli di protezione.
Dato che devo generarlo sia per Access 97 che per Access 2000, ho da gestire
la scomoda feccnda per cui, convertendo da 2000 a 97, viene creato un db non
protetto.
Quindi devo manualmente reimpostare tutte le protezioni.
Esiste un sistema per farlo in automatico?
Oppure: esiste almento un modo per stampare l'elenco degli oggetti e della
relativa protezione? Sicuramente qualcosa del genere viene prodotto
dall'impostazione guidata protezione, ma come posso farlo in "manuale"?
Adesso come adesso devo tenere aperti contemporaneamente i due db su due pc
diversi (uno con A. 2000 e uno con A97) per "ricopiare" i dati da uno
all'altro....
Ringrazio anticipatamente.
8tto


title: Repost - Riepilogo Protezione

author: MegaMax

text:
> Quindi devo manualmente reimpostare tutte le protezioni.
> Esiste un sistema per farlo in automatico?
Se sei pratico ed hai voglia di scrivere un po di codice penso che non sia
un grande problema...
Credo che il codice per impostare le protezioni sugli oggetti dei DB sia
molto simile tra A97 ed A2000.
Quindi potresti creare codice che piglia tutti i criteri di protezione di
tutti gli oggetti del db e li ficca in una tabella (di cui inventerai te la
struttura)
E poi fai un codice che prende i dati dalla tabella e li aplica agli
oggetti.
Cosě hai il db 2000, salvi la protezione nella tua tabella col tuo codice,
converti in a97, ripristini la protezione dall atua tabella col tuo
opportuno codice.
Non ho mai provato a cambiare i diritti di protezione da codice, ma credo
che si possa fare.
Ciao, Max


title: Leggere / impostare le roprietà di un report chiuso

author: Francesco R.

text:
Salve a tutti, non riesco in nessun modo a leggere e quindi neanche ad
impostare le proprietą di un report senza aprirlo in modalitą struttura.
Uso Access 2000 con Windows XP ed ho tentato con queste istruzioni ma
praticamente non mi restituisce nessuna proprietą.
    Dim obj As AccessObject, dbs As Object, prp As AccessObjectProperty
    Set dbs = Application.CurrentProject
    Set obj = dbs.AllReports(stDocName)
    For Each prp In obj.Properties
        Debug.Print prp.Name; prp.Value
    Next prp
Che cosa sbaglio?
Oppure esiste un modo utilizzando metodi ADO?
Grazie mille anticipatamente.


text:
"Francesco R." <
rfrance...@infinito.it
> ha scritto nel messaggio
news:fB7Aa.245687$K35.5...@news2.tin.it...

Sbagli nel voler accedere ad un Oggetto CHIUSO.
@Alex.


title: Aiuto, query difficile...

author: Pietro Favaro

text:
Intanto grazie...
il problema riguarda un data-entry per ordini cliente che in apparenza e'
molto semplice.
1) l'utente definische con una combo il cliente (e altre due stronzate)...
2) a questo punto passa in una sottomaschera per l'inserimento dell'ordine
che pero' (e qui scatta il problema) deve essere generata partendo
dall'assortimento del cliente selezionato.
In sostanza la sottomaschera di inserimento dell'ordine all'inizio
visualizza una serie di articoli con a fianco la quantita' a zero. Gli
articoli provengono dalla tabella assortimento, mentre le quantita' (in
origine 0) provengono dalla tabella ordini vera e propria.
Come faccio ?? Devo generare una Query o e' meglio riempire una tabella
temporanea derivante da una query dai listini e poi aggiorno i campi
quantita' ri-facendo una query sulla tabella ordini ??
Vi ringrazio.


title: Aiuto, query difficile...

author: Roberto dal portatile

text:
"Pietro Favaro" <
pfa...@docnet.it
> ha scritto nel messaggio
news:96894242...@tango.comm2000.it...
> Intanto grazie...
> il problema riguarda un data-entry per ordini cliente che in apparenza e'
> molto semplice.
>
> 1) l'utente definische con una combo il cliente (e altre due stronzate)...
Come origine record della maschera principale hai una tabella Ordini?
La combo è un controllo non associato ed è impostata su una tabella
Anagrafe?
> 2) a questo punto passa in una sottomaschera per l'inserimento dell'ordine
> che pero' (e qui scatta il problema) deve essere generata partendo
> dall'assortimento del cliente selezionato.
>
Cosa hai come origine record della sottomaschera? Una tabella
Dettaglio_Ordini?
Se si, in questa tabella devi registrare anche i record con quantità = zero?
Dove è contenuto l'assortimento del cliente selezionato?
> In sostanza la sottomaschera di inserimento dell'ordine all'inizio
> visualizza una serie di articoli con a fianco la quantita' a zero. Gli
> articoli provengono dalla tabella assortimento, mentre le quantita' (in
> origine 0) provengono dalla tabella ordini vera e propria.
>
Provengono dalla tabella Ordini (!?) o dalla tabella Dettaglio_Ordini ?
> Come faccio ?? Devo generare una Query o e' meglio riempire una tabella
> temporanea derivante da una query dai listini e poi aggiorno i campi
> quantita' ri-facendo una query sulla tabella ordini ??
Che voui dire?
> Vi ringrazio.
>
Prego, però penso che se non chiarisci anche queste "altre due stronzate",
solo il Mago Zurlì leggendo nella sfera di cristallo ti può aiutare.
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: Array come Parametro di Sub

text:
Ciao Ho un problema con gli array
Ho un modulo in cui ho dichiarato un array dim bVal(9) che riempo e
passo come parametro ad una sub dichiarata in General
Chiamata: bSet(bVal())
In General ho:
Public Sub bSet (ParamArray bVal())
ma quando tento di utilizzarlo scopro (dalla finestra immediata) che il
mio array e' diventato una matrice 1x9...
Qualcuno sa spiegarmi cosa sbaglio?
Grazie
Alessandro.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Array come Parametro di Sub

author: Lorenzo Coronati

text:
Scrisse "
ale.sc
" <
ale...@bigfoot.com
>:
>Ho un modulo in cui ho dichiarato un array dim bVal(9) che riempo e
>passo come parametro ad una sub dichiarata in General
>Chiamata: bSet(bVal())
>
>In General ho:
>Public Sub bSet (ParamArray bVal())
>ma quando tento di utilizzarlo scopro (dalla finestra immediata) che il
>mio array e' diventato una matrice 1x9...
Temo di non capire
bVal(9) *e'* una matrice 1x9
--
Lorenzo Coronati
---
[si parla di ODE/MOD, ndr]
<<chi sarebbe cosi' gentile da passarmelo?
in caso posso ricambiare con qualache mp3...:)))>>
(Koala, 5/3/2001)
---


title: Una query tosta ..per me

author: Riviera

text:
Problema 1: una query puň essere di accodamento e aggiornamento nello stesso
tempo o
                   bisogna  fare due query?
                   se si , bisogna intervnire sul codice della query ?? Un
esempio sarebbe graditissimo , grazie
Problema 2 correlato all' 1:
                   Dovendo aggiorn. una tabella A in base ad una tabella B
accodando rec. alla B
                   (se esistono in A e non in B) , mentre devo aggiornare se
record di tab. A= a rec di tabella   B     (cioč esiste un rec uguale in
tutte e due le tab) .
In questi casi č meglio scrivere del codice VB (dove si puň decidere cosa
fare) o fare piů query lanciate da macro o altro ??
Grazie e tutti
Con le domande si puň essere utili come con le risposte


title: Una query tosta ..per me

author: Giovanni Albertone

text:
On Mon, 5 Jun 2000 19:14:04 +0200, "Riviera"
<
marce...@smartino.ge.it
> wrote:
>Problema 1: una query può essere di accodamento e aggiornamento nello stesso
>tempo
Si, e' possibile. Devi usare una query di update in cui le tue due
tabelle sono unite tramite una "outer join".
Puoi trovare una rozzo esempio nella knowledge base di Microsoft:
http://support.microsoft.com/support/kb/articles/Q208/8/70.ASP?LN=EN-US&SD=gn&FR=0
Se non basta posta i dettagli delle tue due tabelle e vediamo di
costruirla.
--
Ciao,
Giovanni


title: Dati di riepilogo inutili in gruppi di un solo record

author: Giuseppe

text:
Come si fa ad impedire l'emissione dei dati di riepilogo quando i record del
gruppo si riducono ad un solo record?
In questa circostanza, infatti, i dati di riepilogo del gruppo son
superflui.
saluti
Giuseppe


author: Roberto da casa

text:
"Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
news:AsLP9.62366$TC5.2...@twister1.libero.it...

Ma il problema dove lo devi risolvere?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
> Ma il problema dove lo devi risolvere?
In un report.
Scusa se non l'ho precisato.
saluti
Giuseppe


text:
"Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
news:f1_P9.63749$TC5.2...@twister1.libero.it...

Se l'oggetto (tabella o query) che è origine record del report si chiama
Pippo.
Se il campo di Pippo in base al quale fai il raggruppamento sul report si
chiama Codice.
A fronte dell'evento "Su formattazione" della sezione Piè di pagina Codice
del report genera il seguente codice VBA:
Private Sub PièDiPaginaGruppo1_Format(Cancel As Integer, FormatCount As
Integer)
If DCount("*", "Pippo", "Codice=" & Codice) = 1 Then
    Cancel = True
End If
End Sub



text:
Grazie Roberto
Più tardi lo provo e ti dico com'è andata.
Access non finisce mai di stupirmi ...
...anche se spesso mi fa arrabbiare :-)
--
saluti
Giuseppe
per risposte in privato togli:
LevamiNoSpam
dall'indirizzo.


text:
Funziona alla grande Roberto.
Tanti auguri di buon anno.



text:
"Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
news:eDkQ9.67462$Ou4.2...@twister2.libero.it...
> Funziona alla grande Roberto.
> Tanti auguri di buon anno.
>
> --
> saluti
> Giuseppe
>
Tanti auguri di Buon Anno a te.



title: Colonne visibili

author: Mauro Monfardini

text:
C'è qualcuno che ha già costruito dei report per capitolati di preventivo
con pagine divise in colonne ...?
Ne ho realizzati in diversi modi, ma non riesco a costruirne uno che
renda visibile le linee di colonne lungo l'intera pagina..
Se rendo visibile il bordo di caselle di testo posizionate
orizzontalmente, queste si allungano verticalmente in base al contenuto,
ma non in egual misura a quella più profonda
non credo che creare un'immagine tipo griglia da applicare sulla pagina
 sia il metodo appropriato..., anche se possibile.
Un'altra domanda (visto che ci sono..):
Come si procede per far sì che l'intestazione di una colonna
diventi un pulsante "ordina" in una maschera..?
non ho trovato accenno di come fare nè sulla guida in linea
nè sulla Guida Completa Access 2000  (..Apogeo..), ma ho visto ciò sui
modelli presenti non riuscendo però a capire il metodo.
Forse saranno domande banali, ma non conosco alcuno
a cui rivolgermi.....  Il "fai da te" può comportare anche questo..
....Grazie.....


title: Colonne visibili

author: Ditta Cerri (Sib)

text:
Mauro Monfardini <
mam...@tin.it
> wrote in message
8dsgjs$bsh$1...@nmaster.tin.it...
> C'è qualcuno che ha già costruito dei report per capitolati di preventivo
> con pagine divise in colonne ...?
Se non ricordo male c'e' un esempio sul sito comune, ma potrei sbagliarmi.
Ciao, Sib


title: Colonne visibili

author: lbo dal portatile in treno

text:
>Ne ho realizzati in diversi modi, ma non riesco a costruirne uno che
>renda visibile le linee di colonne lungo l'intera pagina..
e' un bel problema.  quello che puoi fare e' inserire una righetta
verticale nel corpo del report, ma ovviamente sara' ripetuta e
diventera' un rigone verticale solo finche' sono presenti righe da
stampare, ossia record.
potresti allora fare in modo che alle righe/record che dovresti
stampare se ne aggiungano altre/i, in modo da arrivare fino in fondo
alla pagina, o meglio, fino ad arrivare in cima al pie' di pagina del
report.
la cosa e' stata dibattuta, per altri motivi, piu' volte sul ng.  in
sostanza devi calcolare l'altezza del corpo del report (ecco, questo
e' importante: devi capire che hai a che fare con una sezione, il
corpo, che viene ripetuta piu' volte se e solo se ci sono record da
visualizzare: il concetto di pagina cosi' come ti servirebbe, nei
report, sostanzialmente non essite), devi calcolare l'altezza, dicevo,
e usarla per dividere lo spazio che c'e' tra la fine dell'intestazione
e l'inizio del pie' di pagina per sapere quante istanze del corpo ti
servono.
la distanza tra intestazione e pie' di pagina dovrebbe essere
l'altezza del foglio meno i margini di stampa verticali meno l'altezza
(height) delle sezioni intestazione e pie' di pagina (vedi section
sull'help).

>Come si procede per far sě che l'intestazione di una colonna
>diventi un pulsante "ordina" in una maschera..?
non si fa.  cioe', magari potresti intercettare un evento click di
qualche etichetta o pulsante e scriverti del codice adeguato.  cosa
intendi per intestazione colonna?
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: Colonne visibili

text:
Mauro Monfardini <
mam...@tin.it
> wrote in message
8dsgjs$bsh$1...@nmaster.tin.it...
> C'è qualcuno che ha già costruito dei report per capitolati di preventivo
> con pagine divise in colonne ...?
>
> Ne ho realizzati in diversi modi, ma non riesco a costruirne uno che
> renda visibile le linee di colonne lungo l'intera pagina..
Scusa, ricordavo male, nel sito comune non ce l'ho trovato, fai cosi':
Nell'evento SuPagina del report usi il metodo:
Me.Line (Xi,Yi)-(Xf,Yf)
Per realizzare una linea che parte dal punto Xi,Yi e arriva nel punto Xf,Yf
Se vai a vedere sull'help ti spiega come puoi usare questo stesso metodo
anche per tracciare dei rettangoli.
Se poi ti vai a guardare il db di esempio "Soluzioni" e guardi la voce
"Aggiunta di un bordo pagina al report" nell'evento SuPagina del report
vedrai un esempio di questo metodo.
Ciao, Sib


title: Colonne visibili

author: lbo dal portatile

text:
>Nell'evento SuPagina del report usi il metodo:
>
>Me.Line (Xi,Yi)-(Xf,Yf)
si', ma questo non vale per il solo corpo del report?
cioe' se nel mio report da testata a pie' di pagina ci entrassero,
metti, 25 righe/record/corpi, ma i record da reportare fossero solo
20, la riga arriverebbe ai 4 quinti del foglio, non fino al pie' di
pagina.



title: Colonne visibili

author: Dario Martello

text:
lbo dal portatile <
l...@NOSPAM.blunet.it
> wrote in message
39085d5a...@news.interbusiness.it...

No Ibo, non č cosě, la linea te la fa sempre comunque, qualsiasi cosa tu
abbia sulla pagina !!! (purtroppo)
Anche questo č comunque un problema.
E' la classica soluzione che uso io per fare le righe sulle colonne delle
fatture : ovviamente le fatture devono avere tutte la stessa lunghezza (e
questo per la maggior parte delle fatture non č un problema).
E voi in casi di questo genere (fatture) come fate a fare le linee verticali
? (sempreche come me stampiate le fatture con la laser su fogli A4 normali,
non moduli prestampati su cui aggiungere solo i campi "mancanti").
Ciao
Dario


title: copiare id

author: Smart

text:
Ciao ragazzi vi spiego il mio problema:
ho una maschera prodotti e una maschera clienti.
apro la maschera prodotti e inserisco un nuovo prodotto, poi apro la
maschera clienti e inserisco i dati di un cliente.
a questo punto mi servirebbe un tasto che mi copiasse l'id del cliente
appena inserito nell'id del prodotto.
come fare??
ringraziando per la Vostra cortesia...Andrea.


title: copiare id

author: TANNHAUSER

text:
Smart ha scritto:


> come fare??

Domanda introduttiva: ogni cliente ha più prodotti solo suoi e ogni
prodotto è solo per un cliente? Se si vai a CONTINUA, sennò a SPECIFICA.
CONTINUA
Nella tabella prodotti inserisci anche un campo Cliente che sarà collegato
con IDCliente della tabella clienti molti a uno.
Nella maschera prodotti inserisci una casella combinata che abbia come
origine una query sulla tabella clienti in modo che tu possa scegliere il
cliente da abbinare al prodotto; se il cliente non esiste ancora puoi, ad
esempio attraverso un pulsante, aprire la maschera per il suo inserimento
equindi, una volta chiusa vederlo nella tua casella combinata aggiornata.
Ti sembra chiaro?
SPECIFICA
Appunto.
TANNHAUSER
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: copiare id

text:
"TANNHAUSER" <
tannau...@virgilio.it
> ha scritto nel messaggio
news:cq9bi4$glh$1...@news.newsland.it...

si grazie mille!!!


title: Problemino con recordset e campo contatore

author: Marco

text:
Ciao a tutti!
Ho la seguente situazione: apro un recordset e aggiungo un nuovo record.
Immetto i miei valori ed eseguo l'update. Ora io vorrei ottenere il valore
del campo ID, che č un contatore, che ovviamente č l'unico che non ho
aggiornato a mano.
C'č un modo per fare questo senza eseguire una query?
Il codice che uso piů o meno č questo
recordset.Open nometabella,stringaconnessione,0,3
recordset.AddNew
...
recordset.Fields("nomequi").Value = x
...
recordset.Update
Avrei voluto inserire qualcosa del tipo
id = recordset.Fields("id").Value
ma il campo č vuoto.
Ho l'impressione che sia un problema da niubbo, quale in effetti sono, ma
qualcuno mi darebbe una mano?
Marco


author: massimo

text:

prova in questo modo
recordset.Requery
recordset.MoveLast
id = recordset.Fields("id").Value
sempre che la tua query non sia ordinata in modo particolare,
non so bene a cosa ti serve ma mi sembra un metodo poco valido.
Ciao.


author: Pablitomf (Maurizio Facciuti)

text:
"Marco" <extrema...@email.italia> ha scritto nel messaggio
news:FKF7f.43$r_4...@news.edisontel.com...
> Ciao a tutti!
> Ho la seguente situazione: apro un recordset e aggiungo un nuovo record.
> Immetto i miei valori ed eseguo l'update. Ora io vorrei ottenere il valore
> del campo ID, che è un contatore, che ovviamente è l'unico che non ho
> aggiornato a mano.
> C'è un modo per fare questo senza eseguire una query?
>
> Il codice che uso più o meno è questo
>
> recordset.Open nometabella,stringaconnessione,0,3
> recordset.AddNew
> ...
> recordset.Fields("nomequi").Value = x
> ...
> recordset.Update
>
> Avrei voluto inserire qualcosa del tipo
>
> id = recordset.Fields("id").Value
>
> ma il campo è vuoto.
>
> Ho l'impressione che sia un problema da niubbo, quale in effetti sono, ma
> qualcuno mi darebbe una mano?
>
> Marco
>
Chiudi il recordset, riaprilo, posizionati sull'ultimo record inserito e
leggi l'ID.
;-)
--
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97 e 2000
ASP
-----------------------------------------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
-----------------------------------------------------------------
Il mio motto :
""Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media."


text:
Grazie ad entrambi, il mio problema principale è che nel frattempo altri
utenti potrebbero aver aggiunto altri record, e non ho nessuna assicurazione
che con MoveLast il puntatore venga posizionato sul record voluto. So che è
una questione di decimi di secondo, ma cercavo un metodo "infallibile".
Leggevo sulla documentazione di chiliasp che è possible fare in modo che il
recordset rifletta le modifiche apportate da altri utenti mediante
l'impostazione del locktype (se non erro). Questo non potrebbe fare al caso
mio? Solo che non ho capito molto bene in che contesto si applichi.
Ogni rimando a documentazione esistente è più che gradito.
Grazie ancora,
Marco


text:
In data Wed, 26 Oct 2005 08:55:38 +0200, Marco
<extrema...@email.italia> ha scritto:
> Ciao a tutti!
> Ho la seguente situazione: apro un recordset e aggiungo un nuovo record.
> Immetto i miei valori ed eseguo l'update. Ora io vorrei ottenere il
> valore
> del campo ID, che è un contatore, che ovviamente è l'unico che non ho
> aggiornato a mano.
> C'è un modo per fare questo senza eseguire una query?
>
> Il codice che uso più o meno è questo
>
> recordset.Open nometabella,stringaconnessione,0,3
> recordset.AddNew
> ...
> recordset.Fields("nomequi").Value = x
> ...
> recordset.Update  [1]
>
> Avrei voluto inserire qualcosa del tipo
>
> id = recordset.Fields("id").Value  [2]
>
> ma il campo è vuoto.
>
> Ho l'impressione che sia un problema da niubbo, quale in effetti sono, ma
> qualcuno mi darebbe una mano?
>
> Marco
>
Credo che nel momento in cui richiami l'ID questo non sia ancora stato
generato...
Hai provato ad inserire l'istruzione [2] dopo la [1]?
Se no, non so...
--
...oooOOO Nitro 82282 OOOooo...


author: Giorgio da Prato

text:
Marco ha scritto:

un' altra possibilità: e' possibile isolare una key (descrittiva) del
record dall' insieme dei dati (campi) aggiunti , appunto, in ogni
record ?
Se si' puoi ricavare la key numerica (idContatore) con una Dlookup.
Giorgio


title: ribattezzare file

author: Loico

text:
Come mai le applcazioni access si chiamano per forza nomeprogramma.mdb ??
Vorrei creare un icona sul desktop tipo "programma" e basta, senza
estensione.
si può ?
--


title: ribattezzare file

author: Antonio Biso

text:
"Loico" <
mi...@tin.it
> ha scritto nel messaggio
news:b32tvs$5s5$1...@usenet.itgate.net...
> Come mai le applcazioni access si chiamano per forza nomeprogramma.mdb ??
> Vorrei creare un icona sul desktop tipo "programma" e basta, senza
> estensione.
Sigh...
Tu puoi anche chiamare un db access Pippo e basta, e se lo apri da dentro
access lo apre.
Ma se invece ci fai doppio clic sopra, NON ti apre access automaticamente
con quel db, perchè l'associazione estensione programma non c'è più!
Ma il tuo amico lingua in bocca Bill Gates ha inventato i collegamenti!
Allora puoi crearti un collegamento al db che mantiene la sua estensione,
però il collegamento sul desktop lo chiami come ti pare!!!
Antonio


title: ribattezzare file

author: MA

text:

Antonio, credo il problema sia ancora più grave: Loico, fermo restando ciò
che ha detto Antonio, vai in cartelle - opzioni- e togli l'opzione
visualizza estensione.
strasigh :..-[
cioa MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


title: ribattezzare file

author: Alessandro Cara

text:
MA wrote:
>
> Antonio, credo il problema sia ancora più grave: Loico, fermo restando ciò
> che ha detto Antonio, vai in cartelle - opzioni- e togli l'opzione
> visualizza estensione.
Visto il soggetto. Strano che non gli hai consigliato il fiume Giordano
--
a.cara
Togli qualcosa dall'email


title: ribattezzare file

text:
"Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
news:3E55021C...@blunet.it...

Solo perchè non è di moda.......!!
@Alex.


title: ribattezzare file

text:
Il 20 Feb 2003, 17:28, Alessandro Cara <
alexqu...@blunet.it
> ha scritto:
> MA wrote:
>
> >
> > Antonio, credo il problema sia ancora più grave: Loico, fermo restando
ciò
> > che ha detto Antonio, vai in cartelle - opzioni- e togli l'opzione
> > visualizza estensione.
> Visto il soggetto. Strano che non gli hai consigliato il fiume Giordano
Credo che per come sta il solo Giordano non possa farcela. C'è bisogno
dell'intera
Ma.Gi.Ca
. (Maradona-Giordano-Careca)
Oh mammma, mammma,mammma, Oh mammma, mammma,mammma, sai perchè mi batte il
corason...
ho visto Maradona, ho visto Maradona, e mamma, innamorato son
Oh mammma, mammma,mammma, Oh mammma, mammma,mammma, sai perchè mi batte il
corason...
ho visto Maradona, ho visto Maradona, e mamma, innamorato son
Oh mam...
Buongiorno a tutti e
ciao MAssimiliano



title: ribattezzare file

text:
MA wrote:
>
>
Ma.Gi.Ca
. (Maradona-Giordano-Careca)
Mag(g)ica.... Lasciamo perde. Sto in lutto.



title: ribattezzare file

text:
"Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
news:3E55FA77...@blunet.it...
> MA wrote:
> >
>
> >
Ma.Gi.Ca
. (Maradona-Giordano-Careca)
> Mag(g)ica.... Lasciamo perde. Sto in lutto.
A 'sto giro possiamo fa' una bella veglia funebre collettiva!!!
Antonio


title: Importazione xls

author: Luca Lau

text:
>Buongiorno a tutti,
>vi espongo velocemente il problema:
>se importo in access una tabella excel che contiene dei valori decimali,
>essi vengono automaticamente approssimati per eccesso.
>Una volta importata non posso più recuperarli.
>Come evitarlo?
>Danghiu,
>Luca


title: Importazione xls

text:
Per maggior chiarezza volevo aggiungere che
una volta passata in access, la tabella
xls perde tutti i decimali. Ciņ vuol dire che anche
impostando precisione doppia sul campo ed aggiungendo due
dec. dopo la virgola, essi rimangono a zero, poichč ha gią arrotondato
automaticamente.
Luca


title: Importazione xls

author: Sergio MAZZA

text:
"Luca Lau" <luca_l...@NOSPAMfastwebnet.it> ha scritto nel messaggio news:ySdhf.14917$tc5....@tornado.fastwebnet.it...
>
> Per maggior chiarezza volevo aggiungere che
> una volta passata in access, la tabella
> xls perde tutti i decimali. Ciò vuol dire che anche
> impostando precisione doppia sul campo ed aggiungendo due
> dec. dopo la virgola, essi rimangono a zero, poichè ha già arrotondato
> automaticamente.
>
> Luca
Se la tabella la colleghi?
Ciao.
--
Sergio MAZZA


title: Importazione xls

text:
> Se la tabella la colleghi?
Se la tabella la collego.... va perfettamente!!!!
Grazie 1000,
Luca


title: modifica record........

text:
Salve ragazzi vorrei chiedervi se è possibile tramite un If avere la
conferma del salvataggio del record o meno o delle eventuali modifiche senza
il messaggio predefinito di access.
--
Grazie dei vostri conisgli ,
Gianni_B


title: modifica record........

author: Enrico

text:
"Gianni_B" <
gia...@bluewin.ch
> ha scritto nel messaggio
news:3fcf1352$1...@news.bluewin.ch...
> Salve ragazzi vorrei chiedervi se è possibile tramite un If avere la
> conferma del salvataggio del record o meno o delle eventuali modifiche
senza
> il messaggio predefinito di access.
Testa la variabile Me.Recordset.RecordStatus della form sull'evento che ti
interessa.
Guarda la guida per dettagli.. :-)
Spero sia quello che cerchi.
> Grazie dei vostri conisgli ,
> Gianni_B
Enrico


title: Focus su apertura maschera

author: Giuseppe

text:
Ciao a Tutti
Ho questo problema , con un pulsante  apro due maschere , la prima
normale ,la seconda popup a scelta obbligatoria , a questo punto vorrei che
il cursore si posizionasse sulla casella di Testo "Nome" .
Solo che la  popup non mi prende lo stato attivo , solo se clicco
in una qualsiasi parte della Popup allora vedo il cursore lampeggiare
nella casella di testo .
Ne ho provate tante , niente
Su apertura Popup
Me.Nome.SetFocus
Su Caricamento Maschera
Forms!CercaArticoliAprilia.SetFocus
Forms!CercaArticoliApriliaPopup!Nome.SetFocus
Su attivazione Popup
Me.Nome.SetFocus
C'è una soluzione
Grazie anticipato
Ciao Giuseppe


title: Focus su apertura maschera

text:

> C'č una soluzione
>
> Grazie anticipato
>
> Ciao Giuseppe
Ho creato due form identiche ma una č Popup e a scelta obbligatoria; in
un'altra form ho creato un bottone con il codice (generato da access):
   stDocName = "provaNormale"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    stDocName = "provaPopup"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
mi si apre la form "normale" poi la "popup" e quest'ultima ha il focus e il
cursore lampeggiate sul primo controllo.
Forse devi rivedere l'ordine di apertura delle form...
Ciao.
--
Sergio MAZZA


title: Valore da label

author: Lucio

text:
Salve a tutto il NG,
in un report ho delle etichette che come proprietą caption hanno dei
numeri, poi ho delle caselle di testo che a loro volta hanno delle
funzioni Dsum, le quali perņ dovrebbero filtrare le somme in funzione del
valore contenuto per ogni caption delle etichette.
Come posso fare da codice a definire il valore del filtro delle somme in
funzione di qunto contenuto nelle caption?
Grazie.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Valore da label

author: Roberto dalla campagna

text:
"Lucio" <nap...@NOSPAMtin.it> ha scritto nel messaggio
news:de7ilv$gu1$1...@news.newsland.it...
> Salve a tutto il NG,
> in un report ho delle etichette che come proprietą caption hanno dei
> numeri, poi ho delle caselle di testo che a loro volta hanno delle
> funzioni Dsum, le quali perņ dovrebbero filtrare le somme in funzione del
> valore contenuto per ogni caption delle etichette.
> Come posso fare da codice a definire il valore del filtro delle somme in
> funzione di qunto contenuto nelle caption?
> Grazie.
Se la tabella che contiene i dati si chiama Tabella2.
Se il campo da controllare con il valore della caption della etichetta si
chiama Valore1.
Se il campo da sommare si chiama Valore2.
Se l'etichetta si chiama Etichetta1.
Se la casella di testo si chiama Testo0.
Prova con la seguente riga di codice VBA:
Me!Testo0 = DSum("Valore2", "Tabella2", _
"Valore1 =" & Me!Etichetta1.Caption)
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Query impossibile? (trasporre e sommare una tabella)

author: iLanders

text:
Salve a tutti,
devo generare una query da una tabella, ma non ne esco. Provo a spiegarmi.

Partendo da una tabella in cui ogni record rappresenta le quantità di 3 prodotti (AA, AB, BB) presenti su 3 scaffali (es per la prima riga: 3 prodotti AB sullo scaffale1, 3 BB sullo scaffale2, e 3 AB sullo scaffale3), ho bisogno di avere i totali, divisi per prodotto, per ogni scaffale.

Esempio:
Ho una tabella fatta così (AA, AB, BB sono codici di prodotto, Sca è lo scaffale):
--------------------------
q.tà   Sca1   Sca2   Sca3
--------------------------
  3     AB     BB     AB
  1     BB     AB     BB
  4     AB     AA     AB
  5     AB     AB     AB
--------------------------

Vorrei una query che mi restituisse questi dati:
-------------------------------
Cod   QtàSca1  QtàSca2  QtàSca3
-------------------------------
 AA      0        4       0
 AB     12        6      12
 BB      1        3       1
-------------------------------

E' possibile?
Grazie in anticipo.
iLanders


text:
Prova ad usare una UNION ALL

http://stackoverflow.com/questions/560621/sql-convert-column-to-row


text:
Il giorno sabato 6 ottobre 2012 11:10:39 UTC+2,
in...@mauropiccini.it
 ha scritto:
> Prova ad usare una UNION ALL
>
>
>
>
http://stackoverflow.com/questions/560621/sql-convert-column-to-row

Grande MAURO PICCINI!
Funziona alla grande!
Mi hai tolto un pentolone dal fuoco grosso così!!!
Mitico!


title: Proprietà visible

author: il barbi

text:
Ho necessita' di cambiare questa proprieta' da VBA per le
pagine di una struttura a schede e per gruppi di controlli
nelle singole pagine. Se devo rendere invisibile una pagina
con tutti i suoi controlli mi basta porre
me.pagina.visible=false
ma se successivamente pongo
me.pagina.visible=true, non tutti i controlli della pagina
diventano visibili, ma solo quelli che erano visibili prima
che rendessi invisibile la pagina. Quindi sono costretto a
porre la proprieta' visible esplicitamente per tutti i
controlli che voglio rendere visibili, con notevole
appesantimento della programmazione ma soprattutto con
notevole rallentamento perche' devo decidere record per
record quali pagine e quali gruppi di controlli
visualizzare; cioe' passando da un record a un altro devo
aspettare 2 o 3 sec. (va bene che il clock e' a 333 MHz...).
Questo nel caso peggiore, in cui devo rendere visibili 8
pagine con complessivamente quasi 200 controlli.
Pensavo che la situazione potesse migliorare usando il
raggruppamento dei controlli, ma ho visto che si tratta solo
di una manovra adatta a selezioni manuali, che non esiste in
VBA per i miei scopi e d'altronde non posso definire una
pagina per ogni gruppo di controlli che devono essere
visualizzati o no contemporaneamente, sarebbero troppe
pagine
C'e' magari un'altra soluzione?
il barbi


title: Form e subform

author: Darktheater

text:
Salve a tutti... vi spiego il mio problema: ho una form con due subform
relazionate che mi servono per gestire delle fatture. Il tutto lo gestisco
con dei recordset per consentire, principalmente, l'annulamento delle
modifiche. Digitando nel campo serie/numero la fattura che si vuole
richiamare, VB accede al recordset principale (quello associato alla form) e
filtrandolo estrae la fattura voluta. Fatto questo, i recordset delle due
subform devono essere filtrati in base all'id della fattura estratta e lo
faccio con istruzioni di questo tipo:
...
sqlDettCalz="SELECT * FROM qfatts1 WHERE idfattcalz="& me!idfatt
set rstDettCalz=OpenRecordSet(sqlDettCalz,dbOpenDynaset)
set Me.frmdettcalz.form.Recordset = rstDettCalz
'per la prima subform
sqlDettEx="SELECT * FROM qfatts6 WHERE idfattex="& me!idfatt
set rstDettEx=OpenRecordSet(sqlDettEx,dbOpenDynaset)
set Me.frmdettcalz.form.Recordset = rstDettEx
'per la seconda subform
Nella maschera principale ho due controlli per il calcolo del totale di
quanto riportato nelle subform
"IIf([frmdettcalz].Form.[Recordsetclone].[RecordCount]=0;0;[frrdettcalz].For
m.[txttotcalz]" (idem per la seconda) ed è qui che ora sorge il problema: in
pratica viene riportato il totale solo per il primo recordset che viene
aperto mentre per il secondo mi riporta un #Errore! Assurdo... vi ringrazio
anticipatamente per l'aiuto e vi auguro un buon Natale.


title: Form e subform

author: Roberto dal portatile

text:
"Darktheater" <
darkt...@libero.it
> ha scritto nel messaggio
news:H8_W7.373966$sq5.18...@news.infostrada.it...

Perché non usi la funzione di aggregazione DSum (vedi help)?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Strano errore in programma per Pub

author: M--M

text:
Salve,
ho creato un programmino per la gestione di un Pub.
Il funzionamento è semplice, scelto il numero del tavolo, appare una
maschera con un solo record vuoto (prodotto, quantità, prezzo). Al campo
"prodotto" è associata una tabella con i prodotti che man mano aggiungo.
Ogni prodotto aggiunto viene sistemato nel record sotto al precedente in
ordine cronologico di acquisto.
Tuttavia, ogni tanto si presenta il seguente errore:
io aggiungo un nuovo prodotto e questo va a sistemarsi in cima alla
lista! (con problemi in fase di stampa in quanto l'ordine dei prodotti è
a dir poco fantasioso: un dolce prima delle patatine!!) Inoltre spesso a
questo bizzarro comportamento è associata anche la scomparsa del prezzo
del prodotto che è andato in testa!
Purtroppo non ho ancora capito da cosa dipende questa disfunzione e
spero che qualcuno abbia la pazienza di aiutarmi.
Mille grazie
M.


title: Strano errore in programma per Pub

author: SunRex

text:
"M--M" <a...@defghi.lm> ha scritto nel messaggio
news:3F586DF9...@defghi.lm...

Mumble mumble
Ma che per caso il problema ti si presenta quando cambi tavolo?
Perchè se si allora c'è un problema di ordinamento nei record.
Se non riesci a risolvere vai sul report e forzagli l'ordinamento
premendo sul menu Visualizza e poi Ordine e Raggruppamento.
SunRex


title: Strano errore in programma per Pub

text:
Il problema si presenta quando meno te lo aspetti!
E poi il prodotto inserito per ultimo va in ogni caso in testa alla
lista indipendentemente dal nome! Con relativa scomparsa del "prezzo"
dal relativo campo!
Ti giuro sembrerebbe un virus fatto ad arte per romprere le balle a chi
sta lavorando!
Tutto si risolve se cancello tutti gli ordini e riparto da zero!
Grazie
M.



title: Strano errore in programma per Pub

text:
"M--M" <a...@defghi.lm> ha scritto nel messaggio
news:3F59DBEE...@defghi.lm...

Dubito che sia un virus.
Per un'analisi più approfondita dovresti postare la struttura delle due tbl
che usi
e le propietà principali della frm che usi per caricare i dati.
SunRex


title: Contatti di Outlook 2000

author: Franco

text:
Salve a tutti, vorrei porre un quesito a coloro che sanno come fare od hanno
già avuto modo di utilizzare la cartella contatti di outlook collegata ad un
db access.
Il mio scopo è quello di vedere i clienti del db di access in outlook, ed un
campo di questi deve contenere i prodotti acquistati è generalmente servono
+ di 255 caratteri, il tutto va sincronizzato con il palmare psion (che non
si collega direttamente con access.
Spiego cosa vorrei fare:
Vorrei collegare (non importare) la cartella contatti con un db di access, e
fin quì nessun problema, se non fosse chè mi serve un campo che non importa,
e cioè il campo note che accetta + di 255 caratteri.
Ho aggirato il problema importando la tabella di access in outlook, e qui
importa il campo note ma non è possibile aggiornarlo.
Quindi avendo esaurito le alternative, non so + cosa fare, e chiedo aiuto a
Voi, sperando che possiate suggerirmi un'alternativa.
Cmq Vi auguro buone feste.
Franco


title: A97 Data 1° giorno del mese successivo

author: Sonix

text:
Salve  a tutti!!.....Ho il problemuccio di riuscire ad avere in automatico
in una forms d'una maschera basata su una tabella come questa:
----------------------------------------------------------------------------
----
Nome tabella: Data odierna
Campo: "IDdata"  -contatore
Campo: "Data odierna"  -valore predefinito =Date( )
----------------------------------------------------------------------------
---
Il problemuccio è questo:.....vorrei ottenere in una maschera ove inserito
una forms non correlata, cliccando su un pulsante la data del primo giorno
del mese successivo in base alla data odierna che è ottenuta automaticamente
nel campo: "Data odierna"
Se fosse possibile senza usare codice di Visual Basic ma ottenendola da una
MACRO o da una FORMULA.
Spero ci sia qualche buona aninima che voglia aiutarmi.... :-)


title: A97 Data 1° giorno del mese successivo

author: Roberto da casa

text:
"Sonix" <
marcosi...@libero.it
> ha scritto nel messaggio
news:s4wH6.13463$0t6.4...@news.infostrada.it...

Devi usare la funzione DateSerial (vedi help).
Ipotizziamo che il controllo associato al campo Data odierna della tabella e
che ha valore predefinito =Date() si chiami anche lui Data odierna.
Se il controllo che deve contenere la data del 1° giorno del mese successivo
si chiama Pippo, a fronte dell'evento "Su clic" del tuo pulsante di comando
genera la seguente riga di codice VBA:
Me!Pippo = DateSerial(Year(Me![Data odierna]), Month(Me![Data odierna]) + 1,
1)
Le macro non le adopero per principio, quindi non saprei dirti come fare con
una macro.
Se però ritieni di poter fare a meno del pulsante di comando, nel valore
predefinito di Pippo scrivi:
= DateSerial(Year([Data odierna]) ; Month([Data odierna])+1 ; 1)
Un piccolo consiglio: se vuoi usare decentemente Access e ritieni utile
frequestare questo NG, forse è bene che cominci a familiarizzare con VBA
(giuro che non morde ;-) ).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: A97 Data 1° giorno del mese successivo

author: Silvio Berruti

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:f3CH6.17899$0t6.6...@news.infostrada.it...
>
> "Sonix" <
marcosi...@libero.it
> ha scritto nel messaggio
> news:s4wH6.13463$0t6.4...@news.infostrada.it...
> > Salve  a tutti!!.....Ho il problemuccio di riuscire ad avere in
automatico
> > in una forms d'una maschera basata su una tabella come questa:
>
> --------------------------------------------------------------------------
> --
> > ----
> > Nome tabella: Data odierna
> > Campo: "IDdata"  -contatore
> > Campo: "Data odierna"  -valore predefinito =Date( )
>
> --------------------------------------------------------------------------
> Devi usare la funzione DateSerial (vedi help).
[Cut]
> Un piccolo consiglio: se vuoi usare decentemente Access e ritieni utile
> frequestare questo NG, forse è bene che cominci a familiarizzare con VBA
> (giuro che non morde ;-) ).
>
> --
> Roberto
Meno male che gli hai risposto tu, perché a me veniva voglia di
rispondergli:
fai una macro, ciao, ciao
:-))
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: A97 Data 1° giorno del mese successivo

author: Riccardo

text:
> Devi usare la funzione DateSerial (vedi help).
> Ipotizziamo che il controllo associato al campo Data odierna della tabella
e
> che ha valore predefinito =Date() si chiami anche lui Data odierna.
> Se il controllo che deve contenere la data del 1° giorno del mese
successivo
> si chiama Pippo, a fronte dell'evento "Su clic" del tuo pulsante di
comando
> genera la seguente riga di codice VBA:
>
> Me!Pippo = DateSerial(Year(Me![Data odierna]), Month(Me![Data odierna]) +
1,
> 1)
>
> Le macro non le adopero per principio, quindi non saprei dirti come fare
con
> una macro.
Per quale principio?
> Se però ritieni di poter fare a meno del pulsante di comando, nel valore
> predefinito di Pippo scrivi:
>
> = DateSerial(Year([Data odierna]) ; Month([Data odierna])+1 ; 1)
>
> Un piccolo consiglio: se vuoi usare decentemente Access e ritieni utile
> frequestare questo NG, forse è bene che cominci a familiarizzare con VBA
> (giuro che non morde ;-) ).
Una piccola domanda:
ma dato che tante cosè si possono fare sia con le macro che con VBA, che
differenza
c'è nell'usare l'uno o l'altro?
grazie, Riccardo


title: A97 Data 1° giorno del mese successivo

text:
"Riccardo" <
ricc...@free.panservice.it
> ha scritto nel messaggio
news:9cp5vt$7dq$1...@news.panservice.it...
[CUT]
> > Un piccolo consiglio: se vuoi usare decentemente Access e ritieni utile
> > frequestare questo NG, forse è bene che cominci a familiarizzare con VBA
> > (giuro che non morde ;-) ).
>
> Una piccola domanda:
> ma dato che tante cosè si possono fare sia con le macro che con VBA, che
> differenza
> c'è nell'usare l'uno o l'altro?
>
> grazie, Riccardo
>
Se conosci ugualmente bene le macro e l'uso del codice VBA, per le cose che
si possono fare in ambedue le maniere, decidi tu ciò che preferisci.
Se però sei un neofita e devi decidere se imparare l'uso delle macro o l'uso
del codice VBA, io non avrei dubbi: impara prima l'uso del codice VBA, per
due motivi:
1) Con il codice VBA puoi fare praticamente tutto quello che fai con le
macro, ma sei mooooolto lontano dal poter dire il contrario.
2) La stragrande maggioranza dei frequentatori di questo NG non usa le
macro, come avrai potuto notare dal fatto che quasi tutti i messaggi sulle
macro restano senza risposta. Quindi se ritieni interessante partecipare a
questo NG, ritengo che sia bene che tu conosca VBA.
Resta un fatto innegabile: se conosci solo le macro non riuscirai a
sfruttare gran parte delle potenzialità di Access, e ciò è confermato anche
dal fatto che tutti gli esempi dell'help sono realizzati con codice VBA e
non con macro.



title: A97 Data 1° giorno del mese successivo

text:
Roberto dal portatile <
r.ma...@libero.it
> wrote in message
huWH6.29454$0t6.1...@news.infostrada.it...

_____
thank's
Riccardo


title: Conteggio ore lavorative

author: usarraci

text:
Siccome avrei bisogno di conteggiare il numero di ore lavorative
mensili di alcuni dipendenti compresi i minuti (tipo: 10h e 25min)
sapete come posso fare in modo che access sommi e scali
automaticamente questi valori temporali in una casella finale?
La mia idea sarebbe di conteggiare mese per mese il numero di ore
comprensivi di minuti per sottrarlo al numero di ore totali da
compiere (nel caso specifico 1200). (es. mese di ottobre 2002:
100h21min + mese di novembre 2002: 110h40min totale ore da svolgere
989h59min).
Vi ringrazio anticipatamente per il vostro aiuto.
Ciao
Ciao
--
Fan di Hanamichi, Godai e Asuka
ICQ number: 156081507


title: dlookup o varie query

author: Fd

text:
Ciao a tutti,
    sono bloccato con una query e a questo punto non so se forse sia meglio
usare
dlookup. (a dire il vero ho fatto 2-3 query collegata me non ci sono versi)
Ecco la situazione:
Tabella FattureTestata e TabellaFattureCorpo
in unione con idfattura
Volevo per una statistica interna creare un report che sia simile ad una
fattura ma da usare internamente dove alla stampa mi venga presentato il
prezzo di vendita della fattura in oggetto
e di fianco l'ultimo prezzo di vendita dello stesso articolo allo stesso
cliente.
Praticamente un confronto di prezzo tra la riga del corpo della fattura
corrente
e la riga del corpo dell'ultima fattura precedente all'attuale.
Il problema su cui non riesco a ragionare č:
Come posso fare per estrarre SOLO un record che corrisponda per codice
articolo e cliente
a quello della riga della fattura che sto stampando?
Tutto funziona in ogni caso se la fattura che vado a stampare ha una riga...
ma se ha piů articoli non  funziona nulla!
Ciao e Grazie
Fd


title: dlookup o varie query

text:
"Fd" <
f...@libero.it
> ha scritto nel messaggio
news:43d36541$0$335$5fc...@news.tiscali.it...

Mi sembra che una DLookup vada benissimo per risolvere il tuo problema: nei
suoi criteri imposta che il cliente e l'articolo siano quelli del record
corrente ed inoltre imposta la cose in modo che la data sia la data massima
tra i record di quel cliente e di quel prodotto (per far questo puoi usare
una DMax nei cui criteri imposti il cliente e il prodotto uguale a quelli
del record corrente).
>
> Ciao e Grazie
Prego
> Fd
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: dlookup o varie query

text:
Grazie,
ma... una domanda... forse stupida...
per poter fare il dlookup e filtrare per data (dmax) codice articolo e
cliente devo
inserire come dominio di ricerca del dlookup un query creata appositamente
Non credo si possano specificare sul dlookup le join tra tabelle ...
confermi?
Grazi ancora
Fd


title: dlookup o varie query

text:
<
f...@libero.it
> ha scritto nel messaggio
news:f%TAf.58259$eD5.9...@twister2.libero.it...

Il dominio di una funzione DLookup deve essere una tabella o una query
registrata: se si tratta di una query nessuno vieta che essa sia basata sul
join di piů tabelle.
>
> Grazi ancora



title: Problemi vari....

author: M. Rick

text:
Purtroppo, data la mia grande inesperienza, vado sempre a sbattere contro
gli ostacoli peggiori.
Sto testando un database che credevo essere molto semplice, ma a quanto pare
è peggio del previsto.
Sono semplicemente 2 tabelle principali, e una maschera con sottomaschera,
eppure sto trovando un sacco di problemi.
Fondamentalmente, quello che dovrebbe fare il db è:
-registrare i dati di tizio in una tabella A;
-per ogni record di A (quindi per ogni tizio) registrare una serie di record
nella tabella B
 Per fare questo, ho creato una relazione 1-a-molti tra A e B (1 tizio in
A - molti record in B); maschera principale dove inserisco i dati per la
tabella A, pulsante per salvare il record in A, quindi sottomaschera dove
andare poi a inserire i record in B.
Poi mi interesserebbe poter stampare, per ogni tizio in A, un report in cui
mi elenca i dati contenuti in B e relativi "solo" a quel record di A. In
pratica, dalla maschera principale, tramite elenco a discesa, seleziono il
nome di tizio, lui mi va al record Tizio e nella sottomaschera mi visualizza
tutti i record correlati.
E qui il primo problema: il report che mando in stampa, però, mi elenca
tutti i tizi contenuti in A (però almeno per ogni tizio mi elenca i
rispettivi record in B - magra consolazione). Come faccio a fare questa
stampa selettiva, cioè solo tizio e i suoi record?
Poi, nella sottomaschera avevo inserito un pulsante (creato con l'apposita
funzione) per avere l'anteprima del report dopo aver inserito i dati di B.
Adesso, a prescidere dal problema di cui sopra, quando premo il pulsante mi
esce sempre questo messaggio:
"L'espressione Su Click immessa come impostazione della proprietà di evento
ha provocato il seguente errore: Errore di comunicazione con il server OLE o
con il controllo ActiveX".
Ho provato a formattare il sistema e reinstallare Access, ma mi resta sempre
lo stesso messaggio. Come ci rimedio?
Grazie per la pazienza.
Andrea


title: Problemi vari....

author: Carlo Costarella

text:
"M. Rick" <
now...@libero.it
> ha scritto nel messaggio
news:mCPtb.119724$vO5.4...@twister1.libero.it...

Addirittura formattare mi sembra eccessivo...comunque.
Se scegli il tizio dalla tabella A da una combo o da una lista o da una
maschera, potresti alimentare il report con una query che abbia nei criteri
del "Tizio" il valore presente nella maschera, nella lista o nella combo.
L'istruzione SQL della query dovrebbe assomigliare a questa:
SELECT TabellaA.*, TabellaA.CampoTizio
FROM TabellaA
WHERE (((TabellaA.CampoTizio)=[Forms]![TuaMaschera]![CampoTizio]));
Questa query la puoi salvare e utilizzarla per alimentare il report.
Per il secondo problema devi leggere bene il codice associato al pulsante,
controllare che tutto sia stato scritto correttamente rispettando bene i
nomi dei controlli. Verifica di non aver inserito un controllo ActiveX
magari poi eliminato senza eliminare qualche riferimento.
Ciao, Carlo


title: Problemi vari....

author: cidi

text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> ha scritto nel
messaggio news:NXPtb.38483$hV.14...@news2.tin.it...

Ciao Carlo
credo che questa volta i ceci non te li toglie nessuno :))
Daniele


title: Problemi vari....

text:
"cidi" <
dadonzin...@tin.it
> ha scritto nel messaggio
news:udQtb.38787$hV.14...@news2.tin.it...
CUT
> >
>
> Ciao Carlo
> credo che questa volta i ceci non te li toglie nessuno :))
> Daniele
>
Hai ragione Daniele.
Non ho fatto caso al subject...speriamo che il Biso sia clemente...almeno
con gli anziani del NG.
Ciao, Carlo


title: Problemi vari....

text:
>Addirittura formattare mi sembra eccessivo...comunque.
Il fatto è che a volte sono troppo drastico, ma non mi va di litigare con
zio Bill (più che altro mi rode che il sistema oggi funziona, poi spengo,
domani riaccendo e qualcosa ha deciso di andare a passeggio chissà dove
lasciando a me i casini)
>Non ho fatto caso al subject...speriamo che il Biso sia clemente...almeno
con gli anziani del NG.
Scusa la domanda, ma me la spieghi? Dare un consiglio a qualcuno comporta la
punizione dei ceci...?
cmq, provo oggi ad applicare il consiglio che mi hai dati circa la query,
grazie ancora.
Ciao
Andrea


title: Problemi vari....

text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> ha scritto nel
messaggio news:L%Ztb.40268$hV.15...@news2.tin.it...

Ciao Carlo
Penso che per te non sia un problema :)
Paghi con petroJolly che, senza dire niente, ne hai a vagonate, a differenza
di qualcuno che si vanta di averne un solo e misero cespo....;-)
Ciao Daniele


title: Problemi vari....

text:
Scusate, io devo essere l'uomo più idiota e ignorante del pianeta.
Questo è il codice generato dall'autocomposizione pulsante; io non sono un
genio della programmazione (cioè non so proprio niente), ma dove è il
riferimento ai controlli ActiveX per cui mi esce il msg di errore sotto
riportato?
Private Sub cmdVediScheda_Click()
On Error GoTo Err_cmdVediScheda_Click
    Dim stDocName As String
    stDocName = "rptScheda"
    DoCmd.OpenReport stDocName, acPreview
Exit_cmdVediScheda_Click:
    Exit Sub
Err_cmdVediScheda_Click:
    MsgBox Err.Description
    Resume Exit_cmdVediScheda_Click
End Sub
"L'espressione Su Click immessa come impostazione della proprietà di evento
ha provocato il seguente errore: Errore di comunicazione con il server OLE o
con il controllo ActiveX".
ho provato anche a scrivere da me il codice, limitandolo alla sola riga
DoCmd etc etc, ma mi da lo stesso errore.
Grazie
Andrea


title: Problemi vari....

author: MA

text:
Soluzioni varie
MAssimiliano


title: Stampare un codice per ogni pagina

author: Fabio

text:
Salve a TUTTI,
ho costruito un report che ha origine dei dati in una query, la quale prende
i dati da due tabelle relazionate uno a molti. Dove uno è un codice, molti
sono le descrizioni degli articoli che il codice contiene. Nel report ho
messo il codice nella sezione: Intestazione di Gruppo - gli articoli nel
corpo del report. Ottengo, come volevo il codice e di seguito gli articoli.
Chiedo come fare a stampare una pagina per ogni codice?
Ho provato a mettere nell'Ordinamento e raggruppamento: Stampa sezione unita
Gruppo intero, lo fa ma stampa, ovviamente, più gruppi nella stessa pagina.
Grazie a TUTTI.
Fabio


title: Stampare un codice per ogni pagina

text:
"Fabio" <
fab...@libero.it
> ha scritto nel messaggio
news:2L3Kj.51831$FR.2...@twister1.libero.it...

Da proprietà del corpo scegli "Interruzione di pagina >> Dopo sezione".
Ciao, Carlo


title: Stampare un codice per ogni pagina

text:
> Da proprietà del corpo scegli "Interruzione di pagina >> Dopo sezione".
>
> Ciao, Carlo
>
PERFETTO.
Grazie mille Carlo, la dritta è quella giusta.
Nel mio caso devo utilizzare la Tua istruzione nella proprietà
dell'intestazione di gruppo, perchè è là che ho il codice.
Grazie ancora avevo cercato a lungo, ma non del tutto cavolina!!!
Ciao Fabio


title: Stampare un codice per ogni pagina

text:
"Fabio" <
fab...@libero.it
> ha scritto nel messaggio
news:2j6Kj.283331$%k.40...@twister2.libero.it...

Prego.
Nonostante io sia stato tra i pochissimi che hanno usato Access fin dalla
versione 1.0,
ancora oggi imparo tantissimo e sempre cose nuove.
Ciao, Carlo


title: Casella numerazione "ID"

text:
Ho un programma di fatturazione creato con Access.
Purtroppo ogni tanto mi perde un "ID" fattura.....
Come posso fare per recuperarlo?
Spero di essere stato chiaro...
Grazie in anticipo,
Ale


title: Casella numerazione "ID"

author: Nick

text:
"I_fiorentino" <
i_fiorent...@email.it
> ha scritto nel messaggio news:zij9d.87257$35.42...@news4.tin.it...

in che senso lo perde?
fai un esempio di "perdita ID"
ciao
Nick


title: Casella numerazione "ID"

author: Dalila SAS

text:
> in che senso lo perde?
> fai un esempio di "perdita ID"
> ciao
> Nick
>
clikko sul pulsante nuova fattura e invece che la numero 10 mi va
direttamente alla 11.....l'ID 10 e' come se sparisse.
Il programma e' stato elaborato su office xp mentre e' stato montato su
office 2000. Forse e' per quello!


title: Casella numerazione "ID"

text:
"Dalila SAS" <
dal...@hotmail.com
> ha scritto nel messaggio news:Bxs9d.89526$35.42...@news4.tin.it...

l'id se è il classico id ovvero un campo contatore viene incrementato automaticamente
però se io creo un record e poi lo elimino  il mio contatore viene cmq incrementato per un discorso di "unicità del contatore"
se il tuo numero fattura  dipende dall'id del record è meglio che fai qualche modifica al programma e aggiungi un campo relativo al
numero fattura reale, anche perchè
[IMHO]
al nuovo anno che succede? crei una nuova tabella? e poi quante maschere e report devi fare per visualizzare i dati per ogni anno?
[/IMHO]
spero di aver capito il problema
ciao
Nick


title: runtime

author: francesco di maio

text:
Qualcuno di voi l'ha mai usato o lo usa? L'ho
installato sulla mia macchina ma non sono riuscito a capire come fare per fralo
funzionare e/o installare con il database che ho creato su macchine senza il
pacchetto Office.

grazie


title: Campi obbligatori

author: Adriano

text:
Come si fa in una maschera a rendere obbligatorio inserire dei dati in
determinati campi?
Ovvero vorrei che alcuni campi non venissero 'saltati', ma gli utenti siano
obbligati ad inserire dei dati e non possano lasciarli vuoti.
Grazie a chiunque mi risponda
Adriano


title: Campi obbligatori

author: Paolo A.

text:
Adriano wrote:

o inserisci del codice sull'evento uscita dal campo che controlla che non sia
vuoto, o imposti la proprietą 'richiesto' nella struttura della tabella
saluti
Paolo


title: Campi obbligatori

author: Antonio Biso

text:
Adriano <
ic...@libero.it
> wrote in message
8rslss$sb1$1...@pegasus.tiscalinet.it...
> Come si fa in una maschera a rendere obbligatorio inserire dei dati in
> determinati campi?
> Ovvero vorrei che alcuni campi non venissero 'saltati', ma gli utenti
siano
> obbligati ad inserire dei dati e non possano lasciarli vuoti.
> Grazie a chiunque mi risponda
Prima soluzione: nella tabella associata alla maschera definisci come campi
chiave i campi che vuoi che siano obbligatori. Sarà Access stesso a
segnalarti un errore qualora l'utente inserisca un nuovo record tramite la
maschera senza compilare i campi chiave.
Seconda soluzione (io preferisco questa perchè posso personalizzarla)
Faccio in modo che l'utente debba sempre abbandonare il record corrente
validandolo mediante un pulsante. Al clic di questo pulsante attivo una
funzione che mi controlla se i dati immessi sono corretti quindi per esempio
se qualche controllo non è stato riempito o se alcuni valori in relazione
tra loro sono corretti e così via...
Se non va, gli dai l'ooportuno messaggio di errore e non salvi il record.
Antonio


title: Campi obbligatori

author: Sergio MAZZA

text:
"Adriano" <
ic...@libero.it
> ha scritto nel messaggio
news:8rslss$sb1$1...@pegasus.tiscalinet.it...
> Come si fa in una maschera a rendere obbligatorio inserire dei dati in
> determinati campi?
> Ovvero vorrei che alcuni campi non venissero 'saltati', ma gli utenti
siano
> obbligati ad inserire dei dati e non possano lasciarli vuoti.
> Grazie a chiunque mi risponda
>
> Adriano
>
>
Hai due (che io sappia) possibilità:
1) definire come obbligatorio/i il/i campo/i un struttura tabella;
2) test su ogni controllo della maschera con l'evento "su disattivato";
Ciao.


title: Campi obbligatori

text:
Sergio MAZZA <
sergi...@tiscalinet.it
> wrote in message
8rsnld$t9a$1...@suite03.caspur.it...
>
> "Adriano" <
ic...@libero.it
> ha scritto nel messaggio
> news:8rslss$sb1$1...@pegasus.tiscalinet.it...
> > Come si fa in una maschera a rendere obbligatorio inserire dei dati in
> > determinati campi?
> > Ovvero vorrei che alcuni campi non venissero 'saltati', ma gli utenti
> siano
> > obbligati ad inserire dei dati e non possano lasciarli vuoti.
> > Grazie a chiunque mi risponda
> >
> > Adriano
> >
> >
> Hai due (che io sappia) possibilità:
> 2) test su ogni controllo della maschera con l'evento "su disattivato";
Ma siccome l'utente è stronzo, sui controlli che vuole lui il focus non ce
lo passa mai...
Antonio


title: Campi obbligatori

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:JplE5.23486$N93.7...@news.infostrada.it...
>
> Ma siccome l'utente è stronzo, sui controlli che vuole lui il focus non ce
> lo passa mai...
>
> Antonio
>
>
Ah già! Dimenticavo il teorema...
Ciao.


title: Campi obbligatori

text:
Sergio MAZZA ha scritto nel messaggio >>
>> Ma siccome l'utente è stronzo, sui controlli che vuole lui il focus non ce
>> lo passa mai...
>>
>> Antonio
>>
>>
>Ah già! Dimenticavo il teorema...
>
Hai ancora molto da imparare bimbo :-))
Saluti, Antonio


title: Campi obbligatori

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:%aoE5.24804$N93.8...@news.infostrada.it...

Eh! Eh! Mai io lo faccio apposta per dirgli che è stronzo...
Ciao.


title: Campi obbligatori

text:
Scusa la mia ignoranza, ma il codice per me è ancora abbastanza sconosciuto.
Siccome è la soluzione che mi convince di più, mi puoi indicare la stringa
di codice che dovrei inserire?
Grazie mille
Adriano
> o inserisci del codice sull'evento uscita dal campo che controlla che non
sia
> vuoto, o imposti la proprietà 'richiesto' nella struttura della tabella
>
> saluti
> Paolo
>
"Paolo A." <
aul...@interlogica.it
> ha scritto nel messaggio
news:39E1DB78...@interlogica.it...



title: Funzione zoom in anteprima report

author: G. Palumbo

text:
Salve a tutti.
Vorrei impostare la funzione zoom di un'anteprima report, che si apre al
click di un pulsante,  in modo da avere la schermata ad es. all'80% invece
del 100% di default. Potete suggerirmi come? Grazie.


title: Funzione zoom in anteprima report

text:
"G. Palumbo" <
gius...@tin.it
> ha scritto nel messaggio
news:U%jPd.878361$35.33...@news4.tin.it...

Dai un'occhiata qui:
http://www.donkarl.com/it/
sezione Report, argomento 5.4
Ciao, Carlo


title: Xp developer

author: Mark

text:
ho dei problemi con un programma preparato con access xp developer in quanto
lo dovrei installare su Windows 2003 server.
Il programma di installazione mi dice:
"Per l'applicazione che si sta installando sono necessari componenti di
sistema aggiornati. Per continuare, installare Office System Pack.
Rivolgersi al fornitore dell'applicazione per assistenza."
La stessa cosa mi capita con Win xp64.
Potete darmi qualche consiglio?
Grazie in anticipo
Marco


title: Xp developer

author: Alessandro Baraldi

text:
"Mark" <
dmsof...@tin.it
> wrote in message
news:43ef6517$0$12604$
4faf...@reader3.news.tin.it

Da dove hai inviato la mail da SanFrancisco....?
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Xp developer

text:
cut
>
> Da dove hai inviato la mail da SanFrancisco....?
>
> @Alex
>
Semmai dalla parte opposta...era già il 13...dovrebbe essere tra Mosca e
Teheran.
Ciao, Carlo


title: Xp developer

text:
"Mark" <
dmsof...@tin.it
> ha scritto nel messaggio
news:43ef6517$0$12604$4faf...@reader3.news.tin.it...

Questa la spiegazione e la soluzione:
http://support.microsoft.com/default.aspx?scid=kb;en-us;837150&Product=acc2002
Ciao, Carlo


title: Xp developer

text:
"Carlo Costarella" <
carloco...@libero.it
> wrote in message
news:43efff35$0$12591$
4faf...@reader3.news.tin.it

Hai ragione è +800 mi era sfuggito il senso di rotazione...!!
+800 rispetto a GR forse è in Cina..?
Ciao



title: Xp developer

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:5268b29e089edbd0e1...@mygate.mailgate.org...
> "Carlo Costarella" <
carloco...@libero.it
> wrote in message
> news:43efff35$0$12591$
4faf...@reader3.news.tin.it
cut
>
> Hai ragione è +800 mi era sfuggito il senso di rotazione...!!
> +800 rispetto a GR forse è in Cina..?
>
> Ciao
> @Alex
>
O Singapore...siamo lì.
Dall'orario del tuo post dovrebbero essere 3,30 ore.
Ciao, Carlo


title: se pendrive presente fai questo altrimenti quest'altro

text:
qualcuno sa dirmi in che modo posso verificare se una pendrive è inserita
nella porta usb ed eseguire un codice se è presente oppure un altro se non è
stata inserita
grazie.


text:
"Stero72" <
ste...@email.it
> ha scritto nel messaggio
news:461bd5d6$0$17940$4faf...@reader1.news.tin.it...
> qualcuno sa dirmi in che modo posso verificare se una pendrive č inserita
> nella porta usb ed eseguire un codice se č presente oppure un altro se non
> č stata inserita
>
> grazie.
Ti propongo questa funzione da scrivere in un modulo pubblico:
Option Compare Database
Option Explicit
Public Function DiskDriveUSB() As Boolean
On Error Resume Next
Dim arrComputers
Dim strComputer, objWMIService, colItems, objItem
Const wbemFlagReturnImmediately = &H10
Const wbemFlagForwardOnly = &H20
arrComputers = Array("localhost")
For Each strComputer In arrComputers
   Set objWMIService = GetObject("winmgmts:\\" & strComputer &
"\root\CIMV2")
   Set colItems = objWMIService.ExecQuery("SELECT * FROM Win32_DiskDrive",
"WQL", _
                                          wbemFlagReturnImmediately +
wbemFlagForwardOnly)
   For Each objItem In colItems
      If objItem.InterfaceType = "USB" Then
        If Mid(objItem.MediaType, 1, 15) = "Removable media" Then
          If objItem.Status = "OK" Then
          DiskDriveUSB = True
          Exit For
          End If
        End If
      End If
   Next
Next
End Function
Tipicamente la funzione si potrebbe chiamare cosě:
If DiskDriveUSB = True then
msgbox "PenDrive USB inserito e funzionante!"
End if
Tiene presente che la funzione restituisce true al primo disco usb trovato e
non ne cerca altri. Questo significa che se hai diciamo tre pendrive o tre
dischi esterni USB, non potrai avere la certezza che quello trovato sia
proprio quello che ti serve.
Ciao, Carlo


text:
Carlo Costarella wrote:
> "Stero72" <
ste...@email.it
> ha scritto nel messaggio
> news:461bd5d6$0$17940$4faf...@reader1.news.tin.it...
>> qualcuno sa dirmi in che modo posso verificare se una pendrive è
>> inserita nella porta usb ed eseguire un codice se è presente oppure
>> un altro se non è stata inserita
>>
>> grazie.
>
> Ti propongo questa funzione da scrivere in un modulo pubblico:
> Tiene presente che la funzione restituisce true al primo disco usb
> trovato e non ne cerca altri. Questo significa che se hai diciamo tre
> pendrive o tre dischi esterni USB, non potrai avere la certezza che
> quello trovato sia proprio quello che ti serve.
>
> Ciao, Carlo
Scusami carlo se integro il tuo consiglio.
A quel punto se hai true, prenditi il path e cerca il tuo db
--
--
Massimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


text:
> Tiene presente che la funzione restituisce true al primo disco usb trovato
> e non ne cerca altri. Questo significa che se hai diciamo tre pendrive o
> tre dischi esterni USB, non potrai avere la certezza che quello trovato
> sia proprio quello che ti serve.
>
> Ciao, Carlo
>
una volta torvato il pendrive posso fare
if dir(usbdrive\nomefile)<>"" then msgbox "è il drive giusto"
vi pongo un altro questito
in gestione dischi nel pannello di windows xp credo esista la possibilità di
assegnare una lettera fissa ad un certo dispositivo usb, se ad esempio
assegno G: alla mia usb quella rimarra sempre G: a quel punto mi basta
fare --> if dir(usbdrive\nomefile)<>"" then msgbox "è il drive giusto"
il problema credo sorgerà se faccio il dir e l'unità G: non esiste, forse
basta gestire un msgbox di ritorno gestendo l'errore?
voi che ne dite?


text:

Se lo metti sempre sulla staessa macchina non c'è problema. Piuttosto ti
suggerisco di usare una lettera alta, così se metti un lettore multicard ad
es. non hai problemi a incorrere la lettera



author: Panathos

text:
On 11 Apr, 09:48, "Stero72" <
ster...@email.it
> wrote:
> in gestione dischi nel pannello di windows xp credo esista la possibilità di
> assegnare una lettera fissa ad un certo dispositivo usb, se ad esempio
Sì, start \ esegui \ diskmgmt.msc
> assegno G: alla mia usb quella rimarra sempre G: a quel punto mi basta
> fare --> if dir(usbdrive\nomefile)<>"" then msgbox "è il drive giusto"
> il problema credo sorgerà se faccio il dir e l'unità G: non esiste, forse
> basta gestire un msgbox di ritorno gestendo l'errore?
>
> voi che ne dite?
Che come metodo può andare. Ti conviene seguire il consiglio di Carlo,
cioè assegnare alla tua unità USB una lettera alta in modo da evitare
sovrapposizioni con eventuali altre.
ciao,
Panathos


title: Esportazione report in Excel numeri telefonici

author: Claudio

text:
Buon giorno a tutti
Ho provato ad esportare un report con dei numeri telefonici in xls e mi son
visto sparire gli zeri iniziali.
Se l'esportazione si fa da una query nessun problema, ma poiché con il
report esporto anche l'impaginazione devo trovare il modo che nel dialogo
Access-Excel non perda gli zeri iniziali.
Ho provato anche tutte le formattazioni cella in Excel, nulla da fare.
Qualcuno ha avuto lo stesso problema?
Grazie per la collaborazione
Claudio


author: Paolo Aulisio

text:
Claudio wrote:

prova ad esportare anteponendo un apice ' ai numeri di telefono


text:
Claudio <
mf4...@mclink.it
> wrote in message 91876f$an$1...@news.mclink.it...

Ma soprattutto: perchè esportare da access in excel ?!?
Antonio


text:
">
> Ma soprattutto: perchè esportare da access in excel ?!?
>
> Antonio
>
Scusa se per errore ho postato la risposta alla tua e-mail, ma la risposta è
sempre la stessa
Le persone con le quali devo condividere l'indirizzario usano sempre excel
perché rispetto a Word, che io preferisco, gestisce meglio le tabelle.
Quando esporti in excel questi ti raggruppa tutti gli indirizzi che hai
raggruppato con Access nelle intestazioni del report
Claudio


text:
"> prova ad esportare anteponendo un apice ' ai numeri di telefono
>
Se non erro intendi la seguente procedura:
Con una query d'aggiornamento mettere un apice all'inizio del campo,
esportare e dopo in Excel con il comando sostituisce elimini l'apice?
Od intendi un procedimento diverso?
Claudio


text:
Claudio <
mf4...@mclink.it
> wrote in message 91bf89$3eo$1...@news.mclink.it...

La stessa cosa la puoi fare PERFETTAMENTE anche con Access !!!
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:jgk_5.107414$hk4.3...@news.infostrada.it...

E' vero. Io le faccio con Access, perché mi servono i dati, che ho su tre
tabelle in relazione tra di loro, per estrapolare vari tipi di informazioni.
Poi li raggruppo nel report in base ad alcuni criteri e li stampo
utilizzando solo Access. Un solo tipo di report mi viene chiesto di
convertirlo in Excel al fine che altri possano utilizzarlo. Vorrei tanto che
imparassero ad usare Access, almeno per quelle poche cose che devono fare,
ma purtroppo non riesco a convincerli. Il tuo intervento mi conferma che
devo continuare ad utilizzare tutti gli strumenti possibili per far non far
utilizzare un programma di foglio di calcolo al posto di un DB.
Grazie del tuo intervento
Claudio


text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:jgk_5.107414$hk4.3...@news.infostrada.it...

E' vero. Io uso Access, perché mi servono i dati, che ho su tre
tabelle in relazione tra di loro, per estrapolare vari tipi di informazioni.
Poi li raggruppo nel report in base ad alcuni criteri e li stampo
utilizzando solo Access. Un solo tipo di report mi viene chiesto di
convertirlo in Excel al fine che altri possano utilizzarlo. Vorrei tanto che
imparassero ad usare Access, almeno per quelle poche cose che devono fare,
ma purtroppo non riesco a convincerli. Il tuo intervento mi conferma che
devo continuare ad utilizzare tutti gli strumenti possibili per non far



text:
Claudio <
mf4...@mclink.it
> wrote in message 91e3b9$qjk$1...@news.mclink.it...
>
> ma purtroppo non riesco a convincerli. Il tuo intervento mi conferma che
> devo continuare ad utilizzare tutti gli strumenti possibili per non far
> utilizzare un programma di foglio di calcolo al posto di un DB.
Esatto!
Ad ognuno il suo mestiere...
Antonio


title: Aiuto Querry

author: Ventosa

text:
Ciao sto facendo un database sul tennis. Ho fatto due tabelle, in una ho
inserito tutti i nomi, cognomi e nazionalità dei tennisti, nell'altro ho
inserito i risultati così: Torneo, Superficie, Categoria, Turno, Giocatore
A, Giocatore B, Punteggio. Al momento sono riuscito a realizzare due querry,
nella prima riesco a mettere tutti i match vinti da Tizio, nella seconda
tutti i match persi da tizio. Ora il problema è che io vorrei mettere
insieme questi risultati per avere in una unica pagina, tutti i match di
Tizio (sia vinti che persi). Credo che devo fare una terza querry, ma come?
QUalcuno mi può aiutare?
Grazie
Vittorio


title: Aiuto Querry

author: All Eyez On me

text:
"Ventosa" <
eagl...@libero.it
> ha scritto nel messaggio
news:0AVM9.471$lj5....@tornado.fastwebnet.it...

devi fare una query di unione es.
select * from queryvittorie where giocatore='agassi'
union
select * from querysconfitte where giocatore='agassi';
per fare una nuova query, passare da visualizzazione struttura a sql e li
scriverla manualmente.
spero di essere stato chiaro
AEOM


title: Aiuto Querry

text:
No non sono riuscito a capire bene...
"All Eyez On me" <
nospambf...@libero.it
> ha scritto nel messaggio
news:jiWM9.10677$Q%4.33...@news1.tin.it...



title: Bug Bastardo.... in apertura automatica Access2000

text:
Salve:
Ho un DB Access2000 con un pannello principale:
Ho fatto una modivica off-line su una versione senza dati del DB quindi l'ho
importata come maschera nella versione ufficiale, rinominando la vecchia
PannelloOld.
Problema. Era anche la maschera Selezionata per l'apertura automatica in
Strumenti/Avvio...
Quindi
NON si apre piů con quella maschera. (posso capire anche se il nome ra lo
stesso...)
NON me la fa rinominare (e qui un po' mi tira...)
Ogni volta che provo a cancellarla, oppure ad aprire il menů
strumenti/Avvio... Access muore.
Tutto qui.
Qualcuno ha qualche constiglio su come uscirne?
Grazie a tutti
Brando


author: Maurizio Sordo

text:
Crea un file access2000 vuoto e reimporta tutto tranne la maschera pannello
.


text:
Maurizio Sordo <
maur...@seldatiservice.it
> wrote in message
8h68qe$opu$1...@nslave2.tin.it...
> Crea un file access2000 vuoto e reimporta tutto tranne la maschera
pannello
> .
>
Grazie, innanzitutto
Era quello che pensavo anch'io (facile dirlo adesso...), ma non rischio di
perdere le relazioni tra le tabelle?


author: Andrea Sciamanna

text:
> > Crea un file access2000 vuoto e reimporta tutto tranne la maschera
> pannello
> >
> Grazie, innanzitutto
> Era quello che pensavo anch'io (facile dirlo adesso...), ma non rischio di
> perdere le relazioni tra le tabelle?
Ma figurati! E' proprio un'opzione di importazione, quella di ripristinare
le relazioni (Importa Relazioni).


title: Creare una msgbox di errore

author: Sthepan

text:
Per una casella di testo ho impostato questa funzione:
Private Sub CodiceFiscale_GotFocus()
CodiceFiscale.InputMask = ">LLLLLL00L00L000L"
End Sub
vorrei che quando si immette un numero al posto di una lettera o viceversa
invece che emettere il classico bip mi compaia anche una msgbox
con indicato il probalile errore.
Come fare?
Ciao Sthepan


title: Creare una msgbox di errore