title: record successivo in sottomaschera

text:

Ciao Alex, grazie per il tuo intervento.
Ho cercato di utilizzare la faq 4.5 di Karl.
Ho messo su evento corrente della sottomaschera
Dim lngStore As Long

lngStore = Me!ID

mentre su evento click di un pulsante della stessa sottomaschera
'riduce lo sfarfallio dello schermo
Me.Painting = False

'Me.Requery
Me.Recordset.FindFirst "Id = " & lngStore

Me.Painting = True

ma ritorna sempre al primo record.
Cosa ho sbagliato?
Giuseppe


title: record successivo in sottomaschera

text:

Hai verificato che così come stai facendo la variabile [lngStore] sia correttamente valorizzata...? Nel senso prima del Requery, [lngStore] vale il Campo ID che hai attivato...? nel momento in cui premi il Button rimane valorizzata giusta...?

@Alex


title: record successivo in sottomaschera

author: Giuseppe

text:

Alex scusa l'ignoranza.
Premetto, e lo dovevo fare prima, che la sottomaschera non è di tipo continua, ma mi mostra il record selezionato dalla casella di riepilogo.
Con il terzo record valorizzato nella sottomaschera, sono entrato in Vba e ho provato a posizionare il mouse su [lngStore] sia su
lngStore = Me![num riga] (evento corrente della sottomaschera) che su
Me.Recordset.FindFirst "[num riga] = " & lngStore (evento cliclk su pulsante salva)
ma lngStore non mi visualizza alcun valore.
Il requery lo faccio fare alla casella di riepilogo non alla sottomaschera.
Come altro posso controllare che la variabile abbia memorizzato il numero di Id (nel mio caso [num riga])??
Grazie.
Giuseppe


title: record successivo in sottomaschera

text:

Convieni che se [lngStore] non è valorizzato il tutto non può funzionare...?

Devi capire perchè non viene valorizzato, oppure cancellato... o aggiornato con un valore non coerente...

Purtroppo devi farla tu questa analisi...

@Alex


title: Sfondo problematico

author: io

text:
Ho un problemaccio che mi ha fatto maledire mamma Microsoft:
quando metto uno sfondo di 3 Kb in una maschera e mi sposto fra una maschera
e l'altra Acces si inchioda e dice che non ha abbastanza memoria
!!!???!!!
Attendo risposte anche sulla mia mail
marc...@yahoo.com
GRAZIů


title: Sfondo problematico

author: mario pizzi

text:
caro io, come mi ha spiegato qualcuno su queste news tanto tempo fa, c'č il
fatto che Access ogni cosa che fa la mette tutta nella sua grande memoria,
ma poi non la scarica quando non gli serve piů.
purtroppo ti devi rassegnare come ho fatto io. ;-(
ciao mario
"io" <
i...@io.com
> ha scritto nel messaggio
news:8mpfcn$k6o$1...@serv1.iunet.it...



title: Sfondo problematico

author: Andrea Sciamanna

text:
> Ho un problemaccio che mi ha fatto maledire mamma Microsoft:
> quando metto uno sfondo di 3 Kb in una maschera e mi sposto fra una
maschera
> e l'altra Acces si inchioda e dice che non ha abbastanza memoria
> !!!???!!!
Perchè Access è stabile. Chiedi a Mauro.


title: Sfondo problematico

author: Maurizio

text:
Mah! Io di sfondi ne ho messi piů di uno e non mi da alcun messaggio di quel
genere. Preciso che utilizzo Access 97.
Ciao.
"io" <
i...@io.com
> ha scritto nel messaggio
news:8mpfcn$k6o$1...@serv1.iunet.it...
> Ho un problemaccio che mi ha fatto maledire mamma Microsoft:
> quando metto uno sfondo di 3 Kb in una maschera e mi sposto fra una
maschera
> e l'altra Acces si inchioda e dice che non ha abbastanza memoria
> !!!???!!!



title: Sfondo problematico

text:
> caro io, come mi ha spiegato qualcuno su queste news tanto tempo fa, c'č
il
> fatto che Access ogni cosa che fa la mette tutta nella sua grande memoria,
> ma poi non la scarica quando non gli serve piů.
> purtroppo ti devi rassegnare come ho fatto io. ;-(
Non esageriamo.
Se apro una maschera, indipendentemente da quello che contiene, quando la
chiudo, viene scaricata dalla memoria.


title: Sfondo problematico

author: Mauro

text:
>Non esageriamo.
>Se apro una maschera, indipendentemente da quello che contiene, quando la
>chiudo, viene scaricata dalla memoria.
>
Piccolo, devi studiare un pochino di piů su come Access utilizza l'area GDI del motore grafico di
windows.
Recupera le decine di post su questo tema che il ng. ha ospitato anche solo negli ultimi sei mesi,
poi ne riparliamo.


title: Sfondo problematico

text:

Grande, grande cosa? Mah, qualche idea ce l'avrei.
Cmq, perchč non mi fai qualche caso specifico? Non so, per esempio, indicami
il mittente del post, la data e l'oggetto, cosě vado a cercarmelo. Sai
com'č: i post sono tanti e andarmeli a spulciare uno per uno, solo per
scoprire che hai raccontato una balla, non mi va. Tanto meno, mi va di fare
delle ricerche, che, spesso ti restituiscono tutto, tranne quello che cerco.
Ah, dimenticavo: sono io che non so fare le ricerche.


title: Sfondo problematico

text:
>Cmq, perchè non mi fai qualche caso specifico? Non so, per esempio, indicami
>il mittente del post, la data e l'oggetto, così vado a cercarmelo. Sai
>com'è: i post sono tanti e andarmeli a spulciare uno per uno, solo per
>scoprire che hai raccontato una balla, non mi va. Tanto meno, mi va di fare
>delle ricerche, che, spesso ti restituiscono tutto, tranne quello che cerco.
>Ah, dimenticavo: sono io che non so fare le ricerche.
>
Per rispetto nei confronti di chi segue il ng. (e temendo reazioni a colpi di Decompilatore di Lbo e
Giovanni Albertone) questa sarà l'ultima mia replica.
Access, come tutti gli applicativi corposi, di buchi ne ha tanti: se ne scopri uno cosa fai? Lo
aggiri oppure continui a sbatterci contro la testa maledicendo mamma Microsoft?
E' evidente che sei un tipo capace Andrea, eppure tu hai problemi d'affidabilità che io non ho più
da un pezzo, perchè?
Probabilmente perchè io lavoro in proprio e ti assicuro che nella giungla in cui viviamo è difficile
farsi pagare anche se tutto funziona perfettamente!
Figuriamoci se dovessi produrre software con problemi di stabilità...
Anch'io come te sono stato dipendente parecchi anni fa e so che le cose sono sottilmente diverse: se
qualcosa non funzia si tende sempre a scaricare la responsabilità su qualcun'altro ... chi ha fatto
la rete, la qualità dell'hardware, il capo progetto, il produttore dell'ambiente di sviluppo, etc.
D'altro canto con gli stipendi da operai che girano, non vedo perchè ci si dovrebbe far coinvolgere
più di tanto.
Di conseguenza è raro che i prodotti sviluppati da grosse società siano anche di buona qualità (per
fare un esempio terra a terra, prova ESATTO 2000, il gestionale win più diffuso d'Italia!)
Ma quando si lavora da soli si deve imparare a ottenere quello che ti chiedono, e che ti pagano
profumatamente, nonostante tutto.
Va da sè che per "sopravvivere" si è costretti a documentarsi capillarmente (Federico Luciani
dovrebbe essere un esempio per tutti sul ng.) e a imparare un pò di tutto: anche a mettere le mani
sull'hardware e sulle reti.
Sono sicuro che quando lavorerai in proprio, ci metterai un paio di mesi al massimo a risolvere i
problemi d'affidabilità che denunciavi...
Ok, seppellisco l'ascia di guerra!
Ciao, Mauro
P.S:  In rapporto al problema in questione (GDI che non basta mai ad Access) il 90% dei
frequentatori del ng. ti potranno confermare che è tutt'altro che una balla. Access 2000,
specialmente passando nel corso della programmazione dalla modalità Design a quella esecuzione, è
ancora più sensibile del '97.
L'unica soluzione è andar cauti con sfondi grafici pesanti.
Si vociferava che OSR2 di Access 2000 *potrebbe* risolvere il problema.
Si è dibattuto spessissimo di questo baco, però i post se t'interessano te li cerchi da
solo...vedrai che non sarà una ricerca infruttuosa.


title: Sfondo problematico

text:
> >Per rispetto nei confronti di chi segue il ng. (e temendo reazioni a
colpi di Decompilatore di Lbo e
> >Giovanni Albertone) questa sarà l'ultima mia replica.
>
> Ma come... la garetta... il mio lavoro dei prossimi due mesi... me lo
> devo fare da solo :-(
Dì che stai cercando un pretesto per farti fare un lavoro che non vuoi fare
e, per giunta, anche gratis! :-)
Se paghi te lo faccio. Stai attento, però: te lo farei, ma molto instabile
:-)


title: Sfondo problematico

text:
Giovanni Albertone ha scritto nel messaggio ...
>On Wed, 09 Aug 2000 17:11:49 GMT, "Mauro" <
maur...@libero.it
> wrote:
>
>>Per rispetto nei confronti di chi segue il ng. (e temendo reazioni a colpi di Decompilatore di Lbo
e
>>Giovanni Albertone) questa sarà l'ultima mia replica.
>
>Ma come... la garetta... il mio lavoro dei prossimi due mesi... me lo
>devo fare da solo :-(
>
Ce provi eh? :-)))
CIAO


title: Sfondo problematico

text:
> > per giunta, anche gratis! :-)
>
> Io non ho mai parlato di gratis. Ho detto che mi dovevate dare
> qualcosa per farvi da beta tester :-))
Sì, ma chissà come mai, le specifiche del test lo avresti proposto tu. :-)


title: Sfondo problematico

text:
> >Sì, ma chissà come mai, le specifiche del test lo avresti proposto tu.
:-)
>
> Per essere in grado di giudicare con piu' competenza i vostri
> risultati :-)
Vabbè, vabbè. E quali sarebbero queste specifiche?


title: Sfondo problematico

author: Federico Luciani

text:
Mauro wrote:
> [cut]
> Va da sč che per "sopravvivere" si č costretti a documentarsi capillarmente (Federico Luciani
> dovrebbe essere un esempio per tutti sul ng.) e a imparare un pņ di tutto: anche a mettere le mani
> sull'hardware e sulle reti.
> Sono sicuro che quando lavorerai in proprio, ci metterai un paio di mesi al massimo a risolvere i
> problemi d'affidabilitą che denunciavi...
Sono pienamente daccordo con te.
Anch'io lavoro in proprio e quello che dici rispecchia anche la mia realta'.
P.S.
Perdonami, ma non ho capito perche' mi hai tirato in ballo. Forse ci
conosciamo?
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: Sfondo problematico

text:
Federico Luciani ha scritto nel messaggio >
>Sono pienamente daccordo con te.
>Anch'io lavoro in proprio e quello che dici rispecchia anche la mia realta'.
>
>P.S.
>Perdonami, ma non ho capito perche' mi hai tirato in ballo. Forse ci
>conosciamo?
Purtroppo non ti conosco di persona Federico, ma pur postando di rado è parecchio che seguo il ng. e
mi piace molto il tuo approccio.
Spessissimo per rispondere ai problemi segnali links che rimandano direttamente alla knowledge base
Microsoft o affini.
E' un chiaro segnale di quanto sia importante per te documentarti il più capillarmente possibile
sull'ambiente che utilizzi e che ti dà da mangiare...
E per utilizzare con profitto questi ambienti visuali, è assolutamente essenziale non fermarsi alle
pubblicazioni "ufficiali" Microsoft Press (per quanto siano ottime come base di partenza).
CIAO, Mauro


title: Sfondo problematico

text:

Ti ringrazio.
Effettivamente quello che hai descritto e' il mio modo di
lavorare e di affrontare i problemi.
Naturalmente ci sono tante altre persone in questo ng che
lavorano cosi', ed altrettanto meritevoli di stima.
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access



title: Problemi di ordinamento

author: Gerry

text:
Ciao a tutti
Ho realizzaro un database per il personale di una caserma ,
la tabella interessata quindi contiene i sequenti record:
gradi, cognome, nome, codice fiscale, indirizzo, ecc.
Devo ordinare la sequente tabella in ordine di gradi e cognome. Tenete
presente che la chiave primaria e costituita dal codice fiscale.
Generale ,Colonnello, Tenete non sono certamente odinati in ordine
crescente.
Quindi non li posso ordinare in ordine alfabetico
COME POSSO RISOLVERE QUESTO DILEMMA
by Francesco


title: Problemi di ordinamento

author: giorgio rancati

text:
"Gerry" <
artd...@freemail.it
> ha scritto nel messaggio
news:jZNnc.170441$hc5.7...@news3.tin.it...

Puoi usare questo sistema bruttino
---------------
ORDER BY
Switch([Grado]="Generale",1,[Grado]="Colonnello",2,[Grado]="Tenente",3),
                    [Cognome]
---------------
o meglio ancora crei una tabella Gradi con le colonne Grado e Ordinamento
poi la metti in Join con la tua anagrafica e ordini per il campo ordinamento
e poi per il campo Cognome.
Ciao Giorgio


title: Problemi di ordinamento

author: Antonio Biso

text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:c7oarl$gud$1...@lacerta.tiscalinet.it...

Solo per aggiungere che il primo metodo non è bruttino, ma è un metodo
piuttosto valido per fare quello
Antonio


title: Vorrei seguire un corso su Access

author: NSantini

text:
in zona alta Lombardia, sapreste suggerirmene qualcuno? Grazie
--
Saluti
NSantini


title: Vorrei seguire un corso su Access

author: Libero

text:
La Teaching OnLine organizza da tre anni oramai un corso on line di
programmazione VBA per Access. E' uno dei corsi più completi disponibili. Ed
anche il più economico.
Per informazioni
http://www.teachingonline.it/index.asp
Saluti,
Francesco
"NSantini" <
oai...@tin.it
> ha scritto nel messaggio
news:9v32to$vqa$1...@nreada.inwind.it...



title: Allega File

author: Paolo

text:
Ciao a tutti,
Ho necessità inserire in una maschera la possibilità di caricare dei file
come allegati, non dovendoli spedire via mail basterebbe poter scegliere il
percorso del relativo file che risiede su un file server condiviso, ma la
cosa migliore sarebbe poter caricare i file in uno spazio e mantenere
l'indice con il relativo record.
Spero di essere stato chiaro e grazie ancora a tutti.
Paolo


title: Allega File

author: antonio

text:
"Paolo" <
pa...@tiscali.it
> ha scritto nel messaggio
news:y1hHh.50498$aF5....@tornado.fastwebnet.it...

Con queste istruzioni puoi iniziare ad esaminare quello che ti va bene e
quello che necessita di ulteriori approfondimenti.
    Dim fd As FileDialog
    Set fd = Application.FileDialog(msoFileDialogFilePicker)
    Dim fo As Variant
    Set fo = CreateObject("Scripting.FileSystemObject")
    fd.AllowMultiSelect = False
    fd.Title = "Titolo da dare alla finestra"
    If fd.Show = False Then GoTo nonèstatosceltonessunfile
    Dim Suffisso As String
    Suffisso = ""
    If Len(fd.SelectedItems.Item(1)) >= 4 Then _
            Suffisso = LCase(Right$(fd.SelectedItems.Item(1), 4))
    If Suffisso <> ".xls" Then GoTo nonèunfoglioelettronico
    Me.FoglioElettronico = LCase(fd.SelectedItems.Item(1))
e così via...
Ciao
Antonio


title: controllo delle immissioni

author: giaconet

text:
Ciao a tutti.
Ho una tabella cognomi, nomi, ecc.
Ho realizzato una maschera per l'immissione dei dati, bla bla,...
Adesso voglio aggiungere una funzionalità all'immissione dei dati. Voglio
che quando viene digitato un cognome già presente vengano visualizzati i
record con quel cognome in modo che l'operatore che sta immettendo i dati si
accorga dell'eventuale presenza del record che sta inserendo.
A tal fine ho fatto un'altra maschera (tipo tabulare) e alla casella di
testo associata a cognome ho scritto questo codice (vado a memoria)
Private Sub cognome_After_Update()
    DoCmd.OpenForm "frm_anagrafica_elenco",,"cognome = '" & cognome "'"
End Sub
Funziona ma è abbastanza brutto. Innanzitutto la form mi viene aperta sempre
anche quando quello digitato non è un cognome presente (in questo caso la
maschera è ovviamente vuota). Un altro problema è quello che nel caso
l'operatore decida di abbandonare l'immisione dei dati perché si è reso
conto che il record è già immesso, ha comunque già creato un nuovo record
con il campo cognome riempito.
 Spero di essermi spiegato.
Thanx
giaconet


title: controllo delle immissioni

author: Roberto dal portatile

text:
"giaconet" <
giac...@wind.it
> ha scritto nel messaggio
news:9ccqs6$d9cvl$1...@ID-71483.news.dfncis.de...
> Ciao a tutti.
> Ho una tabella cognomi, nomi, ecc.
> Ho realizzato una maschera per l'immissione dei dati, bla bla,...
> Adesso voglio aggiungere una funzionalità all'immissione dei dati. Voglio
> che quando viene digitato un cognome già presente vengano visualizzati i
> record con quel cognome in modo che l'operatore che sta immettendo i dati
si
> accorga dell'eventuale presenza del record che sta inserendo.
> A tal fine ho fatto un'altra maschera (tipo tabulare) e alla casella di
> testo associata a cognome ho scritto questo codice (vado a memoria)
>
> Private Sub cognome_After_Update()
>     DoCmd.OpenForm "frm_anagrafica_elenco",,"cognome = '" & cognome "'"
> End Sub
>
> Funziona ma è abbastanza brutto. Innanzitutto la form mi viene aperta
sempre
> anche quando quello digitato non è un cognome presente (in questo caso la
> maschera è ovviamente vuota).
Per evitare questo evidente fastidio, prima di aprire la maschera
frm_anagrafica_elenco, con una DCount verifica se esistono o meno record con
quel cognome.
Se la tabella che è origine record della maschera si chiama Anagrafe, il
campo in essa contenuto si chiama Cognome e se anche il controllo della
maschera si chiama Cognome, potresti scrivere:
If DCount("[Cognome]", "Anagrafe", "[Cognome ]=" & Chr$(34) & Cognome &
Chr$(34)) <> 0 Then
DoCmd.OpenForm ..........
End If
> Un altro problema è quello che nel caso
> l'operatore decida di abbandonare l'immisione dei dati perché si è reso
> conto che il record è già immesso, ha comunque già creato un nuovo record
> con il campo cognome riempito.
Sino a quando non passi ad un'altro record, il record corrente non è stato
salvato e quindi, se nuovo, non è stato creato.
Quindi, per abbandonare l'inserimento o l'aggiornamento in corso causa
ripensamenti dell'operatore, puoi inserire nella maschera un pulsante di
comando e a fronte dell'evento "Su clic" di tale pulsante genera il seguente
codice VBA:
    DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70
con questo comando annulli il record che è in fase di inserimento ma, come
ho detto sopra,  non ancora inserito.
Se invece è stato anche inserito, cancellalo con i comandi:
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
>  Spero di essermi spiegato.
Spero di aver capito ciò che volevi..
> Thanx
> giaconet
>
>


title: controllo delle immissioni

text:
[...]
> >  Spero di essermi spiegato.
>
> Spero di aver capito ciò che volevi..
>
Sei stato utilissimo. Mi spieghi anche un'altra cosa? Ho letto nella guida
in linea che DoMenuItem è stato lasciato solo per compatibilità, e quindi di
usare RunCommand. Ma è la stessa cosa (a parte la sintassi)?
Thanx
giaconet


title: controllo delle immissioni

author: Roberto da casa

text:
"giaconet" <
giac...@wind.it
> ha scritto nel messaggio
news:9cgtvt$ds73f$1...@ID-71483.news.dfncis.de...

Si, è la stessa cosa.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: outloock -- access

author: Dott. MONTI

text:
Esiste un sistema per collegarmi tramite access ai dati dell''agenda di
outlook....
Mi piacerebbe da access avere tutti i dati (basterebbe indirizzo email e
nome) impostati in agenda, senza dover da agenda esportare il file in txt ed
importarmelo in tabella access.
Un collegamento diretto...aggiorno rubrica ed in access ho tabella con tutti
gli indirizzi presenti....
Ringrazio in anticipo per le preziose indicazioni
Paolo


title: outloock -- access

text:
se da access (almeno nella versione XP lo fa..) colleghi una tabella, nel
tipo dati selezini Outlook puoi andare a vedere tutti i dati dei tuoi
profili oulook e reperire i dati...
Sinceramente però non ho mai provato...
ciao
"Dott. MONTI" <
monti...@dnet.it
> ha scritto nel messaggio
news:a8enfg$6g9$1...@serv1.iunet.it...



title: outloock -- access

text:
si anche in windows 98 lo fa, access 2000, chissá quante volte ho collegato
tabelle e mai avevo visto file di tipo outlook.
Ti ringrazio molto!!


title: outloock -- access

text:
io l'ho scoperto per caso...
ciao
"Dott. MONTI" <
monti...@dnet.it
> ha scritto nel messaggio
news:a8f9re$238$1...@serv1.iunet.it...



title: Selezione Sottomaschera da Casella Combinata

author: TIZIANO

text:
Ciao a tutto il NG,
come detto nell' oggetto dovrei richiamare una sottomaschera attraverso una
selezione in una casella combinata.
Come fare?
Ciao Tiziano


author: Leo

text:
"TIZIANO" <
tizi...@libero.it
> ha scritto nel messaggio
news:NGwV6.3266$Ea.1...@news.infostrada.it...

sull'evento 'Su Modifica' della casella combinata scrivi:
if Me.<nome casella combinata>.Value = <valore della casella combinata>
        Then <nome sottomaschera>.SetFocus
--
Leo


text:
"TIZIANO" <
tizi...@libero.it
> ha scritto nel messaggio
news:NGwV6.3266$Ea.1...@news.infostrada.it...

sull'evento 'Su Modifica' della casella combinata scrivi:
If Me.<nome casella combinata>.Value = <valore della casella combinata> Then
    <nome sottomaschera>.SetFocus
EndIf
Oltre a .SetFocus può servirti impostare .Enable = True
 a seconda di come hai impostato le stottomaschere
--
Leo


text:




Ciao,
grazie, però sono un vero neofita di DB, spero che funzioni.
se volessi
impostare l'evento .Enable dove devo inserirlo?
Grazie Tiziano
--------------------------------
Inviato via
http://usenet.iol.it


text:
"TIZIANO" <
tizi...@libero.it
> ha scritto nel messaggio
news:140Z105Z117Z234...@usenet.iol.it...


    <nome sottomaschera>.Enable = True
    <nome sottomaschera>.SetFocus
End If
Ciao
Leo


title: che formato devo usare?

author: Matteo Denti

text:
ho una txt box con un tempo per documento diciamo 01.07.00  in un'altra
ho il numero dei documenti es 1000
 se in un ulteriore txt box eseguo il prodotto delle due txt box come
devo settare il formato numero affinché mi scriva le ore impiegate?
con ora estesa non segna più di 24 ore, o meglio segna una data e poi le
ore ma sempre e comunque inferiore alle 24....
vi ringrazio tutti per l'aiuto


title: che formato devo usare?

text:
"Matteo Denti" <
mat...@inwind.it
> ha scritto nel messaggio
news:3B0D4C9C...@inwind.it...

Se ti sta bene avere il risultato anziché in ore.minuti in ore e frazioni di
ora (100,5 anziché 100.30), moltiplica il risultato che hai ora per 24 e dai
al controllo il formato Numero generico o Fisso.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: che formato devo usare?

text:
grazie 1000
in attesa di altre dritte :-)
adotterņ il tuo metodo
ciao


title: Recordset

author: Luca

text:
Ciao. Come si fa a puntare a una riga di un recordset? se il recordset e'
una "tabella virtuale" (da : faqqone) non dovrebbe essere difficile puntare
a una riga il cui valore di riferimento lo si trova in un controllo di una
maschera , giusto? Una cosa del tipo :
dim rec as recordset
set rec = miodatabase.openrecordset"miorecordset"
rec.movelast
 E POI ???
poi gli dovrei dire : spostati fino alla riga il cui valore e' nella
casellataldeitali della maschera , e scrivi quel valore da un'altra parte
....
Per il momento mi servirebbe un consiglio / sintassi corretta su come dirgli
di puntare a un certo valore , in pratica non so se usare e come usare le
funzioni Filter o ... aiuto.
Luca.


title: Recordset

text:
Luca ha scritto nel messaggio <10oe7h1$chi$
1...@fe2.cs.interbusiness.it
>...
>Ciao. Come si fa a puntare a una riga di un recordset? se il recordset e'
>una "tabella virtuale" (da : faqqone) non dovrebbe essere difficile puntare
>a una riga il cui valore di riferimento lo si trova in un controllo di una
>maschera , giusto? Una cosa del tipo :
>dim rec as recordset
>set rec = miodatabase.openrecordset"miorecordset"
>rec.movelast
> E POI ???
>poi gli dovrei dire : spostati fino alla riga il cui valore e' nella
>casellataldeitali della maschera , e scrivi quel valore da un'altra parte
Tu però c'avresti da darti una bella studiata all'help sui recordset e ai
loro metodi e proprietà e a tutti quei begli esempi che ti farebbero capire
un sacco di cose.
Dopo aver aperto il recordset con parametro dbopendynaset (importante in
questo caso per il metodo che andremo ad usare) dovremo usare appunto il
metodo findfirst che consiste nel saltare al primo record del recordset che
verifica certe condizioni.
La sintassi del criterio di selezione è una stringa con il nome del campo
senza quadre, operatore logico e valore (circondato da apici se stringa)ed
eventualmente si possono concatenare più ricerche su più campi mediante AND
o OR.
Nel tuo caso sarà:
Criterio = "CampoTalDeiTali = '" & forms("TuaMaschera").controlloTaldeiTali
& "'"
A questo punto tu farai
rec.findfirst Criterio
e ti troverai come per magilla sul record che verifica quella condizione
(sta a te far sì che quella sia un criterio univoco).
Antonio


title: Msgbox se numero già presente.

text:
Salve a tutti.
Situazione:
maschera "msk_Partecipanti" con origine dati
in tabella "tbl_Partecipanti".
Controllo numerico (TextBox) a immissione libera da parte dell'utente
[Numero_T],
diverso dal contatore [ID_P] ma importante e con duplicati non ammessi.
Se si immette un numero già presente, quando si chiude la maschera una volta
inseriti tutti i dati o si cerca di passare al nuovo record, appare il msg
che avvisa
dell'errore <L'apporto modifiche non è riuscito...etc etc...Modificare i
dati nel
campo o nei campi che contengono valori duplicati oppure...etc etc>.
Ora, vorrei che all'inserimento del dato numerico nel controllo, il
programma
facesse un confronto con i dati già presenti e, in caso, mi segnalasse la
duplicazione
del dato, annullando l'immissione.
Ho provato con un "On error goto miaFunzione" nell'evento
AfterUpdate, ma nisba.
Spero di essere stato chiaro.
Grazie dell'attenzione e buona giornata a tutti.
---- --- ---
         Gio


title: Msgbox se numero già presente.

text:
"gio_sgj" <ilnic...@NOSPAM.tiotnupoohay> ha scritto nel messaggio
news:gewla.89685$Jg1.2...@news1.tin.it...

Se la tabella che contiene i dati si chiama Tabella1.
Se il campo in essa contenuto associato alla casella di testo Numero_T è di
tipo numerico ed anche lui si chiama Numero_T.
A fronte dell'evento "Prima di aggiornare" del controllo Numero_T genera il
seguente codice VBA:
Private Sub Numero_T_BeforeUpdate(Cancel As Integer)
If DCount("*", "Tabella1", _
"Numero_T=" & Me!Numero_T) <> 0 Then
    MsgBox Me!Numero_T & " già esiste"
    Cancel = True
    Me!Numero_T.Undo
End If
End Sub
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: report gia' fatto e opione ordina in modo crescente

text:
Ho creato un report con l'autocomposizione e l'ho aggiustato come volevo...
dopo un po' mi sono accorto che il campo [data] e' ordinato in modo
*decrescente*... e io lo vorrei in modo *crescente*... spero ci sia un modo
per cambiare questa impostazione senza dover rifare il report. Si puň fare?
Grazie ancora.


author: MA

text:
"beppe005" <
beppe005...@virgilio.it
> ha
scritto nel messaggio
news:RKLGc.4262$tP4.1...@news4.tin.it...

rifare il report. Si può fare?
>
> Grazie ancora.
Tra i vari pulsanti in visualizzazione struttura
c'è anche ordinamento:
vedi c'è un simbolo del genere
" (= " in realtà le righe sono 4
MAssimiliano


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:5aNGc.13100$%l2....@news.edisontel.com...

Grazie, questo l'ho trovato!


title: Doppio filtro

author: Valery From The Mountain

text:
Ho una maschera con sottomaschera in foglio dati. Sulla maschera ho una
combo ed una casella di controllo in base alle quali voglio filtrare la
sottomaschera.
La casella di controllo deve filtrare mano mano che si digita, quindi filtro
sulla proprietà text.
La combo invece deve filtrare su afterupdate.
Ho due problemi, quando faccio l'aggiornamento della combo, il requery della
sottomaschera si perde un eventuale precendete filtro della casella di
controllo perchè è sul text e non sul value.
Inoltre, il filtro sulla casella di controllo deve funzionare sia sul value
che sul text.
Spero di essermi spiegato...


title: Doppio filtro

text:
Valery From The Mountain ha scritto:

E' un po' vago.....come fai il filtro della combo? Io creerei la stringa SQL e imposterei il recordsource della sottomaschera sulla stringa filtrata...(perchè devi fare un requery? Prima crei la stringa, poi fai il requery per rinfrescare la visualizzazione. Se la maschera è basata su una query è normale che te la ripresenti...)
Per la casella di controllo o usi il recordsetclone sull'eventro keypress, o usi l'anteprima tasti e prima filtri e poi fai apparire il testo nella casella, che diventa praticamente una specie di etichetta non attiva, nel senso che non ci scrivi proprio dentro, è la maschera che, dopo aver eseguito il filtro, riempie la casella. Niente text, niente value.
Altrimenti, usi un tasto (tipo F2) per crearti un pop up dove scrivi il filtro e alla pressione di INVIO, chiudi e crei l'SQL per il recordsource
Non so se nulla di quello che ho detto potrà esserti utile....forse ho capito male...
--
Questo articolo e` stato inviato dal sito web
http://www.nonsolonews.it


title: Doppio filtro

author: Maurizio Borrelli

text:
"Valery From The Mountain" wrote in message
news:485ffab3$0$41655$
4faf...@reader4.news.tin.it
:

Ciao Valery.
Forse invece che "Casella di controllo" (CheckBox) intendevi scrivere
"Casella di testo" (TextBox)? In tal caso, la Casella di testo e`
associata a un Campo della Maschera principale? La Casella combinata
(ComboBox) e` associata a un Campo della Maschera principale?
--
Ciao!
Maurizio Borrelli [Microsoft MVP Office System]
http://www.riolab.org/


title: Controllo IBAN

author: Sandrobi

text:
Il modulo per il controllo del codice IBAN pubblicato nel Sito Comune 5.63
secondo me presenta un errore:
in questa riga di codice
If Mid(pstrIBan, 4, 2) > "96" Then
al posto di 4 va messo 3 in quanto il codice di controllo č a pos. 3 e 4
come riportato nei commenti qualche riga di codice piů indietro.
Chiedo conferma agli altri.
--
Ciao, Sandrobi


title: Controllo IBAN

author: Carlo Costarella

text:
"Sandrobi" <
sand...@tiscali.it
> ha scritto nel messaggio
news:499dc1e2$0$1109$4faf...@reader4.news.tin.it...
> Il modulo per il controllo del codice IBAN pubblicato nel Sito Comune 5.63
> secondo me presenta un errore:
> in questa riga di codice
> If Mid(pstrIBan, 4, 2) > "96" Then
> al posto di 4 va messo 3 in quanto il codice di controllo è a pos. 3 e 4
> come riportato nei commenti qualche riga di codice più indietro.
>
> Chiedo conferma agli altri.
>
> --
> Ciao, Sandrobi
>
Dipende se usi lo spazio....
Questo sarebbe al quarto: IT 52  H  03174 ...
Ciao, Carlo


title: Controllo IBAN

author: Nina

text:
"Sandrobi" <
sand...@tiscali.it
> ha scritto nel messaggio
news:499dc1e2$0$1109$4faf...@reader4.news.tin.it...
> Il modulo per il controllo del codice IBAN pubblicato nel Sito Comune 5.63
> secondo me presenta un errore:
> in questa riga di codice
> If Mid(pstrIBan, 4, 2) > "96" Then
> al posto di 4 va messo 3 in quanto il codice di controllo è a pos. 3 e 4
> come riportato nei commenti qualche riga di codice più indietro.
>
> Chiedo conferma agli altri.
>
> --
> Ciao, Sandrobi
>
>
Non so se sia corretta la soluzione, però posso confermare che quella riga
di codice è sbagliata: un cliente infatti mi ha fatto notare che la verifica
dava esito negativo per un codice Iban corretto e la riga "interessata" era
proprio quella.
Ciao
--
Nina


title: Controllo IBAN

text:
Ritiro quello che ho detto.
E' sbagliato!
Ciao, Carlo


title: Controllo IBAN

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:gnm4kl$6tf$1...@tdi.cu.mi.it...
>
> Ritiro quello che ho detto.
> E' sbagliato!
>
> Ciao, Carlo
Grazie della conferma.
Qualcuno provvederà a corre la pagina e relativo mdb allegato.
Ciao, Sandrobi


title: Dlookup ERRATO

author: Luigi Corinna

text:
Gentili A97
in una casella di testo
vorrei fare collegare un campo di tabella con il dlookup che filtri in base a due opzioni il CODICE CORSO ed il CAPITOLO DI SPESA...
dove sbaglio?

=DLookUp("[Totale_Voce]";"Costi_Capitoli";"[Id_Corso_Righe]=[MiaCasella]&[Id_Capitolo_Spesa=[Capitolo_Spesa]")

GRAZIE


title: Dlookup ERRATO

text:

Commetti molti errori...

1) Per Concatenare + criteri servono gli Operatori BOOLEANI AND/OR/ecc... e tu lo hai omesso
2) La sintassi deve distinguere i Campi dai Controlli... e tu hai messo tutto in un unico calderone... ma devi pensare che le stringhe qualcuno le Interpreta e deve risolverle... e questo è il Motore del VBA o di JET.
Quindi se non gli spieghi bene cosa fare... non capisce.

=DLookUp("[Totale_Voce]";"Costi_Capitoli";"[Id_Corso_Righe]=" & [MiaCasella] & " AND [Id_Capitolo_Spesa]=" & [Capitolo_Spesa])

@Alex


title: Dlookup ERRATO

text: GRAZIE ,,,


title: ricerca dlookup al contrario

author: Pokoto

text:
ciao a tutti,
uso la funzione dlookup per cercare un valore all'interno di una
tabella, esso però mi restituisce univocamente il primo record che
rispecchia il criterio di ricerca
Io ho bisogno di un metodo che faccia la stessa cosa partendo però dal
fondo
Avete qualche idea ?
Grazie in anticipo


title: ricerca dlookup al contrario

author: Alessandro Baraldi

text:

Credo che tu debba usare un Recordset aperto con una SQL dedicata che
ti ordina i Records al contrario, a quel punto usi TOP 1
Es:
SELECT TOP1 * FROM T1
WHERE Campo1=5
ORDER BY CampoX Desc
@Alex


title: ricerca dlookup al contrario

text:

grazie infinite


title: Ti aiuto a risparmiare...

author: ButidonT

text:
Ciao, non sono uno spammatore, cerco solo il mio e il tuo guadagno; come?
1)Vai a
www.spedia.net
;
2)Registrati (ci vogliono al massimo 4 minuti)
3)Durante la registrazione ti sarà richiesto un numero (sponsor number); a
quel punto dovrai scrivere 791556 (poi ti spiego il perchè); se non
inserisci un numero o ne inserisci uno sbagliato la tua iscrizione non sarà
accettata;
4)Scaricare il banner;
5)Navigare, navigare, navigare...
Ora ti spiego tutto: la Spedia è una società che, tramite il banner (cioè
quella striscia alta 2 cm e larga quanto lo schermo) fa pubblicità a varie
aziende (in generale tutte aziende legate a Internet), più questo banner è
presente sul tuo schermo più guadagni; sì perchè la Spedia guadagna da
queste ditte che chiedono la pubblicità e di conseguenza anche noi
guadagniamo leggendola. Per sapere se stiamo realmente guadagnando dobbiamo
vedere il punto esclamativo che si troverà sulla barra delle applicazioni
una volta richiamato il banner: se è verde guadagneremo, se è rosso no; per
far si che sia sempre verde dovremo restare sempre all'interno di Internet
Explorer e soprattutto far muovere la connessione (cioè inviare o ricevere
dati); più navigheremo più guadagneremo, ripagandoci la spesa della bolletta
(e ci avanzerà qualcosa). Il numero dello sponsor serve a registrarti a
carico di un altro utente già registrato; sì perchè l'utente sul quale ti
sei registrato ricevera una quota dei tuoi punti e quindi più persone si
iscrivono su di un numero e più il proprietario guadagnerà; naturalmente
dopo la registrazione anche voi avrete il vostro numero e come se non
bastasse vi arriverà una e-mail con tutti i dati (user id, password e
numero). Il guadagno si baserà sui punti che totalizzerai, più saranno e più
alto sarà il tuo guadagno; un segreto per guadagnare punti consiste nel
giocare ai giochi (davvero semplici) che Spedia ci mette a disposizione...
Credo di aver detto tutto e ricorda il numero 791556 altrimenti non potrai
iscriverti....


title: Ti aiuto a risparmiare...

author: Giovanni Albertone

text:
On Tue, 14 Mar 2000 14:27:30 +0100, "ButidonT" <
buti...@iol.it
>
wrote:
>Ciao, non sono uno spammatore,
No, sei un coglione
--
Ciao,
Giovanni


title: ricerca tra date

author: checco

text:
          Ciao a tutti,
ho un problema: ho una tabella dipendenti nella quale ho varie informazioni
tra le quali il periodo lavorativo (data inizio e data fine), ho la
necessità di cercare tutti coloro che stanno lavoranto in data odierna. Come
faccio a dirgli questo nella query o select?
Grazie infinite!
Francesco
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: ricerca tra date

author: Sergio MAZZA

text:
"checco" <
fra....@libero.it
> ha scritto nel messaggio news:217Z59Z54Z60Y1...@usenet.libero.it...
>
>           Ciao a tutti,
> ho un problema: ho una tabella dipendenti nella quale ho varie informazioni
> tra le quali il periodo lavorativo (data inizio e data fine), ho la
> necessità di cercare tutti coloro che stanno lavoranto in data odierna. Come
> faccio a dirgli questo nella query o select?
>
> Grazie infinite!
> Francesco
>
Prova con:
Select * From dipendenti Where [data inizio] => date() And [data fine] <= date();
Ciao.
--
Sergio MAZZA


title: Errore su "Aggiunte..."

text:
Ciao a tutti,
ho un problema con Access che spero che qualche Guru possa risolvermi:
Da menu "Strumenti->Aggiunte" qualsiasi comando tenti di lanciare mi
da' la seguente segnalazione:
"Metodo 'CodeDb' dell'oggetto '_Application' non riuscito!"
e a seguito tutta una serie di improperi che solo Access puo' capire.
Ho tentato di reinstallare Access, disinstallarlo e reinstallarlo
ecc.. ma il risultato e' sempre lo stesso!
Qualcuno mi puo' dare un lume che mi aiuti a risolvere 'sto problema
del ...Bill Gates!
Grazie in anticipo per il vostro Aiuto,
Vassalle Giovanni
P.S.: non chiedetemi di reinstallare Windows, Access, ODBC, ecc.
perche' non mi pare il caso...


title: Maschera Continua - Domanda

author: Marco

text:
Ho una sottomaschera continua di immissione dati con i seguenti controlli:
Descrizione,IDArticolo,etc...
Il funzionamento è semplice; praticamente inserisco i valori nel primo
record, poi inserisco i valori del secondo record e cosi
via..(Funzionamento normale).
E' possibile che alla riapertura della maschera i record(in questo caso 1°
e 2°)non possano essere + modificati e posso solo inserire dati a partire
dal 3 record?
Esempio: inserisco dati 1° record
         inserisco dati 2° record

   chiudo la maschera
   riapro la maschera
allora 1° e 2° record impossibile da modificare
   3° record inserisco dati
   4° record inserisco dati

   chiudo e riapro la maschera

   1°, 2°,3°,4° record sola lettura
5 , etc... inserimento dati e cosi via

Saluti Marco
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Maschera Continua - Domanda

text:
> "Marco" news:anf24g$rq7$1...@news.newsland.it...:
[...]
> E' possibile che alla riapertura della maschera i record(in questo caso 1°
> e 2°)non possano essere + modificati e posso solo inserire dati a partire
> dal 3 record?
> Esempio: inserisco dati 1° record
>          inserisco dati 2° record
>    chiudo la maschera
>    riapro la maschera
> allora 1° e 2° record impossibile da modificare
>    3° record inserisco dati
>    4° record inserisco dati
>    chiudo e riapro la maschera
>    1°, 2°,3°,4° record sola lettura
> 5 , etc... inserimento dati e cosi via
    Che valore hai assegnato alla proprieta':
        Consenti modifiche
della maschera?
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: Maschera Continua - Domanda

text:
Maurizio Borrelli wrote:
[Marco] Cut...
>     Che valore hai assegnato alla proprieta':
>         Consenti modifiche
> della maschera?
> --
> Ciao :-)
> Maurizio
> --------
> ?SPQR(C)
>  X
> --------
Infatti, Colpa dell'influenza. Sono uno scemo!
Sei stato molto + veloce di me! Volevo annullare questa mia domanda
stupida, ma mi hai fregato sul tempo.
Ciao Maurizio



title: stampare CODICI A BARRE

author: Spaghetti

text:
come faccio a stampare i codici a barre con access?
ho bisogno di moduli aggiuntivi? librerie? dove li trovo?
grazie


title: stampare CODICI A BARRE

author: Massimo

text:
"Spaghetti" <
spaghetti...@togli-hotmail.com
> ha scritto nel messaggio
news:a8i5a6$dfo$1...@lacerta.tiscalinet.it...
> come faccio a stampare i codici a barre con access?
>
> ho bisogno di moduli aggiuntivi? librerie? dove li trovo?
>
> grazie
>
Che tipo di codice a barra devi stampare ?


title: stampare CODICI A BARRE

author: Emyr

text:


per alcuni codici è sufficiente un font, leggi nei thread precedenti
cercando codici a barre è un argomento ampiamente trattato
Saluti.
Emanuele.


title: stampare CODICI A BARRE

author: Nicola Dainoli

text:
Spaghetti <
spaghetti...@togli-hotmail.com
> wrote in message
a8i5a6$dfo$1...@lacerta.tiscalinet.it...
> come faccio a stampare i codici a barre con access?
>
> ho bisogno di moduli aggiuntivi? librerie? dove li trovo?
>
> grazie
>
>
>
Se ti serve stampare dei codici formato EAN13 so per certo che bastano le
font dei caratteri perchè li stampo anch'io. Penso che sia la stessa cosa
anche per altri tipi di codice.
Ciao, Nicola.


title: Ancora immagini jpg

author: Stefano

text:
Ciao,
dopo non pochi problemi, superati anche grazie al vostro aiuto, sono
arrivato alla stampa dell'immagini.
Ho creato un report e il pulsante per l'apertura di esso dalla maschera. Fin
qui tutto bene.
Il problema e' sorto quando ho fatto l'anteprima del report, in quanto
l'immagine non ha piu' le dimensioni originali.
Ho impostato il controllo immagine su ritaglia e le immagini sono
memorizzate in un campo ipertestuale.
Non è che nella conversione da jpg a bmp, Access cambia anche le dimensioni?
Come posso fare per stampare l'immagine con le dimensioni originali?
Grazie per l'aiuto.Ciao.
Stefano.
--
~~~~~~~~~~~~~~~~~~~~~~~~~
   Per rispondere in E-Mail togli AT.


title: Ancora immagini jpg

author: Roberto da casa

text:
"Stefano" <
geost...@yahoo.it
> ha scritto nel messaggio
news:FO0h9.97683$ub2.1...@news1.tin.it...
> Ciao,
> dopo non pochi problemi, superati anche grazie al vostro aiuto, sono
> arrivato alla stampa dell'immagini.
> Ho creato un report e il pulsante per l'apertura di esso dalla maschera.
Fin
> qui tutto bene.
> Il problema e' sorto quando ho fatto l'anteprima del report, in quanto
> l'immagine non ha piu' le dimensioni originali.
> Ho impostato il controllo immagine su ritaglia e le immagini sono
> memorizzate in un campo ipertestuale.
>
> Non è che nella conversione da jpg a bmp, Access cambia anche le
dimensioni?
>
> Come posso fare per stampare l'immagine con le dimensioni originali?
Dovresti crearti un controllo immagine delle dimensioni originali
dell'immagine; se questo non è possibile ti consiglio di usare Zoom come
Modalità Ridimensionamento.
>
> Grazie per l'aiuto.Ciao.
> Stefano.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Ancora immagini jpg

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:%A2h9.15852$eG6.3...@twister1.libero.it...
>
> Dovresti crearti un controllo immagine delle dimensioni originali
> dell'immagine; se questo non è possibile ti consiglio di usare Zoom come
> Modalità Ridimensionamento.
Creare un controllo immagine delle dimensioni originali dell'immagine non è
possibile perchè ho immagini di diversa grandezza.
Come dovrei utilizzarlo lo Zoom? Sempre che mi adatta l'immagine al
controllo!
Secondo te, potrei risolvere il problema memorizzando le jpg con Blob?
> --
> Roberto
>
> ---------------------------------------------
> il Sito Comune di it.comp.appl.access:
>
http://www.sitocomune.com
> ---------------------------------------------
Grazie e ciao, Stefano.


title: Ancora immagini jpg

text:
"Stefano" <
geost...@yahoo.it
> ha scritto nel messaggio
news:uG2h9.97956$ub2.1...@news1.tin.it...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:%A2h9.15852$eG6.3...@twister1.libero.it...
> >
> > Dovresti crearti un controllo immagine delle dimensioni originali
> > dell'immagine; se questo non è possibile ti consiglio di usare Zoom come
> > Modalità Ridimensionamento.
>
> Creare un controllo immagine delle dimensioni originali dell'immagine non
è
> possibile perchè ho immagini di diversa grandezza.
Ne ero convinto...
Quindi il tuo problema è far si che tutta l'immagine sia contenuta nel
controllo immagine ridimensionandola senza distorsioni.
> Come dovrei utilizzarlo lo Zoom?
Apri la struttura della tua maschera.
Evidenzia con il mouse il controllo immagine.
Scegli Zoom dal menu a tendina della proprietà Modalità Ridimensionamento
del controllo immagine.
> Sempre che mi adatta l'immagine al controllo!
L'impostazione a Zoom serve proprio a questo.
> Secondo te, potrei risolvere il problema memorizzando le jpg con Blob?
Non so cosa sia Blob e comunque (cosa più importante) non so se esiste un
filtro necessario ad Access a visualizzare un file Blob.
> Grazie e ciao, Stefano.



title: Ancora immagini jpg

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:RT4h9.19757$my3.3...@twister2.libero.it...
> > Come dovrei utilizzarlo lo Zoom?
>
> Apri la struttura della tua maschera.
> Evidenzia con il mouse il controllo immagine.
> Scegli Zoom dal menu a tendina della proprietà Modalità Ridimensionamento
> del controllo immagine.
>
> > Sempre che mi adatta l'immagine al controllo!
>
> L'impostazione a Zoom serve proprio a questo.
Non è quello che vorrei, perchè cmq le dimensioni dell'immagine non resta
uguale all'originale.
> > Secondo te, potrei risolvere il problema memorizzando le jpg con Blob?
>
> Non so cosa sia Blob e comunque (cosa più importante) non so se esiste un
> filtro necessario ad Access a visualizzare un file Blob.
Non è quella funzione di cui parla S.Bettini in una faq del sito comune?
Ha la particolarita' di archiviare in dati come un "grumo di dati".
Pensavo che forse in quel modo le jpg rimanessero delle dimensioni
originali.
Grazie e ciao, Stefano.


title: Ancora immagini jpg

author: Alessandro Cara

text:
Roberto da casa wrote:
[cut]
>
> > Sempre che mi adatta l'immagine al controllo!
>
> L'impostazione a Zoom serve proprio a questo.
Ciao Roberto
credo che non gli basti. Dovrebbe modificare anche le dimensioni
del controllo. Immaginati la classica foto presa in orizzontale
od in verticale lo zoom non la risolve e la distorce
>
> > Secondo te, potrei risolvere il problema memorizzando le jpg con Blob?
>
> Non so cosa sia Blob e comunque (cosa più importante) non so se esiste un
> filtro necessario ad Access a visualizzare un file Blob.
blob = binary large object (ole di access)
clob = character large object (i memo di access)
--
a.cara


title: Ancora immagini jpg

author: warp

text:
Stefano ha scritto nel messaggio ...
>
>Non č quello che vorrei, perchč cmq le dimensioni dell'immagine non resta
>uguale all'originale.
Il controllo immagine standard di Access non č granchč.
Al limite prova su evento formattazione della sezione (o apertura Report, dipende)
Me!Immagine.Height = Me!Immagine.ImageHeight
Me!Immagine.Width = Me!Immagine.ImageWidth
Ciao.


title: Ancora immagini jpg

text:
"warp" <
war...@libero.it
> ha scritto nel messaggio
news:am4mdq$qo$1...@fe2.cs.interbusiness.it...
> Il controllo immagine standard di Access non č granchč.
Pienamente d'accordo!
> Al limite prova su evento formattazione della sezione (o apertura Report,
dipende)
>
> Me!Immagine.Height = Me!Immagine.ImageHeight
> Me!Immagine.Width = Me!Immagine.ImageWidth
Forse non ho capito come funziona!
Immagine a sinistra dell'= č quella che ho nel report.
E a destra anche?
Booo.
Mi puoi dare una spiegazione?
Grazie e ciao,
Stefano.


title: Ancora immagini jpg

text:
Stefano ha scritto nel messaggio ...
>> Me!Immagine.Height = Me!Immagine.ImageHeight
>> Me!Immagine.Width = Me!Immagine.ImageWidth
>
>Forse non ho capito come funziona!
>Immagine a sinistra dell'= č quella che ho nel report.
>E a destra anche?
>Booo.
Sě.
>Mi puoi dare una spiegazione?
>Grazie e ciao,
Mah, diciamo che si cerca di assegnare alla cornice contenente l'immagine le dimensioni reali
dell'immagine stessa.
Ciao.


title: Qualche facile esempio sull'uso della funzione Dlookup

author: badush

text:
Ciao amici del newsgroup
Potete dirmi se nel sitocomune c'e un esempio sull'utilizzo della funzione
Dlookup.
Su consiglio di Roberto devo usare questa funzione per inserire in una
maschera di scarico di prodotti i loro prezzi prelevandoli da una tabella
listino a parte.
Purtroppo per me l'Help in linea è un po ostico. Mi serve pertanto qualche
facile esempio per capire come applicare questa funzione.
Se sul sitocomune non c'è nulla in proposito potete farmi un piccolo
esempio.
Grazie


author: mino

text:

questo esempio riguarda la dlookup nei moduli
DLookup("[Autorizzazione Contabilità]", "[TabellaAutorizzazioni]",
"[matricola]= Forms![Pannello comandi]![matricola]")
questo esempio per tutto il resto
DLookup("[Autorizzazione Contabilità]"; "[TabellaAutorizzazioni]";
"[matricola]= Forms![Pannello comandi]![matricola]")
ciao
--------------------------------
Inviato via
http://usenet.libero.it


author: Antonio Biso

text:
"badush" <
bad...@martucci.com
> ha scritto nel messaggio
news:cOBra.77954$iy5.2...@twister2.libero.it...
> Ciao amici del newsgroup
>
> Potete dirmi se nel sitocomune c'e un esempio sull'utilizzo della funzione
> Dlookup.
> Purtroppo per me l'Help in linea è un po ostico. Mi serve pertanto qualche
> facile esempio per capire come applicare questa funzione.
Se i facili ed illuminanti esempi contenuti nell'help on line ti risultano
ostici, è meglio che lasci perdere questa attività...
Antonio


text:
"mino" <
news...@libero.it
> ha scritto nel messaggio
news:80Z16Z45Z126Y1...@usenet.libero.it...

Eeeehhhhhh?!?!?
Sei convinto di quello che hai scritto?
A parte il fatto ovviamente di distinguere il caso in cui matricola sia
numerico (e allora se non fosse sbagliata la sintassi potrebbe pure andare)
da quello di tipo testo (e quindi ci vogliono gli apici intorno al valore da
confrontare!!!)
Prova a riguardare quello che hai scritto... poi se badush dice che non
capisce c'ha ragione...
Antonio


author: Xymox

text:
"badush" <
bad...@martucci.com
> ha scritto
> Ciao amici del newsgroup
>
> Potete dirmi se nel sitocomune c'e un esempio sull'utilizzo della funzione
> Dlookup.
=DLookUp("[RagSoc]","T_Clienti","[cod]='" & [Forms]![S_1]![codcli] & "'")
'Scrive la ragione sociale della tabella T_Clienti , paragonando
T_Clienti![Cod] con il numero che c'è nel campo codcli della scheda S1 .
es. 1 = Barilla , scrivento 1 nel campo [Forms]![S_1]![codcli] restituisce
automaticamente nel campo dove come Origine Controllo c'è il comando sopra
descritto la scritta Barilla .
Me!RagSoc1 = DLookup("[RagSoc]", "T_Clienti", "[cod]='" &
[Forms]![S_1]![codcli] & "'") 'Come l'esempio sopra ma con l'utilizzo del
codice al posto della Propietà -Origine Controllo- ; il codice in questo
esempio è sulla propietà della scheda Su Corrente .
Me!RagSoc1 è il campo della scheda dove mette il risultato del comando
Dlookup es. Barilla
Me.OrdCodCli = DLookup("affCdCli", "T_Com_Affare", "affCdAff='" &
Me.OrdNrAff & "'") 'Esempio uguale ma semplificato come sintassi
Me!DCliente = DLookup("[CLIENTE]", "T_elettrici", "[ID ORDINE] = " & NOrd)
'La variabile NOrd è di tipo numerico
Esempi di funzione DLookup
Nell'esempio riportato di seguito si restituiscono informazioni relative ai
nomi contenuti nel campo NomeSocietà del record che soddisfa criteri. Il
dominio è la tabella Corrieri. L'argomento criteri limita il set di record
risultante ai record in cui IDCorriere equivale a 1.
Dim strX As String
strX = DLookup("[NomeSocietà]", "Corrieri", "[IDCorriere] = 1")
Nell'esempio riportato di seguito, relativo alla tabella Corrieri, si
utilizza la maschera IDCorriere per fornire criteri alla funzione DLookup.
Si noti che il riferimento al controllo non è racchiuso tra le virgolette
che denotano le stringhe. In tale modo si assicura che ogni volta che la
funzione DLookup viene richiamata, il controllo fornisca il valore corrente.
Dim strX As String
strX = DLookup("[NomeSocietà]", "Corrieri", "[IDCorriere] =" _
& Forms!Corrieri!IDCorriere])
Nell'esempio riportato di seguito si utilizza una variabile intRicerca per
eseguire la ricerca.
Dim intRicerca As Integer, strX As String
intRicerca = 1
X = DLookup("[NomeSocietà]", "Corrieri", _
"[IDCorriere] = " & intRicerca)
--
ciao MarcoS
www.marcosanti.it


text:

non penso di essere un genio ma questa dlookup la uso senza problemi e
funziona.
se posso capire dove sbaglio mi fa solo piacere. fammi sapere



text:
On Tue, 29 Apr 2003 21:05:12 GMT, "badush" <
bad...@martucci.com
>
wrote:

valorevariabile=dlookup("nomecampo";"nometabella";"campoa=" &
nomevariabilenumerica)
valorevariabile=dlookup("nomecampo";"nometabella";"campoa=""" &
nomevariabilestringa & """")
Saluti.
Emanuele.


text:
"mino" <
news...@libero.it
> ha scritto nel messaggio
news:80Z16Z45Z126Y1...@usenet.libero.it...
> > > questo esempio riguarda la dlookup nei moduli
> > > DLookup("[Autorizzazione Contabilità]", "[TabellaAutorizzazioni]",
> > > "[matricola]= Forms![Pannello comandi]![matricola]")
> > Prova a riguardare quello che hai scritto... poi se badush dice che non
> > capisce c'ha ragione...
> >
> > Antonio
> non penso di essere un genio ma questa dlookup la uso senza problemi e
> funziona.
> se posso capire dove sbaglio mi fa solo piacere. fammi sapere
Forse hai sbagliato a riportare quello che usi senza aver fatto copia
incolla.
Resta il fatto che il parametro criterio che usi non può funzionare.
Tu scrivi che il campo matricola deve essere uguale alla stringa
Forms![Pannello comandi]![matricola] non al contenuto del controllo
specificato. Per ottenere questo la sintassi è
"[matricola]=" & Forms![Pannello comandi]![matricola]
e se matricola è di tipo testo
"[matricola]='" & Forms![Pannello comandi]![matricola] & "'"
Antonio


text:
Antonio Biso wrote:




> Antonio
io la uso come l'ho scritta ma funziona anche se effettivamente è più
chiaro come l'hai scritta tu.
ciao
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
"mino" <
news...@libero.it
> ha scritto nel messaggio
news:b8oh8u$kb6$1...@news.newsland.it...

Potresti copia incollare quello che usi dicendomi in che punto l'hai presa?
Antonio


text:
Antonio Biso wrote:


> Antonio
quello che uso è quello che ho già postato e l'ho presa da un modulo di un
mio db che uso regolarmente.



text:
"mino" <
news...@libero.it
> ha scritto nel messaggio
news:b8okq5$dou$1...@news.newsland.it...
> Antonio Biso wrote:
>
> > > > Forse hai sbagliato a riportare quello che usi senza aver fatto
copia
> > > > incolla.
> > > > Resta il fatto che il parametro criterio che usi non può funzionare.
> > > > Tu scrivi che il campo matricola deve essere uguale alla stringa
> > > > Forms![Pannello comandi]![matricola] non al contenuto del controllo
> > > > specificato. Per ottenere questo la sintassi è
> > > > "[matricola]=" & Forms![Pannello comandi]![matricola]
> > > > e se matricola è di tipo testo
> > > > "[matricola]='" & Forms![Pannello comandi]![matricola] & "'"
> > >
> > > > Antonio
> > >
> > > io la uso come l'ho scritta ma funziona anche se effettivamente è più
> > > chiaro come l'hai scritta tu.
>
> > Potresti copia incollare quello che usi dicendomi in che punto l'hai
presa?
>
> > Antonio
>
> quello che uso è quello che ho già postato e l'ho presa da un modulo di un
> mio db che uso regolarmente.
Pagherei per vedere funzionare veramente quello che tu hai scritto...
Antonio


author: Alberto S.

text:
[cut]
>Pagherei per vedere funzionare veramente quello che tu hai scritto...
>
>Antonio
In un 3d che ho aperto il 31/3/2003 alle ore 22:10 (Criteri in
DLookUp) io segnalavo il fatto che del codice analogo:
**
Private Sub Zip2_Exit(Cancel As Integer)
Dim txtState As String
Dim txtCity As String
    txtState = DLookup("State", "tblZipCode", "ZipCode = Zip2")
    txtCity = DLookup("City", "tblZipCode", "ZipCode =[Zip2] ")
    If (Not IsNull(txtState)) Then Me![STATE2] = txtState
    If (Not IsNull(txtCity)) Then Me![CITY2] = txtCity
End Sub
**
funzionasse, in barba - a mio avviso - ad ogni logica. L'unico seguito
è stato un (blando) flame con te in quanto avevamo opinioni diverse
sul fatto che per tale argomento si dovesse o meno aprire un nuovo
thread.
Il db è formato solo da una tabella e una maschera, ho anche provato a
importare i due oggetti in un db nuovo e poi anche a compattare il
nuovo db: funziona lo stesso. È in A2000 ma se vuoi lo converto in A97
e te lo mando (aggratisse) - pesa 120KB.
Ciao
--
Alberto
No alle guerre


text:
"Alberto S." <
sartori.SPA...@tin.it
> ha scritto nel messaggio
news:te50bv41a920pm5v7...@4ax.com...
> [cut]
>
> >Pagherei per vedere funzionare veramente quello che tu hai scritto...
> >
> >Antonio
>
> In un 3d che ho aperto il 31/3/2003 alle ore 22:10 (Criteri in
> DLookUp) io segnalavo il fatto che del codice analogo:
> **
> Private Sub Zip2_Exit(Cancel As Integer)
> Dim txtState As String
> Dim txtCity As String
>     txtState = DLookup("State", "tblZipCode", "ZipCode = Zip2")
>     txtCity = DLookup("City", "tblZipCode", "ZipCode =[Zip2] ")
>     If (Not IsNull(txtState)) Then Me![STATE2] = txtState
>     If (Not IsNull(txtCity)) Then Me![CITY2] = txtCity
> End Sub
> **
> funzionasse, in barba - a mio avviso - ad ogni logica. L'unico seguito
> č stato un (blando) flame con te in quanto avevamo opinioni diverse
> sul fatto che per tale argomento si dovesse o meno aprire un nuovo
> thread.
> Il db č formato solo da una tabella e una maschera, ho anche provato a
> importare i due oggetti in un db nuovo e poi anche a compattare il
> nuovo db: funziona lo stesso. Č in A2000 ma se vuoi lo converto in A97
> e te lo mando (aggratisse) - pesa 120KB.
Mandamelo, anche in A2K.
Lo guardo perň lunedě...
Antonio
P.S.
Prova tu a testare se col 97 si comporta diversamente...


text:
On Wed, 30 Apr 2003 20:26:58 GMT, "Antonio Biso" <
ch...@etruria.net
>
[cut]
>
>Mandamelo, anche in A2K.
>Lo guardo perň lunedě...
ok, fatto
>Antonio
>
>P.S.
>Prova tu a testare se col 97 si comporta diversamente...
provato (formato A97 sotto A2000: funziona) - A97 sotto A97 lo potrň
provare solo lunedě.



author: ing. Franco Varoli

text:
On Wed, 30 Apr 2003 14:52:18 GMT, "Antonio Biso" <
ch...@etruria.net
>
wrote:

Confermo anch'io quel che sostiene mino. Ho appena utilizzato questo
modulo che sta dietro ad un report e funziona benissimo.
Private Sub PièDiPaginaGruppo1_Format(Cancel As Integer, FormatCount
As Integer)
    Me.txtNumeroNegozi = DLookup("[NumeroDiNegozi]", _
        "[QueryPerReportImpiegatiEOrdini-2]", _
        "[IDImpiegato]= [txtIDImpiegato]")
End Sub
Uso Access2000 e la routine funziona qualunque sia la gerarchia dei
riferimenti (prima ADO o prima DAO, ecc.).
Saluti.
--
ing. Franco Varoli
fRANC...@tin.it
Per scrivermi togliere RANCO


title: Rinominare le etichette dei pulsanti di comando

author: Salvatore

text:
Avendo una maschera con una serie di pulsanti (supponiamo 12, per esempio)
chiamati comando0, comando1,...comando12, vorrei rinominare le loro
etichette con un ciclo for next, prendendo i valori dal campo di una
tabella.
Potete darmi una mano?
Grazie, Salvatore


text:
"Salvatore" <
sal...@tiscalinet.it
> ha scritto nel messaggio
news:aarhhf$ujk$1...@pegasus.tiscalinet.it...

Penso di si, se però ci spieghi come è fatta questa tabella. ;-)
> Grazie, Salvatore
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:AndA8.46355$W9.11...@twister2.libero.it...
>
> "Salvatore" <
sal...@tiscalinet.it
> ha scritto nel messaggio
> news:aarhhf$ujk$1...@pegasus.tiscalinet.it...
> > Avendo una maschera con una serie di pulsanti (supponiamo 12, per
esempio)
> > chiamati comando0, comando1,...comando12, vorrei rinominare le loro
> > etichette con un ciclo for next, prendendo i valori dal campo di una
> > tabella.
> > Potete darmi una mano?
>
> Penso di si, se perň ci spieghi come č fatta questa tabella. ;-)
>
> > Grazie, Salvatore
>
> --
> Roberto
>
> ---------------------------------------------
> il Sito Comune di it.comp.appl.access:
>
http://www.sitocomune.com
> ---------------------------------------------
>
>
La tabella č costituita da due campi: il primo č un campo contatore (ID), il
secondo contiene il testo da associare al pulsante.
Ciao,e auguri di pronta guarigione
Salvatore


text:
"Salvatore" <
sal...@tiscalinet.it
> ha scritto nel messaggio
news:ab15oa$9kp$1...@lacerta.tiscalinet.it...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:AndA8.46355$W9.11...@twister2.libero.it...
> >
> > "Salvatore" <
sal...@tiscalinet.it
> ha scritto nel messaggio
> > news:aarhhf$ujk$1...@pegasus.tiscalinet.it...
> > > Avendo una maschera con una serie di pulsanti (supponiamo 12, per
> esempio)
> > > chiamati comando0, comando1,...comando12, vorrei rinominare le loro
> > > etichette con un ciclo for next, prendendo i valori dal campo di una
> > > tabella.
> > > Potete darmi una mano?
> >
> > Penso di si, se perň ci spieghi come č fatta questa tabella. ;-)
> >
> > > Grazie, Salvatore
> >
> > --
> > Roberto
[CUT]
> La tabella č costituita da due campi: il primo č un campo contatore (ID),
il
> secondo contiene il testo da associare al pulsante.
OK, ma come si fa ad identificare il record che contiene la descrizione di
comando0, quale quello che contiene la descrizione di comando1 e cosě via. ?
> Ciao,e auguri di pronta guarigione
Grazie!!



text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:0qVA8.7507$US3.1...@twister1.libero.it...
>
> "Salvatore" <
sal...@tiscalinet.it
> ha scritto nel messaggio
> news:ab15oa$9kp$1...@lacerta.tiscalinet.it...
> >
> > "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> > news:AndA8.46355$W9.11...@twister2.libero.it...
> > >
> > > "Salvatore" <
sal...@tiscalinet.it
> ha scritto nel messaggio
> > > news:aarhhf$ujk$1...@pegasus.tiscalinet.it...
> > > > Avendo una maschera con una serie di pulsanti (supponiamo 12, per
> > esempio)
> > > > chiamati comando0, comando1,...comando12, vorrei rinominare le loro
> > > > etichette con un ciclo for next, prendendo i valori dal campo di una
> > > > tabella.
> > > > Potete darmi una mano?
> > >
> > > Penso di si, se però ci spieghi come è fatta questa tabella. ;-)
> > >
> > > > Grazie, Salvatore
> > >
> > > --
> > > Roberto
> [CUT]
> > La tabella è costituita da due campi: il primo è un campo contatore
(ID),
> il
> > secondo contiene il testo da associare al pulsante.
>
> OK, ma come si fa ad identificare il record che contiene la descrizione di
> comando0, quale quello che contiene la descrizione di comando1 e così via.
?
>
> > Ciao,e auguri di pronta guarigione
>
> Grazie!!
>
> > Salvatore
>
> --
> Roberto
La scelta va fatta con qualunque ordine, per esempio in ordine cronologico
di immissione. Quindi il primo record dà l'etichetta al pulsante 1, il
secondo al pulsante 2 e così via. Infatti, una volta rinominati i pulsanti,
per l'evento farò riferimento all'etichetta del pulsante stesso.
Saluti
Salvatore


text:
"Salvatore" <
sal...@tiscalinet.it
> ha scritto nel messaggio
news:ab2rug$4uc$1...@pegasus.tiscalinet.it...
[CUT]
>
> La scelta va fatta con qualunque ordine, per esempio in ordine cronologico
> di immissione. Quindi il primo record dà l'etichetta al pulsante 1, il
> secondo al pulsante 2 e così via. Infatti, una volta rinominati i
pulsanti,
> per l'evento farò riferimento all'etichetta del pulsante stesso.
> Saluti
> Salvatore
Se la tabella si chiama Tabella1 ed ha una struttura simile a questa:
ID                  Contatore e chiave primaria
Descrizione    Testo
Se i pulsanti di comando sono 12 (chiamati Comando0, Comando1 ...
Comando11).
Se sei d'accordo ad usare i primi 12 record di Tabella1.
A fronte dell'evento "Su apertura" della maschera che contiene i dodici
pulsanti di comando genera il seguente codice VBA, che fa riferimento alle
librerie DAO:
Private Sub Form_Open(Cancel As Integer)
Dim rst As Recordset
Dim Conta As Integer
If DCount("*", "Tabella1") < 12 Then Exit Sub
Set rst = CurrentDb.OpenRecordset("Tabella1")
rst.MoveFirst
For Conta = 0 To 11
    Me("Comando" & Trim(Conta)).Caption = rst!Descrizione
    rst.MoveNext
Next Conta
Set rst = Nothing
End Sub



text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:tW6B8.8562$5k4.2...@twister2.libero.it...

Come sempre, grazie
Ciao
Salvatore


title: mostra o nascondi colonna

text:
premetto che sono poco esperto di codici in access.
il mio problema è il seguente.
Ho una tabella articolata in molti campi.
Da questa tabella dovrò sviluppare maschere o report diversificati, in cui
per esempio voglio visualizzare solo nome e cognome oppure nome e indirizzo
oppure etc...
So che l'estrazione delle colonne si fa con la query di selezione cliccando
o meno sull'"interruttore" Mostra.
Però così ogni volta che devo estrarre certe colonne devo fare una query; e
perciò fare unìinfinità di query(la mia applicazione non mi permette nemmeno
di sapere al momento di quali avrò bisogno).
Ho anche provato a studiare la proprietà ColumnHidden, ma non so come usarla
in modo dinamico.
Io invece vorrei una maschera in cui seleziono con dei pulsanti una o più
colonne che voglio inserire e poi le visualizzo. In tal modo ho la massima
flessibilità.
Chiunque può aiutarmi mi scriva, dandomi il codice VBA(credo che sia
necessario in questo caso).
Ho urgenza!!!!!!!!!!!!!!
Saluti
--------------------------------
Inviato via
http://usenet.libero.it


title: mostra o nascondi colonna

author: Carlo Costarella

text:
<
ubaldoc...@inwind.it
> ha scritto nel messaggio
news:62Z98Z215Z6Y10...@usenet.libero.it...

Troppo difficile e lungo da spiegare e peggio da scrivere.
In sintesi posso solo dirti che una strada è quella di crearti dinamicamente
l'istruzione SQL per i campi che ti servono.
Leggiti "QueryDef" e "CreateQueryDef" nella guida.
Una volta creata la query a runtime la puoi aprire e mostrare i risultati,
stamparla e poi cancellarla.
Comunque non è un gioco da ragazzi.
Ciao, Carlo


title: mostra o nascondi colonna

author: Roberto dalla campagna

text:
<
ubaldoc...@inwind.it
> wrote in message
62Z98Z215Z6Y10...@usenet.libero.it...

Può darsi che non abbia capito il tuo problema, ma a mio avviso non devi
fare neppure una query, ma devi basare le maschere ed i report direttamente
sulla tabella inserendo in essi solo i controlli associati ai campi che ti
interessano per quella maschera o report. Le queries servono per estrarre i
record e non per estrarre i campi, ma anche questo lo puoi fare filtrando
direttamente le maschere o i report tramite le loro proprietà Filter e
FilterOn (vedi help) e senza far ricorso a delle queries.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: mostra o nascondi colonna

author: ubaldo

text:
Il 03 Mag 2003, 18:05, "Roberto dalla campagna" <
r.ma...@libero.it
> ha
scritto:

> Ciao, grazie del tuo consiglio, ma il mio problema è diverso.
Lo so che se voglio inserire o meno delle colonne in una maschera posso
associare o meno i relativi controlli della tabella.
Il fatto è che nell'ambito dell'applicazione, che non userò io, l'utente che
è ancora più inesperto di me, si muoverà solo nell'ambito di maschere che io
ho fissato.
Perciò non posso ogni volta che lui vuole filtrare una colonna creare una
nuova maschera, anche perchè le sue esigenze potrebbero essere molto varie a
seconda del dato che gli serve.
La mia tabella è fondamentalmente un'anagrafica dipendenti, con nome
cognome, data assunzione, titolo di studio, data avanzamento, profilo
economico, giuridico ed un sacco ancora di cose. Allora una volta il mio
utilizzatore vuol solo nome e cognome e titolo di studio, una volta data
assunzione e tipo contratto, una volta i gognomi delle donne etcc. insomma
unìinfinità di combinazioni che non posso prevedere tutte in anticipo.
Il mio sogno sarebbe che gli fosse visualizzata una maschera di controllo
generale in cui lui, cliccando su un pulsante associato a nome oppure
cognome oppure indirizzo oppure a qualunque combinazione, può decidere quali
sono i campi da visualizzare.
Forse non è possibile ma se poi aiutarmi mi fai un gran favore.
Ciao



title: mostra o nascondi colonna

text:
"ubaldo" <
ubaldoc...@inwind.it
> ha scritto nel messaggio
news:62Z98Z217Z56Y1...@usenet.libero.it...

Vai sul Sito Comune (link qui sotto) e nella Sezione Queries leggiti la FAQ
intitolata "Come si può creare in maniera dinamica una query con la tecnica
QBF?".
Nell'esempio allegato alla FAQ puoi scegliere:
1) Il nome della query da creare; se esiste già una query con quel nome essa
verrà sovrascritta da quella nuova.
2) La tabella su cui basare la query da creare, scegliendola tra quelle
contenute nel database.
3) Fino a quattro campi della tabella scelta al punto 2).
4) Fino a due campi in base ai quali ordinare i dati della query.
Una volta che hai capito la tecnica QBF, potrai anche aumentare i campi
selezionabili ed impostare la proposizione WHERE per selezionare i record
con la query.
In alternativa puoi crearti sempre dinamicamente da codice VBA una stringa
SQL che potrai poi usare come origine record di una maschera e/o di un
report.



title: Public Function non funziona

author: Ultra

text:
Salve a tutto il NG
Ho un problemino con una function che non ne vuol sapere di funzionare....Vi
spiego un attimo.....ho due mdb, uno è il gestionale e l'altro è l'archivio.
Il problema è che quando vado a scrivere nell'archivio il pc non mi si
collega dandomi un errore di runtime dicendomi che l'utente ADMIN ha messo
il database in uno stato in cui è impossibile aprirlo o modificarlo....(non
ho fatto nulla di tutto ciò). Non solo se lancio il solo codice non mi apre
il db archivio nel recordset che vorrei io dicendo che è necessario 1...poi
questo 1 che cavolo sarà.....?
Vi incollo il codice:
Option Compare Database
Option Explicit
Public Function SalvataggioOfferteSuArchivio2()
Dim dbs As Database
Dim db As Database
Dim rst As Recordset, rst2 As Recordset, rsta1 As Recordset, rsta As
Recordset, rsControlloOf As Recordset, rsControlloDf As Recordset
Dim strSQL As String
Dim strSql2 As String
Dim strSQL3 As String
Dim strSQL4 As String
Set db = CurrentDb
strSql2 = "SELECT * FROM Offerta WHERE IDOfferte = " &
Forms!Offerte01!IDOfferte & ""
strSQL = "SELECT * FROM DettaglioOfferta WHERE IDOfferte = " &
Forms!Offerte01!IDOfferte & " ORDER BY Riga"
strSQL3 = "SELECT * FROM Offerta WHERE IDOfferte = " &
Forms!Offerte01!IDOfferte & ""
strSQL4 = "SELECT * FROM DettaglioOfferta WHERE IDOfferte = " &
Forms!Offerte01!IDOfferte & " ORDER BY Riga"
Set dbs = OpenDatabase("C:\Documenti\ArchivioEstero.mdb")
Set rst = dbs.OpenRecordset(strSQL4, dbOpenDynaset)
Set rst2 = dbs.OpenRecordset(strSQL3, dbOpenDynaset)
Set rsta = db.OpenRecordset(strSQL, dbOpenDynaset)
Set rsta1 = db.OpenRecordset(strSql2, dbOpenDynaset)
mi continua  a dare errore sul rst dicendomi che è necessario 1.......chi sà
dirmi se il codice è sbagliato e come risolvere sta cosa???
Grazie ancora a tutti!!
Ultra


title: Public Function non funziona

text:
"Ultra" <
lew...@tin.it
> ha scritto nel messaggio
news:1E6Ga.82692$pR3.1...@news1.tin.it...

Copia e incolla le varie strSQL in una query reale (in visualizzazione SQL)
e ti accorgerai dell'errore.
Ciao, Carlo


title: Public Function non funziona

author: ultrareflex

text:

"Carlo Costarella" <
carloantoni...@virgilio.it
> ha scritto nel
messaggio news:LfdGa.83281$pR3.1...@news1.tin.it...
> Copia e incolla le varie strSQL in una query reale (in visualizzazione
SQL)
> e ti accorgerai dell'errore.
> Ciao, Carlo
Ciao Carlo....ho visto quello che intendi tu.....le varie istruzioni si
riferiscono sempre al db Principale e non a a quello archivio.....però a
questo punto come posso dirgli di prendere i dati nell'altro??? Io credevo
che così andasse bene...:
Dim dbs As Database
Set dbs = OpenDatabase("C:\Documenti\ArchivioEstero.mdb")
Dim rst As Recordset, rst2 As Recordset, rsta1 As Recordset, rsta As
Recordset, rsControlloOf As Recordset, rsControlloDf As Recordset
Dim strSQL3 As String
Dim strSQL4 As String
Set rst = dbs.OpenRecordset(strSQL4, dbOpenDynaset)
Set rst2 = dbs.OpenRecordset(strSQL3, dbOpenDynaset)
Sbaglio Qualcosa??
Sul Set rst io chiedo di aprire il dbs.Openrecordset e non
db.Recordset............
Qualche idea??
>
>


title: Public Function non funziona

text:
"ultrareflex" <
lew...@tin.it
> ha scritto nel messaggio
news:uzeGa.153738$g92.3...@news2.tin.it...

Ho provato la tua funzione e a me funziona tutto.
Dai uno sguardo alla guida alla voce "Metodo OpenDatabase" e sopratutto agli
errori possibili.
Ciao, Carlo


title: AIUTO. Il mio access non riconosce la Date()

author: Giovanna

text:
Dopo aver inserito =Format(Date();"Data in cifre") in una casella di testo è
uscito il seguente messaggio:
Errore di sintassi nell'espressione oppure i dati di tipo testo non sono
racchiusi tra virgolette.
Credo che questa sia la causa di tanti altri problemi che st incontrando.
Qualcuno mi aiuti
:o(((((((((


author: Stefano Radice

text:
Giovanna ha scritto nel messaggio <10nmhsp$2lt$
1...@fe2.cs.interbusiness.it
>...
>Dopo aver inserito =Format(Date();"Data in cifre") in una casella di testo
è
>uscito il seguente messaggio:
>Errore di sintassi nell'espressione oppure i dati di tipo testo non sono
>racchiusi tra virgolette.
Io ho fatto copia e incolla della tua stringa e funziona...non avrai qualche
problema di riferimenti o installazione? Comunque ti ho ri-risposto per la
requery
Stefano


text:
Ho risolto il problema della data importando tutti gli oggetti in un nuovo
database. Ma!?! Ti ringrazio molto per gli aiuti... Ti ho mandato parte del
database
Stefano Radice <ste...@NOSPAMstefano.com> wrote in message
895n54$7ur$1...@nslave2.tin.it...



text:
Giovanna ha scritto nel messaggio <895pr3$rvo$
1...@fe1.cs.interbusiness.it
>...
>Ho risolto il problema della data importando tutti gli oggetti in un nuovo
>database. Ma!?! Ti ringrazio molto per gli aiuti... Ti ho mandato parte del
>database
>Stefano Radice <ste...@NOSPAMstefano.com> wrote in message
>895n54$7ur$1...@nslave2.tin.it...
>>
non ho ricevuto nulla...


text:
E' vero, il messaggio ritorna al mittente; nn è che hai un altra email?
Stefano Radice <ste...@NOSPAMstefano.com> wrote in message
895tmu$l6a$1...@nslave2.tin.it...



text:
stefano...@eon.it
Giovanna ha scritto nel messaggio <89694a$pku$
1...@fe1.cs.interbusiness.it
>...



title: ricerca installatori hw/sw

author: Arrigo Bernardi

text:
Startup internet company ricerca per serio lavoro in Bassano del
Grappa (VI) persone con dimestichezza nell'istallazione di nuovo
hardware e software.
Massima urgenza.
Contattare Arrigo Bernardi
aber...@kingcommerce.it


title: Giudizi sulla guida di Access2000

text:
Trovo, a ben cercare, tutto spiegato o devo
rivolgermi a terze parti, vedi alla voce manuali
o siti.
Nel secondo caso (inglese no-problem ) cosa
acquistare.
TIA
--
	Dino


title: creazione package con office xp developer

author: Mx

text:
un'altra domanda...
ho l'office developer in inglese...mentre il mio db l'ho fatto con
office 2000 prof in italiano.
Ho provato a fare un package del db, in modo da poterlo installare nei
pc insieme ai componenti run time necessari.
a un certo punto del processo di packaging..mi da un errore..in cui dice
che non trova uno dei componenti nel linguaggio da me scelto.
Quindi mi dice di creare un nuovo set di componenti nel linguaggio
desiderato...oppure di cercare tali componenti nel cd di office.
ps:quando faccio il package...ho provato a selezionare una volta la
lingua italiana..e una volta quella inglese...ma l'errore e' lo stesso!
Ho installato anche il cd "COMPONENT UPDATE"...ma non ho risolto.
sara' perche qualcuno dei componenti del db e' in italiano..mentre
l'office developer e' in inglese?
ciao


title: [OT]Proposta DEMO Grafica Win Vista Style

author: Rino Ferrari

text:
A chi potrebbe interessare (per qualcuno "anche l'occhio vuole la sua
parte")Propongo al NG (Momentaneamente .MDE poiché non definitiva) una
rappresentazione Grafica di Access un po' diversa dal solito.
Sono ben accette Critiche e altro..... ;-)
--
Rino®


author: VedoTondo

text:
"Rino Ferrari" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:440ec370$0$18281$4faf...@reader1.news.tin.it...

Ciao Rino ma dov'è la tua proposta?
Saluti Andrea


author: Alessandro Baraldi

text:
Ti è scappato il Link nella penna.
@Alex


author: Simone Calligaris

text:
"Rino Ferrari"


Vediamo!     ;)
Ciao, Simone


text:
"Rino Ferrari" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:440ec370$0$18281$4faf...@reader1.news.tin.it...

OK ! Raga volevo solo vedere se qualcuno  fosse interessato
ecco il Link :
http://www.systemsoftware.it/DemoWinVistaStile.mde


text:
A me piace!
Saluti Andrea
"Rino Ferrari" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:440ecb84$0$18283$4faf...@reader1.news.tin.it...



text:
"Rino Ferrari" <
> OK ! Raga volevo solo vedere se qualcuno  fosse interessato
Molto bravo: davvero un ottimo impatto grafico...
Ciao, Simone


author: Roberto La Forgia

text:
"Rino Ferrari" <
rinof...@virgilio.it
> wrote in message
news:440ecb84$0$18283$
4faf...@reader1.news.tin.it
CUT
> > RinoŽ
> >
> OK ! Raga volevo solo vedere se qualcuno  fosse interessato
>
> ecco il Link :
>
http://www.systemsoftware.it/DemoWinVistaStile.mde
Lo trovo piacevole...
clap clap ...
Ciao,
Roberto
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
Graficamente molto piacevole.
@Alex


author: Nick

text:
Rino Ferrari ha detto: in data 08/03/2006 13.18:

in che versione di access è? Xp? non ne hai una versione per access 2k?
Ciao
Nick


text:
>>> Sono ben accette Critiche e altro..... ;-)
>>>
>>> --
>>> RinoŽ
>>>
>> OK ! Raga volevo solo vedere se qualcuno  fosse interessato
>>
>> ecco il Link :
>>
http://www.systemsoftware.it/DemoWinVistaStile.mde
> in che versione di access č? Xp? non ne hai una versione per access 2k?
>
> Ciao
> Nick
Si e in Axp .
RinoŽ


text:
"Rino Ferrari" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:440ecb84$0$18283$4faf...@reader1.news.tin.it...
>
> "Rino Ferrari" <
rinof...@virgilio.it
> ha scritto nel messaggio
> news:440ec370$0$18281$4faf...@reader1.news.tin.it...
>>A chi potrebbe interessare (per qualcuno "anche l'occhio vuole la sua
>>parte")Propongo al NG (Momentaneamente .MDE poiché non definitiva) una
>>rappresentazione Grafica di Access un po' diversa dal solito.
>>
>> Sono ben accette Critiche e altro..... ;-)
>>
>> --
>> Rino®
>>
> OK ! Raga volevo solo vedere se qualcuno  fosse interessato
>
Ciao Rino
il lavoro seppure in fase embrionale mostra sicuramente un approccio diverso
rispetto a quello a cui siamo abituati.
La combinazione dei colori sembra molto riposante.
Manca di fluidità o meglio sarebbe gradita una maggiore fluidità specie
nell'apertura dei menù.
Ti consiglio di usare sempre un solo tipo di carattere (sicuramente i TT) e
anche due soli colori per i menù.
Vedremo le prossime versioni...per il momento complimenti per l'ottimo
sforzo creativo.
Ciao, Carlo


author: Oscar Manfredini

text:
"Rino Ferrari"

L'impatto è accattivante, anche se non ci fai vedere come "tratti" altre
tipologie di Forms (con struttura a schede per esempio).
Un problema potenziale è l'ingombro che la grafica (anche se .bmp) potrebbe
comportare su progetti vasti, con decine di Forms.
Certo, dipende dalla strategia d'associazione che utilizzi:
1-  immagini in cartella esterna
2 - immagini inglobate in ogni oggetto grafico
3 - immagini inglobate solo in una form nascosta (o magari quella iniziale)
e associate a Runtime ai vari oggetti.
Dal .MDE non si capisce se la soluzione sia la numero 2 o la 3, occhio alla
seconda e non disprezzare la prima...


text:
La domanda sulle strutture a schede è cattivella...!
In realtà anche quelle sono semplici da mascherare.
Mettendo lo sfondo a Trasparente e lo stile a Nessuno
è come non ci fossero, quindi un bello sfondo sfumato.....!
Ora mancano i pulsanti di navigazione che si possono creare con
N controlli immagine ai quali associare su evento Click il Focus della
pagina indicizzata.
Magari ho banalizzato nel senso che era una cosa ovvia, ma visto che
l'ho fatto anch'io e funziona benissimo...
P.S. hai visto come funziona il printer del nuovo Editor.?
@Alex


text:
"Alessandro Baraldi" <
La domanda sulle strutture a schede è cattivella...!
In realtà anche quelle sono semplici da mascherare.
Mettendo lo sfondo a Trasparente e lo stile a Nessuno
è come non ci fossero, quindi un bello sfondo sfumato.....!
Ma no: sei tu cattivello!     ;-)
So bene che è possibile sostituire i pulsanti standard (c'è pure un esempio
sul s.c. se non sbaglio) ... però ero curioso di vedere che pulsanti
skinnati utilizzerebbe Rino, tutto qua.
Ora mancano i pulsanti di navigazione che si possono creare con
N controlli immagine ai quali associare su evento Click il Focus della
pagina indicizzata.
Magari ho banalizzato nel senso che era una cosa ovvia, ma visto che
l'ho fatto anch'io e funziona benissimo...
P.S. hai visto come funziona il printer del nuovo Editor.?
A cosa ti riferisci Alessandro: mi sono perso qualcosa?
Ciao, Oscar


text:
Dai un'occhiata alla nuova versione dell'Editor dei Report
con la gestione del Printer.
Questa volta è in formato MDE però....!
;-)
@Alex


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1141940805....@z34g2000cwc.googlegroups.com...


;-)
@Alex
Ne approfitto per rispondere ad entrambi
in merito al tipo di struttura utilizzata:
1-  immagini in cartella esterna
Re: No perché potrebbero essere asportate o manomesse quindi addio effetti
2 - immagini inglobate in ogni oggetto grafico
Re: Si ma una soltanto "BMP"(quindi poco ingombrante) il resto e
manipolazione VBA
3 - immagini inglobate solo in una form nascosta (o magari quella iniziale)
e associate a Runtime ai vari oggetti.
Re: No
Per ciò che riguarda le form con struttura a schede sono solo in fase di
definizione grafica (vi sono più opzioni, e molto funzionali) sempre
seguendo la logica  RE:2
Ciò che e stato proposto seguendo la filosofia di Alex che condivido al non
utilizzo "se ne non per necessita tecniche" componenti Obelix, Asterix
ecc.... che
con un po' di fantasia si può dare un impatto grafico molto gradevole e
diverso ad ACCESS
da ciò che di solito si vede in giro (e a tutti quelli che ne hanno
minimizzato tale aspetto) ,
naturalmente sono stati proposti solo due esempi di menu ma dando uno
sguardo al nuovo sistema
OP. Vista si può spaziare molto di più.
Rino®


text:
>Dai un'occhiata alla nuova versione dell'Editor dei Report
>con la gestione del Printer.
>Questa volta è in formato MDE però....!
Visto!!!
Fantastico, questo è veramente fantastico: ma dove avete messo i sorgenti?
;-)
A parte la gestione del Printer è notevole anche tutta la parte relativa
alle Forms: formati personalizzati, regole di convalida, maschere di input:
non manca praticamente nulla.
Tra l'altro, a titolo di curiosità, è possibile colorare le colonne
numeriche e tipo data/ora in modalità DataSheet con formati personalizzati:
ad ex:
dd/mm/yy[Blue]  per le date.
0.00[Red]    per i valori numerici
Ma ... è prevista per il futuro la possibilità di disporre dei sorgenti?


text:
"Rino Ferrari"
> 2 - immagini inglobate in ogni oggetto grafico
>
> Re: Si ma una soltanto "BMP"(quindi poco ingombrante) il resto e
> manipolazione VBA
Poco ingombrante finchè le forms e gli oggetti skinnati sono pochi ... stai
in
campana.
Lasciare le immagini esternamente è una scelta che consente tra l'altro la
possibilità
di creare skin alternative senza modificare il FE ...
Se poi gli utenti le cancellassero?
Sono cazzi loro: possono rimuovere anche l'applicazione o formattare il PC:
embè?    ;-)
> Per ciò che riguarda le form con struttura a schede sono solo in fase di
> definizione grafica (vi sono più opzioni, e molto funzionali) sempre
> seguendo la logica  RE:2
Sono curioso di vedere gli ulteriori sviluppi ... sei davvero molto bravo.
Ma anche nel caso tuo: perchè quel .MDE?
Non dimenticare che Massimiliano Amendola possiede il talismano miracoloso
per riportarlo in .mdb!
> Ciò che e stato proposto seguendo la filosofia di Alex che condivido al
non
> utilizzo "se ne non per necessita tecniche" componenti Obelix, Asterix
> ecc.... che
> con un po' di fantasia si può dare un impatto grafico molto gradevole e
> diverso ad ACCESS
> da ciò che di solito si vede in giro (e a tutti quelli che ne hanno
> minimizzato tale aspetto) ,
> naturalmente sono stati proposti solo due esempi di menu ma dando uno
> sguardo al nuovo sistema
> OP. Vista si può spaziare molto di più.
La filosofia della rinuncia agli Obelix non è solo di Alex, ma di chiunque
ambisca a un minimo di serenità.
Purtroppo ancora sogno di notte (si fa per dire) il Flame natalizio con quel
pistola col nick da quattro lettere.
Ciao, Oscar


author: MA

text:
Oscar Manfredini wrote:
> Sono curioso di vedere gli ulteriori sviluppi ... sei davvero molto
> bravo. Ma anche nel caso tuo: perchè quel .MDE?
> Non dimenticare che Massimiliano Amendola possiede il talismano
> miracoloso per riportarlo in .mdb!
>
> Ciao, Oscar
Ah Oscar ... e dai, sarcasmo fuori luogo.
Io non raccolgo la provocazione, ma su questo Ng scoppiano spesso flame, e
no è proprio il caso
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


text:
"MA" <
> > Non dimenticare che Massimiliano Amendola possiede il talismano
> > miracoloso per riportarlo in .mdb!
> Ah Oscar ... e dai, sarcasmo fuori luogo.
> Io non raccolgo la provocazione, ma su questo Ng scoppiano spesso flame, e
> no è proprio il caso
E faresti scoppiare un flame per un'affermazione del genere?
Mah!
Ciao, Oscar


text:

Sto dicendo proprio il contrario
> Mah!
>
> Ciao, Oscar



title: problemi access 2000 con windows 98

author: Giacomo

text:
ciao a tutti,
non so se la questione è stata già affrontata xè è da un bel mesetto
che non mi riconnetto al ng, descrivo dunqu brevemente il mio
problema.
ho creato un mdb con access 2000 su win2k.
l'ho fatto girare anche su winme e non ci sono stati problemi.
stamani l'ho fatto girare su un win98 dove c'era office 97.
ho aggiornato office con il 2000.
ho avviato il programma ma all'avvio mi da subito un errore del tipo:
ERRORE DI COMPILAZIONE:
impossibile trovare il progetto o la libreria.
e mi evidenzia, dal vb, la riga contentente PrivateSubFormLoad.
il programma all'avvio mi carica la data con la funzione Date() e pare
proprio che questa funzione crei problemi xè mi da #Errore? (o forse
#Numb?, non ricordo xè ora non ho sottomano win98) dove dovrebbe
mettere invece la data.
il fatto è che adopero Date() abbastanza di frequente e dover togliere
questo campo da tutti i forms mi scoccia assai.
qualcuno ne sa niente?
grazie,
--g


title: problemi access 2000 con windows 98

author: Caponetto Alex

text:
"Giacomo" <giacomo@_
NOSPAM_free.floating.net
> ha scritto nel messaggio
news:oeql1vsl7630s8clj...@4ax.com...

non so se è la soluzione addatta ma mi pare di capire che si tratti di un
problema di riferimenti (almeno io l'ho risolto così) guarda i riferimenti
di access sull'altra macchina e riportali
ciao


title: problemi access 2000 con windows 98

author: Roberto da casa

text:
"Giacomo" <giacomo@_
NOSPAM_free.floating.net
> ha scritto nel messaggio
news:oeql1vsl7630s8clj...@4ax.com...

Controlla i riferimenti del tuo database: dovresti trovarne almeno uno
mancante.
Nel frattempo invece della funzione Date() prova ad usare Int(Now()); è però
un paliativo in quanto, se non sistemi i riferimenti al database dovresti
avere altre funzioni che ti danno lo stesso errore per lo stesso motivo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: problemi access 2000 con windows 98

text:
On Wed, 08 Jan 2003 12:06:14 GMT, "Roberto da casa"
<
r.ma...@libero.it
> wrote:
>Controlla i riferimenti del tuo database: dovresti trovarne almeno uno
>mancante.
>Nel frattempo invece della funzione Date() prova ad usare Int(Now()); č perň
>un paliativo in quanto, se non sistemi i riferimenti al database dovresti
>avere altre funzioni che ti danno lo stesso errore per lo stesso motivo.
intanto grazie per la risposta, non ci speravo piů!
ma ... che cosa intendete per "i riferimenti" ?
ho controllato, da vba, con F2, gli oggetti del codice e per ogni
funzione mi dice dove trovare la libreria etc (su common files,
microsoft shared, vba, vba6 mi pare e vba6.dll) ed i files esistono.
perň non va.
per la funzione int(Now())) proverň ma ieri, leggendo il 3d "Date()
non funziona" avevo letto una vostra risposta che suggeriva di usare
int(date()) e questo sicuramente non mi ha funzionato.
ringrazio di nuovo anticipatamente.
chiaritemi, se possibile in 4 parole cosa intendete per riferimenti.
grazie mille!
--g


title: problemi access 2000 con windows 98

text:
"Giacomo" <giacomo@_
NOSPAM_free.floating.net
> ha scritto nel messaggio
news:k3io1vk625vo7l2lj...@4ax.com...
> On Wed, 08 Jan 2003 12:06:14 GMT, "Roberto da casa"
> <
r.ma...@libero.it
> wrote:
>
> >Controlla i riferimenti del tuo database: dovresti trovarne almeno uno
> >mancante.
> >Nel frattempo invece della funzione Date() prova ad usare Int(Now()); è
però
> >un paliativo in quanto, se non sistemi i riferimenti al database dovresti
> >avere altre funzioni che ti danno lo stesso errore per lo stesso motivo.
>
> intanto grazie per la risposta, non ci speravo più!
> ma ... che cosa intendete per "i riferimenti" ?
> ho controllato, da vba, con F2, gli oggetti del codice e per ogni
> funzione mi dice dove trovare la libreria etc (su common files,
> microsoft shared, vba, vba6 mi pare e vba6.dll) ed i files esistono.
> però non va.
> per la funzione int(Now())) proverò ma ieri, leggendo il 3d "Date()
> non funziona" avevo letto una vostra risposta che suggeriva di usare
> int(date()) e questo sicuramente non mi ha funzionato.
Nel dare la risposta ho commesso un errore che ho poi rettificato in un
secondo tempo in Int(Now()) come ho suggerito a te.
Ti rammento però che potrebbero esserci altre funzioni che ti daranno errore
sino a quando non risolvi il problema dei riferimenti.
>
> ringrazio di nuovo anticipatamente.
> chiaritemi, se possibile in 4 parole cosa intendete per riferimenti.
Cabiando sistema operativo può succedere che alcune librerie cui il database
fa riferimento si trovino in una cartella diversa da quella in cui si
trovavano nel PC in cui il database è stato creato, per cui Access non le
trova più, dando errore.
Per verificare e/o modificare i riferimenti del tuo database, apri la
struttura di un modulo VBA qualsiasi; dal menu Strumenti seleziona il
comando Riferimenti...; verrà aperta una finestra di dialogo Riferimenti che
conterrà l'elenco di tutti i riferimenti possibili: quello aggiunti per il
tuo database risulteranno in testa nella lista ed avranno uno "svirgolino"
settato alla loro sinistra; è in quella lista che devi verificare se c'è
qualche riferimento mancante ed eventualmente aggiungerlo.
Ti ricordo che un database Access 97 eseguito con Access 97 deve avere
attivi i seguenti riferimenti:
Visual Basic For Applications
Microsoft Access 8.0 Object Library
Microsoft DAO 3.51 Object Library
> grazie mille!
> --g



title: problemi access 2000 con windows 98

text:
On Wed, 08 Jan 2003 17:02:30 GMT, "Roberto da casa"
<
r.ma...@libero.it
> wrote:
>Cabiando sistema operativo può succedere che alcune librerie cui il database
>fa riferimento si trovino in una cartella diversa da quella in cui si
>trovavano nel PC in cui il database è stato creato, per cui Access non le
>trova più, dando errore.
>Per verificare e/o modificare i riferimenti del tuo database, apri la
>struttura di un modulo VBA qualsiasi; dal menu Strumenti seleziona il
>comando Riferimenti...; verrà aperta una finestra di dialogo Riferimenti che
>conterrà l'elenco di tutti i riferimenti possibili: quello aggiunti per il
>tuo database risulteranno in testa nella lista ed avranno uno "svirgolino"
>settato alla loro sinistra; è in quella lista che devi verificare se c'è
>qualche riferimento mancante ed eventualmente aggiungerlo.
>Ti ricordo che un database Access 97 eseguito con Access 97 deve avere
>attivi i seguenti riferimenti:
>
>Visual Basic For Applications
>Microsoft Access 8.0 Object Library
>Microsoft DAO 3.51 Object Library
ok, grazie, proverò subito.
cmq non si tratta di access 97 ma di access 2000 su win98 (come da
subj.)
grazie ancora!
--
giacomo


title: Filtro in maschera anzichè query

author: Principiante

text:
Buongiorno NG,
anzichè tante query con parametri.
in una maschera modalità maschere continue,
vorrei inserire delle combo con origine TABELLA1.
lo scopo è filtrare i dati da mostrare in maschera, stile query.
esempio:
mostra tutti i record per: COGNOME
oppure:
per: COGNOME e per CITTA, etcc.
Per poi procedere ad un eventuale report.
come mi suggerite di procedere?
Salutoni...


title: Filtro in maschera anzichè query

text:

in 2 parolo non è facile, ma in sostanza basta fare una casella
combinata con i campi che ti servono per il filtro e poi acquisire su
afterupdate della combo i valori e salvari ad esempio in campi
appositi sulla maschera
dopodiche devi fare una query generica che prende i valori della
maschera ricavati dalla combo ed utilizzarli come criteri
 ciao


title: Filtro in maschera anzichè query

text:

>  ciao- Nascondi testo citato
>
> - Mostra testo citato
Oppure?


title: Filtro in maschera anzichè query

text:

oppure trova tu la soluzione....


title: Filtro in maschera anzichè query

text:

> oppure trova tu la soluzione....- Nascondi testo citato
>
> - Mostra testo citato
:))  :)) :))


title: Filtro in maschera anzichè query

text:
On 9 Giu, 12:45, Principiante <
frcavall...@yahoo.it
> wrote:

Usa 1 Combo impostata come:
TipoOrigineRiga=Elenco Campi
Origine Riga=Tabella1
Aggiungi una TextBox ed un Button.
Sul dopo Aggiornamento della Combo Abiliti la textBox ed il Button.
Su Click del Button applichi il Filtro alla proprietà Filter della
Form.
Nel tuo caso ti viene comodo l'uso della Funzione BuildCriteria
passando sia il FieldName(recuperato dalla Combo) che il FieldType
recuperato dal RecordsetClone puntando al Field...!
Me.FilterOn=False
Me.Filter=BuildCriteria(Me!NomeCombo, Me.RecordsetClone.Fields(Me!
nomeCombo).Type, Me!NomeTextBox)
Me.FilterOn=True
Ciao


title: Filtro in maschera anzichè query

text:

> Ciao- Nascondi testo citato
>
> - Mostra testo citato
Domattina proverò il suggerimento di Alessandro Baraldi.
Intanto Grazie di cuore.


title: Filtro in maschera anzichè query

text:

> Intanto Grazie di cuore.- Nascondi testo citato
>
> - Mostra testo citato
Cosa scrivo affinchè,
> > Sul dopo Aggiornamento della Combo Abiliti la textBox ed il Button.
ecco come ho personalizato il filtro:
Me.FilterOn=False
Me.Filter=BuildCriteria(Me!Combo1, Me.RecordsetClone.Fields(Me!
Combo1).Type, Me!Tbox1)
Me.FilterOn=True
Grazie, Ciao.


title: Filtro in maschera anzichè query

text:

> Grazie, Ciao.- Nascondi testo citato
>
> - Mostra testo citato
Perchè non va? Ecco cosa ho fatto.
Creo la form con,
Combo1 impostata come:
TipoOrigineRiga=Elenco Campi
Origine Riga=Tabella1
sulla form:
Private Sub Form_Current()
Tbox1.Visible = False
Botton1.Visible = False
End Sub
sulla combo:
Private Sub Combo1_AfterUpdate()
    Tbox1.Visible = True
    Botton1.Visible = True
End Sub
Sul pulsante:
Private Sub Botton1_Click()
    Me.FilterOn = False
    Me.Filter = BuildCriteria(Me!Combo1, Me.RecordsetClone.Fields(Me!
Combo1).Type, Me!Tbox1)
    Me.FilterOn = True
End Sub
Sulla Combo sono visibili i campi della tabella.
Dopo Aggiornamento della Combo sono visibili la textBox ed il Button.
allinterno della texbox non appare nulla.
Al Click del botton appare:
Errore:
Riferimento alla proprietà RecordSetClone non valido nell'espressione.


title: Parametri query da codice

author: kismet

text:
Buona notte a tutto l'NG e, quasi, Buona Pasqua.
La mia domanda è questa: come e se è possibile passare i parametri che
filtrano i dati di una query da codice invece che inserirli direttamente
nella struttura della query stessa.
Ad esempio: al posto di like nz([Forms][MiaMaschera][MiaCombo];"*") che
solitamente uso per le mie query filtrate, cosa posso usare in VBA??
Ciao e grazie


title: Parametri query da codice

text:
"kismet" <
dk...@tin.it
> ha scritto nel messaggio
news:C4Fna.44776$T34.1...@news2.tin.it...

Usa la tecnica QBF (Query By Form).
Creati in maniera dinamica una stringa SQL che contenga appunto il codice
SQL della query che vuoi eseguire esplicitando i parametri.
Apri un oggetto QueryDef sulla tua query e memorizza la stringa SQL nella
proprietà SQL di tale oggetto. Così facendo i parametri vengono memorizzati
all'interno della query e non è necessario ripassarli ogni volta.
Un esempio di come usare questa tecnica lo trovi nel Sito Comune (link qui
sotto), nella Sezione Queries nella FAQ intitolata "Come si può creare in
maniera dinamica una query con la tecnica QBF?".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Parametri query da codice

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:CZNna.47943$DT4.1...@twister1.libero.it...

Grazie mille e Buona Pasqua.


title: formattare  cella per ottenere tre decimali

author: Alberto Luzi

text:
Salve!
da vba voerrei formattare una cella per ottenere tre decimali, ma
con FormatCurrency mi da due decimali.
Grazie


text:

Hai letto la GUIDA...? Non è complicato...!

Function FormatCurrency(Expression, [NumDigitsAfterDecimal As Long = -1], [IncludeLeadingDigit As VbTriState = vbUseDefault], [UseParensForNegativeNumbers As VbTriState = vbUseDefault], [GroupDigits As VbTriState = vbUseDefault]) As String
    Membro di VBA.Strings
    Formats expression as currency

Il 2° Parametro cosa rappresenta...?

Attenzione che quella è una STRINGA arrotondata, da usare SOLO per la VISUALIZZAZIONE.

Se vuoi 3 Decimali sempre per la sola visualizzazione, metti a 3 decimali la proprietà NumeroDecimali...!

@Alex


text:

grazie Alex
scusa, ma non ho capito cosa devo fare.
Ogni volta che apro il foglio, lancio una macro
dove ricavo per esempio, questo valore:
0,285  U
poi con replace recupero il valore stringa dove in questo caso è 0,285
ma quando lo vado ad inserire nella cella
con:
FormatCurrency(myValore(0))
mi restituisce 0,29€


text:
...
> scusa, ma non ho capito cosa devo fare.
> Ogni volta che apro il foglio, lancio una macro
> dove ricavo per esempio, questo valore:
> 0,285 U
> poi con replace recupero il valore stringa dove in questo caso è 0,285
> ma quando lo vado ad inserire nella cella
> con:
> FormatCurrency(myValore(0))
> mi restituisce 0,29€

Ripeto, hai letto la guida di come si usa quella Funzione [FormatCurrency]...?

Rispondo io, NO...!
Leggila:
https://docs.microsoft.com/en-us/office/vba/language/reference/user-interface-help/formatcurrency-function

Se leggi la funzione supporta PARAMETRI, che tu non hai usato ma ci sono, il Secondo parametro che si chiama [NumDigitsAfterDecimal] cosa rappresenta per te..?
che dici è complicato...?

@Alex


text:

grazie Alex
ok