title: cambiare nome ed icona maschera

author: Pablitomf (Maurizio Facciuti)

text:
Maurizio ha scritto:

> Mi data qualche indicazione?
Form.Caption = "RUBRICA"
> Ciao
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------
http://www.accessgroup.it/
----------------------------
Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: cambiare nome ed icona maschera

author: Alessandro Baraldi

text:
Maurizio ha scritto:

Per l'Icona usa questo:
http://www.mvps.org/access/api/api0043.htm
Per la descrizione metti la proprietà CAPTION di Form=vbNullString da
codice.
Ciao
@Alex


title: cambiare nome ed icona maschera

author: Roberto da Parma

text:
"Maurizio" <*@.it> ha scritto nel messaggio
news:45129743$0$35081$4faf...@reader4.news.tin.it...

Per l'icona puoi provare su sito comune sezione MODULES 5.83
Per l'etichetta della maschera puoi utilizzare le indicazioni di Pablitomf o
semplicemente nelle proprietą della maschera alla voce etichetta metterci
uno spazio...
Ciao
Roberto


title: Casella di testo

author: Marco

text:
Ciao a tutti,
ho la necessità di far comparire in una casella di testo all'interno di una
maschera un campo presente in un'altra tabella, semplicemente selezionando
un altro campo...per farmi capire meglio
1° maschera = magazzino (codice e prezzo)
2° maschera = fattura
selezionando tramite una casella combinata, nella maschera fattura, un
codice vorrei che venisse fuori, in una casella di testo, in automatico il
prezzo relativo


title: Casella di testo

author: Roberto da casa

text:
"Marco" <
m.g...@tin.it
> ha scritto nel messaggio
news:dd_s8.3626$b62....@news1.tin.it...

Se "l'altra tabella" tabella si chiama tblMagazzino e contiene i campi
Codice e Prezzo.
Se la casella di testo dove vuoi che ti compaia il prezzo del prodotto
selezionato con la casella combinata si chiama Pippo.
Se la casella combinata si chiama Pluto.
Fai in maniera che la tua casella combinata abbia 2 colonne, di cui la
seconda non visibile; fai inoltre in modo che l'origine riga della cadella
combinata abbia un codice SQL simile a questo
SELECT Codice, Prezzo FROM tblMagazzino;
A fronte dell'evento "Dopo aggiornamento" della casella combinata Pluto
genera la deguente riga di codice VBA:
Me!Pippo = Me!Pluto.Column(1)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Casella di testo

text:
> Se "l'altra tabella" tabella si chiama tblMagazzino e contiene i campi
> Codice e Prezzo.
> Se la casella di testo dove vuoi che ti compaia il prezzo del prodotto
> selezionato con la casella combinata si chiama Pippo.
> Se la casella combinata si chiama Pluto.
>
> Fai in maniera che la tua casella combinata abbia 2 colonne, di cui la
> seconda non visibile; fai inoltre in modo che l'origine riga della cadella
> combinata abbia un codice SQL simile a questo
>
> SELECT Codice, Prezzo FROM tblMagazzino;
>
> A fronte dell'evento "Dopo aggiornamento" della casella combinata Pluto
> genera la deguente riga di codice VBA:
>
> Me!Pippo = Me!Pluto.Column(1)
>
> --
> Roberto
>
Grazie per il suggerimento, perň dopo aver fatto quello che mi hai
suggerito, nel momento in cui vado a selezionare un valore nella casella
combinata, mi compare un messaggio di errore che dice:
Impossibile trovare la macro


title: Casella di testo

text:
"Marco" <
m.g...@tin.it
> ha scritto nel messaggio
news:Z2dt8.5816$b62.1...@news1.tin.it...

Penso proprio che tu non abbia fatto ciň che ti ho suggerito.;-)
Qualcosa mi dice che
Me!Pippo = Me!Pluto.Column(1)
tu l'abbia scritto a fianco della scritta "Dopo aggiornamento" della casella
combinata anzichč scriverlo all'interno di una routine VBA generata a fronte
di tale evento, come ti ho suggerito nel mio messaggio precedente.
E' cosě?



title: Casella di testo

author: Ivan

text:
"Marco" <
m.g...@tin.it
> ha scritto nel messaggio
news:dd_s8.3626$b62....@news1.tin.it...

se la casella combinata è :  cmbCodice
se la casella testo è         :  txtPrezzo
e se nell'origine dati della cmbCodice c'è una colonna prezzo (una query
esterna o interna)(ammettiamo la terza colonna)
allora sull'evento
    Private Sub cmbCodice_AfterUpdate
            txtPrezzo = cmbCodice.Column(2)
    End Sub
spero sia il tuo caso ....
van


title: eliminare un file di testo dopo la lettura

author: snake

text:
Domandone come se non programmassi dal 93 con Access ma quando hai poco
tempo...
Grazie
sn...@inwind.it


author: JBad

text:
In article <8j05v8$acr$
1...@nslave1.tin.it
>,
sn...@inwind.it
 says...
> Domandone come se non programmassi dal 93 con Access ma quando hai poco
> tempo...
> Grazie
sn...@inwind.it
>
Kill nomefile
--
JBad


text: Grazie JBad


title: filtrare una sottomaschera

author: Ronny

text:
Ciao a tutti.
  Ho una Form che contiene una sottomaschera al cui interno vengono
visualizzati alcuni campi, uno di questi è una voce che segnala che la riga
è già stata fatturata oppure no, contiene quindi il valore N o S.
Vorrei poter filtrare dalla maschera principale la sottomaschera in base al
fatto che scelgo di visualizzare le operazioni con il valore N oppure S.
Quindi con conseguente refresh della sottomaschera.
Come si può fare ? Grazie a tutti.
       Ronny
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: filtrare una sottomaschera

author: giovanni t

text:
                    Il 15 Lug 2004, 13:01,
fucks...@tiiii.it
 (Ronny) ha scritto:
> Ciao a tutti.
> Ho una Form che contiene una sottomaschera al cui interno vengono
> visualizzati alcuni campi, uno di questi è una voce che segnala che la
riga
> è già stata fatturata oppure no, contiene quindi il valore N o S.
> Vorrei poter filtrare dalla maschera principale la sottomaschera in base
al
> fatto che scelgo di visualizzare le operazioni con il valore N oppure S.
> Quindi con conseguente refresh della sottomaschera.
> Come si può fare ? Grazie a tutti.
> Ronny
1 - metti i valori sì e no in una combo
2 - su click di un pulsante siassegni alla subform il recordsourse (lo
stesso che ha già) ma con la condizione where fatturata (o come si chiama il
tuo campo) = al valore selezionato nella combo
3 - fai un requery della subform
ciao
Giovanni T



title: filtrare una sottomaschera

author: Sergio MAZZA

text:
"Ronny" <
fucks...@tiiii.it
> ha scritto nel messaggio news:194Z130Z244Z250...@usenet.libero.it...
> Ciao a tutti.
>   Ho una Form che contiene una sottomaschera al cui interno vengono
> visualizzati alcuni campi, uno di questi è una voce che segnala che la riga
> è già stata fatturata oppure no, contiene quindi il valore N o S.
> Vorrei poter filtrare dalla maschera principale la sottomaschera in base al
> fatto che scelgo di visualizzare le operazioni con il valore N oppure S.
> Quindi con conseguente refresh della sottomaschera.
> Come si può fare ? Grazie a tutti.
>        Ronny
Utilizzi il metodo Filter e FilterOn della sottomaschera:
es.
Me!sottomaschera.Filter = "fatturata = " & Me!chkFatturata
Me!sottomaschera.FilterOn = True
Ciao.
--
Sergio MAZZA


title: filtrare una sottomaschera

text:
 > Utilizzi il metodo Filter e FilterOn della sottomaschera:
> es.
> Me!sottomaschera.Filter = "fatturata = " & Me!chkFatturata
> Me!sottomaschera.FilterOn = True
>
> Ciao.
>
Ciao ed innanzitutto grazie per la rispo, perň messo cosě sembra che
sottomaschera lo prenda come nome campo ...
manca qualcosa?
Grazie mille



title: filtrare una sottomaschera

text:
"Ronny" <
pdjd...@maillll.it
> ha scritto nel messaggio news:194Z130Z244Z250...@usenet.libero.it...
> > Utilizzi il metodo Filter e FilterOn della sottomaschera:
> > es.
> > Me!sottomaschera.Filter = "fatturata = " & Me!chkFatturata
> > Me!sottomaschera.FilterOn = True
> >
> > Ciao.
> >
> Ciao ed innanzitutto grazie per la rispo, perň messo cosě sembra che
> sottomaschera lo prenda come nome campo ...
> manca qualcosa?
> Grazie mille
> Ronny
E sě, messa cosě hai ragione;  ma se nell'indicare il problema utilizzi termini generici come pensi che possa indovinare il nome che
hai assegnato all'oggetto sottomaschera?
Anche il controllo "chkFatturata" e il nome del campo "fatturata" me li sono inventati; sta a te capire il suggerimento e
riadattarlo o, per la prossima volta, essere piů preciso e indicare i nomi dei controlli sulla form (non campi, che sono parte delle
tabelle) e di tutti gli oggetti da prendere in considerazione...
Ciao.
--
Sergio MAZZA


title: filtrare una sottomaschera

author: namor

text:
Ronny ha scritto:
> > Utilizzi il metodo Filter e FilterOn della sottomaschera:
> > es.
> > Me!sottomaschera.Filter = "fatturata = " & Me!chkFatturata
> > Me!sottomaschera.FilterOn = True
> > Ciao.
> Ciao ed innanzitutto grazie per la rispo, perň messo cosě sembra che
> sottomaschera lo prenda come nome campo ...
> manca qualcosa?
> Grazie mille
> Ronny
No, lo considera un controllo della maschera principale.
Devi specificare che ti vuoi riferire alla sottomaschera e non al
controllo che la contiene. Aggiungi un .Form
  Me!sottomaschera.Form.Filter = "fatturata = " & Me!chkFatturata
  Me!sottomaschera.Form.FilterOn = True
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: filtrare una sottomaschera

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio news:cd8caf$iv1$1...@news.newsland.it...
> Ronny ha scritto:
>
> > > Utilizzi il metodo Filter e FilterOn della sottomaschera:
> > > es.
> > > Me!sottomaschera.Filter = "fatturata = " & Me!chkFatturata
> > > Me!sottomaschera.FilterOn = True
> > > Ciao.
>
> > Ciao ed innanzitutto grazie per la rispo, perň messo cosě sembra che
> > sottomaschera lo prenda come nome campo ...
> > manca qualcosa?
> > Grazie mille
> > Ronny
>
> No, lo considera un controllo della maschera principale.
> Devi specificare che ti vuoi riferire alla sottomaschera e non al
> controllo che la contiene. Aggiungi un .Form
>   Me!sottomaschera.Form.Filter = "fatturata = " & Me!chkFatturata
>   Me!sottomaschera.Form.FilterOn = True
> Namor
>
>
> --
> namor at inwind punto it
>
Che gentleman che sei!
Ciao.
--
Sergio MAZZA


title: filtrare una sottomaschera

text:
> E sì, messa così hai ragione; ma se nell'indicare il problema utilizzi
termini generici come pensi che possa indovinare il nome che
> hai assegnato all'oggetto sottomaschera?
> Anche il controllo "chkFatturata" e il nome del campo "fatturata" me li
sono inventati; sta a te capire il suggerimento e
> riadattarlo o, per la prossima volta, essere più preciso e indicare i nomi
dei controlli sulla form (non campi, che sono parte delle
> tabelle) e di tutti gli oggetti da prendere in considerazione...
Ok, no ma infatti non volevo lamentarmi della risposta, anzi posso solo
dirti grazie per la disponibilità.
Ora funziona il filtro , l'unica cosa è quando faccio il filter On = False,
nella sottomaschera mi presenta dei record che non sono appartenenti alla
testata.
Spero di essermi spiegato.
Grazie



title: filtrare una sottomaschera

text:
"Ronny" <
aaaaa...@tin.it
> ha scritto nel messaggio news:194Z130Z244Z250Y...@usenet.libero.it...
>
> Ok, no ma infatti non volevo lamentarmi della risposta, anzi posso solo
> dirti grazie per la disponibilità.
> Ora funziona il filtro , l'unica cosa è quando faccio il filter On = False,
> nella sottomaschera mi presenta dei record che non sono appartenenti alla
> testata.
> Spero di essermi spiegato.
> Grazie
> Ronny
>
Togliendo il filtro togli la condizione; la sottomaschera non è legata alla maschera principale (collega campi secondari/master)?
Ciao.
--
Sergio MAZZA


title: filtrare una sottomaschera

text:
Sergio MAZZA ha scritto:
> > > > Utilizzi il metodo Filter e FilterOn della sottomaschera:
> > > > es.
> > > > Me!sottomaschera.Filter = "fatturata = " & Me!chkFatturata
> > > > Me!sottomaschera.FilterOn = True
> > > > Ciao.
> > > Ciao ed innanzitutto grazie per la rispo, perň messo cosě sembra che
> > > sottomaschera lo prenda come nome campo ...
> > > manca qualcosa?
> > > Grazie mille
> > > Ronny
> > No, lo considera un controllo della maschera principale.
> > Devi specificare che ti vuoi riferire alla sottomaschera e non al
> > controllo che la contiene. Aggiungi un .Form
> >   Me!sottomaschera.Form.Filter = "fatturata = " & Me!chkFatturata
> >   Me!sottomaschera.Form.FilterOn = True
> > Namor
> Che gentleman che sei!
> Ciao.
Si fa il possibile.
Dai, non ce la poteva fare da solo, senza suggerirgli il .Form!
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito



title: filtrare una sottomaschera

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:cdfsn9$8ru$1...@news.newsland.it...
>
> Si fa il possibile.
> Dai, non ce la poteva fare da solo, senza suggerirgli il .Form!
> Namor
>
>
> --
> namor at inwind punto it
>
Veramente la gentilezza l'hai fatta verso di me non facendo notare la
strunzata...
Ciao.
--
Sergio MAZZA


title: Qualcuno mi aiuta a trovare l'errore

author: Marcello Anselmi Tamburini

text:
Questa Sub mi da errore 13, tipo non corrispondente. Qualcuno mi aiuta?
'---
Sub week_rpt()
    'esporta i report settimanali
    On Error GoTo gestErr

    Dim w As Integer
    Dim stFileName As String
    Dim xlsSheet As Excel.Application
    Dim xRow As Integer, xCol As Integer
    Dim oRst As Recordset

    w = Format(Now(), "ww") - 1
    stFileName = "Week" & Str(w) & ".xls"

    Set xlsSheet = CreateObject("Excel.Application")
    Set oRst = CurrentDb.OpenRecordset("ss_per SLA")
    xlsSheet.Workbooks.Open stFileName
    xlsSheet.ActiveWorkbook.Sheets(2).Select
    xlsSheet.Visible = True
    xRow = 1: xCol = 1
    Do While Not oRst.EOF
        xlsSheet.Cells(xRow, xCol) = oRst!sla_id
        xCol = xCol + 1
        xlsSheet.Cells(xRow, xCol) = oRst!activity_num
        xCol = 1
        xRow = xRow + 1
        oRst.MoveNext
    Loop
    oRst.Close
    Set oRst = Nothing
    Exit Sub

gestErr:
    MsgBox "Errore " & Err.Number & ": " & Err.Description

End Sub
'---
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Qualcuno mi aiuta a trovare l'errore

text:
"Marcello Anselmi Tamburini" <
marcello....@gmx.net
> ha scritto nel
messaggio news:f12d9c64a48739e0918...@mygate.mailgate.org...

Sarebbe di aiuto che tu (e non solo) indicassi quale versione di access stai
utilizzando e quale riga ti indica il debug; dal tipo di errore sembra
Access 200x, quindi devi inserire i riferimenti della libreria DAO prima di
quella ADO per utilizzare la dichiarazione "Dim oRst As Recordset"...
Ciao.
--
Sergio MAZZA


title: immagini nei record

author: Marco Pierleoni

text:
Eccomi con un nuovo quesito:
Per visualizzare delle schede anagrafiche personali, vorrei visualizzare
nelle maschere anche l'immagine della persona inserita nel singolo record, e
che questa immagine sia anche stampabile sul report che invio alla stampa
del record stesso.
Ho provato inserendo una cornice di oggetto associato, ma non sono poi
riuscito a collegarla al campo di oggetto OLE che avevo creato nella
relativa tabella. Ed anche facendo clic destro sulla cornice e selezionando
Inserisci oggetto, scegliendo la foto che mi interessava ottenevo solo di
visualizzare l'icona del file e non l'immagine stessa (anche senza
selezionare l'opzione "visualizza come icona").
Come posso fare?
Vi prego, ci sto uscendo scemo... :-(
Marco


title: immagini nei record

author: Alessandro Cara

text:

vai su
www.sitocomune.com
 sezione general per i numeri:
6.223, 6.197,6.161,6.125,6.96,6.75, 6.13 (ce ne sono anche altri)
e vedi se risolvono il tuo problema.
Alle 2.25 di notte e' facile uscire scemi ;<)
--
ac


title: immagini nei record

text:
> vai su
www.sitocomune.com
 sezione general per i numeri:
> 6.223, 6.197,6.161,6.125,6.96,6.75, 6.13 (ce ne sono anche altri)
> e vedi se risolvono il tuo problema.
Ci ho guardato... credo che il 6.13 (Come implementare correttamente un
archivio di immagini) faccia al caso mio, ma date le mie modeste capacità
non sono riuscito a metterlo in pratica... Che frana, sigh...
Me lo potresti spiegare passo-passo, per piacere?
Scusami il disturbo...
> Alle 2.25 di notte e' facile uscire scemi ;<)
Eccome... ^__^
Ciao
Marco


title: immagini nei record

text:
Marco wrote:
>>vai su
www.sitocomune.com
 sezione general per i numeri:
>>6.223, 6.197,6.161,6.125,6.96,6.75, 6.13 (ce ne sono anche altri)
>>e vedi se risolvono il tuo problema.
>
>
> Ci ho guardato... credo che il 6.13 (Come implementare correttamente un
> archivio di immagini) faccia al caso mio, ma date le mie modeste capacità
> non sono riuscito a metterlo in pratica... Che frana, sigh...
> Me lo potresti spiegare passo-passo, per piacere?
> Scusami il disturbo...
Lascia stare il punto 2. A te serve, credo,  il solo punto 1 che
fondamentalmete richiede solo una istruzione:
i.e.
sub Form_Current()
	Me.MioControlloImmagine.Picture = Me.Path_Immagine
end sub
tra l'altro ha il "grossissimo" vantaggio di non gonfiare inutilmente il
DB. Devi solo aver cura di definire un campo sul db dove conservare il
path in cui si trova l'immagine e poi segui la spiegazione.
Se poi vai sul sito del Baraldi
http://www.mantuanet.it/alessandro.baraldi/
sezione downloads la prima voce Archifoto e' una applicazione che fa
tutto quello che chiedi ed anche un "pelino" di piu'.
L'autore inoltre e' molto attivo su questo NG e quindi potresti tenerlo
occupato per un po'.  (ehh ....ehh....ehh... risatina maliziosa)
--
ac


title: mapping unità di rete

author: Riccardo Casadei

text:
Vi spiego il problema che devo affrontare.
Un mio programma (FE) è utilizzato da un portatile su cui è mappato un disco
S: che corrisponde al pc con i dati (BE).
Tale portatile deve collegarsi anche a un'altra rete e utilizzare lo stesso
programma.
La lettera S: però è già impegnata, quindi vorrei "rinviare" la mappatura di
S: a, ad esempio, M:
In questo modo vorrei ottenere che l'utente possa usare lo stesso programma
dove le tabelle collegate puntano a S: eche, a seconda della rete a cui è
collegato, legge i dati da un pc (S: reale) o dall'altro pc (M: rimappato).
Non so se mi sono spiegato bene.
Avete suggerimenti ?
grazie
Rick


title: mapping unità di rete

author: sv

text:
Riccardo Casadei ha scritto:


> grazie
> Rick
Se riesco a capire avresti un server unico a cui accedi da due reti
diverse. Penso che devi abbandonare l'utilizzo della lettera Unità di
Rete, e collegare le tabelle con i percorsi assoluti del tipo
\\nomeserver\MieTabelle.
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: mapping unità di rete

author: Pablitomf

text:
sv ha scritto:
> Se riesco a capire avresti un server unico a cui accedi da due reti
> diverse. Penso che devi abbandonare l'utilizzo della lettera Unità di
> Rete, e collegare le tabelle con i percorsi assoluti del tipo
> \nomeserverMieTabelle.
O punti su un altro disco virtuale... visto che "S" è già occupato creane
uno "Z" che usa lo stesso percorso... anche se poi dovrai modificare il
percorso delle tabelle nel tuo mdb
--
Pablitomf
Chi la dura la vince ;-)
Voglia di lavorar Saltame addosso, lavora babbo mio che io non posso.



title: mapping unità di rete

text:
"Riccardo Casadei" <
in...@ricweb.it
> ha scritto nel messaggio
news:c7q8ph$iet$1...@fata.cs.interbusiness.it...

Oltre al suggerimento di sv, non capisco qual'è il problema; non sai come
mappare unità di rete? O cosa?
Ciao.
--
Sergio MAZZA


title: mapping unità di rete

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:c7qggk$1fn$1...@canarie.caspur.it...

vi spiego come lavoro:
- il cliente non ha server
- in una sede ha 3 pc (di cui un portatile)
- uno di questi pc ha i dati e per questo ho creato l'MDE con le tabelle
collegate in C:\...
- l'altro client e il portatile usano un MDE creato con le tabelle collegate
a S:\... (dove S è il disco del pc con i dati)
- nella seconda sede ha 2 pc, uno fisso e l'altro è sempre lo stesso
portatile.
Il portatile quindi deve lavorare sia su una rete che sull'altra.
Quello che vorrei fare è, quando sul potatile si esegue il programma
collegato alla seconda rete, lanciare preventivamente un .bat che rimappi il
disco S con un'altra lettera; questo per far si che l'MDE rimanga sempre
quello.
Il mio problema è la sintassi da scrivere nel .bat per la rimappatura.
Mi auguro di essere stato più chiaro ?!?
Rick


title: mapping unità di rete

text:
"Riccardo Casadei" <
in...@ricweb.it
> ha scritto nel messaggio
news:c7qji0$6ei$1...@balena.cs.interbusiness.it...
>
>
> vi spiego come lavoro:
> - il cliente non ha server
> - in una sede ha 3 pc (di cui un portatile)
> - uno di questi pc ha i dati e per questo ho creato l'MDE con le tabelle
> collegate in C:\...
> - l'altro client e il portatile usano un MDE creato con le tabelle
collegate
> a S:\... (dove S è il disco del pc con i dati)
> - nella seconda sede ha 2 pc, uno fisso e l'altro è sempre lo stesso
> portatile.
>
> Il portatile quindi deve lavorare sia su una rete che sull'altra.
> Quello che vorrei fare è, quando sul potatile si esegue il programma
> collegato alla seconda rete, lanciare preventivamente un .bat che rimappi
il
> disco S con un'altra lettera; questo per far si che l'MDE rimanga sempre
> quello.
>
> Il mio problema è la sintassi da scrivere nel .bat per la rimappatura.
> Mi auguro di essere stato più chiaro ?!?
>
> Rick
Poco; comunque se mappi tutti sulla lettera Z:?
Il codice per mappare le risorse di rete è:
Dim WshNet
Set WshNet = CreateObject("Wscript.Network")
WshNet.MapNetworkDrive "Z:", "\\nomePc\risorsaDaMappare", , "utente",
"password"
Set WshNet = Nothing
per rimuovere il "mappaggio":
Dim WshNet
Set WshNet = CreateObject("Wscript.Network")
WshNet.RemoveNetworkDrive "Z:"
Set WshNet = Nothing
per sapere se esistono unità mappate:
   Dim fso, d, t, dc
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set dc = fso.Drives
       For Each d In dc
        Set d = fso.GetDrive(d.DriveLetter)
        Select Case d.DriveType
            Case 0: t = "sconosciuta"
            Case 1: t = "rimovibile"
            Case 2: t = "fissa"
            Case 3: t = "di rete"
            Case 4: t = "CD-ROM"
            Case 5: t = "disco RAM"
        End Select
        Debug.Print "Unità " & d.DriveLetter & ": - " & t
        Set d = Nothing
        Next
    Set dc = Nothing
    Set fso = Nothing
oppure se vuoi sapere solo quelle mappate:
Dim WshNetwork, oDrives, oPrinters, i As Integer
Set WshNetwork = CreateObject("WScript.Network")
Set oDrives = WshNetwork.EnumNetworkDrives
For i = 0 To oDrives.Count - 1 Step 2
   Debug.Print "Unità " & oDrives.item(i) & " = " & oDrives.item(i + 1)
Next
Set WshNetwork = Nothing
Set oDrives = Nothing
Ciao.
--
Sergio MAZZA


title: mapping unità di rete

text:
Riccardo Casadei ha scritto:
> vi spiego come lavoro:
> - il cliente non ha server
Non è vero da quello che scrivi dopo... il server è qualsisi PC al quale
fai riferimento per programmi o come in questo caso per dati. (e poi se
non avesse Server perchè i restanti PC li chiameresti Client???)
> - in una sede ha 3 pc (di cui un portatile)
> - uno di questi pc ha i dati e per questo ho creato l'MDE con le tabelle
> collegate in C:...
Ecco il server dal primo ufficio.
> - l'altro client e il portatile usano un MDE creato con le tabelle collegate
> a S:... (dove S è il disco del pc con i dati)
> - nella seconda sede ha 2 pc, uno fisso e l'altro è sempre lo stesso
> portatile.
> Il portatile quindi deve lavorare sia su una rete che sull'altra.
> Quello che vorrei fare è, quando sul potatile si esegue il programma
> collegato alla seconda rete, lanciare preventivamente un .bat che rimappi il
> disco S con un'altra lettera; questo per far si che l'MDE rimanga sempre
> quello.
> Il mio problema è la sintassi da scrivere nel .bat per la rimappatura.
> Mi auguro di essere stato più chiaro ?!?
Invece che un bat, gestisci l'errore... nel senso che nel momento in cui
nel 2ndo ufficio cercando la lettera "S" da errore, rialleghi le tabelle
del tuo programma su un secondo disco virtuale (che risulterà tarato con
il percorso del PC server del secondo ufficio)



title: mapping unità di rete

text:
Riccardo Casadei ha scritto:



Il comando da usare in un file .bat che potrai inserire nel Menù di
Avvio--Programmi--Esecuzione Automatica è SUBST.
> Il mio problema è la sintassi da scrivere nel .bat per la rimappatura.
> Mi auguro di essere stato più chiaro ?!?
> Rick
--
rgrds
SC
--



title: mapping unità di rete

text:
"sv" <
salv...@nospbox.enel.it
> ha scritto nel messaggio
news:c7qlf7$afu$1...@news.newsland.it...

SUBST questa è la risposta che cercavo, grazie !!!
Rick


title: E' possibile aprire la form di un altro mdb da codice

author: PabloDapatas

text:
Salve a tutti
Mi scuso fin d'ora se la domanda è banal, ma non ho trovato nulla che mi
  aiutasse in tal senso.
Grazie
Paolo


author: ciroteo

text:
"PabloDapatas" <
paolo...@libero.it
> ha scritto nel messaggio
news:1qjVd.57987$lB4.1...@twister1.libero.it...

Puoi provare ad inserire nei riferimenti l'altro mdb, in questo modo accedi
a tutte le funzioni salvate in esso. Alcuni sostenevano che si potesse
lanciare anche le forms non associate.
io non c'ero riuscito e avevo abbandonato.


author: Karl Donaubauer

text:
PabloDapatas wrote:
> Mi scuso fin d'ora se la domanda è banal, ma non ho trovato nulla che
>  mi aiutasse in tal senso.
www.donkarl.com/it
 FAQ 1.14 Usare oggetti da altri database
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
+info sulla prima Conferenza Italiana per Sviluppatori di Access (CISA1)


text:
Karl Donaubauer ha scritto:
> PabloDapatas wrote:
>
>>Mi scuso fin d'ora se la domanda è banal, ma non ho trovato nulla che
>> mi aiutasse in tal senso.
>
>
>
www.donkarl.com/it
 FAQ 1.14 Usare oggetti da altri database
>
molte grazie


title: query di eliminazione.. come funziona ?

author: GM

text:
ciao a tutti... vorrei eliminare tutti i dati in un DB che ha molte
relazioni e non volendo modificare queste ultime ho creato una query di
eliminazione inserendo la tabella A + B + C...
però quando lancio la query mi dice di specificare una tabella...
nella query in Elimina leggo Dove... cosa dovrei specificare ??
in sostanza come fare ad eliminare tutti i record con tabelle e dati
correlati !!!
grazie e ciao


title: query di eliminazione.. come funziona ?

text:

Dal mio basso (soluzione spiccia da poco esperto),
fossi in te se non hai davvero uan marea di tabelle piene di una marea
di dati fai prima ad aprire le tabelle e a cancellarli a mano...
(ovviamente previo backup)


title: query di eliminazione.. come funziona ?

author: MA

text:

Allora, per la tua soluzione:
Creati un nuovo file
File
carica dagli esterni
Importa
scegli il file vecchio
selezioni tutte le tabelle
e gli dici di non importare i dati ma solo le strutture
Per quanto riguarda la query di eliminazione
basta che ci metti un campo nel rigo Dove e lui cancella tutto il record
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: query di eliminazione.. come funziona ?

text:
<
al...@libero.it
> ha scritto nel messaggio
news:1195032264.5...@d55g2000hsg.googlegroups.com...


--------------
ho fatto questa richiesta in quanto anche da tabella non mi fa eliminare
un bel nulla...
dice che i record sono correlati... quindi cerco una brute-force...
Ciao


title: query di eliminazione.. come funziona ?

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:fhejg3
> ciao a tutti... vorrei eliminare tutti i dati in un DB che ha molte
> relazioni e non volendo modificare queste ultime ho creato una query
> di eliminazione inserendo la tabella A + B + C...
> però quando lancio la query mi dice di specificare una tabella...
> nella query in Elimina leggo Dove... cosa dovrei specificare ??
> in sostanza come fare ad eliminare tutti i record con tabelle e dati
> correlati !!!
> grazie e ciao
Allora, per la tua soluzione:
Creati un nuovo file
File
carica dagli esterni
Importa
scegli il file vecchio
selezioni tutte le tabelle
e gli dici di non importare i dati ma solo le strutture
Per quanto riguarda la query di eliminazione
basta che ci metti un campo nel rigo Dove e lui cancella tutto il record
-------
grazie Ma,sono riuscito adottando la soluzione 1...
però ti chiedo come cavolo non mi funziona la query di eliminazione ??
anche se nel campo Dove - Da inserisco un campo della tabella in
questione mi dice campo non in elenco... per caso le relazioni possono
dar fastidio ???
Ciao


title: query di eliminazione.. come funziona ?

text:

Se hai messo l'integrità referenziale e non hai settatto l'eliminazione a catena
non puoi cancellare il record padre se ci sono figli (rimarrebbero orfani e l'integrità non lo permette).
Devi eliminare prima il lato molti



title: Spiegazione termine Access

author: Aussy

text:
Qualcuno mi potrebbe spiegare (con un linguaggio umanamente comprensibile),
cos'è un "Flag" ?
Grazie a tutti.
Aussy


title: Spiegazione termine Access

author: Roberto dal portatile

text:
"Aussy" <
conz...@tin.it
> ha scritto nel messaggio
news:8kosvu$8fq$2...@nslave2.tin.it...

Come certamente sai la traduzione letterale di flag è bandiera; normalmente
si "battezza" flag un controllo di tipo SI/NO che ci segnali (appunto come
avviene con le bandiere) ad esempio se un evento è avvenuto o no, se una
certa cosa è vera o falsa ecc.
Naturalmente un "flag" è oggetto di settaggi (ON o OFF), quindi può essere
testato per conoscerne lo stato.
Roberto


title: Spiegazione termine Access

text: Conciso ed efficace, Grazie.


title: Spiegazione termine Access

author: U.S.T.I.F. di Venezia

text:
Il di' Sat, 15 Jul 2000 10:45:43 GMT, "Roberto dal portatile"
>"Aussy" <
conz...@tin.it
> ha scritto nel messaggio
>> cos'è un "Flag" ?
Flag -> bandiera
Indica la "bandierina" delle cassette postali americane (vista
l'enorme quantita' di film e telefilm americani l'avrai senz'altro
vista; oppure sulle strisce di Charlie Brown ;) ) che viene alzata
dal postino per segnalare la presenza della posta.
>Naturalmente un "flag" è oggetto di settaggi (ON o OFF), quindi può essere
>testato per conoscerne lo stato.
--
Filippo "Kirone" Zamengo
Quanto scritto deve ritenersi IMHO e indipendente dal datore di lavoro
e-mail modificata: togliere DESPAM.


title: Spiegazione termine Access

text:
 "Aussy" wrote:
Cos'è un "Flag" ?
U.S.T.I.F. di Venezia:
[Cut]
 Naturalmente un "flag" è oggetto di settaggi (ON o OFF), quindi può essere
 testato per conoscerne lo stato.
 --
 Filippo "Kirone" Zamengo
 Quanto scritto deve ritenersi IMHO e indipendente dal datore di lavoro
 e-mail modificata: togliere DESPAM.
----------------------------------------------------------------------------
------------------------
Grazie per la risposta, Aussy.


title: Doppi apici e/o apice in campo testo

author: pfm

text:
salve

in un campo testo

ho una serie di valori

Rossi
D'Amico
libro "il mio Amico D'Albenga"
Poeta "pippo

per utilizzare via codice SQL
come posso contamplare i casi in cui ho all'interno virgolette o apostrofi?

se metto chr(34) & mioCampo & chr(34)

mi da' errore

Come posso fare?


title: Doppi apici e/o apice in campo testo

text:

Spiega meglio... in che contesto devi usarlo...?
Se ad esempio scrivi in un Criterio

"TuoCampo LIKE '*" & REPLACE(Testo,"'","''") & "*'"

@Alex


title: Doppi apici e/o apice in campo testo

text:

vorrei scrivere

    strsql = "INSERT INTO Customer ( Customer, Name1, City ) _
VALUES (CHR(34) & LetterCode & CHR(34) & "," & _
CHR(34) & xyz & CHR(34) & "," & _
CHR(34) & yyy & CHR(34) & ")"


title: Doppi apici e/o apice in campo testo

text:
Hai provato come ti ho proposto io...?

@Alex


title: Doppi apici e/o apice in campo testo

text:
Il giorno giovedì 6 dicembre 2018 17:26:32 UTC+1, @Alex ha scritto:
> Hai provato come ti ho proposto io...?
>
> @Alex

ho creato

Public Function RaddoppiaApiciDoppipici(sTesto As String) As String
   RaddoppiaApiciDoppipici = Replace(sTesto, "'", "''")
   RaddoppiaApiciDoppipici = Replace(sTesto, Chr(34), Chr(34) & Chr(34))
End Function

per cui la costruzione della stringa
sSQL_web = "INSERT INTO Destination_web ( Cognome, Nome, Citta ) " & _
                          "VALUES (" & _
Chr(34) & RaddoppiaApiciDoppipici(!Cognome) & Chr(34) & "," & _
Chr(34) & RaddoppiaApiciDoppipici(!Nome) & Chr(34) & "," & _
Chr(34) & RaddoppiaApiciDoppipici(!Citta) & Chr(34) & _
                              ")"

e la stringa

viene
INSERT INTO Destination_web ( Cognome, Nome, Citta )
VALUES ("D'Almine","Via D'Angiò ""Detto Angio""","L'Aquila")

INSERT INTO Destination_web ( Cognome, Nome, Citta )
VALUES ("D'Amico","G""iovanni","Roma")


title: Doppi apici e/o apice in campo testo

text:
Come può funzionare così...?
Prova a vedere la 2° riga... prende sempre in ingresso il valore della stringa passata come parametro vanificando completamente l'esecuzione della prima riga... ma secondo me basta la prima riga perché la seconda è di troppo.

Ti suggerisco però di sfruttare la finestra immediata per debuggare il risultato prima di farlo eseguire... in modo da capire come interagiscono le modifiche che apporti.

@Alex


title: Riferimenti circolari

text:
Salve a tutti,
ho la necessità di realizzare un database che sia, in sostanza, un
archivio di agenti, con i loro dati anagrafici, riferiti per regione e
per ditta.
Devo arrivare ad avere tre maschere
1. Agenti: dove visualizzo l'anagrafica, le ditte in carico e le regioni
di riferimmento
2. Regioni: dove visualizzo per ogni regione quali agenti operano
3. Ditte: dove visualizzo, per ditta, gli agenti di riferimento.
Io pensavo di fare tre tabelle (agenti, regioni, Ditte) da collegare...
come per non violare l'integrità del database?
Grazie a chi avrà pazienza di leggere... e due grazie a chi risponderà
pure :-)
--
Guido
.        _.-----.  \.-./       . .
\`-.._,-' .-. .-.`-' ``-.  _,-'.'`.
  `-.____,-. `:. `.-'-._.O-:_ .:'.,|
            `-" `-"          `-.__.'


title: Riferimenti circolari

author: IvanDaBologna

text:
"Grisou@HP" <
ottanta...@email.it
> ha scritto nel messaggio
news:focd2o$cfk$1...@aioe.org...

in realtà và bene quello che hai pensato. Crea le tabelle distinte e legale
con relazioni adeguate (magari usa degli ID nei campi collegati per
risparmiare spazio e tempo).
Semmai le visualizzazioni dei tre scenari le ricavi da query adHoc, e le
visualizzi in maschere e sottomaschere.
Io non ho capito se hai un problema ad eseguire queste operazioni o se
cercavi un consiglio per ottimizzare ulteriormente l'approccio al disegno
del DB.
IvanDaBologna


title: Riferimenti circolari

text:
IvanDaBologna ha scritto:
> in realtà và bene quello che hai pensato. Crea le tabelle distinte e legale
> con relazioni adeguate (magari usa degli ID nei campi collegati per
> risparmiare spazio e tempo).
> Semmai le visualizzazioni dei tre scenari le ricavi da query adHoc, e le
> visualizzi in maschere e sottomaschere.
>
> Io non ho capito se hai un problema ad eseguire queste operazioni o se
> cercavi un consiglio per ottimizzare ulteriormente l'approccio al disegno
> del DB.
>
mi viene un pasticcio, perchè nel momento in cui lego agenti a
regioni... devo avere anche regioni ad agenti... e questo tende a
duplicare le immissioni di regioni e di agenti...
Lo so... è dietro l'angolo la soluzione, ma quando si va di fretta si
sbatte la testa più forte!



title: Riferimenti circolari

text:

Immagino che ad un agente corrispondano più regioni e ad una regione
possano corrispondere più agenti!
Se sì ti serve una ulteriore tabella "intermedia" fra quella tabella
Agenti e quella Regioni per poter realizzare una RELAZIONE MOLTI A
MOLTI
Nella TabellaIntermedia ci vanno le due chiavi esterne di Agenti e
Regioni
Agenti-Intermedia (relazione uno a molti)
Regione Intermedia (relazione uno a molti)
(Se poi vale lo stesso per Agenti e Ditte occorre ulteriore tabella
intermedia...)
P.S. Forse Access2007 fa tutto in "automatico"


title: Riferimenti circolari

text:
al...@libero.it
 ha scritto:
> Immagino che ad un agente corrispondano più regioni e ad una regione
> possano corrispondere più agenti!
esatto!
> Se sì ti serve una ulteriore tabella "intermedia" fra quella tabella
> Agenti e quella Regioni per poter realizzare una RELAZIONE MOLTI A
> MOLTI
> Nella TabellaIntermedia ci vanno le due chiavi esterne di Agenti e
> Regioni
> Agenti-Intermedia (relazione uno a molti)
> Regione Intermedia (relazione uno a molti)
grazie della dritta, ora studio un po' la situazione. Ehm, come la
realizzo fisicamente la tabella intermedia?
>
> P.S. Forse Access2007 fa tutto in "automatico"
provo con qualche modello?



title: Riferimenti circolari

text:
Grisou@HP ha scritto:
>> P.S. Forse Access2007 fa tutto in "automatico"
>
> provo con qualche modello?
Ops, in realtà io ho "solo" il 2003



title: Riferimenti circolari

text:

Crea nuova tabella? ;-)


title: Riferimenti circolari

text:
al...@libero.it
 ha scritto:
>
> Crea nuova tabella? ;-)
:-P non ho capito che ci metto nella nuova tabella...



title: Riferimenti circolari

text:

Due campi dello stesso tipo delle chiavi della tabella Agenti e
Regioni
Ad esempio se
1.
Id_Agenti Id_Regioni (sono le chiavi primarie delle rispettive
tabelle) sono contatori,
metti due campi
Id_Agenti_Intermedia e Id_Regioni_Intermedia numericolungo (sono le
chiavi esterne).
2.
Id_Agenti Id_Regioni sono testo,
metti due campi
Id_Agenti_Intermedia e Id_Regioni_Intermedia testo.


title: Riferimenti circolari

text:
"Grisou@HP" <
ottanta...@email.it
> ha scritto nel messaggio
news:fog0pn$dd2$1...@aioe.org...

Se capisci il concetto ti rispondi da solo.
Questa tabella deve legare MOLTI agenti con MOLTE regioni.
Conterrą (almeno) due campi: IDagente e IDregione. Se vuoi ci puoi mettere
anche un IDrelazione, ma non e' necessario. Nessuna chiave primaria. Al
massimo puoi mettere un indice composto dai due ID e impostato a Duplicati
no, per evitare di immettere doppioni di accoppiate.
Piu' difficile da spiegare che da fare ...
IvanDaBologna


title: Riferimenti circolari

text:
IvanDaBologna ha scritto:
> Se capisci il concetto ti rispondi da solo.
> Questa tabella deve legare MOLTI agenti con MOLTE regioni.
> Conterrà (almeno) due campi: IDagente e IDregione. Se vuoi ci puoi mettere
> anche un IDrelazione, ma non e' necessario. Nessuna chiave primaria. Al
> massimo puoi mettere un indice composto dai due ID e impostato a Duplicati
> no, per evitare di immettere doppioni di accoppiate.
>
> Piu' difficile da spiegare che da fare ...
Sì sì, ci sto smanettando e mi pare che stia riuscendo a farlo funzionare.
Ancora litigo con l'immissione dati però perché nella sottomaschera non
mi fa inserire dati nuovi nonostante sia abilitata l'opzione... è che
devo trovarmi quell'oretta per sistemare tutto senza altre distrazioni.
Intanto grazie a tutti per la disponibiltà.



title: controllo del testo digitato codice fiscale o p.iva

author: michele

text:
Salve a tutti
premesso che dal sitocomue ci sono gli "strumenti per verificare la bontaà
di un codice fiscalke e di una partita iva volevo sapere se è possibile
effettuare tali controlli in uin unica casella di testo e se si come?
grazie
michele
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


text:

Quesito molto generale il tuo per cui inevitabilemente così sarà mia
risposta... :-)
Comincia col prendere il primo strumento (ad esempio P.IVA) ed
applicalo al tuo caso!
Poi ovviamente il concetto è:
Se è PIVA esci dal codice
Se non è PIVA prendi secondo strumento Cfiscale e verifica di nuovo la
stringa
Se è Cfiscale esci dal codice
Se non Cfiscale (quello che ti interessa ad esempio msgbox di
avviso...)
F.


author: RobertoA

text:
Quesito molto generale il tuo per cui inevitabilemente così sarà mia
risposta... :-)
Comincia col prendere il primo strumento (ad esempio P.IVA) ed
applicalo al tuo caso!
Poi ovviamente il concetto è:
Se è PIVA esci dal codice
Se non è PIVA prendi secondo strumento Cfiscale e verifica di nuovo la
stringa
Se è Cfiscale esci dal codice
Se non Cfiscale (quello che ti interessa ad esempio msgbox di
avviso...)
---------------------------------------------------------
Non e' che sapete dove reperire delle liste consistenti di partite iva /
codici fiscali per testare il corretto funzionamento della routine ?
Dico questo perche' qualche anno fa, quando sviluppai questo controllo, le
associazioni no profit non venivano riconosciute (quelle che hanno partita
iva che inizia col 9 per capirci), poi e' toccata la volta delle ditte che
hanno codice fiscale diverso dalla partita iva ma con sintassi simile a
quest'ultima
Poi e' venuta la volta dell'ufficio iva che non esisteva (nella p.iva una
parte e' il codice ufficio iva e non sono contigui)
Insomma, avere una lista bella grossa da passare in pasto alla routine per
testarne il codice sarebbe un collaudo non esaustivo ma almeno qualcosa in
piu' rispetto alle tre prove a mano per vedere se tutto funziona
Ciao
RobertoA


title: Larghezza elenco di casella combinata

author: robb

text:
Salve,
oggi sto postando a rotta di collo :) Il motivo è che sto dando gli
ultimi ritocchi al database.
Passiamo alla domanda.
Ho una casella combinata nel cui elenco vengono visualizzate due
colonne: NomeCliente e ViaCliente (l'ho fatto in caso di clienti
omonimi).
Mi chiedevo se fosse possibile, in qualsiasi modo, che la larghezza
delle due colonne, e quindi dell'elenco, si espanda o si riduca a
seconda della lunghezza del testo contenuto.
Spero di essermi spiegato bene.
Ciao e grazie.


title: Larghezza elenco di casella combinata

text:
robb ha scritto:

argomento ampiamente discusso su
www.alessandrobaraldi.it
Resize List/Combo_Box


title: Larghezza elenco di casella combinata

text:

Ti ringrazio della risposta. Io, in realtà, avrei voluto che solamente
la larghezza dell'elenco si dimensionasse automaticamente e non tutta
la combo.
E' possibile?


title: Larghezza elenco di casella combinata

text:
è possibile farlo cambiando la function resizecontrol con il seguente
codicd:
Public Function ResizeControl(ctl As Control, _
                               Optional blHeight As Boolean = True, _
                               Optional blWidth As Boolean = True, _
                               Optional maxWidth As Long = 35000, _
                               Optional blFirstColHidden As Boolean =
False)
   'blHeight indica se il Controllo deve essere Ridimensionato in
Altezza
   'blWidth indica se il Controllo deve essere Ridimensionato in
Larghezza
   Dim TwipsPerPixel As POINTAPI
   Dim lngMax() As Long
   Dim lngWidth As Long
   Dim strFont As String
   Dim intWeight As Integer
   Dim fItalic As Boolean
   Dim fUnderline As Boolean
   Dim lngHeight As Long
   Dim intSize As Integer
   Dim strText As String
   Dim intI As Integer
   Dim intCol As Integer
   Dim Scroll As Long
   Dim Sz As ControlSize
   Dim strWidth As String
   Dim blHead As Integer
   Dim strWidth1 As Double
   With ctl
       intSize = .fontsize
       strFont = .FontName
       intWeight = .FontWeight
       fItalic = .FontItalic
       fUnderline = .FontUnderline
       blHead = .ColumnHeads
   End With
   ' Cicla i valori del Controllo, e
   ' memorizza la larghezza(lngMax) del piu lungo.
   ' Non è detto che il valore con più caratteri
   ' sia il più lungo:
   ' Es.:
   ' OOOOO è più lungo di
   ' 11111 nonostante Len(..)=5
   ' Queste proporzioni dipendono anche dal
   ' tipo di Font e dalla Formattazione applicata.
   ' E' necessario, quindi ricavare il numero di Twips
   ' o Pixel che occupa la Scritta e confrontare questo
   ' valore.
   Call TwipsPixel
   ReDim lngMax(ctl.ColumnCount)
   For intI = 0 To ctl.ListCount + CInt(Not blHead)
      For intCol = 0 To ctl.ColumnCount - 1
         If intCol = 0 And blFirstColHidden Then
            lngMax(intCol) = 0
         Else
            strText = Nz(ctl.Column(intCol, intI), vbNullString)
            If TwipsFromFont(strFont, intSize, _
             intWeight, fItalic, fUnderline, 0, strText, _
             False, lngWidth, lngHeight) Then
                If lngWidth > lngMax(intCol) Then
                    lngMax(intCol) = lngWidth
                End If
            End If
         End If
      Next intCol
   Next intI
   ' Calcola la larghezza della SCROLL_BAR
   ' ricavandone le dimensioni utilizzando
   ' le API(GetSystemMetrics).
   ' Somma una % della Larghezza in quanto aumentando
   ' il FONT si introducono errori percentuali VISIBILI.
   ' Convert it to twips for use in Access.
   TwipsPerPixel.x = TwipsPerInch / lngLogPixels.x
   Scroll = GetSystemMetrics(SM_CXVSCROLL) * TwipsPerPixel.x
   For intCol = 0 To ctl.ColumnCount - 1
      If intCol = 0 And blFirstColHidden Then
         Sz.XMax = 0
         'strWidth = strWidth & "0;"
         strWidth1 = strWidth1
      Else
         If CInt(lngMax(intCol)) > 0 Then
            Sz.XMax = CInt(Sz.XMax + lngMax(intCol) + 100)
            'strWidth = strWidth & CInt(lngMax(intCol) + 100) & ";"
            strWidth1 = strWidth1 + CInt(lngMax(intCol) + 100)
         End If
      End If
   Next
   'strWidth = strWidth & "0"
         strWidth1 = strWidth1
   Sz.XMax = Sz.XMax + AdjustForScreen
   If Sz.XMax > maxWidth Then Sz.XMax = maxWidth
   Sz.YMax = ctl.ListCount * lngHeight * 1.02 + AdjustForScreen
   Sz.YMin = lngHeight '+ AdjustForScreen
   'Il RESIZE Verticale avviene in modo differente su LIST e COMBO
   'LIST:
   '     Aggiorna la proprietà Height=ListCount*AltezzaCarattere
   'COMBO:
   '     Aggiorna la Proprietà Height=AltezzaCarattere
   If TypeOf ctl Is ListBox Then
      If blHeight Then ctl.Height = Sz.YMax
      If blWidth Then
         If ctl.ListCount * lngHeight < (ctl.Height) Then Scroll = 0
         'ctl.Width = Sz.XMax + Scroll
      End If
   ElseIf TypeOf ctl Is ComboBox Then
      If blHeight Then ctl.Height = Sz.YMin
      'If blWidth Then ctl.Width = Sz.XMax + Scroll
      'ctl.ListWidth = Sz.XMax + Scroll
   End If
   [Forms]![es_resize_list]![combo2].ListWidth = strWidth1
End Function


title: Larghezza elenco di casella combinata

text:

Ti ringrazio molto per l'aiuto.
Non mi sono chiare alcune cose.
1- Ho scaricato il file dal sito di Alessandro Baraldi. Devo copiare
tutti e quattro i moduli nel mio db o mi basta solo il modulo
basResizeControl modificato come da te suggerito?
2- E' necessario creare una sottomaschera, come nel file del sito?
3- Come mai alla fine del codice che mi hai postato ci sono le
coordinate della combo2 presente nel file del sito? Ciò vuol dire che
il modulo può essere applicato ad una sola combo?
4- Ultima, ma non per importanza. Su quale evento della combo devo
richiamare il modulo?
Grazie.


title: Larghezza elenco di casella combinata

text:
robb wrote:
[CUT]
> Ti ringrazio molto per l'aiuto.
> Non mi sono chiare alcune cose.
> 1- Ho scaricato il file dal sito di Alessandro Baraldi. Devo copiare
> tutti e quattro i moduli nel mio db o mi basta solo il modulo
> basResizeControl modificato come da te suggerito?
> 2- E' necessario creare una sottomaschera, come nel file del sito?
> 3- Come mai alla fine del codice che mi hai postato ci sono le
> coordinate della combo2 presente nel file del sito? Ciò vuol dire che
> il modulo può essere applicato ad una sola combo?
> 4- Ultima, ma non per importanza. Su quale evento della combo devo
> richiamare il modulo?
>
> Grazie.
Ho provato a sostituire il codice che mi hai scritto direttamente nel
file del sito e l'elenco non sembra ridimensionarsi come dovrebbe.
Qualche lettera risulta tagliata.


title: Larghezza elenco di casella combinata

text:

Con il codice che mi hai postato, l'elenco in effetti si ridimensiona
in maniera corretta, ma sono le colonne che sono un po' sbalestrate.


title: Larghezza elenco di casella combinata

text:
robb wrote:
[CUT]
Lascia perdere tutti i messaggi precedenti. :)
Ho importato solo il modulo basResizeControl nel mio DB. Ho modificato
parte del codice con il codice che mi hai postato. Alla fine del codice
ho sostituito le coordinate di Combo2 con quelle della mia Combo.
Nell'evento "Su apertura" della maschera ho scritto:
ResizeControl Me.Combo_Cliente, True, True, , True
L'ultimo True, mi pare di aver capito, va inserito se la prima colonna
è una colonna nascosta.
Ho impostato "Larghezza elenco" della Combo su "Automatica".
In "Larghezza colonne" ho scritto "0 cm", altrimenti, nonostante
l'ultimo True, la prima colonna, che dovrebbe stare nascosta, viene
visualizzata.
Le colonne, quindi, sono 3. La prima, che è un Contatore, è nascosta.
Le altre due devono essere visualizzate.
Mi rimane un problema.
Premetto che le dimensioni, con il tuo codice, rimangono sempre uguali.
Il problema è costituito dalle due colonne visualizzate, che vengono
divise in parti esattamente uguali, a prescindere dalla lunghezza del
testo in esse contenuto.
Se il testo diventa più lungo, anche la larghezza dell'elenco cresce,
ma le colonne restano sbalestrate e sempre divise in due parti uguali.
Quale può essere il problema?


title: Larghezza elenco di casella combinata

text:

La frase "Premetto che le dimensioni, con il tuo codice, rimangono
sempre uguali." è riferita alle dimensioni della Combo e non
dell'elenco. Quelle dell'elenco cambiano, come specificato più avanti.


title: Larghezza elenco di casella combinata

text:
robb ha scritto:

Non saprei come fare, dovresti chiedere a Baraldi, il fautore del db.


title: Larghezza elenco di casella combinata

text:
BR1 wrote:
[CUT]
> Non saprei come fare, dovresti chiedere a Baraldi, il fautore del db.
Mannaggia! Ci eravamo quasi.
Come faccio a chiedere a Baraldi? Ho letto nella netiquette del ng che
non sono ben accetti i messaggi nel cui titolo si mette il nome di una
persona specifica.
Dovrei postare un nuovo messaggio nella speranza che lo legga.


title: Larghezza elenco di casella combinata

text:

Ti sta leggendo, se vuole risponde
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Larghezza elenco di casella combinata

author: Alessandro Baraldi

text:
robb ha scritto:

Non ho ben capito il problema sarà il caldo, ti spiacerebbe inviarmi
un Demo molto stringato per capire meglio...!
Più o meno dovrebbe essere questione di impostare il ColumnWidths, ma
dovrei
essere sicuro di quanto ho capito, per questo meglio il Demo.
i k 2 z o k @l i b e r o . i t
Togli gli interspazi.
@Alex


title: Larghezza elenco di casella combinata

text:
Alessandro Baraldi ha scritto:
[CUT]
Pubblico la modifica della Routine sperando di aver capito il problema:
' Da chiamare così:
  ResizeControl Me.Combo_Cliente, True, False, , True


      ctl.ColumnWidths = strWidth
      ctl.ColumnWidth = strWidth1
      If blWidth Then ctl.Width = Sz.XMax + Scroll
      ctl.ListWidth = Sz.XMax + Scroll
   End If
   [Forms]![M_Fattura]![Combo_Cliente].ListWidth = strWidth1

End Function
Ciao
@Alex


title: Larghezza elenco di casella combinata

text:
Alessandro Baraldi ha scritto:
[CUT]
L'ultima riga, questa per capirci:
>    [Forms]![M_Fattura]![Combo_Cliente].ListWidth = strWidth1
può, deve, essere rimossa, riduce la flessibilità del codice,
eventualmente
avrebbe dovuto essere
ctl.ListWidth=strWidth1
ma non serve in questo contesto.
Ciao
@Alex


title: Convertire formato immagine

author: Patrick De Angelis

text:
Salve, avrei la necessità, dato un oggetto "Command", di convertire
l'immagine incorporata da formato "ICO" a formato "JPG". Infatti creando un
file basandomi sulla proprietà PictureData del tasto, mi crea un file in
formato ".ICO", mentre a me servirebbe "JPG".
Come posso farlo?
Grazie! :-)
Patrick


title: Convertire formato immagine

author: Carlo Costarella

text:
"Patrick De Angelis" <
patr...@vodafone.it
> ha scritto nel messaggio
news:jccCh.11828$aF5....@tornado.fastwebnet.it...

Il formato jpg non è supportato per le immagini sui pulsanti.
Sui pulsanti puoi usare i file .ico, .bmp e .gif.
Tieni presente che il formato .ico è in realtà una bitmap e che se rinomini
il file ico in bmp otterrai comunque una bitmap.
Altra soluzione è quella di salvare l'immagine ico come bmp e convertire
quest'ultima in jpg. Si è parlato di questo in questo NG.
E' chiaro che non potrai usare il file jpg come immagine del pulsante.
Ciao, Carlo


title: Re: una query collegata a una query che non funziona...

author: BFS

text:
Il 20/10/2014 15:17, ignazio.pilone ha scritto:

> Purtroppo come collego pluto a pippo access non va piu avanti

cosa vuol dire?
si impalla?
è lentissima?
crasha?

BFS


text:
Ciao BFS, alla fine sono riuscito da solo trasformando le query in query di creazione tabella.
Aluce di questo ho cancellato il post, a cui tu, velocissimo, sei riuscito a rispondere.
grazie mille,ciao.

>
> è lentissima?
>
> crasha?
>
>
>
> BFS


title: Aiutante per programma in Access

author: emanuela

text:
Ho bisogno di un volenteroso possibilmente della provincia di MC o AN
disposto ad aiutarmi a concludere la realizzazione di un programma
gestionale in Access. Urgente per favore rispondetemi
Emanuela
--------------------------------
Inviato via
http://usenet.libero.it


title: Aiutante per programma in Access

author: onafets

text:
volentereso lo sono ma sono di firenze
possiamo sempre provare per email


title: Aiutante per programma in Access

author: Emanuela

text:
Sarebbe bello provare anche se sei lontano ma la scadenza è fine mese e non
credo che via internet riusciremmo a fare molto (è un lavoro un po'
incasinato).



title: Aiutante per programma in Access

author: yQy

text:
On Mon, 17 Mar 2003 13:42:24 GMT,
ema...@tiscali.it
 (emanuela) wrote:
>Ho bisogno di un volenteroso possibilmente della provincia di MC o AN
>disposto ad aiutarmi a concludere la realizzazione di un programma
>gestionale in Access. Urgente per favore rispondetemi
penso sia difficile trovare gente "volenterosa" che si sposti
"gratuitamente" per aiutarti a guadagnare soldi :))
quanto paghi? :)
Poi ci vieni a cena con me? :))
Fabrizio


title: Aiutante per programma in Access

text:
"yQy" <fabrizi...@SESPAMMITISTRONCOtin.it> ha scritto nel messaggio
news:3e763298...@news.tin.it...

Ragazzaccio.......


title: Aiutante per programma in Access

text:
On Tue, 18 Mar 2003 22:52:51 GMT, "onafets" <
hugesQ...@email.it
>
wrote:
>> Poi ci vieni a cena con me? :))
>>
>> Fabrizio
>
>
>Ragazzaccio.......
>
pazza ke non sei altro :)))))))))


title: CERCA su Sitocomune

author: Roberto (non quello bravo)

text:
Dmanda: come si fa a cercare qualcosa su sitocomune?
Domanda sciocchina? Mica tanto: con il pulsante ricerca non trovo
sistematicamente nulla.
Java è regolarmente installato e non ottengo messaggi o risposte
d'errore.
Se voglio qualcosa sono costretto a scorrere tutte le FAQ una per una.
Ovviamente c'è qualcosa che non, natuarlmente sul mio PC o sulla
configurazione di internet.
Qualche suggerimentoi?
Grazie!


title: CERCA su Sitocomune

author: Roberto da casa

text:
"Roberto (non quello bravo)" <
ut...@katamail.com
> ha scritto nel messaggio
news:1130421288....@g49g2000cwa.googlegroups.com...
>Dmanda: come si fa a cercare qualcosa su sitocomune?
>
>Domanda sciocchina? Mica tanto: con il pulsante ricerca non trovo
>sistematicamente nulla.
>Java č regolarmente installato e non ottengo messaggi o risposte
>d'errore.
>Se voglio qualcosa sono costretto a scorrere tutte le FAQ una per una.
>
>Ovviamente c'č qualcosa che non, natuarlmente sul mio PC o sulla
>configurazione di internet.
Se come mi sembra di capire hai disabilitato il compilatore Java JIT come
indicato nella pagina Cerca del Sito Comune, c'č ben poco da aggiungere:
devi scegliere con la casella combinata come usare le parole chiave nella
ricerca e poi digitare la parole chiave nella casella di testo posta sopra
al pulsnte Cerca.
Il limite vero di quel motore di ricerca č che č necessario digitare le
parole chiave per intero, ovvero se cerchi Giuseppe non puoi digitare
solamente Giuse ma devi digitare proprio Giuseppe per intiero.
>
>Qualche suggerimentoi?
Nulla da aggiungera a ciň che ho scritto qui sopra.
>Grazie!
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: La costruzione di una query non funziona su OpenRecordset.

author: Riccardo Baldinotti

text:
In A2010 ho una maschera la cui origine dati è la query qIspezioni1.
Su doppio click nella casella attiva voglio prendere i dati del record
corrispondente, e nel codice ho scritto:
Set RST = CurrentDb.OpenRecordset("SELECT * FROM qIspezioni1
WHERE Idope=" & Forms!mElencoXisp!figlio14.Form!Testo0 &
" AND [id unit org]=" & Forms!mElencoXisp!figlio14.Form!Testo33 &
" AND anno=" & Forms!mElencoXisp!figlio14.Form!Testo21 & ";")
(ho aggiunto degli acapo per leggibilità)
Mi esce "Errore di run-time '3061':
Parametri insufficienti. Previsto 7."
Se però metto la stringa risultante in una casella di testo per
copiarla e con essa creare una query, ottengo il risultato giusto.
La stringa viene fuori così:
SELECT * FROM qIspezioni1 WHERE Idope=3966 AND [id unit org]=190238
AND anno=2010;
Ho l'impressione di perdermi in una banalità ma non ne vengo fuori.
Qualcuno ha suggerimenti?
Grazie a tutti.
Riccardo Baldinotti


author: Geppo

text:
Ciao "Riccardo Baldinotti" <
bari...@gmail.com
> ha scritto nel messaggio
news:d6cb04b5-73c5-4085-aa0b->198d99...@d18g2000yql.googlegroups.com...

controlla bene i nomi dei campi e della tabella, controlla che i dati nel
criterio vengano passati nel modo corretto, ad esempio tieni presente che il
tipo testo deve essere racchiuso tra le apici.

Grazie a tutti.
Riccardo Baldinotti

--
Ciao
Geppo


author: Karl Donaubauer

text:

> ...

"qIspezioni1" è una query?
Se sì, controlla se nei criteri o altre espressioni di qIspezioni1
hai riferimenti a maschere e leggi questo articolo:

Parametri insufficienti
http://www.donkarl.com/it?FAQ6.4

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


text:
On 29 Set, 18:16, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:
> Riccardo Baldinotti wrote:
> > In A2010 ho una maschera la cui origine dati la query qIspezioni1.
> > Su doppio click nella casella attiva voglio prendere i dati del record
> > corrispondente, e nel codice ho scritto:
> > Set RST = CurrentDb.OpenRecordset("SELECT * FROM qIspezioni1
> > WHERE Idope=" & Forms!mElencoXisp!figlio14.Form!Testo0 &
> > " AND [id unit org]=" & Forms!mElencoXisp!figlio14.Form!Testo33 &
> > " AND anno=" & Forms!mElencoXisp!figlio14.Form!Testo21 & ";")
> > (ho aggiunto degli acapo per leggibilit )
> > Mi esce "Errore di run-time '3061':
> > Parametri insufficienti. Previsto 7."
> > Se per metto la stringa risultante in una casella di testo per
> > copiarla e con essa creare una query, ottengo il risultato giusto.
> > La stringa viene fuori cos :
> > SELECT * FROM qIspezioni1 WHERE Idope=3966 AND [id unit org]=190238
> > AND anno=2010;
> > Ho l'impressione di perdermi in una banalit ma non ne vengo fuori.
> > ...
>
> "qIspezioni1" una query?
> Se s , controlla se nei criteri o altre espressioni di qIspezioni1
> hai riferimenti a maschere e leggi questo articolo:
>
> Parametri insufficientihttp://
www.donkarl.com/it?FAQ6.4
>
> --
> Ciao
> Karl
Il Grande colpisce ancora! Ebbene sì, la query faceva riferimento a
una maschera.
Ho risolto sostituendo, al nome di query, le SELECT opportune, tanto
quei riferimenti nel caso specifico non mi servivano.
Grazie, e grazie anche a Geppo: controllare i nomi è sempre buona
cosa.
Riccardo Baldinotti


title: Query particolare

author: Giovanni Di Maria

text:
Ciao a tutti.
Potrei ricevere cortesemente un suggerimento.
Vorrei creare una Query.
Ho questa tabella:

Name	Nation visited
----------------------------------
Mike Italy
Dennis Romania
Mike Polan
Dennis Italy
Jonathan Spain
Mike Germany
Dennis France
Mike Swiss
Jonathan Australia
Jonathan Belgium
Dennis Portugal
Jonathan Sweden
Jonathan Belarus
Dennis Camerun
Mike Bulgaria
Mike Canada
Jonathan Peru
Jonathan Colombia

Vorrei ottenere questa interrogazione:

Name, Number Of Nations, Nations
------------------------------------------
Mike 6        "Italy, Polan, Germany, Swiss, Bulgaria, Canada"
Dennis 5      "Romania, Italy, France, Portugal, Camerun"
Jonathan 7    "Spain, Australia, Belgium, Sweden, Belarus, Peru, Colombia"

Qui c'e' la foto piu' esplicativa:
http://www.elektrosoft.it/hd/stati.png

Che strada potrei seguire?
Vi ringrazio anticipatamente.
Ciao a tutti.
Giovanni


title: Query particolare

text:
Salve,

Giovanni Di Maria:
> ...

> ...

http://www.allenbrowne.com/func-concat.html

--
Ciao
Karl
*********
http://www.AccessDevCon.com

Access FAQ:
http://www.donkarl.com/it


title: Query particolare

text:
Thank you very MUCH!!!!
Giovanni



title: Filtrare query senza filtro ma con variabili di una selezione multipla

text:
Salve a tutti.
Ho un problema da risolvere per fare un piccolo motore di ricerca che potrei risolvere con un filtro di una query.
In verità non sono in grado di scrivere il codice per costruire un filtro complesso e quindi per rendere "modulare" e di facile modificabilità la query, la maschera e i report, voglio evitare di scrivere la sql con righe di codice in VBA creando delle query parametriche basate unicamente su caselle di testo, selezioni multiple, ecc di una form.
Per semplificare diciamo che ho un Db con 2 tabelle.
Tabella "iscritti" composta come segue:
IDiscritti 	codice
1	PA
2	MM05
ecc	ecc
Tabella "Tab015" composta come segue:
codice		Desc_codice
PA		PAGAMENTO
MM05		Abbonamento MM05
ecc		ecc
La form "RICERCA" ha una casella di riepilogo con una selezione multipla chiamata "codice1" (in verità ne avrà tante di caselle) che prende i dati da "Tab015".
Con il seguente codice (ne scrivo solo una parte per fare capire) la casella "codice1" riempie una casella di testo chiamata "codice" facendo una stringa che come risultato finale avrà come valori (a seconda dei dati che seleziono) "PA, MM05, ecc".
Private Sub codice1_Click()
    For Each varItem In Me!codice1.ItemsSelected
       Me!codice = Me!codice & Me!codice1.Column(0, varItem) & ", "
    Next varItem
End Sub
La form richiama con un bottone il report "ELENCO" i cui dati sono basati sulla query "00_RICERCA"
La query "00_RICERCA" è composta come segue:
SELECT iscritti.codice, iscritti.* FROM iscritti
WHERE ((iscritti.codice) In ([forms]![RICERCA]![codice]))
Ora: se nella maschera la casella "codice" ha 1 valore solo (es: MM05) la  query "00_RICERCA" funziona filtrando i dati correttamente.
Però se la casella codice ha più di 1 valore (es: PA, MM05)  la  query "00_RICERCA" non funziona.
Inserendo a mano i valori  PA, MM05 la query funziona perfettamente (la condizione diventa: WHERE ((iscritti.codice) In ([PA, MM05)).
Ho provato a inserire tutti gli apici possibili e immaginabili facendo in modo che la casella di testo "codice" avesse i seguenti valori:
"PA", "MM05"
oppure
'PA', 'MM05'
Tuttavia il risultato è sempre lo stesso: funziona con un valore solo (con o senza apici)
Penso che il problema stia nel fatto che non riesco a "formattare" le condizioni separate da una virgola come stringhe singole mentre la query mi legge la casella "codice" come un unica stringa: un po' come se la stringa finale della condizione fosse "PA, MM05, ecc" e non "PA", "MM05", "ecc".
C'è un modo per "formattare" le stringhe in modo corretto senza usare VBA (o usandolo solo in minima parte)?
grazie per la pazienza a chiunque mi può dare una mano.
--
km5000
------------------------------------------------------------------------
View this thread:
http://www.itsistemi.net/viewtopic-775476.html
Inviato via
http://www.itsistemi.net


author: ces

text:
il post è kilometrico e da quello che penso di aver capito ti conviene
usare una query passandogli i parametri interessati piuttosto che un
filtro (che a mio modestissimo parere è più difficile da controllare)
per passare i valori all'sql puoi usare la sintassi
select campo as tabella prova where id=2 or id=3 or id=4
devi solo costruirti la parte where da passare all'sql a seconda di cosa
selezioni per l'estrazione
per far questo il metodo migliore è quello di fare una function pubblica e
di richiamarla nell'sql
non so la tua capacità (non voglio offendere nessuno ovviamente) perfar
questo ma io che non sono gran che sono riuscito a farla (quindi penso che
anche tu ce la possa fare)
ciao e buon lavoro
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
Per facilitare l'aiuto posto il db da scaricare qui di seguito
DB_PROVA.mdb (
http://www.amcli.it/DB_PROVA.mdb
)
grazie



text:
Ti ringrazio per l'interessamento.
Se al limite vuoi dare un occhiata perdendo del tuo tempo prezioso, ho inserito il Db da scaricare nel post precedente.
In effetti sto facendo come mi hai suggerito con dei checkbox che attivano di relativi valori da passare alla query anche se il tempo di costruzione è immenso rispetto il metodo delle selezioni multiple con una condizione per ciascuna selezione multipla.
Inoltre passando dei valori precisi come mi indichi tu (id=1) nella query dovrei impostare Nz([forms]![RICERCA]![codice_01],"*") per elencare tutti i valori in caso la variabile codice_01 fosse nulla.
Questo va bene finche c'è una sola variabile. Quando sono più di una nella maschera, dovrei impostare l'OR come segue per ottenere (id=1 OR id=2):
Nz([forms]![RICERCA]![codice_01],"*") OR Nz([forms]![RICERCA]![codice_02],"*") .
Ma questa condizione è assurda e inutile perchè basta una variabile nulla per elencare tutti i valori.



author: Sergio MAZZA

text:
"km5000" <
km5000...@no-mx.itsistemi.net
> ha scritto nel messaggio
news:km5000...@no-mx.itsistemi.net...
>
> Per facilitare l'aiuto posto il db da scaricare qui di seguito
> DB_PROVA.mdb (
http://www.amcli.it/DB_PROVA.mdb
)
>
>
> grazie
>
>
> --
> km5000
Devi togliere il criterio nella query e aprire il report passandogli
l'elenco dei valori tramite il parametro CondizioneWhere del metodo
OpenReport (vedi help).
Quindi Nella:
Private Sub codice1_Click()
togli il commento alla riga:
Me!codice = Me!codice & "'" & Me!codice1.Column(0, varItem) & "', "
le altre le puoi eliminare.
Nella:
Private Sub Comando14_Click()
inserisci la CondizioneWhere:
DoCmd.OpenReport stDocName, acPreview, , "[codice] In (" & Me!codice & ")"
Ciao.
--
Sergio MAZZA


text:
Grazie per l'interessamento.
Sto provando a fare come mi suggerisci però,  scusami la mia incapacità, non capisco cosa intendi per "togli il commento alla riga:"
Inserendo le righe che mi hai postato non appena clicco su una voce della casella codice parte il Debug indicando un errore di sintassi su:
Me!codice = Me!codice & “ '“ & Me!codice1.Column(0‚ varItem) & “'‚ “
In effetti l'editor VB mi lascia in verde come "commento" tutta la parte dopo l'apice: “ & Me!codice1.Column(0‚ varItem) & “'‚ “
Il debug analizza come errore:
DoCmd.OpenReport stDocName‚ acPreview‚ ‚ “[codice] In (” & Me!codice & “)"
Anche senza far partire la maschera ,l'editor VB mi lascia in rosso tutta la stringa    DoCmd.OpenReport stDocName‚ acPreview‚ ‚ “[codice] In (” & Me!codice & “)"



text:
"km5000" <
km5000...@no-mx.itsistemi.net
> ha scritto nel messaggio news:km5000...@no-mx.itsistemi.net...
>
> Grazie per l'interessamento.
>
> Sto provando a fare come mi suggerisci però,  scusami la mia incapacità, non capisco cosa intendi per "togli il commento alla
> riga:"
Le righe verdi sono dei commenti e hanno l'apostrofo come primo carattere. Ma non l'hai scritto tu il codice?
> Inserendo le righe che mi hai postato non appena clicco su una voce della casella codice parte il Debug indicando un errore di
> sintassi su:
> Me!codice = Me!codice & “ '“ & Me!codice1.Column(0‚ varItem) & “'‚ “
Se scrivi messaggi in html sarà dura riuscire a capirci.
> In effetti l'editor VB mi lascia in verde come "commento" tutta la parte dopo l'apice: “ & Me!codice1.Column(0‚
> varItem) & “'‚ “
> Il debug analizza come errore:
> DoCmd.OpenReport stDocName‚ acPreview‚ ‚ “[codice] In (” & Me!codice & “)"
> Anche senza far partire la maschera ,l'editor VB mi lascia in rosso tutta la stringa    DoCmd.OpenReport stDocName‚
> acPreview‚ ‚ “[codice] In (” & Me!codice & “)"
>
>
> --
> km5000
Praticamente deve rimanere solo la riga che ti ho segnalato, le altre le puoi cancellare o commentarle (inserire come primo
carattere l'apice)...
Ciao.
--
Sergio MAZZA


text:
"km5000" <
km5000...@no-mx.itsistemi.net
> ha scritto nel messaggio
news:km5000...@no-mx.itsistemi.net...
>
>
> Grazie per l'interessamento.
>
> Sto provando a fare come mi suggerisci però,  scusami la mia incapacità,
> non capisco cosa intendi per "togli il commento alla riga:"
>
> Inserendo le righe che mi hai postato non appena clicco su una voce della
> casella codice parte il Debug indicando un errore di sintassi su:
> Me!codice = Me!codice & “ '“ & Me!codice1.Column(0‚
> varItem) & “'‚ “
> In effetti l'editor VB mi lascia in verde come "commento" tutta la parte
> dopo l'apice: “ & Me!codice1.Column(0‚ varItem) &
> “'‚ “
> Il debug analizza come errore:
> DoCmd.OpenReport stDocName‚ acPreview‚ ‚ “[codice]
> In (” & Me!codice & “)"
> Anche senza far partire la maschera ,l'editor VB mi lascia in rosso tutta
> la stringa    DoCmd.OpenReport stDocName‚ acPreview‚ ‚
> “[codice] In (” & Me!codice & “)"
>
>
> --
Sembra mancare qualche virgoletta...doppio apice....ecc.
Il tuo db non si apre!.
Ciao, Carlo


text:
Per Carlo
Il tuo db non si apre!.
E' un Db Access 2000 zippato.
Non si apre con lo Zip o il Rar o non si apre il DB?
Per Sergio MAZZA
Modificando con i giusti apici le righe che mi hai passato, FUNZIONA!
Se scrivi messaggi in html sarà dura riuscire a capirci.
quando hai ragione hai ragione.
Praticamente deve rimanere solo la riga che ti ho segnalato, le altre le puoi cancellare o commentarle
Se rimane solo la riga segnalata non mi elimina le voci che deseleziono dalla lista multipla.
Inserendo la tua riga nel codice funziona perfettamente.
Posso dire di essere a 1/3° dell'opera.
Ora però ho altri 2 problemi:
1)
Quando non seleziono una delle voci dalla lista "codice", mi da ovviamente questo errore: operatore mancante nell'espressione " [codice] In ()"
Come faccio a far caricare tutti i dati se NON seleziono voci dalla lista multipla chiamata "codice"?
Ho provato con la seguente riga:
DoCmd.OpenReport stDocName, acPreview, , IIf(IsNull([Forms]![RICERCA]![codice]), [codice], "[codice] In (" & Me!codice & ")")
oppure con questa
DoCmd.OpenReport stDocName, acPreview, , Nz("[codice] In (" & Me!codice & ")", "*")
ma gli argomenti dell' "Iff" (espressione e parte vera) sono sbagliati.
Quali alrgomenti posso inserire correttamente per visualizzare tutti i record se non seleziono nulla dalla lista multipla?
2)
Ho aperto un'altro thread con questo titolo "Baco di query su tabelle che richiamano un valore di un campo = Null".
Sto cercando una soluzione basandomi sulla risposta di un'utente.
Potreste dare un'occhiata? perchè altrimenti tutto lo sforzo che sto (ops: state) facendo risulta inutile
grazie



text:
"km5000" <
km5000...@no-mx.itsistemi.net
> ha scritto nel messaggio
news:km5000...@no-mx.itsistemi.net...
>
> Modificando con i giusti apici le righe che mi hai passato, FUNZIONA!
>

Rispondo solo al punto 1) che è quello che stiamo trattando qui.
Non c'è bisogno di complicarsi la vita con IIF, puoi fare un semplice IF.
es.
'----
dim strCondizione as string
If isnull(me!codice) then
    strCondizione = ""
else
    strCondizione = "[codice] In (" & Me!codice & ")"
end if
DoCmd.OpenReport "...",,,strCondizione
'----
Ciao.
--
Sergio MAZZA


text:
Seguendo le tue indicazioni ho provato ad inserire una condizione con più di un parametro ma non riesco a farlo funzionare
es:
"[codice] In (" & Me!codice & ") AND [parametro1] like *" & Me!parametro1& "*"
Posso chiederti se la condizione da passare al report può contenere 10 o 20 parametri?



text:
"km5000" <
km5000...@no-mx.itsistemi.net
> ha scritto nel messaggio
news:km5000...@no-mx.itsistemi.net...
>
> Seguendo le tue indicazioni ho provato ad inserire una condizione con più
> di un parametro ma non riesco a farlo funzionare
> es:
> "[codice] In (" & Me!codice & ") AND [parametro1] like *" & Me!parametro1&
> "*"
>
> Posso chiederti se la condizione da passare al report può contenere 10 o
> 20 parametri?
>
>
> --
> km5000
Non è un problema di numero di parametri; hai scritto male la stringa,
verifica la sintassi dei comandi SQL.
I valori testo devono essere delimitati da apici o doppie virgolette, se
vuoi utilizzare anche i caratteri jolly (es. *) devi comunque inserirli tra
i caratteri che delimitano il valore testo;
es.
"[codice] In (" & Me!codice & ") AND [parametro1] like '*" & Me!parametro1 &
"*'"
Devi studiarti il linguaggio SQL e come scrivere le condizioni where...
Ciao.
--
Sergio MAZZA


text:
Ricevuto.
Infiniti RINGRAZIAMENTI per i vostro prezioso supporto.



title: Valori duplicati

author: Raffaele D.

text:
Qualcuno saprebbe dirmi come fare a personalizzare un messaggio di errore in
una maschera quando si cerca di duplicare i valori in un indice ed
intercettare quindi il messaggio d'errore di default di Access 2000.
Un grazie anticipato a tutti!


title: Valori duplicati

text:
Raffaele D. <
rad...@libero.it
> ha scritto:
> Qualcuno saprebbe dirmi come fare a personalizzare un messaggio di errore in
> una maschera quando si cerca di duplicare i valori in un indice ed
> intercettare quindi il messaggio d'errore di default di Access 2000.
Nel evento On Error della maschera:
If DataErr = 3022 Then
    Response = acDataErrContinue
    MsgBox Me!a & " già esiste.", vbOKOnly, "Duplicato vietato!"
End If
--
HTH
Karl
*********
Scusate il mio malissimo italiano. Faccio solo esercizi qui.
Access-FAQ (tedesco):
http://www.donkarl.com


title: Valori duplicati

text:
qualcuno che non conosco ha scritto:
>     MsgBox Me!a & " già esiste.", vbOKOnly, "Duplicato vietato!"
vuol dire
MsgBox Me!NomeCampo & " già esiste.", vbOKOnly, "Duplicato vietato!"
Karl


title: Valori duplicati

text:
Grazie Karl sei stato gentilissimo.
Ciao Raffaele


title: Valori duplicati

author: Volto

text:
Ho una tabella con due campi A e B i quali contengono i seguenti valori;
A        B
1         2
3         4
2         1
4         3
come posso creare una query che mi elenchi come duplicati i valori 1-2 e 2-1
(3-4 e 4-3)?
Con una normale query di ricerca duplicati ovviamente non me li riconosce.
Grazie per la risposta e spero di essere stato chiaro.


title: che errore è questo??

author: enandret

text:
Error Establishing Database Connection. (Can't Connect To Database)
Details:
[Microsoft][Driver Manager ODBC] Funzione SQLSetConnectAttr del driver non
riuscita.


title: Richiamo di una funzione

author: maurizio

text:
Ciao a tutti,
come letto nel NG, voglio usare la funzione fctRound di Karl Donaubauer per
arrotondare il risultato di una divisione ma ho dei problemi dovuti
sicuramente a tanta ignoranza (scusatemi).
Questo e' quello che ho scritto :
Private Sub Form_Load()
Dim Rata As Variant
Dim TotFattura As Variant
Dim NrRate As Variant
Dim Residuo As Variant
Dim fctRound As Variant
Dim varNr As Variant
Dim Pl As Integer
MsgBox TotFattura
MsgBox NrRate
Rata = TotFattura / NrRate
varNr = Rata
Pl = 2
fctRound (varNr, Pl )    <=====    quando scrivo questo mi da' "errore di
compilazione - previsto : ="
MsgBox Rata
MsgBox fctRound
La funzione l'ho copiata dal sito comune e l'ho inserita pari pari come
modulo Moduli del programma.
Function fctRound (varNr, Optional varPl As Integer = 2)
--------
--------
End Function
Qualcuno mi puo' aiutare a capire anche le regole generali sull'utilizzo
delle funzioni private (non di ACCESS 2000).
Grazie e ciao a tutti.
Maurizio


title: Richiamo di una funzione

author: Sib

text:
"maurizio" <
mm.m...@inwind.it
> ha scritto nel messaggio
> come letto nel NG, voglio usare la funzione fctRound di Karl Donaubauer
per
> arrotondare il risultato di una divisione ma ho dei problemi dovuti
> sicuramente a tanta ignoranza (scusatemi).
cut
> fctRound (varNr, Pl )    <=====    quando scrivo questo mi da' "errore di
> compilazione - previsto : ="
cut
lo stile di programmazione non lo condivido, ma ognuno si gestisce come
crede.
il tuo problema e' comunque dovuto al fatto che la funzione che richiami
deve essere assegnata a una variabile:
TuaVariabile=fctRound(varNr,P1)
invece le funzioni il cui valore restituito non ti interessa, devono essere
richiamate senza parentesi:
fctRound varNr,P1
Sib


title: Richiamo di una funzione

author: All Eyez On me

text:
"maurizio" <
mm.m...@inwind.it
> ha scritto nel messaggio
news:_8wW9.21387$ZE.6...@twister2.libero.it...

Ti do un consiglio, cerca di usare meno possibile il tipo di dato variant
AEOM


title: Richiamo di una funzione

text:
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:OuyW9.21821$YG2.6...@twister1.libero.it...

> Grazie Sib per avere risposto.
Come avrai capito, mi sono accostato da poco ad A2000 e so che ho tanto da
imparare (ho sempre programmato e per tanto tempo in Cobol sotto DOS-conosco
molto poco questi linguaggi orientati agli oggetti e lo stile sicuramente
lascia a desiderare.Imparero' ....  almeno lo spero).
> Vedi, ancora non so bene le differenze fra i vari tipi di dati. Infatti,
ho provato quanto da te suggeritomi pero' mi sono bloccato su un altro
problema connesso :
Dim RataArrotondata As Variant         (ho provato anche con Double,
Currency, Decimal)
RataArrotondata=fctRound(varNr,P1)
e mi ha detto sempre : Tipo non corrispondente  (Err. 13)
Scusami. Dammi un'altra dritta e qualche consiglio per favore. Grazie.
Maurizio


title: Esempi msdn

author: Graziano Montagna

text:
Premetto che sono un principiante.
Ho scaricato da msdn dalla voce access 2000 un file che ha installato due
mdb con relative guide ( sono esempi forniti da microsoft), dato che si
collegano direttamente a Northwind mi sono assicurato che questo ci fosse,
ma quando apro uno dei due compare il messaggio di errore
 d:\Programmi\Microsoft office\office\samples\Northwind.mdb non contiene le
tabelle previste.
Qualcuno conosce il problema e lo ha risolto?????
Se no, volete provare a scaricare gli esempi e vedere se funzionano??
Postare
graz...@libero.it


title: MIgrazione su SQL

author: skipper

text:
Stavo pensando di migrare su SQL e volevo da voi un consiglio su un buon
libro in italiano che mi introduca ai misteri di SQL...
Ho visto che in A2003 (che ho io) c'č l'upsize guidato, ma vorrei saperne di
piů perché in breve tempo rischiamo di essere una trentina di utenti in
contemporanea sui nostri db di A03.

Ho una seconda domanda: come si comporta il binomio Access/SQL con una
connessione VPN? Consigliate forse un desktop remoto?

Grazie

--
_____/)_____

Skipper dixit...


title: MIgrazione su SQL

author: BFS

text:
Il 30/11/2011 15:24, skipper ha scritto:

>
> Ho una seconda domanda: come si comporta il binomio Access/SQL con una
> connessione VPN? Consigliate forse un desktop remoto?
>

io uso file adp connessi a sql anche via vpn
con due adsl decenti ambo i lati non si nota praticamente differenza di
prestazioni rispetto ad averlo in locale.
Parlo per normali programmi di ordini bolle fatture etc.
ovvio che dipende cmq dalla quantità di dati che il server deve restituirti.
sicuramente la soluzione desktop remoto è più performante...ma implica
un bagno di sangue per le licenze server e terminal server
Di parte guadagni nell'hardware dei client visto che puoi usare un
qualsiasi catorcio con ubuntu sopra

ciao
BFS


title: controllo esistenza codice cliente in base a ditta.

author: Giuseppe

text:
Salve a tutti.
Ho una tabella tblclienti con i seguenti campi: IdCliente, codCliente,
IdAzienda, Idanagrafica (relazione con tblanagrafica).
Il campo IdCliente è progressivo, mentre CodCliente per ogni ditta
parte da 1.
In una form dopo aver scelto la ditta, su evento dopo aggiornamento
del controllo idcliente ho messo:
If IsNull(DLookup("[codcliente]", "Tblclienti", "codcliente =" _
& Forms![frmparametrischededispesa]!IDCliente))
come aggiungo il criterio "idazienda =" & Forms!
[frmparametrischededispesa]!IDazienda   ???
Grazie.
Giuseppe.


text:

Se ti capisco bene:
If IsNull(DLookup("codcliente", "Tblclienti", "codcliente =" _
 & Forms!frmparametrischededispesa!IDCliente _
 & " And idazienda =" & Forms!frmparametrischededispesa!IDazienda)) _
 Then
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


text:

Si Karl hai capito bene.
Grazie.
Giuseppe.


title: visualizzare i dati di 4 query incrociandone i dati...è possibile ?

text:
buongiorno a tutti e sopratutto ai miei soliti paladini che sempre mi aiutano.
D
Ho quattro query (luce,olio;gasolio;benzina) che mi restituiscono i dati in questo formato:

ACode	2015  Gen  Feb  Mar  Apr Mag Giu  Lug	Ago tr1	tr1n tr2 tr2n tr3 tr3n

Ford	665   22   82	27   72	 140 132   90	98  132	124  344 290  189  178
Fiat	461  163  237	28  126	  13  20  269	269 116	116   76  76
Opel	1292 173  181  163  198	 182 168  119	108 517	480  548 517  227  226
NSU	1266   5  173  126  178	 192 113  170	393 348	323  493 402  425  385

Avrei bisogno, di poterli vedere raggruppati in una sola o al limite quattro query singole suddivise per tipologia come eslico megli qua sotto:

           2015  Gen  Feb  Mar  Apr Mag Giu  Lug Ago tr1 tr1n tr2 tr2n tr3 tr3n
luce Ford
luce Fiat
luce Opel
luce NSU

olio Ford
olio Fiat
olio Opel
olio NSU

gasolio Ford
gasolio Fiat
gasolioOpel
gasolio NSU

benzina Ford
benzina Fiat
benzina Opel
benzina NSU

Qualcuno riesce a darmi gentilmente un aiuto? E' un problema che non mi si è mai presentato o meglio ancora non so da che parte cominciare....creare una tabella o una query a campi incrociati, però ci stanno tutti i campi ?

grazie a chiunque mi potrà aiutare.


title: esportazione in HTML

author: MarcoBa

text:
Buonasera a tutti quanti
Devo esportare il risultato di una qry in html attraverso il codice Vba,
il problema nasce quando un campo che è in formato ora convertito viene
visualizzato in formato numerico. In che modo posso risolvere questo
problema???
Grazie
Marco
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: esportazione in HTML

author: MA

text:
MarcoBa wrote:
> Buonasera a tutti quanti
> Devo esportare il risultato di una qry in html attraverso il codice
> Vba, il problema nasce quando un campo che è in formato ora
> convertito viene visualizzato in formato numerico. In che modo posso
> risolvere questo problema???
> Grazie
> Marco
Esporta
Ora:Format("Tuocampo";"gg/mm/aa")
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:
www.donkarl.com/it


title: esportazione in HTML

text:
MA ha scritto:
> MarcoBa wrote:
> > Buonasera a tutti quanti
> > Devo esportare il risultato di una qry in html attraverso il codice
> > Vba, il problema nasce quando un campo che è in formato ora
> > convertito viene visualizzato in formato numerico. In che modo posso
> > risolvere questo problema???
> > Grazie
> > Marco
> Esporta
> Ora:Format("Tuocampo";"gg/mm/aa")
Grazie mille



title: Ricerca di un record specifico in una maschera

author: Berti Simone

text:
Ho creato una maschera per l'inserimento e la modifica dei dati Cliente,
questa maschera è creata con un Layout (e questo per altre esigenze) a
colonne, quindi i dati dei clienti mi appaiono su maschere diverse. Siccome
i clienti sono diventati abbastanza, per mia fortuna, avrei la necessità di
dover andare direttamente ad un cliente senza dover sfogliare tutti quelli
che vengono prima... ovvero se ad esempio devo andare a visualizzare o
modificare i dati del cliente Italo Piccoli non voglio passare da tutti i
clienti che iniziano per lettera A poi per lettera B ecc. ma vorrei andare
direttamente alla lettera I oppure, meglio ancora, direttamente a quel
cliente. Come faccio a ottenere questo in una maschera di Access?


author: Roberto da casa

text:
"Berti Simone" <
berti...@tiscali.it
> ha scritto nel messaggio
news:HTrmb.349659$R32.11...@news2.tin.it...

Se la tabella che contiene i dati dei tuoi clienti ed è origine record della
maschera si chiama tblClienti ed ha una struttura simile a questa:
IDCliente            Contatore e chiave primaria
RagioneSociale   Testo
ecc. ecc.
Nell'intestazione della maschera inserisci una casella combinata non
associata chiamata MiaCombo, che abbia due colonne, delle quali visibile
solo la seconda; come origine riga della casella combinata inserisci questo
codice SQL:
SELECT IDCliente, RagioneSociale
FROM tblClienti
ORDER BY RagioneSociale;
Imposta a 1 la proprietà Colonna associata della casella combinata.
A fronte dell'evento "Dopo aggiornamento" della casella combinata genera il
seguente codice VBA:
Me.Filter = "IDCliente=" & Me!MiaCombo
Me.FilterOn = True
Così facendo, dopo che avrai scelto dalla casella combinata il nome del
cliente, la maschera si posizionerà sul record del cliente selezionato nella
casella combinata.
--
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:Rdumb.66363$e6.23...@twister2.libero.it...

Problema... io ho inserito nell'intestazione di maschera una casella
combinata, ho scelto immissione personalizzata, gli ho detto di crearmi 2
colonne e poi sono sempre andato a cliccare su AVANTI. Mi ha creato
l'oggetto, ma non so come si nasconde la prima colonna e non so come
inserire il testo che mi hai suggerito nell'orgine riga. Andando sulle
proprietà della casella combinata infatti mi permette solamente di
specificare una relazione ad una query o ad una tabella esistente e non di
digitare un codice SQL... come mai?
Grazie di nuovo SiMoNe


text:
> Problema... io ho inserito nell'intestazione di maschera una casella
> combinata, ho scelto immissione personalizzata, gli ho detto di crearmi 2
> colonne e poi sono sempre andato a cliccare su AVANTI. Mi ha creato
> l'oggetto, ma non so come si nasconde la prima colonna e non so come
> inserire il testo che mi hai suggerito nell'orgine riga. Andando sulle
> proprietà della casella combinata infatti mi permette solamente di
> specificare una relazione ad una query o ad una tabella esistente e non di
> digitare un codice SQL... come mai?
>
> Grazie di nuovo SiMoNe
>
>
Ok Sono riuscito praticamente nell'impresa anche se continuto ancora a non
saper come nascondere la prima colonna e visualizzare solo la seconda...
infatti se io vado sull'origine riga e non visualizzo SQL ma la struttura
della query ho la possibilità attraverso la casella di spunta di togliere il
MOSTRA ma così facendo ACCESS non mi fa + funzionare la mia ricerca. Come
posso fare a dirgli di non visualizzare il campo ID ma solo la Ragione
Sociale?
Grazie di nuovo


author: cidi

text:
"Berti Simone" <
berti...@tiscali.it
> ha scritto nel messaggio
news:lpPmb.354611$R32.11...@news2.tin.it...

Ciao SiMoNe
Devi settare la larghezza colonne a "0" per la prima colonna e la seconda
quanto vuoi, devi farlo nella proprietà della casella combinata
Daniele


text:
> Devi settare la larghezza colonne a "0" per la prima colonna e la seconda
> quanto vuoi, devi farlo nella proprietà della casella combinata
> Daniele
>
>
Mille Grazie...


title: Maschera aperta resa attiva

author: FANCIULLO

text:
Salve sono Fanciullo
non riesco a fare una cosa semplice semplice:
alla chiusura di una maschera non riesco a portare il focus su una maschera
già aperta..........ma sento che è una stupidata come minimo.
FORM1 apre con un pulsante di comando
FORM2 (passa 1 come openargs alla form2)
....faccio qualcosa con la FORM2  poi con un pulsante di comando
la rendo non visibile.
Ora vorrei che la maschera attiva ritornasse la FORM1
immagino che sul pulsante di comando dovrei scrivere:
Private Sub cmdRENDI_Click()
    If Me.OpenArgs = 1 Then
    rendimi attiva la FORM1!!!!!!!!!!!!!!!!......sbrigati
    Me.Form.Visible = False
End if
Grazie.....


title: Maschera aperta resa attiva

author: Sergio MAZZA

text:
"FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio news:AmmFh.9815$J11.2...@twister1.libero.it...

Prova quest'altra sequenza:
[bottone su form1]
- apro form2
- rendo invisible form1 (Me.Visible = Not Me.Visible)
[bottone su form2]
- rendo invisibile form2 (Me.Visible = Not Me.Visible)
- rendo visibile form1 (Me.Visible = Not Me.Visible)
Le form rese visibili dovranno per forza prendere il fuoco...
Ciao.
--
Sergio MAZZA


title: Maschera aperta resa attiva

author: antonio

text:
"FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio
news:AmmFh.9815$J11.2...@twister1.libero.it...

Queste istruzioni dovrebbero funzionare:
Forms("FORM1").SetFocus
Forms("FORM2").Visible = False
Ciao
Antonio


title: Maschera aperta resa attiva

text:
"antonio" <
antone...@tiscali.it
> ha scritto nel messaggio
news:45e6829d$0$20819$5fc...@news.tiscali.it...

> Grazie Antonio e Sergio.......era tutto semplice sì


title: Setup programma multilingua

author: Rč Artu

text:
RiCiao
Il mio programma di setup (fatto con ode97) funziona anche su sistemi
operativi in inglese e francese? Dove trovo le dll per le varie lingue?
Thanks, Merci...


title: Evento Mouse Spostato in Maschere Continue

author: Gimmy

text:
Ri salve a tutti!!
Quando ci troviamo un form con Maschere continue, come faccio a stabilire su
che record si trova il mouse??
Grazie mille
Gimmy


author: Maurizio Borrelli

text:
> "Gimmy" [...]:
> Quando ci troviamo un form con Maschere continue, come faccio a stabilire
> su che record si trova il mouse??
    Scusa, ma a cosa ti serve saperlo?
    Sperimenta il codice seguente con una casella di testo (txtCoord)
sull'intestazione della maschera:
Private Sub Form_MouseMove( _
  Button As Integer _
, Shift As Integer _
, X As Single _
, Y As Single)
  Me.txtCoord.Value = "X = " & CStr(X) & "; Y = " & CStr(Y)
End Sub
cosi' vedi subito le problematiche che dovresti affrontare. Hai notato che
quando il mouse e' su un controllo txtCoord non viene aggiornato?...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


author: Carlo Costarella

text:
"Gimmy" <ggimmyy@ANTISPAM@
email.it
> ha scritto nel messaggio
news:alnec9$pbv$1...@lacerta.tiscalinet.it...

Non puoi al semplice passaggio del mouse, almeno che io sappia.
Se inveci entri (facendo click) in un controllo qualsiasi allora puoi
saperlo.
Per esempio questa istruzione:
Private Sub Campo1_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
    Me.Campo1.SetFocus
End Sub
ti permette di selezionare il controllo Campo1 al semplice passaggio del
mouse anche se il focus è su di un altro controllo. L'operazione è possibile
solo sul record corrente.
Ciao Carlo


title: id contatore su 2 tabelle

author: Gioconda ed Emanuele

text:
Avendo la tabella1 con un id contatore, si potrebbe far leggere l�id
successivo disponibile alla tabella2 in modo che lo metta come suo id?
Esempio: Tabella1  Contatore 1
               Tabella1  Contatore 2
               Tabella2  Contatore 3
               Tabella1  Contatore 4
               Tabella2  Contatore 5
               Tabella2  Contatore 6
               Tabella2  Contatore 7
               Tabella1  Contatore 8
E cosi via......
Grazie.


title: id contatore su 2 tabelle

author: Karl Donaubauer

text:

In principio si potrebbe fare con codice o espressioni (DMax(), Max() ecc.),
ma la domanda � un po' strano per un db relazionale.
Cosa vuoi fare?
Non parli del tipo di dato contatore ma di qualcosa che gestici tu?
Se le due tabelle sono cos� simili che possono condividere un
"contatore" sei sicuro che non puoi usare una sola tabella?
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: id contatore su 2 tabelle

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> schrieb im Newsbeitrag
news:7cilvkF...@mid.individual.net...

In realt� non so nemmeno io + come strutturare questo database. Cmq quello
che devo fare � questo:
1 Tabella Copertura, ed una tabella determine. La tabella Copertura ha un id
contatore ed altri dati: Data, ufficio, oggetto, preventivo n, data
preventivo, creditore, importo spesa, ecc.. La tabella determine un
idcontatore, data, descrizione, TIPO, ecc... la tabella determine pu� avere
solo 4 tipi cio� impegno, liquidazione, impegno liquidazione, altro. Ho
creato 4 maschere dipendenti da una query(copertura, determine). Ad esempio
apro la maschera impegno ed in un campo idcopertura scrivo un numero di
copertura(corrispondende all�id della tabella copertura), ad esempio 1, e mi
riporta tutti i dati della tabella copertura dell�id 1. Quando apro la
maschera liquidazione vorrei inserire in un campo idimpegno, ad esempio 1,
in modo che mi riporta tutti i dati dell�impegno 1, ma questo non lo posso
fare perch� sia impegno che liquidazione sono nella stessa tabella. Se
invece riuscissi a creare un tabella impegno che vada come ho scritto prima,
a prendere il numero successivo della tabella determine penso di aver
risolto. Perch� in questo modo vado a creare una query(impegno, determine) e
tramite un campo scrivo l�id impegno e mi riporta i dati che mi servono.
Esempio:
Tabella determine id1
Tabella determine id2
Tabella impegno id3
Tabella impegno id4
Tabella determine id5
In questo modo l�id determine e l �id impegno sar� sempre consecutivo ed io
posso inserire nella maschera liquidazione il numero di impegno che mi serve
riportandomi i dati. E�un po complicato se icuramente c� un�altra strada
per� io sono limitato in vba e sql quindi cerco delle soluzioni alternative.
Grazie.


title: id contatore su 2 tabelle

author: Valerio Valentini

text:
"Gioconda ed Emanuele" <
g.suc...@arcor.de
> ha scritto nel messaggio
news:4a64a303$0$32677$9b4e...@newsspool2.arcor-online.net...

Credo di parlare a nome di tutti quando dico che nessuno ha capito cosa sia
una copertura o un determine, quindi nessuno riesce a capire cosa tu voglia
ottenere, prova a spiegare non ci� che hai fatto o quali tabelle hai, ma
quali dati, magari esemplificando, hai e cosa vuoi ottenere, vedrai che
allora pi� di qualcuno ti trover� una soluzione.
Ciao, Valerio.


title: id contatore su 2 tabelle

author: miciomao

text:
Secondo me dovresti crearti un db con i modelli offerti da Access semi-
pronti
come:
Controllo inventario
Gestione eventi
Gestione contatti
Gestione manutenzione
Gestione ordini
Ore di lavoro e fatturazione
Spese
ecc...
oppure da sito office
http://office.microsoft.com/it-it/templates/CT101172481040.aspx
Studiartene uno a piacere e capire come funzionano le relazioni le
sottomaschere e soprattutto le anagrafiche...
Se continui a mettere "toppe" potresti arrivare ad un punto di non
ritorno per capire poi che forse andava curata meglio la struttura
avendo prima qualche nozione in piu.... in fondo per come ti ho
suggerito si tratta solo di rubare con gli occhi
;)
Ciao
Alex


title: id contatore su 2 tabelle

text:
> Credo di parlare a nome di tutti quando dico che nessuno ha capito cosa
> sia una copertura o un determine, quindi nessuno riesce a capire cosa tu
> voglia
In pratica sono i nomi delle tabelle. Cerco di spiegarmi meglio.
Il contatore � separato in una tabella, in modo che le altre tabelle
prendano l�id successivo.
Esempio: La "tabellacontatore" contiene 2 campi, un campo contatore ed uno
di testo.
Tabellacontatore id disponibile 1
La "tabella1" prende come id 1 dalla "tabella contatore" e questa passa a 2
"tabella2" prende il numero 2
"tabella1" prende il numero 3
"tabella3" prende il numero 4
"tabella4" prende il numero 5
Quindi mi ritrover� la "tabellacontatore" in questo modo
Contatore   Tipo
1                tabella1
2                tabella2
3                tabella1
4                tabella3
5                tabella4
..............................
Spero di essermi spiegato meglio :)
Grazie a Tutti.


title: id contatore su 2 tabelle

text:
"Gioconda ed Emanuele" <
g.suc...@arcor.de
> ha scritto nel messaggio
news:4a660c5b$0$30229$9b4e...@newsspool1.arcor-online.net...

Questa era l'unica cosa che abbiamo capito, dimentica tabelle, indici e
contatori, di cui l'uso che fai sembra a tutti un p� strano. Dicci ho tre
patate, due fragole e cinque mele e voglio fare una macedonia con la stessa
quantit� di frutta per ogni tipo. Ovvero le coperture sono: .... mentre i
determini sono .... e devo fare in modo che alla fine risulti questo ....
Non te la prendere ma forse perch� � un caso particolare o forse perch� sei
partito con un impianto sbagliato, ma se non spieghi in termini di frutta e
macedonia continuerai a girare con diversi thread sul NG senza ottenere
risposte :-)
Ciao, Valerio.


title: colore TextBox in maschera

author: crisbetter

text:
Salve a tutti.
Ho una maschera che visualizza record tramite delle textbox associate a
campi di una tabella.
Quando mi sposto fra i vari record avrei bisogno di cambiare il colore del
testo a seconda del contenuto.
Ho provato con la proprietą nell' evento
Form_Current()
questa proprietą
CampoTextBox.ForeColor = N
ma vengono colorati tutti i record di quel campo.
Come posso colorare solo il record attuale indicato dall'oggetto "Selettori
Record".
Grazie per l'aiuto.


title: colore TextBox in maschera

text:
> "crisbetter" news:ancdvl$dgn$1...@lacerta.tiscalinet.it...:

    Saro' lieto di rileggerti e risponderti, nei limiti delle mie
conoscenze, dopo che avrai preso nota di quanto segue:
        Tabelle e Query
            sono composte da Record (righe) e Campi (colonne).
        Maschere e Report
            possono essere associate a Tabelle e Query
        Maschere e Report
            contengono Controlli
            (Caselle di testo, Caselle combinate, SottoMaschere/Report...)
        I Controlli
            possono essere associati a Campi
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: colore TextBox in maschera

author: Lorenzo Coronati

text:
Scrisse "crisbetter" <
cov...@tiscalinet.it
>:
>Come posso colorare solo il record attuale indicato dall'oggetto "Selettori
>Record".
www.sitocomune.com
--
lorenzo coronati
---


title: Calcolo tra date nello stesso campo

author: MASSIMO COLUZZI

text:
Ragazzi chi puň aiutarmi?
Devo estrarre da un unico campo data per uno stesso dipendente, le volte che
la stessa data non č consecutiva faccio un esempio:
Data            Dipendente    Risultato
01/01/01    Rossi
02/01/01    rossi
03/01/01    Rossi                    1
05/04/01    Rossi                    1
06/05/01    Rossi                    1
06/06/01    Rossi
07/06/01    Rossi                    1
e cosě via, non sň se mi fatto capire. Grazie per l'eventuale aiuto
--
Massimo Coluzzi
colu...@tin.it
il sito comune di it.comp.appl.access:
www.sitocomune.com