mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: QRY creazione tabella con valori formattati

Ciao a tutti
Devo eseguire una query che crea un nuova tabella in un database di
supporto, usato per funzioni di stampa unione. 
La query ha un campo "importo_richiesto" di tipo valuta (euro) e un campo
calcolato data dal precedente per una percentuale. Questo campo dovrebbe
risultare anch'esso di tipo valuta, ma nella tabella destinazione diventa
un double con 8-10 decimali e risulta quindi inutilizzabile in Word.
Come posso fare in modo che il campo rimanga formattato come valuta nella
nuova tabella?
Grazie 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio
news:b3iql4$b7$1...@news.newsland.it...


 > Grazie
Prova invece di usare una QRY Action ad utilizzare TransfertDatabase ed
esportare la
tua Tabella, non ricordo se c'è l'opzione di esportare solo la struttura, ma
eventualmente
"DELETE * FORM .... IN tuoDB"
@Alex.

 @Alex.
Avevo pensato a creare già la struttura della tabella destinazione con i
campi valuta, ma poi non posso usare una query per riempire tale tabella
perchè è fuori dal mio database! Dovrei aprire un collegamento da codice e
svuotare i dati contenuti e riempire la tabella ma non ne vale la pena.
Ho risolto formattando e convertendo in stringa il valore ed esportando
quindi una stringa formattata come Valuta.
Grazie cmq


 Ciao
Ci avevo pensato ma dentro nella query non funziona e non so perchč. Avevo
messo in una colonna della query : Ottenuto: Format([A]*[b],"€ ##00.00")
ma mi segnalava sempre errore. 
Quindi ho risolto usando una funzione da codice che formatta l'output e
restituisce una stringa per quel campo della query. Non ho provato a
formattare semplicemente senza convertire in Stringa (sempre con la
funzione). Adesso ci provo


 Grazie cmq
Con una QRY puoi anche riempire una tabella in un DB esterno
in quanto c'è la possibilità di fare riferimento al DATABASE
con la clausola IN della QRY.
Ritengo questa soluzione più corretta dal punto di vista informatico.
@Alex.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.appl.access
Titolo: Setup ODE '97 in lingua italiana...

M'è capitato d'intallare un'applicazione distribuita col Runtime di Access
'97: aveva i messaggi in Italiano.
Credevo non fosse possibile personalizzarli.
Effettivamente ho dato un'occhiata ai files .INI del Setup e non capisco
dove siano memorizzate le stringhe con la messaggistica del Setup.
Qualcuno ha esperienza in merito?


Devi sostituire le 4 dll nella cartella 1040 dell'installazione con quelle
della 1033 tua.
Guarda i post precedenti
MAssimilaino

 > M'č capitato d'intallare un'applicazione distribuita col Runtime di



E' no: magari fosse cosě  :-)
Sto parlando del Runtime '97, che aveva un'installer completamente diverso
rispetto a quello di A '2k.


NOn sono convinto di quello che dici ma non ho riprove.
Cerca 4 dll nei post precedenti, ce n'č uno anche di Emyr
MAssimilaino

 Cerca 4 dll nei post precedenti, ce n'č uno anche di Emyr
Putroppo č cosě ... pazienza.
Newsgroup: it.comp.appl.access
Titolo: comportamento anomalo casellacombinata su filtro form

mi spiego meglio, utilizzo una casellacombinata per scegliere dei valori e 
applicare un filtro alla form
se scelgo un valore che restituisce almeno un record nel filtro nella 
casellacombinata si vede il valore scelto per il filtro, "se invece" 
seleziono un valore che non restituisce record anche il menù a tendina 
risulta vuoto non vedo quindi il valore scelto, se poi scelgo un secondo 
valore quello rimane visibile.
 
non ne vango a capo, qualcuno a già affrontato il problema?
 
grazie. 
 

....
La combo è associata ad un campo della Form...?
 
Se [Si] è il problema...
 
Se [No], non abbiamo elementi sufficienti.
 
@Alex

"@Alex"  ha scritto nel messaggio 
news:9969684c-416d-4154...@y9g2000vbb.googlegroups.com...
 
....
La combo � associata ad un campo della Form...?
 
Se [Si] � il problema...
 
Se [No], non abbiamo elementi sufficienti.
 
@Alex
 
Non � associata, � slegata appunto perch� serve solo come filtro qui sotto 
riporto il codice che eseguo "dopo aggiornamento" ed ho notato che il codice 
che crea il problema � Me.FilterOn = True
che per� non so come correggerlo in quanto dopo aver applicato il filtro 
devo attivarlo
consigli?
 
Private Sub tipo_AfterUpdate()
    Me.Filter = CostruisciFiltro
    Me.FilterOn = True
End Sub
 
 

Ho notato che il valore sparisce la prima volta che scelgo un valore che 
restituisce zero record nella form se riseleziono una seconda volta lo 
stesso valore resta visibile forse perch� filteron � gi� attivato
 
non capisco.
 
 
qualche idea?
Newsgroup: it.comp.appl.access
Titolo: Uso di FindRecord.

Ho la seguente istruzione:
    DoCmd.FindRecord textToSearch, acAnywhere, , acDown
se sono al primo record, mi si posiziona giustamente sulla prima
occorrenza di textToSearch, ma ad una successiva esecuzione dovrebbe
trovarmi la seconda occorrenza e cos� via.
Cos� non �. Ho anche provato a mettere prima un:
    DoCmd.GoToRecord , , acNext
ma niente: mi trova solo la prima occorrenza nonostante acDown.
Dove sbaglio?
Grazie a tutti.
RB
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 


 
 
Usa FindNext, membro di Docmd o meglio dell'Oggetto
Recordset(RecordsetClone meglio ancora) è più gestibile nella lettura
della proprietà NoMatch e consente di evitare aggiornamenti inutili se
non necessari.
 
@Alex

@Alex ha scritto:

Intanto grazie per l'aiuto.
Orbene, nella mia ignoranza ho sostituito tutto l'accrocchio, costruito
precedentemente, con queste righe:
    Set RST = Forms!mRicerche!Figlio67.Form.RecordsetClone
    RST.FindNext textToSearch
premo una "V" e mi esce errore 3070 "Il motore ... non riconosce "V" come
espressione o nome di campo valido".
Ahimé...


Riccardo Baldinotti ha scritto:

Ho corretto così:
RST.FindNext RST!Cognome = textToSearch
e l'errore 3070 ora dice: "Il motore ... non riconosce 'Falso come
espressione o nome di campo valido".
Bò.


On 19 Dic, 13:11, 
riccardo.baldino...@qualcosa.it
 (Riccardo

Leggi questo:
 
http://msdn.microsoft.com/en-us/library/office/ff194099%28v=office.14%29.aspx
 
 
@Alex


Dunque, la cosa mi funziona così.
Nel campo "cognome" dove ho i dati da cercare, ho scritto il comando:
    DoCmd.FindRecord testo, acStart, , , , acCurrent
mentre in un pulsante ho scritto:
    Forms!mRicerche!Figlio67.SetFocus
    Forms!mRicerche!Figlio67.Form!Testo3.SetFocus
    DoCmd.FindNext
e così mi funziona tutto.
 
L'articolo dice cose piuttosto chiare, il problema è che mi stavo perdendo
dietro a chissà cosa, per esempio usando il testo digitato in una casella
di testo fuori dalla sottomaschera per trovare i dati, cosa che mi
sembrava più carina, ma vabbe'...
 
Adesso vorrei capire se posso usare nomatch (e come...) in caso di valore
non trovato.
 
Intanto grazie mille per l'aiuto.

Newsgroup: it.comp.appl.access
Titolo: dividere una tabella

Ciao,
ho importato una tabella da Excel, composta dai campi cognome, nome,
prodotto, quantità, ed è formata come nell'esempio:
ROSSI MARIO GIACCA 2
ROSSI MARIO PANTALONI 1
ROSSI MARIO CRAVATTE 3
BIANCHI LUIGI MAGLIE 2
BIANCHI LUIGI CALZE 4
ecc.
Desidero separare la parte anagrafica in una nuova tabella,
raggruppando i cognomi e nomi e mantenendo le relazioni con i
prodotti e quantità.
Ci sarebbe un modo per farlo?
Ho già provato con l'analizzatore di tabelle ma da dei risultati molto
inattendibili.
Vi ringrazio molto.
Remigio

 ha scritto nel messaggio 
news:d4b9126c-dce6-44a1...@s5g2000yqm.googlegroups.com...



Remigio
Query di creazione tabella con raggruppamento sui campi nome cognome
Vai poi in struttura nuova tabella e aggiungi un campo contatore
Vai nella tabella di excel e aggiungi un campo intero lungo
Esegui una query di aggiornamento mettendo in join la tabella excel e quella 
creata sui campi nome cognome
Aggiorna il campo intero con il valore del contatore
Elimina i campi nome cognome dalla tabella excel
il tutto funzionerà se non ci sono omonimie nome-cognome
Antonio 

 Antonio
Grazie molte per il suggerimento.
Remigio

Newsgroup: it.comp.appl.access
Titolo: aiuto query

ho una query con un elenco di campi nome, cognome, tot contratto ecc...
il criterio di ricerca è [inserisci codice cliente] solo che se non trova
nulla la query mi risulta vuota,
come posso far si che se è nulla mi dia una riga in cui tutti i campi
risulti uno 0?
grazie

 ha scritto nel messaggio

Posta la query.

Newsgroup: it.comp.appl.access
Titolo: Query di raggruppamento

Ho una tabella ORDINI
che oltre all'Id cliente e all'id ordine, contiene anche il tipo di
pagamento (anticipato, 60 giorni, alla consegna).
Cioč con struttura del tipo:
IdOrdine (PK) Testo
IDCLiente    Testo
....
....
TipoPagamento    Testo.
Volevo realizzare una query per una sottomaschera che mi desse un elenco
clienti ordinato per numero ordini con il dettaglio per il tipo di
pagamento.
Un esempio spiegherŕ meglio:
Cliente            Ordini            p. Anticipato        60 Giorni
Consegna
Pippo srl            120            10                        60
50
Pluto sas            100            0                          40
60
ecc.
č possibile una cosa del genere????
Grazie
Marco

 Marco
Si, basta che prendi i campi:
cliente (raggruppamento)
ordini (somma)
Anticipati:iif(TipoPagamento="anticipato";1;0) (somma)
Sessantagg:iif(TipoPagamento="60 giorni";1;0) (somma)
Allaconsegna:iif(TipoPagamento="consegna";1;0) (somma)
Però una query a campi incrociati sarebbe preferibile, così se in futuro
aggiungi un nuovo tipo di pagamento non ti serve andare a modificare la
struttura del report. Questa soluzione però richiede un report
notevolmente più complicato. Sul 
www.sitocomune.com
 trovi gli esempi di
report basati su query a campi incrociati.
Namor
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.appl.access
Titolo: spostare campo

In una tabella desiderei spostare dei campi; per fare questo si possono solo 
trascinare o c'è un indice come per la maschera che è possibile modificare, 
o altro modo?
Se si trascina in visualizzazione tabella , in visualizzazione struttura 
rimane nella vecchia posizione.
Si deve trascinare solo in visualizzazione struttura?
Grazie


Puoi usare codice. Vedi <F1> per "OrdinalPosition".
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it

Newsgroup: it.comp.appl.access
Titolo: collega campi master e secondarii

ciao a tutti
� possibile utilizzare in collega campi master e secondari,
tre campi per la stessa sottomaschera?
(p.e. idcli, idFo, idVarie)
 
Grazie 
 
 


Spiega meglio cosa vuoi fare... 
 
Le proprietà di cui hai parlato sono esposte solo tra la FORM e la SUBFORM... motivo per il quale quello che chiedi potrebbe essere INSENSATO.
 
@Alex

Intendi dire 3 campo della maschera principale con 3 campi della sottomaschera?
 
se intendi questo la risposta è Sì
 

 
 
Si, devi inserire i campi di interesse separati da ;
 puntoevirgola, sia su campi master che. secondari.
ciao
Bruno
-- 

 ha scritto nel messaggio 
news:52717da3$0$23125$4faf...@reader2.news.tin.it...

grazie Bruno

Newsgroup: it.comp.appl.access
Titolo: Pulsanti Colorati

Esiste la possibilità di avere dei pulsanti di comando colorati in una
maschera di Ac2000?
Grazie

 Grazie
Si.
Ci sono 3 soluzioni che io conosco:
1)Usi una BMP colorata come sfondo del Command Button
2)Usi una Label al posto del CommandButton e rilevi l'Evento Click
    quì si complica un pò se vuoi ottenere l'effetto incassato....!
3)altrimenti su 
www.lebans.com
 trovi un'altra un pò più complessa, ma
alternativa....!
@Alex.

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

Ho provato il codice per il protocollo fatture che ho trovato su questo NG
e funziona. Mi chiedevo se era possibile invertire il numero con l'anno e
quindi diventare 0000/aaaa, ho provato a modificare il codice precedente
che è aa/0000 ma senza risultati.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio
news:b7dqsh$c37$1...@news.newsland.it...

Guarda su 
www.Sitocomune.com
 sezione General - Numerazione crescente per
fatture ed altro e scaricati "generacontatore.zip", E' un'ottima utilità

Steve Huges wrote:


Grazie del consiglio 

Newsgroup: it.comp.appl.access
Titolo: problema interrutore

Ciao a tutti, ho un interrutore per la visualizzazione true o false di
due caselle di testo e le relative etichette. In particolare al click
cambia testo e colore grazie a questa routine
Me.Etichetta18.Visible = True
Me.Testo17.Visible = True
Me.Etichetta13.Visible = False
Interruttore29.ForeColor = 255
pagatoriscosso.Value = Null
End If
If Me.Interruttore29 = 0 Then
Me.Etichetta18.Visible = False
Me.Testo17.Visible = False
Me.Etichetta13.Visible = True
Interruttore29.ForeColor = 4227072
End If
End Sub
Il mio problema è che la prima volta che apro la maschera, al primo
click, esegue l'operazione di visible true/false e cambia anche il
testo da riscuoti a paga, ma non cambia il colore che cambia dal click
successivo in poi.
Qualcuno può dirmi come risolvere il problema?
Grazie


Per me non sono chiari alcuni punti:
Nel tuo codice manca la prima riga If, cioè non si vede il primo criterio.
Qual'è il valore e colore dell'interruttore la prima volta che apri la
maschera?
L'interruttore ha un Origine Controllo o no?
In principio puoi fare p.e.
If Me!Interruttore29 = True Then
    Me!Interruttore29.ForeColor = 255
Else
    Me!Interruttore29.ForeColor = 4227072
End If
o anche
If Me!Interruttore29.ForeColor = 255 Then
    Me!Interruttore29.ForeColor = 4227072
Else
    Me!Interruttore29.ForeColor = 255
End If
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 GrazieCiaso
-- 
Ciao
Geppo

Newsgroup: it.comp.appl.access
Titolo: Usare una sola riga di codice per caricare dati da un recordset con campi  di nome simile

Scusate ma ho un vuoto:
in un recordset fatto di campi nominati allo stesso modo: Campo1, Campo2, 
Campo3, etc. La variabile testo deve prendere il valore presente in uno dei 
campi in base ad una scelta (y).
Come posso "nominare" la variabile del recordset  Rst.CampoX  usando una 
sola riga di codice?
            y = Me![scelta]
            Select Case y
            Case 1
            testo = Rst!Campo1
            Case 2
            testo = Rst!Campo2
            Case 3
            testo = Rst!Campo3
            '  e cosě via.
      Grazie infinite
Marco

 Marco
rst("Campo" & y)
Ciao.
-- 
Sergio MAZZA 

 Sergio MAZZA
Ecco perchč mi dava l'erore: usavo cmq. il punto esclamativo prima della 
variabile: rst!("Campo" & y).
Ti saluto e Grazie ancora Sergio

 Ti saluto e Grazie ancora Sergio
Di nulla...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Access 2007 maschera con textbox da modificare singolarmente

Ciao a tutti,
 
devo metter mano a un db con  access 2007
 
dove le maschera hanno tutte le textbox della stessa dimensione
volendo modificare la dimensione di ogni singola casella di testo 
non ci riesco perchè quando modifico la dimensione di una mi modifica anche tutte le altre.
ho provato a consultare la guida ma non ho trovato nulla. Con il 2007 non ho mai lavorato pertanto mi trovo un pò in difficoltà.
 
qualcuno potrebbe darmi una dritta?
 
Grazie

 2007 non ho mai lavorato pertanto mi trovo un pò in difficoltà.
 
Devi rimuovere il Layout controllo. Vedi:
http://office.microsoft.com/it-it/access-help/HA010286849.aspx
 
 
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it

Newsgroup: it.comp.appl.access
Titolo: Query per magazzino--Aiuto urgente

Ciao a tutti
è un po di tempo che non uso Access e probabilmente dimentico alcuni
dettagli in merito alle query.
Ho due tabelle. La prima "Prodotti" contiene tutti gli articoli che ho a
magazzino. La seconda "Dettagli ordini" gestisce gli stessi articoli che
"escono" dal magazzino.
Ma quando vado a creare una query per sapere "quali e quanti articoli mi
sono rimasti" mi trovo con dei risultati scorretti:
o vedo  il rimanente a magazzino dei SOLI articoli venduti e niente di tutto
il resto, oppure la query mi assegna valori di uscita anche su articoli che
non sono stati venduti.
Per ultimo, facendo un joint su NomeProdotto mi restituisce i valori esatti,
ma mi fa vedere il NomeProdotto dei soli articoli venduti.
Ho provato tutti i Joint possibili ma non ne esco.
Le tabelle sono fatte cosi'(semplificando):
PRODOTTI               DETTAGLIORDINI
NomeProduttore         NomeProduttore
NomeProdotto            NomeProdotto
PrezzoUnitario             Prezzo
Quantità                       QuantitàVendute
Magazzino                    Magazzino
Dove sbaglio??? O cosa mi sfugge?
Avrei bisogno di una mano urgente;sto facendo un piacere ad una amica che ha
un negozio di lampadari e rischio di fare una figuraccia :-)
Grazie a tutti i buoni di cuore.
Eddie

 ha scritto nel messaggio
news:mg6ic.131059$rM4.5...@news4.tin.it...

prova a mettere il join che dice -" tutti i prodotti di tabella prodotti e solo qelli di tabella
dettaglio che sono uguali)
a questo punto avrai tutto il tuo magzzino con relative vendite
noteraii che alcuni campi della "sezione vendite" sono nulli
se tu filtri per questi campi nulli avri solo i prodotti che nonsono ancora stati "ordinati" (credo
venduti)
spero di aver capito il problema e di esere riuscito a speigarmi
ciao
Nick
Newsgroup: it.comp.appl.access
Titolo: IF..THEN da accapponare la pelle!! HELP!

Ciao,
sono alle prime armi con il VBA e ho la seguente situazione:
Ho 5 checkbox che sto cercando di gestire uno per uno con IF THEN!
Ecco un esempio, spero che la pelle non vi si accapponi troppo!
Private Sub chkBollaDoganale_Click()
 If chkNessunDocumento = True Then
    chkNessunDocumento = False
    End If
    If chkBollaDoganale = False Then
    chkNessunDocumento = True
    End If
    If chkFatturaVistata = True Then
    chkNessunDocumento = False
    End If
    If chkTutti_i_documenti = True Then
    chkNessunDocumento = False
    End If
    If chkTimbroExport = True Then
    chkNessunDocumento = False
    End If
End Sub
Volevo chiedervi se esiste un modo per rendere questo codice più lineare.
Ripetuto per 5 volte va a finire che non ci capisco più nulla!
Poi ho provato qualcosa di questo tipo
If chkTimbroExport = True andif chkBollaDoganale=True andif
chkFatturaVistata=True Then
chkTutti_i_documenti=True
End If
Ma non va! Nell'ignoranza ho provato Else, Elseif, +, &, ma non c'è verso di
ottenere quello che voglio!!!
Mi sapete aiutare?
Ciao e grazie

 ha scritto nel messaggio
news:hTya6.100905$eB2.7...@news.infostrada.it...

Prova ad usare il metodo Select Case (vedi la guida è sempice).
Prova.
Giorgio

If chkTimbroExport = True andif chkBollaDoganale=True andif
errore di sintassi.  dovevi scrivere solo and, non and if.  prova così
(ho usato il segno _ per mandare a capo le righe di codice così il
codice stesso è più leggibile, e ho anche messo delle parentesi per lo
stesso motivo):
   If (chkTimbroExport = True) and _
      (chkBollaDoganale=True) and _
      (chkFatturaVistata=True) Then
	chkTutti_i_documenti=True
End If
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access

Newsgroup: it.comp.appl.access
Titolo: Reset delle variabili ?

Salve a tutti,
noto uno strano comportamento di access 97 e access 2000, su diverse
macchine.
Ho dichiarato un tipo definito da me che contiene (per lo più stringhe) le
costanti più utilizzate all'interno delle mie procedure.
Questa viariabile strutturata viene caricata all'apertura del DB,
caricandola da una tabella.
Per qualche strano motivo (identificato con l'interruzione in debug in
alcuni casi) ad un certo punto le variabili si "svuotano" magicamente e si
azzerano.
Esiste una spiegazione a tutto questo ??
Ciao e grazie

azzerano.
Sempre sulla stessa riga?
Saluti.
Luciano
(DOC)

 ha scritto nel messaggio
news:9h9r62$7hn$1...@fe2.cs.interbusiness.it...

Se le variabili sono pubbliche e le hai inserite in un modulo, non so dare
una risposta al tuo quesito, ma se i tuoi parametri ce li hai memorizzati in
una tabella, anziché caricarteli in memoria in variabili pubbliche, perché
non ci fai riferimento direttamente nella tabella, ogni volta che ti serve,
ad esmpio con una funzione DLookup?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Posso disabilitare la rotella (scrolling) del mouse da codice?

Come da oggetto,
grazie,Elio


leggiti i msg precedenti... troverai la risposta
by
stwe
ps non fare come me che non cerco prima...


Scusa č vero, soltanto che non riesco a tenere e leggere tutti i msg del ng.
Ora l'ho trovato anche se il riferimento dell'oggetto non era specifico per
lo scroller
per inciso ( e per Leonardo che mi ha scritto in e-mail) il riferimento č :
Disabilitare PagUp e PagDown  con risposta di Alex del 26 Ott 2001 ore
11.01.37
Grazie e cercherň di stare piů attento in futuro!
Ciao ,
Elio

 ha scritto nel messaggio
news:6fvM7.19666$BA4.6...@news1.tin.it...

sei troppo gentile, io non volevo rimproverarti, solamente (e sono sincero)
sapevo la risposta ma non avevo molta voglia di cercare...
un consiglio prova ad utilizzare
http://groups.google.com/advanced_group_search
 e mettici
it.comp.appl.access, funziona alla grande e non devi tenerti 30000 messaggi
memorizzati.
by
stwe
Newsgroup: it.comp.appl.access
Titolo: Diagrammi ER e DFD

Ciao a tutti,
volevo sapere come vi regolavate con i diagrammi ER e DFD nel senso usate un 
programma ad hoc e se si quale o fate a manina santa e poi riversate su 
qualche editor tipo word o power point?
Lo dico perchè vorrei affrontare la progettazzione di un LIS ed essendo la 
cosa abbastanza complessa mi serve di fare una progettazione logica 
piuttosto dettagliata.
Beppe 

 ha scritto nel messaggio 
news:44ce110d$0$30248$4faf...@reader1.news.tin.it...

LIS = Lingua dei Segni? Quella per sordomuti?
Ciao, Carlo

 ha scritto nel messaggio 
news:eal9ml$tqe$1...@area.cu.mi.it...

Laboratory Information System oppure LIMS Laboratory Information Managment 
System
sono programmi gestionali per laboratori di analisi.
Chiaramente Access lo uso come prototipo,almeno per il db.
Beppe 

 ha scritto nel messaggio 
news:44ce2c3c$0$47971$4faf...@reader3.news.tin.it...

Microsoft Visio 2003.
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: Giorno mese anno

grazie

 >grazie
Ciao, puoi trovare tutte le informazioni che ti servono guardando
l'help alle voci Mid, Left, Right et similia.
Sono funzioni dall'uso molto semplice e spiegate bene.
Buon lavoro!

 ha scritto nel messaggio 
news:461e08dc$0$17946$4faf...@reader1.news.tin.it...

Ciao Alfonso
guarda help per formattazione date.
Format([tuocampo];"gg/mmmm/aa"
Daniele 

 ha scritto nel messaggio 
news:461e08dc$0$17946$4faf...@reader1.news.tin.it...

crea 3 campi calcolati
giorno:day(tuocampodata)
mese:format(month(tuocampodata),"mmmm")
anno:right(tuocampodata)
prova e fammi sapere 

Alfonso

Newsgroup: it.comp.appl.access
Titolo: Selezionare periodo (data inizio - data fine) attraverso il controllo calendario

Ciao a tutti,attualmente per fare una verifica "periodale" cioe' tra
una data di inizio ed una fine imposto nei criteri di una query nel
campo "data" questo criterio:
Between [Ins data inizio] and [Ins data fine].
Mi piacerebbe effettuare la stessaoperazione con il controllo
calendario,come posso fare????
Grazie in anticipo
Dino


metti nella maschera due caselle di teste che al click della data
prendono il valore e dalla query tramite il between leggi quei valori.


Ciao e grazie per la risposta.Ho provato e funziona tutto
perfettamente.
Grazie ancora
Dino
Newsgroup: it.comp.appl.access
Titolo: ultimo record di una maschera layout tabulare

Ciao a tutti, vorrei sapere se c'è la possibilità in una maschera con
layout tabulare di eliminare l'ultimo record, quello cioè che compare
con l'asterisco.
Grazie mille
Salvatore

 con l'asterisco.
Imposta la proprietà "Consenti aggiunte" della maschera a No.
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 


Penso che la domanda abbia un altro senso rispetto a quello che ha
inteso Karl.
Se ho capito bene si chiede come eliminare il record in corso di
compilazione (l'ultimo):
in questo caso il comando CancellaRecord non funziona
ed è da utilizzare AnnullaRecord
(Undo da codice: ma attenzione se utilizzi Undo da codice sarà
necessario valorizzare a piacere un campo
nel caso che nessun campo sia stato valorizzato, infatti in questo
caso Undo elimina l'azione precedente
che può anche essere quella di registrazione di un record)

"giorgioDaPrato"  ha scritto nel messaggio 
news:dfe20135-aa67-4277...@u12g2000vbf.googlegroups.com...


___________Risposta:
L'ultimo record vuoto e contrassegnato da un asterisco è il record nuovo, 
indica che la sottomaschera è anche di scrittura.
Se non ti serve metti Consenti aggiunte a no
se ti serve in vba e quindi dinamicamente c'è il corrispondente 
AllowAdditions
MA

Newsgroup: it.comp.appl.access
Titolo: Eseguire una stampa esterna

E possibile eseguire una stampa di un documento  su un report situato in un
alto database?

 alto database?
Quello che puoi fare e' aprire un'altra sessione di access e mandare in stampa
il report e chiudere la sessione.
Quello che segue, ne e' un esempio:
Dim objAccess As Object
Set objAccess = CreateObject("Access.Application")
objAccess.OpenCurrentDatabase "nomeMDB", False
objAccess.DoCmd.OpenReport "nomeReport"
objAccess.Quit
Set objAccess = Nothing
-- 
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
--------------------------------------
Newsgroup: it.comp.appl.access
Titolo: M e SM

Un saluto e un grazie per l'attenzione,
Il mio problema e' il seguente:
Ho una maschera "primaria" e una sottomaschera
incorporata in essa.
La sottomaschera non è legata alla primaria ed è
in visualizzazione foglio dati, ha la funzione di
fornire il riepilogo generale degli articoli.
Nella mascera primaria (visualizzazione scheda)
invece sono visibili le informazioni di dettaglio
del singolo articolo.
Vorrei riuscire, se possibile, a fare in modo che
quando una articolo viene selezionato nella sottomaschera,
automaticamente venga visualizzato nella
principale.
Se è una domanda banale o trita e ritrita vi chiedo
la gentilezza di indicarmi almeno dove posso trovare
le informazioni necessarie.
Vi ringrazio anticipatamente, Giovanni.

 wrote in message
bEX38.87$6e5....@twister2.libero.it...

Supponiamo che tu selezioni, nella sottomaschera a foglio dati, il campo
corrispondente al controllo pippo della maschera che è sottomaschera.
Sull'evento selezionato di questo controllo, nella maschera sottomaschera,
scriverai qualcosa che ti fa sì che si vedano le informazioni legate
all'articolo selezionato (dipende da coem è organizzata questa cosa nella
form principale). Infatti in quel momento c'è un certo record selezionato
corrispondente ad un certo articolo. Per esempio quindi, se la form è basata
su una query che ha come criterio sotto il codice univoco dell'articolo
[forms]![tuaform]![tuocontrollo], nel codice di cui sopra scriverai
forms("tuaform").tuocontrollo = me.codice
Poi fai forms("tuaform").requery e il gioco è fatto
Antonio


Nell'origine dati di maschera e sottomaschera ci deve essere anche il campo
chiave primaria, nella sottomaschera ci deve essere una casella di testo
(anche non visibile) associata al campo chiave.
A fronte dell'evento 'Su corrente' della sottomaschera scriverai piů o meno
cosě:
Forms!MascheraPrincipale.RecordsetClone.FindFirst _
        "[idChiave] = " & Me.txtIdChiave
 Forms!MascheraPrincipale.Bookmark = _
        Forms!MascheraPrincipale.RecordsetClone.Bookmark
Se il campo chiave non č numerico metti Chr$(34) prima e dopo
'Me.txtIdChiave', Ricordati di impostare i riferimenti a DAO.
Ciao
--
Alberto

Newsgroup: it.comp.appl.access
Titolo: Modificare criteri di apertura maschera

Buongiorno a tutti,
 
ho una maschera che apro in sola lettura in questo modo:
    DoCmd.OpenForm stDocName, , , stLinkCriteria, acFormReadOnly
Avrei bisogno con un pulsante (posizionato all'interno della maschera aperta in sola lettura) di rendere momentaneamente la maschera acEdit per fargli eseguire un'operazione per poi farla nuovamente tornare in modalità di sola lettura.
 
Qualcuno sa dirmi come poter fare?
Grazie mille

 ...
 
Me.AllowEdits = True
 
e dopo
 
Me.AllowEdits = False
 
-- 
Ciao
Karl
*********
http://www.AccessDevCon.com
 
Access FAQ: 
http://www.donkarl.com/it
 


Perfetto!
Grazie Karl! Funziona...
Newsgroup: it.comp.appl.access
Titolo: errore 3709

salve
ho quest'errore su chiusura di una maschera
3709 chiave di ricerca non trovata in alcun record
 
dopo che ho inserito su scaricamento
 
If IsNull(Me!data) And (Me!Maschera1 = "Non chiuso") Then
    If MsgBox("devi inserire la data. " & _
                "Vuoi chiudere la maschera lo stesso?", _
                    vbYesNoCancel, "Mancano dati") <> vbYes Then
 
        Cancel = True
    End If
End If
 
potrei gestire l'errore con case 3709
sul pulsante "esci";
Ma e' corretto?
 
Grazie per l'aiuto
 
 
 

Franco ha scritto:

Per caso hai campi memo indicizzati?
 
--
sv
 
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 


ciao Salvino
 
non ho campi memo.
Il numero documento è indicizzato (va bene?)
in piu' ho altri errori che ho
escluso con case
2051, 3011 e 3021
 
 

 2051, 3011 e 3021
 
A me non da' nessun errore. 
Me!Maschera1 cos'č?


 -- 
ciao Salvino
niente di particolare e' una maschera
che mi mostra se il documento è già stato utilizzato.
Ma anche senza ho ugualmente il problema.
 
 
 

 ha scritto nel messaggio 
news:4edcb2b0$0$1384$4faf...@reader1.news.tin.it...

Ho ricostruito la mschera e dopo aver inserito il codice
ho quest'errore:
 
il modulo di gestione di database Microsoft Jet non è riuscito a trovare 
l'oggetto
Assicurarsi che l'oggetto esista e che il nome e il percorsi siano digitati 
correttamente
 
 

Franco ha scritto:

Fai un debug e vedi dove è l'inghippo.


 ha scritto nel messaggio 
news:jbiv8j$s8a$1...@news.newsland.it...

Grazie Salvino
 
non sono capace.
Ho provato piu' volte ma non ci capisco un tubo come funziona.
 
 
 

 Ho provato piu' volte ma non ci capisco un tubo come funziona.
 
E' fondamentale saperlo fare.
 
Vedi:
 
http://office.microsoft.com/it-it/access-help/eseguire-il-debug-del-codice-visual-basic-HP005186717.aspx
 


 -- 
grazie 
 
 

 grazie
cmq se chiudo la maschera utilizzano (anziche' il mio pulsante di chiusura 
realizzato con la casella strumenti) la x in alto  a destra
ovvero casella menu' controllo,
non ho errori.
Newsgroup: it.comp.appl.access
Titolo: criterio apertura maschera da controllo non associato

Buonasera.
In una maschera continua su evento click di una casella di testo apro
un'altra maschera al record uguale a quello della casella di testo
della prima maschera.
Ora ho inserito a piè di pagina un pulsante "Varia" che su click rende
visibile una casella di testo non associata "numriga" in cui scrivo il
numero della riga che corrisponde all'idarticolo e con il seguente
codice su evento keydown cerco di ottenere lo stesso risultato della
casella di testo associata.
If KeyCode = 13 Then
Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "frmarticoli"
    stLinkCriteria = "[idarticolo] like " & Forms![elenco articoli].
[numriga]
        DoCmd.OpenForm stDocName, , , stLinkCriteria, , , Me.Name
End If
Il risultato è che la prima volta mi dà il seguente errore: errore di
run-time '3075': Errore di sintassi (operatore mancante)
nell'espressione della query '[idarticolo] like '.
La seconda volta invece funziona. Se riprovo con un altro numero mi
apre di nuovo quello precedente.
Quindi il valore della casella di testo non associata non viene
memorizzato subito.
Come posso fare?
E come faccio a far ritornare invisibile la casello di testo nel
momento in cui chiudo la seconda maschera e torna attiva la prima?
Grazie anticipate.
Giuseppe.

     stDocName = "frmarticoli"
prova cosi:
     stLinkCriteria = "[idarticolo] like " & Forms![elenco 
articoli].[numriga].text
-- 
Ciao
Geppo 

 Geppo
Perfetto. Grazie.
Giuseppe.
Newsgroup: it.comp.appl.access
Titolo: Da VB a Access 2000! Aiuto!

Ciao a tutti,
ho un problema: ho le seguenti righe di codice che in VB funzionano
perfettamente ma in access mi danno errori del tipo (Errore di run-time
'2185':Impossibile fare riferimento ad una proprietà o ad un metodo per un
controllo a meno che non abbia lo stato attivo).
Come posso portare queste righe di codice in Access in maniera corretta?
Premetto che ho un form o maschera con 5 textbox e un pulsante. Il codice è
all'interno del pulsante all'evento Click.
Mi potreste fare le dovute modifiche? Grazie 1000!!!
ore = DateDiff("h", data_ingresso.Text + " " + ora_ingresso.Text,
data_uscita.Text + " " + ora_uscita.Text)
minuti = DateDiff("n", data_ingresso.Text + " " + ora_ingresso.Text,
data_uscita.Text + " " + ora_uscita.Text) - (ore * 60)
secondi = DateDiff("s", data_ingresso.Text + " " + ora_ingresso.Text,
data_uscita.Text + " " + ora_uscita.Text) - (ore * 3600)
If Val(minuti) > 0 Then secondi = secondi - (60 * minuti)     'serve x
correggere il bug della funzione DateDiff
risultato.Text = Trim(Str(ore)) + ":" + Trim(Str(minuti)) + ":" +
Trim(Str(secondi))


Togli i vari .Text, in Access per accedere al valore di un controllo basta
solo il nome, preceduto dalla parola chiave Me.
Quindi data_ingresso.Text diventa Me.data_ingresso, oppure
Me.data_ingresso.Value, la proprietà Value è ridondante poichè è quella
predefinita.

Grazie!

 ha scritto nel messaggio
news:atc3d3$126d6c$1...@ID-162989.news.dfncis.de...


Newsgroup: it.comp.appl.access
Titolo: database con back-end e front-end

Ciao ragazzi ho creato un database con struttura back-end e front-end, 
questo xchè ho una rete con la quale fare in modo che più persone 
sfruttino il database a partire da una base dati comune e per tanti 
altri motivi (backup, manutenzione ecc, ecc)
Il tutto funziona bene solo che ho notato che se un utente interroga i 
dati contenuti nel database remoto (beck-end) la risposta non è 
immediata ma passano alcuni secondi
Inzomma il tutto risulta un pò più lento del normale
Tutto questo è naturale?
faccio notare che i dati contenuti nel back-end son circa 40.000 record 
(dipenderà anche da questo?)

 wrote in message
news:d1IQe.93272$
2U1.4...@news3.tin.it

Potrebbe essere normale, ma spesso può essere condizionato 
da alcuni fattori:
1)Numero di accessi contemporanei(non sempre è la causa principale)
2)Corretta indicizzazione dei campi di ricerca(spesso è quìil problema)
3)Normalizzazione del DB(anche questo è spesso sottovalutato)
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Alessandro Baraldi ha scritto:

cosa intendi per "normalizzazione"

 cosa intendi per "normalizzazione"
http://www.google.it/search?hl=it&q=normalizzare+un+database&btnG=Cerca+con+Google&meta=lr%3Dlang_it
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: [OT] Licenze MYSQL..... ?!

Ma...se io fornisco il mio programmino Access + un DB MYSQL...necessito di
qualche licenza particolare ?
Grazie

 Grazie
Intanto credo tu non possa fornire MySQL senza pagarne la Licenza di
Distribuzione, poi se
il tuo Access non è OpenSource necessiti di Licenza...!
Anche quì però le cose non sono sempre chiare, mi ero messo a seguire sia un
3D su it.Comp...Database
a riguardo e mi ero letto l'EULA, ma più leggi e più dubbi ti vengono...!
Di sicuro non è scontato che MySQL sia un Database FREE...., molti lo
sottovalutano.
@Alex.
Newsgroup: it.comp.appl.access
Titolo: Vai ad un controllo

Ho creato una maschera di inserimento dati.
Ora vorrei sapere se esiste un metodo per far si che se io inserisco un
valore in un controllo dopo aver premuto il tasto di tabulazione il
cursore si posizioni in un controllo, se invece inserisco un'altro
valore si posizioni su un controllo diverso.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

valore si posizioni su un controllo diverso.
.
Me![NomeControlloDestinazione].SetFocus
E' da inserire in evento "dopo
aggiornamento" del controllo uscente dove dovrai costruirti una condizione
che intercetti il valore (If o Select) e lo diriga sul controllo corretto.
.
OndaMax
--------------------------------
Inviato via 
http://usenet.iol.it
 

 che intercetti il valore (If o Select) e lo diriga sul controllo corretto.
Attenzione al solito bug:
se ci si vuole spostare nel controllo per il quale si sta scrivendo codice
per qualche evento, bisogna prima forzare il setfocus su un altro controllo,
quindi rifarlo su quello voluto!
Antonio

Newsgroup: it.comp.appl.access
Titolo: Decimali nella casella di riepilogo

Salve a tutti,
Ho una casella di riepilogo dentro ad una maschera, in ogni riga della
casella di riepilogo c'č anche un prezzo (in euro) dei vari prodotti:
non riesco a visualizzare le cifre decimali del prezzo... ho provato di
tutto ma non so dove sbaglio.
Qualcuno mi puň aiutare?
GRAZIE

 GRAZIE
hai controllato le priprieta' Formato della casella di riepilogo ?
le metti a Fisso e inponi n° decimali (che e' il campo subito sotto nelle
proprieta') a 2.
ciao,
--
(^o^))~    Lorenzo   (^o^))~
"Preimaginare e' lo imaginare le cose che saranno..."
"Postimaginare e' imaginare le cose passate ..."
(Leonardo Da Vinci)

Newsgroup: it.comp.appl.access
Titolo: Stampa report con 2 fatture su un'unico foglio

Questo post è stato inoltrato anche in microsoft.public.it.office.access.
Vorrei creare un report per stampare una fattura replicata 2 volte su 
un'unico foglio. Quindi 2 fatture identiche su uno stesso foglio, 
strappandolo in mezzo potrò tenerne una copia per me e una per il cliente.
Ho provato a creare il report ma ho incontrato numerosi problemi perchè c'è 
una sola intestazione pagina ed un solo corpo, non riesco a replicare 
correttamente la struttura della fattura.
Cosa posso fare?
Grazie a tutti per i consigli. 

[omissis]
Ti ho risposto su microsoft.public.it.office.access
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution

 
Si puo fare via vba ma e' possibile anche in modo non troppo lineare via 
query.
1) query union che duplichi i dati della fattura
2) aggiungere in testa un campo di raggruppamanto con valore predefinito 
qualsiasi (ie
  select "Copia1" as CMIO,.......
union
select "Copia2",.......
3) nel report eliminare intestazione pagina e gestire l'intestazione 
gruppo su CMIO
Non l'ho mai fatto ma se la "logica" ha un senso....
--
ac

Alessandro Cara wrote:
[cut]
P.S. Puo' diventare un po' complicato gestire l'altezza della 1/2 pagina 
ma perdendo un po' di tempo tutto e' possibile
--
ac
Newsgroup: it.comp.appl.access
Titolo: Maschere e tabelle

Domandone .... ( anche se semplici rispondetemi ho questi dubbi )
Posso inserire i dati di 2 tabelle non in relazione in una maschera  ?????
Posso fare delle operazioni in una maschera ... tipo somma parziale di un
campo ( es soldi) di tutti gli elementi fino a quel momento inseriti ???
( non utilizzando le macro )
Grazie mille.

 Grazie mille.
Prego duecento. :-)
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

Newsgroup: it.comp.appl.access
Titolo: Telefonare da access

ho un'applicazione per selezionare dei supplenti da una lista
gli debbo chiamare telefonicamente, ho messo alla rutine evento del
pulsante la stringa appllication.Run"utility.wlib_AutoDial" ,stDialStr
ma non riesco a farlo funzionare la telefonata parte ma non sento nessuna
voce il modem è un data faxvoice cosa sbaglio, c'è qualcuno che ha
esperienza sul settaggio delle impostazioni o mi può suggerire l'uso di
qualche altro metodo?
USANDO L'UTILITà HIPER TERMINAL DI XP RIESCO A SENTIRE LA VOCE DEL
CHIAMATO ,MA NON FUNZIONA IL MICROFONO.
GRAZIE
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

GRAZIE
attivalo da access
e cmq.....newsgroup di hardware o windows
qualcosa c'era

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

Salve a tutti,
uso A97 ed ho installato lo Snapshot Viewer.
La mia domanda è questa:
se debbo inviare in automatico una email in formato snapshot, quale costante
debbo usare?
    DoCmd.SendObject acSendReport, "Nome Report", Quale Nome Costante?,
***@**.it ,"Nome Oggetto", "Messaggio", False
Nell'help sono specificati solo:;
acFormatHTML  (HTML)
acFormatRTF    (Rich Text Format)
acFormatTXT    (MS-DOS Text)
acFormatXLS    (Microsoft Excel)
mentre se uso una macro, oppure tralascio in VBA il nome della costante, ho
la possibilità
di specificare anche Snapshot Format
Come posso risolvere?
grazie
Riccardo

 ha scritto nel messaggio
news:9cr96h$s26$1...@news.panservice.it...



mille grazie!
Riccardo

Newsgroup: it.comp.appl.access
Titolo: Pulsanti di Ingrandimento/Riduzione

Ciao a tutti
Non riesco ad eliminare completamente i pulsanti di
Ingrandimento/Riduzione delle maschere , nonostante le
impostazioni  Pulsanti Ingrandimento/Riduzione e pulsante
chiusura siano a nessuno e no, nella barra dei menù
mi compare sempre l'icona del pulsante di ripristino, non capisco
perchè .
Come posso fare .
Giuseppe

 Giuseppe
Casella Menů Controllo=No
@Alex.


Casella Menù Controllo=No
Era già impostata a NO
Ho verificato che anche sulla maschera ordini
del DB Northwind  impostando tutto a No rimane sempre
quel pulsante ripristino . Booooooooo
Ciao Giuseppe

 Ciao Giuseppe
Se la maschera è aperta a tutto schermo il pulsante appare, scompare quando
si apre in modalità finestra; dovresti impostare anche il tipo di bordo a
"sottile"...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: traformare maschera -> struttura a schede

ciao ragazzi,
ho una maschera con già tutti i pulsanti e casini vari, però vorrei
trasformarla in una scheda di una maschera a schede, come posso fare senza
fare tutto d'accapo? so che non posso incollare tutto altrimenti on mi
funzionerebbero + i comndi dei pulsanti o sbaglio?
help!
besos
dany xxx
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Inseriscila come sottomaschera in un'altra maschera con la struttura a
schede
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

Newsgroup: it.comp.appl.access
Titolo: posizionare il cursure sul controllo voluto

ciao a tutti
 
ho un programma creato con A2003
e in A2007 all'apertura della maschera
il cursore sembra non essere posizionato su alcun controllo.
 
Se eseguo MsgBox 
Screen.ActiveControl.Name
 
mi dice che è sul controllo data, (esattamente dove io vorrei che fosse)
ma se non ci clicco sopra per attivarlo, non  mi fa scrivere.
 
Perchè questo comportamento?
Come posso risolvere?
Grazie 
 
 

 ha scritto nel messaggio 
news:5337058b$0$1359$4faf...@reader1.news.tin.it...

aggiungo.............
 
ho notato che il problema l'ho se apro la maschera
da pulsante:         DoCmd.OpenForm "MOrdini", , , "IdCarico=" & Me!IdCarico
 
mentre se la apro direttamente questo non succede
 
 
 


aggiungi un   nometuocontrollo.setfocus  per posizionare il cursore dove 
vuoi
 
ciao
BFS

ciao
ciao BFS
la cosa strana è che su click funziona anche senza 
nometuocontrollo.setfocus,
mentre su doppio click no, appare il cursore sul controllo per pochi secondi 
e poi sparisce.
Newsgroup: it.comp.appl.access
Titolo: Aiuto su sql access

HelpME!!!!HelpME!!!!HelpME!!!!HelpME!!!!HelpME!!!!HelpME!!!!HelpME!!!!
DoCmd.TransferSpreadsheet acImport, 8, "agente", "reclamo", False, "b7:b7"
Tranferisce dati da un foglio di excell, dal file "reclamo.xls" alla tabella
"agente". Come posso fare per impostare il valore del file (reclamo.xls) da
una maschera, sciegliendolo da una combobox che veda i file in
c:\documenti\*.xls?
Grazie a chi mi aiuta.
Ciao Nadir

 ha scritto nel messaggio
news:HY186.40593$eB2.4...@news.infostrada.it...

Ciao,
prova con la routine qui sotto.
Private Sub CaricaCombo()
    'Supponi di avere una maschera con una casella combinata chiamata
    'CasellaCombinata2, che conterrà l'elenco dei file trovati.
    'In questo esempio la proprietà "Tipo origine riga" viene impostata a
"Elenco
    'Valori", e viene costruita dinamicamente iterando sui file della
directory
    'prescelta.
  'Nome del file trovato.
   Dim strNomeFile As String
   'Percorso di partenza per la ricerca.
   Dim strPath As String
   'Origine dati della Combo.
   Dim strSourceCombo As String
   strPath = "C:\Documenti\*.xls"
   strNomeFile = Dir$(strPath)
   'Se Len(strNomeFile) ho trovato almeno un file, altrimenti il ciclo qui
   'sotto non viene mai eseguito.
   Do While Len(strNomeFile)
      'Continuo finchè trovo dei file che corrispondono alle specifiche.
       'Le parentesi qui sotto aiutano leggermente la velocità di esecuzione
       ' nel concatenamento
       'delle stringhe (la differenza si nota solo quando le stringhe
diventano
       'molto lunghe (es.: directory con qualche centinaio di file da
concatenare)).
       strSourceCombo = strSourceCombo & (strNomeFile & ";")
       strNomeFile = Dir$
   Loop
   CasellaCombinata2.RowSourceType = "Value List"
   CasellaCombinata2.RowSource = strSourceCombo
end sub
A questo punto ti basta prelevare il contenuto della ComboBox dopo la
selezione
dell'utente, e passarlo alla funzione TransferSpreadsheet (aggiungendo anche
il path del file stesso).
Alberto Covili.

 - rimuovi XXX  x  rispondere  ICQ	#8814554
 
Cina:
	Il  presidente	russo  Boris  Eltsin   e'   giunto   a	 Pechino,   per
discutere i nuovi confini del suo fegato.
		--   Panfilo   Maria   Lippi,	"TABLOID   TABLOID"@"Mai   Dire   Gol"