title: Seleziona tutto in casella di testo

text:
> > > Vorrei che con un click o doppo click su una
> > > casella di testo mi selezioni
> > > > tutto il contenuto. Ho provato con Sellenght ma
> > > ad esempio in una data
> > > > seleziona solo le cifre tra due barre e con
> > > cifre decimali solo fino alla
> > > > virgola. Dovrebbe funzionare insomma come con il
> > > tasto invio.
> > > >
> > > F8
> > > MAssimiliano
> > >
> > Se possiamo riprendere il discorso originario, debbo dirvi che comunque
il
> > problema resta perchč, almeno io, non riesco a selezionare tutto il
campo ma
> > solo la parola, cioč fino alla virgola decimale, ala barra delle date o
allo
> > spazio delle stringhe....................
> >
> > Ciao.
> > Sandro
> >
>
> L'hai letta la mia risposta integrata anche da Karl?
>
Pardon, io insistevo sul Doppio Click, ma probabilmente funziona solo con il
Click.
Quanto a F8, ha un funzionamneto abbastanza strano. Sull'help non ho trovato
nulla.
Ciao
Sandro


title: Creare una relazione tra due tabelle con vba ?

author: pabel

text:
Ciao a tutto il NG
Cercando nel sito comune, non sono riuscito a trovare niente che possa
risolvere il mio problema, o meglio quello che ho trovato mi sembrava troppo
complicato e forse non adatto.
Vi spiego cosa mi serve e se č possibile farlo.
Ringraziando @Alex., Roberto, ecc., loro mi hanno insegnato come da codice
creare nuove tabelle, aggiungere nuovi campi, cambiare il tipo di campo, e
eliminare i dati in esse contenuti, ora mi trovo di fronte la necessitŕ di
creare sempre da codice, oppure in qualsiasi altro sistema la relazione tra
due tabelle DITTA = idditta "contatore" CLIENTI = iddittacliente "numerico,
ripeto che non so se questo sia possibile ma sperando sempre nella vostra
preziosa collaborazione anticipatamente ringrazio e saluto.
Pabel


author: Karl Donaubauer

text:
pabel ha scritto:
> Cercando nel sito comune, non sono riuscito a trovare niente che possa
> risolvere il mio problema, o meglio quello che ho trovato mi sembrava
> troppo complicato e forse non adatto.
> Vi spiego cosa mi serve e se è possibile farlo.
> Ringraziando @Alex., Roberto, ecc., loro mi hanno insegnato come da
> codice creare nuove tabelle, aggiungere nuovi campi, cambiare il tipo
> di campo, e eliminare i dati in esse contenuti, ora mi trovo di
> fronte la necessità di creare sempre da codice, oppure in qualsiasi
> altro sistema la relazione tra due tabelle DITTA = idditta
> "contatore" CLIENTI = iddittacliente "numerico, ripeto che non so se
> questo sia possibile ma sperando sempre nella vostra preziosa
> collaborazione anticipatamente ringrazio e saluto.
È possibile con SQL. Ma in parte dipende dalla versione di Access
che non hai rivelato. Allora uso DAO per l'esempio e assumo che
idditta è la chiave primaria di DITTA:
Dim db As DAO.Database
Dim rel As DAO.Relation
Set db = CurrentDb
With db
      ' creare la relazione con update e delete cascade
      Set rel = .CreateRelation("relDittaClienti", "DITTA", "CLIENTI", _
        dbRelationUpdateCascade + dbRelationDeleteCascade)
      ' creare i campi nella relazione
      rel.Fields.Append rel.CreateField("idditta")
      rel.Fields!ID.ForeignName = "iddittacliente"
      .Relations.Append rel
End With
Set rel = Nothing
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:bvij9c$sbp4p$1...@ID-46617.news.uni-berlin.de...

Ti ringrazio per tua risposta, mi scuso per quanto riguarda la versione,
davo per scontato che si potesse fare con tutte, tornando al tuo
suggerimento, mi sono dimenticato di dirti che non mastico per niente il
codice anche se scopiazzando qua e la ne ho fatto uso, il tuo esempio mi
sembra di capirlo, non riesco invece a capire come posso collegarlo a un
pulsante che mi esegua questa azione, per capirci io vorrei un pulsante in
una maschera che su evento clic mi esegua tutto ciò, mi potresti guidare in
questi passaggi, ho la possibilità di usare qualsiasi versione di access, ma
in questo caso diciamo che userò la 2000
Di nuovo grazie Pabel


title: exporta xml con xsd prefissato

author: max

text:
ho un software in cui devo esportare i dati che ha un suo file xsd, se
esporto i dati prima in excel, mediante "origine xml" e "Mapping XML" carico
l'xsd e ad ogni colonna assegno un nome del campo dell'xsd, posso cosě
creare un file xml con le caratteristiche richieste. come faccio a fare la
stessa cosa in access (2003).
ciao
Max


title: riferimento maschere

author: Marina F.

text:
Piccolo problema:
Ho le maschere
1)ordini
2)clienti con sottomascheraClienti
Dovrei creare una rutine che sull'evento click di un pulsante inserito nella
maschera ordini che mi apra la maschera clienti e porti il setfocus sul
controllo della sottomascheraClienti sul controllo iddettaglio.
ho provato con questo
DoCmd.OpenForm "Clienti", acNormal, "", "", , acNormal
DoCmd.GoToControl "sottomascheraClienti"
DoCmd.GoToControl "idddettaglio"
Funziona però perche quando faccio il debug mi dice nessun campo chiamato
sottomascheraClienti   nel record corrente ?
Grazie per un eventuale delucidazione.
--


title: riferimento maschere

author: Luchino

text:
"Marina F." <1@.1> ha scritto nel messaggio
news:_qG28.18562$ly.6...@twister1.libero.it...

Prova con :
dim f as form
set f= "sottomascheraClienti"
f.idddettaglio.setfocus
Ciao.


title: riferimento maschere

author: Emyr

text:



forms!clienti!sottomascheraClienti.setfocus
forms!clienti!sottomascheraClienti!idddettaglio.setfocus
Saluti.
Emanuele.


title: [?] Report e raggruppamento per mese

author: -> Dave <-

text:
Salve a tutti !
Ho una piccola difficolta' con i report di Access.
Dunque ho una tabella contenente diversi campi di dati, e un campo DATA e un
campo ORA  (Date,Time).
Vorrei stampare dei report di dati per ogni mese, e per far questo ho usato
l'opzione "Raggruppamento", dopo aver creato il report.
Ho messo come parametro "Mese" e ho inserito un pie' di pagina gruppo, dove
indico il totale per il mese indicato.
L'unico difetto é che mi separa si' i dati per mese, ma non mi mette un mese
per ogni pagina, nel caso in un mese ci siano pochi dati.
Capita anche che mi metta 2 mesi (composti da 4-5 giorni l'uno) su una
pagina sola, e non é questo l'effetto che voglio ottenere.
C'e' forse qualche altro parametro da inserire ?
Grazie dell'aiuto
Dave


title: [?] Report e raggruppamento per mese

author: Roberto da casa

text:
"-> Dave <-" <da...@hate.spam> ha scritto nel messaggio
news:9anv8r$f1m$1...@news1.sunrise.ch...

Apri la struttura del report; evidenzia la sezione intestazione di gruppo;
per la proprietà Interruzione pagina seleziona Prima di sezione.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: esportare campi di una tabella per formato outlook

author: tmtube

text:
č possibile scegliere alcuni campi e fare in modo che si possa poi
importarli in microsoft outlook quello incluso in office?

i campi devono avere un nome e un separatore particolare?

grazie.


author: Bruno Campanini

text:
tmtube expressed precisely :
> è possibile scegliere alcuni campi e fare in modo che si possa poi importarli
> in microsoft outlook quello incluso in office?

Sì, si possono esportare da Access oppure importare da Outlook.

> i campi devono avere un nome e un separatore particolare?

No, niente di particolare.
Quel che va bene per Access va bene anche per Outlook.

Bruno


text: grazie


title: per Roberto da casa query elimin....

text:
ciao Roberto la funzione che mi hai suggerito .....
Dim ContaRec As Long
Dim strSQL As String
strSQL = "DELETE * FROM Tabella1 " & _
"WHERE MiaData >= #" & Format(Me!DataInizio, _
"mm/dd/yyyy") & "# AND MiaData <= #" _
& Format(Me!DataFine, "mm/dd/yyyy") & "#;"
ContaRec = DCount("*", "Tabella1", _
"MiaData >= #" & Format(Me!DataInizio, _
"mm/dd/yyyy") & "# AND MiaData <= #" _
& Format(Me!DataFine, "mm/dd/yyyy") & "#")
If ContaRec = 0 Then
    MsgBox "Non esistono record compresi " _
    & "tra le due date", vbInformation, _
    "Cancellazione record"
Else
    If MsgBox("Vuoi cancellare " & ContaRec _
    & " records?", vbYesNo, "Cancellazione record") _
    = vbYes Then
        DoCmd.SetWarnings False
        DoCmd.RunSQL strSQL
        DoCmd.SetWarnings True
        MsgBox "Sono stati cancellati " & ContaRec _
        & " records!", vbInformation, _
        "Canellazione record"
    Else
        MsgBox "Non hai voluto cancellare alcun record", _
        vbInformation, "Cancellazone record"
    End If
End If
non capisco perchč mi porta sempre un errore .............
Errore di sintassi  nell'espressione della query
"MiaData..........ecc.........ecc (mi visualizza la data di inizio č
fine............
Ciao
Gianni _B


title: per Roberto da casa query elimin....

text:
"Gianni_B" <
gia...@bluewin.ch
> ha scritto nel messaggio
news:40242859$1...@news.bluewin.ch...

Non ho capito dove e quando Access ti segnala errore di sintassi.
Per scupolo ho provato la soluzione che ti ho consigliato con il mio
messaggio del 3/2/2004 ore 19:27 ed a me non viene segnalato alcun errore;
mi dispiace ma non so cosa ipotizzare se non il fatto che tu abbia copiato
male.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: per Roberto da casa query elimin....

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:M17Vb.21584$U4.7...@twister1.libero.it...

> > non capisco perchè mi porta sempre un errore .............
> > Errore di sintassi  nell'espressione della query
> > "MiaData..........ecc.........ecc (mi visualizza la data di inizio è
> > fine............
> > Ciao
> > Gianni _B
>
> Non ho capito dove e quando Access ti segnala errore di sintassi.
> Per scupolo ho provato la soluzione che ti ho consigliato con il mio
> messaggio del 3/2/2004 ore 19:27 ed a me non viene segnalato alcun errore;
> mi dispiace ma non so cosa ipotizzare se non il fatto che tu abbia copiato
> male.
>
> --
> Roberto
>
Beh allora io credo che il mio problema lo esposto male l'ultima
volta................
Io ho una query di eliminazione che lancio da una maschera "Elimina record"
che ha due caselle di testo "DataInizio", "DataFine" nella query  nel campo
"Datum" ho scritto come criteri:  Between [Forms]![Elimina
record]![DataInizio] And [Forms]![Elimina record]![DataFine].
Mentre nella maschera "Elimina record" ho un pulsante di comando che
sull'evento click mi lancia la query di eliminazione qui sotto riporto il
codice
del pulsante di comando.
Private Sub Comando4_Click()
On Error GoTo Err_Comando4_Click
    Dim stDocName As String
    stDocName = "Copia_Sicurezza Query"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
    DoCmd.Close acForm, "loschen", acSaveNo
Exit_Comando4_Click:
    Exit Sub
Err_Comando4_Click:
    MsgBox Err.Description
    Resume Exit_Comando4_Click
End Sub
Io quello che vorrei come ho detto prima poter avere la possibbilita di
scegliere
se voglio cancellare i record è visualizzare i record compresi tra le due
date, senza
usare il messagio predefinito di Access.
il codice che hai scritto sopra lo trovo davvero fantastico ma non rieco a
farlo funzionare....
Grazie come sempre Roberto della tua pazienza.
--
Grazie dei vostri conisgli ,
Gianni_B


title: per Roberto da casa query elimin....

text:
"Gianni_B" <
gia...@bluewin.ch
> ha scritto nel messaggio
news:40255...@news.bluewin.ch...

Se per eliminare i record vuoi usare la query  Copia_Sicurezza Query, nel
codice VBA che ti ho suggerito elimina:
Dim strSQL As String
strSQL = "DELETE * FROM Tabella1 " & _
"WHERE MiaData >= #" & Format(Me!DataInizio, _
"mm/dd/yyyy") & "# AND MiaData <= #" _
& Format(Me!DataFine, "mm/dd/yyyy") & "#;"
e sostituisci la riga:
DoCmd.RunSQL strSQL
con:
DoCmd.OpenQuery "Copia_Sicurezza Query", acNormal, acEdit
DoCmd.Close acForm, "loschen", acSaveNo
Se continui ad avere segnalato degli errori non saprei proprio come
aiutarti.



title: docmd.gotorecord in sottomaschera msaccess

author: Roland

text:
Ciao,
ho un problemino che al momento non riesco a risolvere. Vorrei spostarmi nei
record di una sottomaschera premendo i tasti freccia. Questo lo riesco a
fare utilizzando keycode vbkeyleft e vbkeyright pero utilizzando il comando
DoCmd.GoToRecord mi dice che la maschere (sottomaschera) non é aperta. Ho
provato ha fare un setfocus sulla sottomaschera ma il risultato é sempre
negativo. Forse qualcuno mi sa indicare come fare.
Saluti
roland


text:
Roland <
info.c...@tin.it
> ha scritto:

Non è chiaro cosa fai. Sarebbe meglio rivelare il tuo vero codice.
L'errore normalmente succede se usi il nome del SourceObject della
sottomaschera che è falso e inutile qui. Prova senza mezionare
un oggetto: DoCmd.GoToRecord , , acNext
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


text:
Salve,
"Karl Donaubauer" <
ad...@donkarl.com
> schrieb im Newsbeitrag
news:b2jt92$1dm52g$1...@ID-46617.news.dfncis.de...

il mio codice é semplice ed é il seguente:
If KeyCode = vbKeyRight Then
DoCmd.GoToRecord , "FOTO", acNext
End If
dove "FOTO" é una sottomaschera della form. Il messaggio indicato é:
"l'oggetto FOTO non é aperto!"
Grazie per l'auito.
Roland


text:
Roland <
info.c...@tin.it
> ha scritto:
> "Karl Donaubauer schrieb:
> > > ho un problemino che al momento non riesco a risolvere. Vorrei
spostarmi
> > nei
> > > record di una sottomaschera premendo i tasti freccia. Questo lo riesco
a
> > > fare utilizzando keycode vbkeyleft e vbkeyright pero utilizzando il
> > comando
> > > DoCmd.GoToRecord mi dice che la maschere (sottomaschera) non é aperta.
> Ho
> > > provato ha fare un setfocus sulla sottomaschera ma il risultato é
sempre
> > > negativo. Forse qualcuno mi sa indicare come fare.
> >
> > Non è chiaro cosa fai. Sarebbe meglio rivelare il tuo vero codice.
> > L'errore normalmente succede se usi il nome del SourceObject della
> > sottomaschera che è falso e inutile qui. Prova senza mezionare
> > un oggetto: DoCmd.GoToRecord , , acNext
>
> il mio codice é semplice ed é il seguente:
>
> If KeyCode = vbKeyRight Then
> DoCmd.GoToRecord , "FOTO", acNext
> End If
>
> dove "FOTO" é una sottomaschera della form. Il messaggio indicato é:
> "l'oggetto FOTO non é aperto!"
In principio ti ho già detto la soluzione. Vedo che hai anche postato
in dcdma. Allora leggi l'esplicazione e l'esempio per GoToRecord al
Access-FAQ 4.2  Bezug auf Unterformular/bericht



author: Guido Rifesser

text:
Grazie,
ha funzionato nel modo descritto.
saluti
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: List box

author: Paolo Dal Bosco

text:
Per prima cosa un saluto a tutti.
ho una maschera in cui è inserita una Listbox popolata da una query di
selezione,
è possibile passare, tramite un pulsante al primo e/o ultimo record?
Grazie per l'aiuto.
Paolo


title: List box

author: Sergio MAZZA

text:
"Paolo Dal Bosco" <
bos...@tin.it
> ha scritto nel messaggio news:463342f8$0$17941$4faf...@reader1.news.tin.it...
> Per prima cosa un saluto a tutti.
> ho una maschera in cui è inserita una Listbox popolata da una query di
> selezione,
> è possibile passare, tramite un pulsante al primo e/o ultimo record?
Della listbox?
Vedi l'help in linea della proprietà ItemData/ListCount/Selected...
> Grazie per l'aiuto.
>
> Paolo
Ciao.
--
Sergio MAZZA


title: List box

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
------CUT
> Vedi l'help in linea della proprietą ItemData/ListCount/Selected...
>
ho provato il tuo suggerimento,
con ListCount che gią uso ottengo il conteggio delle righe/records
visualizzate
non riesco perņ a posizionarmi/selezionare l'ultima rida dell'elenco
dove sbaglio?
ListCount/Selected non mi dą nessun help
Grazie di tutto
Paolo


title: List box

text:
"Paolo Dal Bosco" <
bos...@tin.it
> ha scritto nel messaggio
news:4635d1d9$0$10629$4faf...@reader2.news.tin.it...
> ho provato il tuo suggerimento,
> con ListCount che già uso ottengo il conteggio delle righe/records
> visualizzate
> non riesco però a posizionarmi/selezionare l'ultima rida dell'elenco
> dove sbaglio?
> ListCount/Selected non mi dà nessun help
> Grazie di tutto
>
> Paolo
Prima riga:
Me!nomeControllo = Me!nomeControllo.ItemData(0)
Ultima riga:
Me!nomeControllo = Me!nomeControllo.ItemData(Me!nomeControllo.ListCount - 1)
Ciao.
--
Sergio MAZZA


title: List box

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:f14pnq$e3f$1...@tdi.cu.mi.it...

Mi son scervellato non ti dico quanto,
e le cose son sempre più semplici di quello che si pensa.
Grazie mille
Paolo


title: List box

text:
"Paolo Dal Bosco" <
bos...@tin.it
> ha scritto nel messaggio news:4635fb85$0$36450$4faf...@reader5.news.tin.it...
>
> Mi son scervellato non ti dico quanto,
> e le cose son sempre più semplici di quello che si pensa.
F1 e/o leggere i messaggi precedenti.
Ormai sono pochissimi i "casi non risolti"...
> Grazie mille



title: Caseel a di riepilogo

author: Gatti Vittorio

text:
Ho una casella di riepilogo che mi visualizza un importo.
Il problema è che me lo visualizza partendo da sinistra verso destra.
E' possibile impostare l'allineamento a destra ?
Grazie e ciao


title: Caseel a di riepilogo

text:
"Gatti Vittorio" <
vi...@libero.it
> ha scritto nel messaggio
news:g%P0a.92089$YG2.2...@twister1.libero.it...

Prova a dare uno sguardo al thread aperto da Valerio Dal Monte il 6/2/2003
alle ore 23:25 e che ha per Oggetto "LIST Allineamento dei numeri a DX!".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Caseel a di riepilogo

text:
Roberto da casa <
r.ma...@libero.it
> wrote in message
VWQ0a.92316$YG2.2...@twister1.libero.it...

> Grazie corro subito a vedere!
ciao Roberto


title: Caseel a di riepilogo

text:
Gatti Vittorio <
vi...@libero.it
> wrote in message
g%P0a.92089$YG2.2...@twister1.libero.it...

> Azz, come si sono scaldati!!!!
ciao


title: Caseel a di riepilogo

text:
"Gatti Vittorio" <
vi...@libero.it
> ha scritto nel messaggio
news:is11a.95202$ZE.26...@twister2.libero.it...

Sai a volte capita: è colpa dell'ardore del sapere. :-)



title: somma di query

author: Eugene

text:
Ho un problema enorme. Ho un file di Access.
Ho creato diverse maschere e tabelle.
Ho creato, poi, due query
Bene ora vorrei creare una terza query che in un campo mi dia la somma delle
altre query.
E meglio ancora vorrei che mi dia la somma solo di un certo giorno.
Aiutatemi per favore
--
TOGLI NOSPAM
e...@freemail.it
TOGLI NOSPAM


title: somma di query

author: Roberto dal portatile

text:
"Eugene" <
edmN...@freemail.it
> ha scritto nel messaggio
news:8lneck$t54$1...@sirmdpsin17.inwind.it...

Potresti spiegarti meglio, magari con un esempio?
Roberto


title: Maschere e report

author: Davide

text:
Problema:
Ho una query MAGAZZINO che prende i criteri dalla maschera SCELTA.
Nella maschera SCELTA ho predisposto diverse caselle combinate che
permettono di impostare i criteri di scelta senza digitarli.
Per le caselle che fanno riferimento a campi di tipo Testo, non ho problemi.
Per la casella NUMORD, che permette di scegliere il numero dell'ordine da
stampare, ho il problema seguente: se si sceglie un numero di ordine dall'
elenco, tutto bene, ma:
come faccio per stampare tutti gli ordini?
Non posso lasciare la casella vuota e non posso usare l'asterisco come
valore predefinito per il controllo, cosa che ho fatto per i campi di tipo
Testo.
Grazie a tutti


title: Maschere e report

text:
"Davide" <
David...@hotmail.com
> ha scritto nel messaggio
news:ebI26.16739$ag5.1...@twister1.tin.it...

Nella query, nei criteri del campo NUMORD scrivi
Like IIF(IsNull([Forms]![SCELTA]![NUMORD]); "*"; [Forms]![SCELTA]![NUMORD])
e non digitare nulla nella casella combinata.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: [?] Access 2000 ADP: Errore 30014

author: Kiks

text:
Premetto che il seguente problema nasce dal porting di una applicazione
Access97 ad Access2000 ADP con SQL Server7.0
Quando cerco di inserire un nuovo record nella sottomaschera (cosa che prima
non mi dava problemi), ora mi compare il seguente messaggio di errore (o
meglio avviso):
"I dati sono stati aggiunti al database, ma non verranno visualizzati nella
maschera perchè non corrispondono ai criteri nell'origine dati sottostante."
Il record lo inserisco passandogli i valori per tutti i campi che in effetti
dovrebbero soddisfare i criteri, ma niente da fare:
    DoCmd.GoToRecord acActiveDataObject, , acNewRec
    Forms(I).danniPratica.Form!idMateriale = idMateriale
    Forms(I).danniPratica.Form!Prezzo = Prezzo
    Forms(I).danniPratica.Form!descr = descrizione
    Forms(I).danniPratica.Form!Tipocosto = Tipocosto
    Forms(I).danniPratica.Form!IDpratica =
Forms(I).danniPratica.Form.Parent!IDpratica
    Forms(I).danniPratica.Form!quantità = 1
    Forms!gestioneMateriale.SetFocus
Il record lo scrive lo stesso, ma io lo vorrei avere a disposizione subito e
senza il messaggio. Qualcuno di voi si è già imbattuto in questo problema?
Grazie
Ciao


title: CanGrow

author: Guido Calgari

text:
Ho un problema banale ma piuttosto fastidioso. Sto preparando un report in
stile elenco, dove c'è anche un campo note che può contenere un numero
variabile di righe, che puo essere anche molto alto, quindi ho pensato di
utilizzare la proprietà CanGrow in modo che il mio controllo si adatti al
numero di righe presenti nel campo note. Il problema è: come faccio a fare
in modo che anche le altre caselle di testo presenti nella sezione (tutte
allineate con il campo note) aumentino della stessa dimensione del campo
note, in modo che il report abbia un aspetto uniforme. Ho provato a settare
su tutte le caselle di testo e su tutta la sezione la proprietà CanGrow, ma
mi aumenta solo la dimensione del controllo con il maggior numero e non le
altre caselle di testo .
Grazie mille in anticipo a chi è in grado di darmi una dritta


title: CanGrow

author: Carlo Costarella

text:
"Guido Calgari" <
formap...@mi.camcom.it
> ha scritto nel messaggio
news:cnsj4m$dpo$1...@stargate1.inet.it...

Qualcosa trovi nel sito
http://www.lebans.com
Oppure puoi scaricarti direttamente questo esempio dallo stesso sito:
http://www.lebans.com/DownloadFiles/printlines.zip
Ciao, Carlo


title: maschera di ricerca

author: giacoMouse

text:
salve,
come si fa a creare una mascherina che richieda l'inserimento di un
dato per poter cerare qualcosa in una tabella?
ad esempio, se volessi recuperare tutti i dati di una banca il cui
nome e quello inserito in una casella di testo?
come/quale bottone per il comando cerca dovrei creare?
scusate le banalita.
ciao e grazie
-g-


title: maschera di ricerca

author: Antonio Biso

text:
"giacoMouse" <
gia...@free.floating.net
> ha scritto nel messaggio
news:3d6133f9...@powernews.inwind.it...

Sigh...
Perchč non guardate i messaggi precedenti?
Questa č una delle domande ricorrenti.
Ti fai una query con criterio sotto il campo su cui filtrare fatto cosě
like nz([forms]![tuaform]![tuacasella];"*")
Poi il pulsante lancerŕ la query
Antonio


title: Report con segmenti

author: lostra

text:
Saluti a tutti, vi sarei grato se mi potreste indicare come rappresentare
con dei segmenti in un report giorni di ferie assegnati ai dipendenti, per
individuare se  i periodi richiesti sono comuni a più dipendenti ed
eventualmente spostarli, una cosa tipo diagrammi di Gannt.
Ringrazio  tutti coloro che hanno qualche soluzione.
Aldo


title: Report con segmenti

author: Emyr

text:


personalmente ho risolto creando da codice una tabella con il periodo
delle ferie come campi e nei record memorizzavo chi aveva prenotato in
quel periodo così risci a fare quello che chiedi...
ti avverto però che il tutto è un pò macchinoso....
Saluti.
Emanuele.


title: Problemi di sincronizzazione dati

text:
Premetto che sono alle primissime armi con la programmazione in Access.
Con Access 97  mi sono creato un programmino per la gestione del cartaceo
nel mio ufficio.
Il programma che gestisce carico fatture fornitori e magazzino e varie  e'
scritto in Fox Pro.
Ho allegato in access le tabelle .DBF anagrafiche e di  fatture, ecc. ecc.
Intorno al nucleo del programma in Fox Pro ho costruito  con access una
serie di funzioni assai utili anche perchè da me personalizzate e
modificabili in ogni momento (scadenzario pagamenti e incassi, gestione
commesse, funzioni di controllo  e tante altre) che non posso gestire con
Fox Pro e
con le quali Fox Pro non interagisce se non passivamente. Allora è nato
il problema di fare sì che eventuali
modifiche nelle tabelle originarie di Fox Pro possano essere riportate anche
in tutte quelle tabelle di Access riempite automaticamente  e periodicamente
via codice coi
dati presi dal Fox. Ad esempio, se annullo più record di fatture in Fox dopo
che la funzione di copia di access da me attivata li ha trasformati in
record di
scadenzario nelle tabelle Access, poi devo gestirmi l'annullamento a catena
dei movimenti stessi in Access.
Vengo al dunque:  Ho una tabella DBF "Fatture_Fox" che copio via codice in
una tabella speculare Fatture_Acc la quale ha un campo "Vergine" che viene
variato a -1 quando il record relativo ha generato qualche altro record  in
scadenzario_Acc o altrove. Le due tabelle sono identiche affinchè scorrendo
il recordset io possa facilmente "sgamare" eventuali variazioni o
annullamenti effettuati in Fatture_Fox e riportare le variazioni in
Fatture_Acc. In tal modo
semplifico i rapporti tra i due programmi affinchè le complicanze possano
ricadere tutte all' interno di Access, per essere gestite al meglio.
Se un malvagio ragioniere mi annulla più record in Fatture_Fox per poi
ricrearli identici ma disposti in diverso ordine di inserimento, e questi
record che sono stati  già copiati in Fatture_Acc hanno già creato movimenti
a cascata (scadenzario, chiusura commessa lavorazione, ecc.), io non
cancello nulla ma utilizzo la funzione che taglia la coda  dei record in
Fatture_Acc non corrispondente a Fatture_Fox in corrispondenza del primo
record anomalo, estrae dalla coda tagliata  di
Fatture_Acc il primo record disordinato  e lo incolla nella posizione
giusta. Nella coda tagliata (una tabella Temp) vengono cercati gli altri
record spostati non vergini che vengono progressivamente riposizionati nel
modo corretto, come in una catena DNA.
Eventuali record non vergini parzialmente variati ( importo, codice
cliente ) vengono posti in un' altra tabella temp a disposizione del
programma per le variazioni delle altre tabelle Access.
Eventuali record in _Acc non più presenti in _Fox (annullati) fanno la
stessa fine.
Eventuali record in _Fox che causa D.C.E.B. (Destino Cinico e Baro) non
fossero presenti in _Acc verrebbero creati dopo solito taglio coda.
Ora Vi chiedo umilmente.....qualcuno ha esempi di codice o consigli per
velocizzare l'abominevole modulo delle nevi?
Esiste una logica meno contorta e che dia più sicurezza (mi interessa quest'
ultima principalmente ) per gestire la cosa?
Vado tranquillo con OpenRecordset - if  datamov = datamov1 then  MoveNext
else  ecc.... oppure c'è in giro qualcosa di più semplice anche come
concezione?
 Un  grazie anticipato.


title: copiare una query da un file all'altro

author: Gabriele

text:
Dentro a un file MDB di A2000  ho creato una bella query .
E' possibile spostarla dentro ad un altro MDB , per non doverla ricreare ex
novo ?
Grazie


title: copiare una query da un file all'altro

author: Pablitomf [Acces]

text:
"Gabriele" <
q...@tin.it
> ha scritto nel messaggio
news:f5qs9f$r5b$1...@nnrp-beta.newsland.it...

Apri sorgente, apri destinazione e fai un bel copia e incolla
--
--
--
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97, 2000, XP e 2003
ASP
-----------------------------------------------------------------
http://www.accessgroup.it/
-----------------------------------------------------------------
Il mio motto :
""Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media."


title: copiare una query da un file all'altro

author: MA

text:

File
carica dagli esterni
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007


title: impostare function: aggiornare recordset maschera

text:
Carissimi buon giorno!

Utilizzo una function (che riporto di seguito) per sfruttare una macro Autokeys. Premendo F2, la funzione che si trova su un modulo controlla quale scheda è attiva genera un recordset da una maschera che si trova nella scheda attiva, e fa una serie di calcoli per poi mandare una stringa, utilizzando il protocollo Xon/Xoff alla cassa per eseguire lo scontrino.

Fin qui tutto funziona!

Public Function AGGIORNAMENTO() As Integer

Dim strSC, strDESC, strPRZf As String
Dim strPRZ, SC As Currency
Dim QR, x As String
Dim rst As DAO.Recordset, rstFiltered As DAO.Recordset
Dim cntMIN, cntMAX As Integer
Dim mychar As Variant

'
'Forms!VEND_MOD.SetFocus

Select Case Forms!VEND_MOD.Tab.Value
    Case 0
        Set rst = Forms!VEND_MOD!VENDITA0.Form.Recordset
    Case 1
        Set rst = Forms!VEND_MOD!VENDITA1.Form.Recordset
    Case 2
        Set rst = Forms!VEND_MOD!VENDITA2.Form.Recordset
    Case 3
        Set rst = Forms!VEND_MOD!VENDITA3.Form.Recordset
End Select

        If rst.RecordCount = 0 Then
            MsgBox "NESSUN ARTICOLO DA SCARICARE"
                Exit Function
        End If

        rst.MoveFirst

        If rst.Fields("REP_CAS") = 10 Or rst.Fields("REP_CAS") = 11 Then
            Select Case Forms!VEND_MOD.Tab.Value
               Case 0
                   Forms!VEND_MOD!VENDITA0.Requery
                   Exit Function
               Case 1
                   Forms!VEND_MOD!VENDITA1.Requery
                   Exit Function
               Case 2
                   Forms!VEND_MOD!VENDITA2.Requery
                   Exit Function
               Case 3
                   Forms!VEND_MOD!VENDITA3.Requery
                   Exit Function
           End Select
        End If

    cntMAX = rst.RecordCount

        Do Until Nz(cntMIN, 0) = cntMAX

            cntMIN = cntMIN + 1

                If rst.Fields("REP_CAS") = 1 Or rst.Fields("REP_CAS") = 2 Or rst.Fields("REP_CAS") = 4 Or rst.Fields("REP_CAS") = 7 Or rst.Fields("REP_CAS") = 8 Or rst.Fields("REP_CAS") = 9 Then
                    'DEFINIZIONE DESCRIZIONE
                    strDESC = rst.Fields("DESCR")
                        For Each mychar In Array("/", "\", ":", "<", ">", "|", "@", ";", ",", _
                            "*", "°", "-", "_", "'")
                            strDESC = Replace(strDESC, mychar, "")
                        Next mychar
                    strDESC = Chr(34) & strDESC & Chr(34)

                    'DEFINIZIONE DEL PREZZO
                    strPRZ = rst.Fields("PRZ_V")

                    strPRZf = Format(strPRZ, "###,##.00") & "H"
                    strSC = strSC & strDESC & rst.Fields("QTA_v") & "*" & strPRZf & rst.Fields("REP_CAS") & "R"

                    'SCONTO SU SINGOLO ARTICOLO
                    'If rst.Fields("SC_1") <> 0 Then strPRZ = rst.Fields("PRZ_V") * ((100 - (rst.Fields("SC_1"))) / 100)

                    If rst.Fields("txd") = -1 Then strSC = strSC & "33.34*1M" ' CALCOLO SCONTO OFFERTA 3X2
                    If rst.Fields("SC_1") > 0 Then strSC = strSC & rst.Fields("SC_1") & "*1M" 'CALCOLO SCONTO SU STRINGA

                End If

                    If cntMIN < cntMAX Then rst.MoveNext
        Loop

Select Case Forms!VEND_MOD!Tab.Value
    Case 0
        Forms!VEND_MOD!T = Forms!VEND_MOD!VENDITA0.Form.Testo39
        Forms!VEND_MOD!VENDITA0.Requery
        Forms!VEND_MOD!VENDITA0.Form.CasellaCombinata26 = Null
        Forms!VEND_MOD!VENDITA0.Form.CasellaCombinata26.SetFocus
        If Not IsNull(Forms!VEND_MOD.CScli.Column(0)) Then Forms!VEND_MOD.CScli = Null
    Case 1
        Forms!VEND_MOD!T = Forms!VEND_MOD!VENDITA1.Form.Testo39
        Forms!VEND_MOD!VENDITA1.Requery
        Forms!VEND_MOD!VENDITA1.Form.CasellaCombinata26 = Null
        Forms!VEND_MOD!VENDITA1.Form.CasellaCombinata26.SetFocus
        If Not IsNull(Forms!VEND_MOD.CScli.Column(0)) Then Forms!VEND_MOD.CScli = Null
    Case 2
        Forms!VEND_MOD!T = Forms!VEND_MOD!VENDITA2.Form.Testo39
        Forms!VEND_MOD!VENDITA2.Requery
        Forms!VEND_MOD!VENDITA2.Form.CasellaCombinata26 = Null
        Forms!VEND_MOD!VENDITA2.Form.CasellaCombinata26.SetFocus
        If Not IsNull(Forms!VEND_MOD.CScli.Column(0)) Then Forms!VEND_MOD.CScli = Null
    Case 3
        Forms!VEND_MOD!T = Forms!VEND_MOD!VENDITA3.Form.Testo39
        Forms!VEND_MOD!VENDITA3.Requery
        Forms!VEND_MOD!VENDITA3.Form.CasellaCombinata26 = Null
        Forms!VEND_MOD!VENDITA3.Form.CasellaCombinata26.SetFocus
        If Not IsNull(Forms!VEND_MOD.CScli.Column(0)) Then Forms!VEND_MOD.CScli = Null

End Select

        If Not strSC = "" Then

            If SCT <> 0 Then strSC = strSC & "=" & SCT & "*" & "2M" ' IN CASO DI SCONTO SUL SUBTOTALE
            strSC = strSC & "1T"
            Open "C:\stp_scntr.txt" For Output As #1
            Print #1, strSC 'Scrive la 1° riga del file
            Close #1 'Chiusura File

                If MsgBox("Vuoi stampare lo scontrino", vbYesNo, "ATTENZIONE") = vbNo Then
                    strSC = "a"
                        Open "C:\stp_scntr.txt" For Output As #1
                        Print #1, strSC 'Scrive la 1° riga del file
                        Close #1 'Chiusura File
                        Shell ("C:\stp_scntr.bat")
                    DoCmd.OpenForm "TOT", , , , , acDialog
                    Exit Function
                Else
                    Shell ("C:\stp_scntr.bat")
                End If
        Else

            strSC = "a"
            Open "C:\stp_scntr.txt" For Output As #1
            Print #1, strSC 'Scrive la 1° riga del file
            Close #1 'Chiusura File
            Shell ("C:\stp_scntr.bat")

        End If

     DoCmd.OpenForm "TOT", , , , , acDialog

End Function

IL PROBLEMA
Adesso dovrei aggiungere un ulteriore do loop perché ho la necessità di conoscere solo per alcuni cliente quali articoli comprano. Perciò vorrei fare in modo che SOLO in questi casi il campo ID_Clnt (cliente) venga riempito con il valore che si trova nella column(0) di una combobox_Clnt. Tenendo conto che la funzione del modulo lavora sul rst e non più sulla recordset della maschera, come faccio a registrare il codice cliente nella tabella vendita?

Detto in altro modo, dopo aver settato rst con il recordset della maschera sulla scheda attiva, come faccio a restituire il recordset aggiornato del codice cliente alla stessa maschera, così che il dato venga registrato nella tabella?

Spero di essere stato sufficientemente chiaro,
Sempre grazie e a presto ;)


text: HELP PLEASE :(


author: pfm

text:

potresti postarci la struttura del recordset Forms!VEND_MOD!VENDITA0.Form.Recordset

contiente il campo che vuoi filtrare?


title: problemi GROUP BY

author: Al

text:
Ciao
Ho dei problemi con access 2002 nel fare un group by
select a,b,c
from miatabella
group by a
mi dice che devo inserire anche le altre colonne nel group by,
come posso fare?
io devo raggruppare solo x la prima
Grazie


title: problemi GROUP BY

text:
"Al" <no...@nowhere.booo> ha scritto nel messaggio
news:e92ed0hojvbhuio1r...@4ax.com...

Ok, ma devi stabilire una formula comunque da applicare alle altre colonne.
Pertanto, se ti basta un valore qualunque di b e c potresti usare First.
Altrimenti dipende dalla tipologia dei dati e da cosa vuoi ottenere.
Antonio


title: identikit

text:
ma ke programmi usano per fare gli identikit la scentifica?
--
Posted from
relay4.inwind.it
 [212.141.53.75]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: identikit

author: AntoGal

text:
""uno1"" <
un...@inwind.it
> ha scritto...
> ma ke programmi usano per fare gli identikit la scentifica?
Forse il classico gioco di societą "Indovina Chi?" :-)
--
Ciao, AntoGal
*************************************************
Gestione punti vendita (casse e pos NCR)

www.powerretail.it
-------------------------------------------------------------
per scaricare un gioco di DAMA ITALIANA
http://volftp.mondadori.com/italiani/galletta/
*************************************************


title: identikit

author: Federico Luciani

text:
AntoGal wrote:
> ""uno1"" <
un...@inwind.it
> ha scritto...
> > ma ke programmi usano per fare gli identikit la scentifica?
> Forse il classico gioco di società "Indovina Chi?" :-)
rotfl!
--
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


title: Errore all'apertura di un achivio ACCESS

text:
Ho un archivio access che devo assolutamente leggere ed estrarre dei dati,
ma quando cerco di aprirlo appare il seguente messaggio:
NON SI DISPONE DELLE AUTORIZZAZIONE NECESSARIE PER UTILIZZARE L'OGGETTO
"NomeFile.mdb". per disporre delle autorizzazioni appropriate, rivolgersi
all'amministratore del sistema o all'autore dell'oggetto.
Come posso risovere questo problema????
Ringrazio tutti quelli che mi posso aiutare
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Cinzia

text:
"Rosy78" <
ro...@ttt.it
> ha scritto nel messaggio
news:ce7tkv$kva$1...@news.newsland.it...

Prova a creare un db nuovo e ad importare i dati dal db che non riesci ad
aprire direttamente, tramite Menu File- Carica dati esterni - Importa dati
a volte funziona.
Cinzia


text:
Cinzia ha scritto:

GRAZIE per il suggerimento, ma non funzione. Appare lo stesso errore.



author: 'gnurant

text:
Rosy78 <
ro...@ttt.it
> ha scritto:
> Cinzia ha scritto:
>
> > "Rosy78" <
ro...@ttt.it
> ha scritto nel messaggio
> > news:ce7tkv$kva$1...@news.newsland.it...
> > > Ho un archivio access che devo assolutamente leggere ed estrarre dei
dati,
> > > ma quando cerco di aprirlo appare il seguente messaggio:
> > >
> > > NON SI DISPONE DELLE AUTORIZZAZIONE NECESSARIE PER UTILIZZARE
L'OGGETTO
> > > "NomeFile.mdb". per disporre delle autorizzazioni appropriate,
rivolgersi
> > > all'amministratore del sistema o all'autore dell'oggetto.
> > >
> > > Come posso risovere questo problema????
> > > Ringrazio tutti quelli che mi posso aiutare
> > >
> > > --
> > >
> > > questo articolo e` stato inviato via web dal servizio gratuito
> > >
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
> > >
> > >
> > Prova a creare un db nuovo e ad importare i dati dal db che non riesci
ad
> > aprire direttamente, tramite Menu File- Carica dati esterni - Importa
dati
> > a volte funziona.
> > Cinzia
> GRAZIE per il suggerimento, ma non funzione. Appare lo stesso errore.
>
>
Prova a chiudere il file e a cancellare "Nomefile.ldb" presente nella
stessa directory di "Nomefile.mdb". Fallo solo se nessun altro è collegato
al db.
Ciauz
--
'gnurant come una cucuzza
Inviato da
www.mynewsgate.net


text:
"Rosy78" <
ro...@ttt.it
> wrote in message
news:ce7tkv$kva$1...@news.newsland.it...

Probabilmente se usi xp o w2000 l'mdb è stato creato con un'altra
Utenza. Per cui riaccedi con l'utente creatore e dai le permission al tuo
utente
ciao


author: Alberto S.

text:
On Wed, 28 Jul 2004 12:03:11 +0200,
ro...@ttt.it
 (Rosy78) wrote:
>Ho un archivio access che devo assolutamente leggere ed estrarre dei dati,
>ma quando cerco di aprirlo appare il seguente messaggio:
>
>NON SI DISPONE DELLE AUTORIZZAZIONE NECESSARIE PER UTILIZZARE L'OGGETTO
>"NomeFile.mdb". per disporre delle autorizzazioni appropriate, rivolgersi
>all'amministratore del sistema o all'autore dell'oggetto.
>
>Come posso risovere questo problema????
>Ringrazio tutti quelli che mi posso aiutare
Sei sicura che chi ha fatto il database non l'abbia - volutamente -
protetto?
--
Alberto
No alle guerre


title: inserire varianti su ordinazioni pietanze cucina

text:
Buonasera,
A2003 vorrei implementare sul programmino per comande sagra che ho sviluppato ,anche grazie ai vostri  suggerimenti, la possibilità di aggiungere delle varianti alle pietanze (ES  ben cotta, abbondante prosciutto,- mozzarella,ecc).
per la visualizzazione degli ordini uso una maschera in visualizzazione Foglio Dati che ha come origine questa query:
SELECT OrdiniDettaglio.IdOrdine, Pietanze.IdTipoPietanza, Pietanze.IdPietanza , Pietanze.PrzPietanza, OrdiniDettaglio.PrzPietanzaOrdi, OrdiniDettaglio.PrzListinoOrdi, OrdiniDettaglio.NumPietanza, Pietanze.NomePietanza, OrdiniDettaglio.Sequenza, (OrdiniDettaglio!PrzListinoOrdi*OrdiniDettaglio!NumPietanza) AS ImportoListino, (OrdiniDettaglio!PrzPietanzaOrdi*OrdiniDettaglio!NumPietanza) AS Importo
FROM TblVarianti, DatiOrdini INNER JOIN (Pietanze INNER JOIN OrdiniDettaglio ON Pietanze.IdPietanza = OrdiniDettaglio.IdPietanza) ON DatiOrdini.IdOrdine = OrdiniDettaglio.IdOrdine
ORDER BY OrdiniDettaglio.Sequenza;
Ho poi creato2 tabelle
TblVarianti che contiene i dati delle varianti
TblVariantiOrdini con un campo Sequenza relazionato molti a 1 con il campo OrdiniDettaglio.Sequenza, dove inserisco i record delle varianti presenti negli ordini.
Nella maschera ordini vorrei ottenere questa visualizzazione
2	pizza margherita	5,50	11,00
1	pizza capricciosa	7,00	7,00
	+capperi
	ben cotta
	-prosciutto
1	panino			3,00	3,00
Ci ho provato anche inserendo una listbox ,ma non ho nessuna idea di come uscirne,anche data la mia scarsa esperienza .
Qualcuno mi puoi aiutare e indirizzare sulla retta via ?
Grazie


author: BFS

text:
Il 12/03/2018 01:20,
maurizio...@gmail.com
 ha scritto:
> Buonasera,

> Nella maschera ordini vorrei ottenere questa visualizzazione
> 2	pizza margherita	5,50	11,00
> 1	pizza capricciosa	7,00	7,00
> 	+capperi
> 	ben cotta
> 	-prosciutto
> 1	panino			3,00	3,00
> Ci ho provato anche inserendo una listbox ,ma non ho nessuna idea di come uscirne,anche data la mia scarsa esperienza .
> Qualcuno mi puoi aiutare e indirizzare sulla retta via ?
> Grazie
>

tralasciando come hai strutturato il tutto, se vuoi ottenere quel tipo
di visualizzazione dove ad ogni pietanza fai seguire una serie di
aggiunte/rimozioni userei una query di unione tra la tabella delle righe
delle ordinazioni e la tabella che per ogni riga della ordinazione
contiene le aggiunte stabilinendo un ordinamento tale da avere sempre
per ogni riga di ordinazione subito dopo tutte le relative aggiunte

semplificando al massimo ho fatto una bozza. vedi qui

http://it.tinypic.com/r/1441ocm/9

ciao
BFS


author: GiorgioDaPrato

text:
> Ci ho provato anche inserendo una listbox ,ma non ho nessuna idea di come uscirne,anche data la mia scarsa esperienza .

aggiungo qualche osservazione, sperando si rivelino suggerimenti

e faccio una (la solita) premessa:
realizzo procedure piuttosto limitate
e quindi posso arrivare a suggerimenti limitati
(quando ci arrivo ...)

l' argomento è di mio interesse per due motivi:
1) vi si ritrovano i termini di una "gestione della produzione"
con attenzioni alla personalizzazione sotto forma di richiesta varianti
(è una cosa che mi si presenta con le schede prodotto di capi abbigliamento)
2) qualche mese fa era apparso un post praticamente uguale,
e il ripetersi della questione mi dà occasione di una riflessione aggiuntiva

allora:
LASCIO DA PARTE (considerandola effettuata) la registrazione dei prodotti
("cibi a catalogo": potrebbe anche essere fatta dai soli nomi e prezzi ...)

e mi soffermo sulle ordinazioni evidenziando due (eventuali) scopi:
-- "personalizzazione" del prodotto
(oppure, che quasi è la stessa cosa, "enfasi" sul frequentatore)
-- situazione di "street food"
(le variazioni proposte vengono considerate valide "dalla casa"
che metterà a catalogo quel prodotto ...)

quindi la registrazione degli ordini può avvenire così:

-ordineTestata
(tabella Master di ordineRighe)
mi sembra sia la "descrizione del tavolo",
con gli attributi necessari (numero, data, ora ...)

-ordineRighe
(tabella Detail di ordineTestata, E Master di ordineRigheDiciture)
c'è il riferimento a tabella Testata,
c'è il riferimento a tabella Prodotti,
alcuni campi "propri":
quantità, PREZZO (modificabile dopo le variazioni ?), FREQUENTATORE

-ordineRigheDiciture ("funziona come un blog")
(tabella Detail di ordineRighe)
c'è il riferimento a tabella ordineRighe,
alcuni campi "propri":
dicitura, tipoRiga E numeroRiga
QUESTI ULTIMI DUE per scopi di stampa e gestionali

Esempio:
tipoRiga "blog" (diciture inserite dal tavolo)
         --> numeroRiga in ordine (da codice: confermare currentRecord ?)
tipoRiga "gestione" (diciture "preparate" con scopo gestionale)
         --> numeroRiga ALTO (prestabilito, superiore al numero teorico blog)

scopi gestionali:
-le variazioni richieste fanno variare ANCHE il prezzo ...
-le variazioni richieste sono da esaminare dai "tecnici" (cuochi)
perchè possono far generare un nuovo prodotto ...
-le variazioni richieste, unite al riempimento del campo FREQUENTATORE,
possono far riproporre l'ordinazione (fidelizzazione) ...
-il FREQUENTATORE è un VIP (magari del luogo) e ce ne faremo pubblicità ...

a questo punto la difficoltà (forse) maggiore è quella di costruire
una form di registrazione dati a subform "dipendenti"
(oggettivamente più adeguata allo scopo rispetto al foglio dati indicato)

mentre avvalendosi della struttura gerarchica delle tabelle
e dei numeri ordinali presenti nelle righe diciture
si possono preparare i report riassuntivi delle ordinazioni per il tavolo
e i report di avviso a scopo gestionale interno


text:
mi scuso per il ritardo ,ma sono preso con il lavoro
Grazie a tutti per le risposte
X BFS
Ho provato a adattare la query union alle tabelle presenti e  questo è il codice:
Select Sequenza,0 as Posizione,NomePietanza,numPietanza From OrdiniDettaglio
UNION ALL select Sequenza ,VarianteSeq,VarianteNome ,0 from OrdiniVarianti
ORDER BY Sequenza, Posizione;
quando lancio la query mi da errore:
L'espressione ORDER BY(Sequenza) include campi non selezionati dalla query.Solo i campi richiesti nella prima query possonoi essere inclusi in un'espressione ORDER BY
Il campo Sequenza è presente nella tabella.
cosa sto sbagliando ?
per il resto (come ho strutturato Il tutto)come posso modificare ?
grazie
Ciao
Maurizio


text:
> per il resto (come ho strutturato Il tutto)come posso modificare ?

per quanto detto da parte mia:

Credo che un inserimento dati a subform annidate risolva la situazione
(pur NON avendo MAI adoperato subform annidate ...)

e ritaglio, semplificandola per lo scopo,
la struttura dati già prospettata:

-ordineTestata
(tabella Master di ordineRighe)
mi sembra sia la "descrizione del tavolo",
con gli attributi necessari (numero, data, ora ...)

-ordineRighe
(tabella Detail di ordineTestata, E Master di ordineRigheVarianti)
c'è il riferimento a tabella Testata,
c'è il riferimento a tabella Prodotti,
alcuni campi "propri":
quantità, PREZZO (modificabile dopo le variazioni), ordinante

-ordineRigheVarianti ("funziona come un blog")
(tabella Detail di ordineRighe)
c'è il riferimento a tabella ordineRighe,
alcuni campi "propri":
dicitura(-->"variante"), numeroRiga

NOTE:
-lascia perdere (per ora ?) gli "scopi gestionali" prima indicati

-subform annidate:
come detto NON le adopero come tali,
ma penso si debba costruire per prima quella terminale
(in questo caso quella con ordineRighe e ordineRigheVarianti)
e poi inserire questa in quella superiore
(in questo caso ordineTestata)

-varianti (diciture come le ho chiamate io):
in teoria NON è necessaria una tabella che le raccoglie
(listaVarianti), è sufficiente una combo che mostra,
raggruppate, quelle già registrate.
Comunque è una buona prassi tenere la lista in una tabella
(e aggiungere direttamente da codice dalla combo il nuovo valore)

NOTA PERSONALE: per come vengono registrate,
queste "varianti" NON sono, in pratica, varianti del prodotto
ma "aggiunte" della rigaOrdine
(E' scopo gestionale farle diventare varianti del prodotto,
e allora può essere necessario il tipoVariante)

- il prezzo della rigaOrdine è un campo calcolato
(come è un campo calcolato l'importo totale dell'ordine del tavolo)

- i numeri Riga sono autonumber progressivi

Procedendo in questo modo mi sembra proprio
che la "semplice" registrazione (e il suo richiamo)
"spiattelli pari pari" i piatti ordinati ...
(anche se un report, a strutturazione identica, sarebbe più indicato)


text:
Buonasera,
mi scuso per la risposta tardiva,ma ho potuto dedicare pochissimo tempo allo sviluppo dell'applicazione.
Sono finalmente arrivato al risultato voluto usando una query union come suggerito da BFS,  soluzione che ho poi usato anche per i report Scontrino e Comanda.
Ho preferito questa soluzione rispetto a quella suggerita da GiorgioDaPrato,che ringrazio comunque tantissimo,in quanto volevo iniziare a approcciare le query union.
Grazie ancora a tutti


title: Errore su filtro

author: Piero

text:
ciao a tutti

ho questo filtro su di un pulsante nella maschera

    If Me.FilterOn Then
        Reports!MioReport.Filter = Me.Filter
        Reports!MioReport.FilterOn = True
    Else
        Reports!MioReport.FilterOn = False
    End If

Mentre in A2003 funziona, in A2007
qualsiasi campo filtro, ho l'errore
"Immettere valore parametro"

Grazie per l'aiuto


title: Errore su filtro

author: Karl Donaubauer

text:

Non ti dice quale parametro?
Incolla un filtro di esempio che non funziona.

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


title: Errore su filtro

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:b2aord...@mid.individual.net...
> Piero wrote:
>> ho questo filtro su di un pulsante nella maschera
>>
>>    If Me.FilterOn Then
>>        Reports!MioReport.Filter = Me.Filter
>>        Reports!MioReport.FilterOn = True
>>    Else
>>        Reports!MioReport.FilterOn = False
>>    End If
>>
>> Mentre in A2003 funziona, in A2007
>> qualsiasi campo filtro, ho l'errore
>> "Immettere valore parametro"
>
> Non ti dice quale parametro?
> Incolla un filtro di esempio che non funziona.
>
Ciao Karl
qualsiasi campo che filtro
p.e. NomeCleinte, dataOrdine ecc.
ho l'errore "Immettere valore parametro"
 mentre in A2003 non ho questo problema.

i campi in questioni sono presenti nella query
del report


title: Errore su filtro

text:
Piero wrote:
> "Karl Donaubauer ha scritto:
>>> ho questo filtro su di un pulsante nella maschera
>>>
>>>    If Me.FilterOn Then
>>>        Reports!MioReport.Filter = Me.Filter
>>>        Reports!MioReport.FilterOn = True
>>>    Else
>>>        Reports!MioReport.FilterOn = False
>>>    End If
>>>
>>> Mentre in A2003 funziona, in A2007
>>> qualsiasi campo filtro, ho l'errore
>>> "Immettere valore parametro"
>>
>> Non ti dice quale parametro?
>> Incolla un filtro di esempio che non funziona.
>>
> qualsiasi campo che filtro
> p.e. NomeCleinte, dataOrdine ecc.
> ho l'errore "Immettere valore parametro"
> mentre in A2003 non ho questo problema.
>
> i campi in questioni sono presenti nella query
> del report

Con "quale parametro" intendevo:
Nella finestra di parametro c'è sempre scritto il nome del campo
che al momento è incluso nel filtro o qc diverso?

Con "filtro di esempio" intendevo cosa ricevi nella finestra
immediata con:

debug.print Me.Filter

Mostra anche il resto del codice rilevante p.e. la riga che apre
il report. Forse si puo riprodurre il problema o vedere delle
cose sospette.



title: Errore su filtro

text:
cut
>>
>> i campi in questioni sono presenti nella query
>> del report
>
> Con "quale parametro" intendevo:
> Nella finestra di parametro c'� sempre scritto il nome del campo
> che al momento � incluso nel filtro o qc diverso?

C'� scritto MiaMaschera.(nome del campo filtrato)

> Con "filtro di esempio" intendevo cosa ricevi nella finestra
> immediata con:
>
> debug.print Me.Filter

ho come risultato Vero
se applico il filtro, altrimenti Falso

> Mostra anche il resto del codice rilevante p.e. la riga che apre
> il report. Forse si puo riprodurre il problema o vedere delle
> cose sospette.

dopo aver tolto il codice su report vuoto:
il report si apre ma senza dati
mentre se non filtro alcun campo, visualizzo tutti i dati

>


title: Errore su filtro

text:
Piero wrote:
> ...
parafrasi ecc.

Siccome non sono in grado di ricavare delle risposte concrete
(valori, nomi, espressioni, codice), speriamo che ti aiuti qualcun'altro.



title: leggere/scrivere proprieta di un documento word

author: Maurizio

text:
salve a tutti
vorrei avere la possibilità da Access 2000 di leggere/scrivere le
proprieta di un documento word. Ho scoperto che bisogna caricare la
libreria dsofile.dll
ho trovato il seguente codice:
Function fGetDocProps(strInFile As String, strProp As String)
Dim objWord As Object, objDocProps As Object
    On Error GoTo Err_fGetDocProps
    Set objWord = CreateObject("Word.Application")
    objWord.Documents.Open strInFile
    Set objDocProps = objWord.ActiveDocument.BuiltInDocumentProperties
    fGetDocProps = objDocProps(strProp)
Exit_fGetDocProps:
    objWord.Application.Quit savechanges:=False
    Set objDocProps = Nothing
    Set objWord = Nothing
    Exit Function
Err_fGetDocProps:
    fGetDocProps = "Error: Probably File/Property does not exist."
    Resume Exit_fGetDocProps
End Function
Function fEnumProps(strInFile As String)
Dim objWord As Object, objDocProps As Object
Dim i As Integer
    On Error Resume Next
    Set objWord = CreateObject("Word.Application")
    With objWord
        .Documents.Open strInFile
        Set objDocProps =
objWord.ActiveDocument.BuiltInDocumentProperties
        For i = 0 To objDocProps.Count - 1
            Debug.Print objDocProps(i).Name, objDocProps(i).Value
        Next i
    End With
    objWord.Application.Quit savechanges:=False
    Set objWord = Nothing
End Function
*****************************************************
per leggere le proprieta (in questo caso il titolo) del documento word
scrivo
msgbox  (fGetDocProps("C:\prova\pippo.me.doc","Title"))
non ho capito come faccio per scrivere (e quindi modificare) la stessa
proprietà
spero di essere stato chiaro
saluti
Maurizio


author: antonio

text:
"Maurizio" <
consu...@open.it
> ha scritto nel messaggio
news:1192228597....@e9g2000prf.googlegroups.com...









----------  RISPOSTA  -----------------
Io ho Office 2003 e, quindi, quanto sto per dirti potrebbe non essere valido
per Access e Word 2000... ma comunque credo che siano valide.
I riferimenti necessari da includere sono questi due:
   Microsoft Office XX.Y Object Library
   Microsoft Word XX.Y Object Library
dove XX.Y per Office 2003 sono 11.0, ma per te potrebbero essere 10.0 o
qualcosa del genere: non mi risulta che sia necessaria quella libreria
indicata da te.
Se riesci ad includere riferimenti come questi appena detti, dovresti poter
definire gli oggetti Word così:
    Dim WordAppl As Word.Application, WordDoc As Word.Document
A questo punto puoi testare se Word è già stato caricato e, nel caso non lo
sia, caricarlo in questo modo:
    Errore.Codicinonerrore = "429;"
    Set WordAppl = GetObject(, "Word.Application")
    If Errore.Erroreoccorso = 429 Then Set WordAppl =
CreateObject("Word.Application")
ovviamente gestisci l'errore 429 (ovvero Word non è attivo) come meglio
credi ed elimina quelle mie istruzione che lo gestiscono per mezzo di una
classe che mi sono creato io esclusivamente a mio piacimento.
Ora hai Word attivo, ma ancora non hai preso il governo di nessun documento.
Per vedere se è presente il documento che serve a te oppure, nel caso non ci
sia, per generarlo puoi fare così:
    For i = 1 To WordAppl.Documents.Count
        Set WordDoc = WordAppl.Documents(i)
        If WordDoc.BuiltInDocumentProperties(wdPropertyComments).Value =
CommentoCercato _
                    Then GoTo dopogenerazionedocumento
    Next
documentoNONtrovato:
    Arco1 = Cartellamodelli & "\" & Modelloscelto & ".dot"
    Set WordDoc = WA.Documents.Add(Arco1)
    WordDoc.BuiltInDocumentProperties(wdPropertyComments).Value =
CommentoCercato
dopogenerazionedocumento:
nella routine suddetta io avevo cercato la proprietà "Commento", tu puoi
utilizzare il Titolo o qualcos'altro.
Alla fine, non ti scordare di chiudere gli oggetti aperti:
    WordDoc.Close False
qui False serve a non fare salvare il documento perchè, se doveva essere
salvato, l'avrei già fatto prima. Ovviamente tu puoi toglierlo.
    Set WordDoc = Nothing
    Set WordAppl = Nothing
E' tutto.
Ciao
Antonio


author: ALESSANDRO Baraldi

text:

Direi che il tuo suggerimento non è corretto, o meglio potrebbe essere
dannoso...!
La tecnica dell'inserimento delle Librerie si usa solo se l'oggetto deve
ereditare EVENTI.
In tutti gli altri casi è bene fare come ha chiesto l'OP vale a dire
lasciare l'associazione
tardiva in modo da non vincolare il codice alla versione presente nel PC di
sviluppo.
Tutte le altre consideazioni che hai fatto invece mi trovano in accordo.
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


text:
>
> Direi che il tuo suggerimento non è corretto, o meglio potrebbe essere
> dannoso...!
> La tecnica dell'inserimento delle Librerie si usa solo se l'oggetto deve
> ereditare EVENTI.
> In tutti gli altri casi è bene fare come ha chiesto l'OP vale a dire
> lasciare l'associazione
> tardiva in modo da non vincolare il codice alla versione presente nel PC
> di
> sviluppo.
>
> Tutte le altre consideazioni che hai fatto invece mi trovano in accordo.
>
> --
> @Alex (Alessandro Baraldi)
> ---------------------------------------------------------------------------
>
http://www.sitocomune.com/
>
http://www.alessandrobaraldi.it
> ---------------------------------------------------------------------------
>
>
Questa cosa non la sapevo !!!
Ci credo perchè la fonte è autorevole, ma l'impossibilità di utilizzare nomi
di oggetti "parlanti" e dover necessariamente preferire l'oggetto anonimo
object... beh, per me questo sarebbe più che sufficiente per farmi preferire
la definizione delle librerie.
In ogni caso, grazie per la precisazione.
Ciao
Antonio
P.S. [O.T.]
Certo che un intervento me lo sarei aspettato anche e soprattutto da
Maurizio :-((((
non fosse altro per farci sapere se ha provato ed è andato tutto bene o se
ha trovato difficoltà...
mah, sto proprio diventando vecchio !!!


title: Sommare

author: pippo

text:
Ormai � da circa 3 giorni che navigo nel buio...
Mi � stato dato da modificare un file fatto con access. Tale file funziona
un p� da "registro contabilit�" con un Anagrafe, le ditte e i relativi
movimenti mese per mese.
Il file si ferma al 2009 e mi � stato chiesto di aggiungere il 2010; riesco
a fare tutto (vedendo come � strutturato il 2009 e gli anni precedenti) per�
quello che non mi riesce � effettuare una semplice somma di tutti i dati
presenti in una colonna.
La tabella non contiene valori nulli.
Esiste una sottomaschera dove ci sono 12 caselle di testo (una per ogni
mese) le quali vengono caricate con i dati dei rispettivi mesi. Ci sono poi
4 altre caselle per calcolare i trimestri.
Il tutto viene inserito in una maschera principale e qui vengono i problemi.
Ho anche qui 12 caselle di testo che per� mi devono sommare l'intera colonna
di ogni mese e tale casella di testo la compongo cos�:
Origine controllo: =Somma([Gennaio2010]), dove Gennaio2010 � anche lo stesso
nome che ho messo in Origine controllo delle caselle di testo nella
sottomaschera.
Quando esco dalla modalit� Struttura non mi esce nessuna somma ma "#Errore".
Tengo a precisare che i campi ovviamente contengono un valore numerico
(precisione doppia) e non contengono valori nulli.
Il problema � che che inserisco solo =[Gennaio2010] mi visualizza il dato
corrente...
Probabilmente sbaglio qualcosa nella somma anche perch� non utilizzo quasi
mai Access...
Ps: Versione Access 2007


title: Sommare

author: Pablitomf (da casa)

text:

Il "Nome Elemento" del campo che vuoi sommare che valore ha?... fare
=Somma([Gennaio2010]), non � giusto se il campoGennaio2010 non esiste... il
fatto che tu abbia attribuito il source Gennaio2010 a un campo, non vuol
dire che il campo stesso si chiami Gennaio2010... magari si chiama PIPPO
(nelle sue propriet� guarda il valore presente in "Nome Elemento")... in tal
caso dovresti fare =Somma([PIPPO])


title: Sommare

text:
"Pablitomf (da casa)"  wrote in message
news:j90Cn.51934$Ua....@twister2.libero.it...
>Il "Nome Elemento" del campo che vuoi sommare che valore ha?... fare
>=Somma([Gennaio2010]), non � giusto se il campoGennaio2010 non esiste... il
>fatto che tu abbia attribuito il source Gennaio2010 a un campo, non vuol
>dire che il campo stesso si chiami Gennaio2010... magari si chiama PIPPO
>(nelle sue propriet� guarda il valore presente in "Nome Elemento")... in
>tal caso dovresti fare =Somma([PIPPO])
Grazie mille per le informazioni, ma ho gi� provato.
La casella di testo che preleva i dati dalla colonna Gennaio ha:
"Nome elemento" 10gen
"Origine controllo" Gennaio2010
Quindi da come suggerisci tu dovrei cambiare la somma con
"Origine controllo" =Somma([10gen]) ma anche cos� non va...


title: Sommare

author: almorel

text:
On 28 Apr, 22:33, "pippo" <
p...@ppp.it
> wrote:
> "Pablitomf (da casa)"  wrote in messagenews:j90Cn.51934$Ua....@twister2.libero.it...
>
> >Il "Nome Elemento" del campo che vuoi sommare che valore ha?... fare
> >=Somma([Gennaio2010]), non è giusto se il campoGennaio2010 non esiste... il
> >fatto che tu abbia attribuito il source Gennaio2010 a un campo, non vuol
> >dire che il campo stesso si chiami Gennaio2010... magari si chiama PIPPO
> >(nelle sue proprietà guarda il valore presente in "Nome Elemento")... in
> >tal caso dovresti fare =Somma([PIPPO])
>
> Grazie mille per le informazioni, ma ho già provato.
> La casella di testo che preleva i dati dalla colonna Gennaio ha:
> "Nome elemento" 10gen
> "Origine controllo" Gennaio2010
>
> Quindi da come suggerisci tu dovrei cambiare la somma con
> "Origine controllo" =Somma([10gen]) ma anche così non va...
Ciao,
sembrerebbe che la struttura del DB non sia proprio un modello di
logica...
se posti il DB forse si trova una soluzione.
Ciao
Alberto


title: Sommare

text:
"almorel"  wrote in message
news:ec81e043-e0ae-48c2...@r34g2000yqj.googlegroups.com...
>Ciao,
>sembrerebbe che la struttura del DB non sia proprio un modello di
>logica...
>se posti il DB forse si trova una soluzione.
>Ciao
>Alberto
Pi� che altro � che il database non � mio e ci sono parecchi dati
personali...
Comunque ho anche provato a duplicare la maschera e la query che mi serve e
a sostituire i nomi da 09 a 10 mantenendo quindi tutta la struttura identica
ma non va!


title: Sommare

text:
"pippo"  wrote in message news:LXZBn.163236$9f6.2...@twister1.libero.it...
>Ormai � da circa 3 giorni che navigo nel buio...
Risolto


title: Sommare

text:

e a "noi" cosa interessa sapere che hai risolto se non ci dici come?...
scusa i "modi", ma questo � un NG, e le cose vanno condivise... successi e
insuccessi, perch� potrebbero essere utili ad altri... ;)


title: Sommare

text:
"Pablitomf (da casa)"  wrote in message
news:YmECn.164118$9f6.2...@twister1.libero.it...
>e a "noi" cosa interessa sapere che hai risolto se non ci dici come?...
>scusa i "modi", ma questo � un NG, e le cose vanno condivise... successi e
>insuccessi, perch� potrebbero essere utili ad altri... ;)
Probailmente sbagliavo semplicemente a copiare le schede vecchie.
Ho rifatto il procedimento con calma e funzionava. Non ho fatto chiss�
cosa...


title: aiutooooooo!!!! ho sbagliato a formulare la domanda!

author: domenico panfili

text:
Ho una libreria. Lavoro in autocomposizione gestione ordini. Nella maschera
prodotti, oltre a nome prodotto e prezzo unitario, ho inserito anche i campi
volume, codice e autore. Quando entro nella sottomaschera dettagli sugli
ordini e clicco sulla casella combinata, mi appaiono tutti i libri inseriti
nella maschera prodotti. Scegliendone uno, perň, mi si aggiornano solo i
campi  nome prodotto e prezzo unitario. Come faccio a far aggiornare
automaticamente anche gli altri campi della sottomaschera prodotti? Mi hanno
detto di vedere l'opzione Refresh, ma non la trovo. Come devo fare?
Spiegatemelo con la massima chiarezza possibile.


author: Roberto dal portatile

text:
"domenico panfili" <
s82...@students.uni-bocconi.it
> ha scritto nel
messaggio news:9krfhs$k9u$2...@pegasus.tiscalinet.it...
> Ho una libreria. Lavoro in autocomposizione gestione ordini. Nella
maschera
> prodotti, oltre a nome prodotto e prezzo unitario, ho inserito anche i
campi
> volume, codice e autore. Quando entro nella sottomaschera dettagli sugli
> ordini e clicco sulla casella combinata, mi appaiono tutti i libri
inseriti
> nella maschera prodotti. Scegliendone uno, però, mi si aggiornano solo i
> campi  nome prodotto e prezzo unitario. Come faccio a far aggiornare
> automaticamente anche gli altri campi della sottomaschera prodotti? Mi
hanno
> detto di vedere l'opzione Refresh, ma non la trovo. Come devo fare?
> Spiegatemelo con la massima chiarezza possibile.
>
Se la tabella Prodotti l'hai già modificata ed ora la sua struttura è:
IDProdotto          Contatore e chiave primaria
NomeProdotto    Testo
PrezzoUnitario    Valuta
Volume              Testo
Codice               Testo
Autore                Testo
Se alla Sottomaschera Dettagli ordini hai aggiunto le caselle di testo
Volume, Codice e Autore.
Nella Sottomaschera Dettagli ordini imposta a 6 la proprietà Numero colonne
della casella combinata IDProdotto e imposta a
0cm;3,353cm;1,729cm;0cm;0cm;0cm la proprietà Larghezza colonne della casella
combinata IDProdotto.
Nella Sottomaschera Dettagli ordini modifica la routine generata a fronte
dell'evento "Dopo aggiornamento" della casella combinata IDProdotto da
Me![PrezzoUnitario] = Me![IDProdotto].Column(2)
in
Me![PrezzoUnitario] = Me![IDProdotto].Column(2)
Me!Volume = Me![IDProdotto].Column(3)
Me!Codice= Me![IDProdotto].Column(4)
Me!Autore= Me![IDProdotto].Column(5)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Passare come argomento di un form il nome di un controllo

author: Andrew

text:
Ciao, ho una maschera principale con un bottone che chiama una popup di
ricerca cliente. La popup mi da la possibilità di selezionare un Cod cliente
ed inserirlo con un DblClick nel campo Cod cliente della maschera
principale.
Il problema e che la popup per scrivere nella maschera principale fa
riferimento ad un campo ben preciso del form altrimenti non saprebbe dove
incollare il codice, così ho scritto:
Forms![movimenti]!Cliente.Setfocus
Forms![movimenti]!Cliente = Me.Cliente
Questo mi limita perchè io non posso utilizzare questa funzionalità per
tutti i campi cod clifor presenti nel programma. Quindi ho pensato di
passare utilizzare OpenArgs come parametro nell'evento di apertura della
popup, in modo da riportare il form che ha chiamato la maschera e il campo
di destianzione.
Ho provato passando nell'openargs la stringa "Forms![movimenti]!Cliente" e
successivamente intercettare la stringa sulla popup e creare un oggetto
Control.
Ma ovviamente non ci sono riuscito, sapreste trovare una soluzione a questo
problema?
Grazie in anticipo
Andrea


text:
"Andrew" <
andrea.di...@tin.it
> ha scritto nel messaggio
news:r%gNa.16404$xK6.3...@news1.tin.it...

Io uso un'altra tecnica.
Mi appoggio ad un Modulo e la Form PoPup la apro
in modalità acDialog.
Nella Form PoPup definisco una Property personalizzata
che io chiamo Value.
Public Property Get Value() As Variant
    Value = Me.MiaListBox
End Property
Nel Modulo apro come ti dicevo la Form ed essendo aperta
in modalità acDialog interrompe l'esecuzione del codice, quando
la chiudo il codice del modulo riprende e verifico il valore della
Proprietà Value di Form.
Public Function adhDoChois(Optional oldValue = "") As String
   DoCmd.OpenForm strForm, WindowMode:=acDialog
   If IsLoaded(strForm) Then
      adhDoChois = Forms(strForm).Value
      DoCmd.close acForm, strForm
   Else
      adhDoChois = Nz(oldValue, vbNullString)
   End If
End Function
In questo modo dalla Form Principale non faccio altro che
scrivere :
Su evento Activate della TxtBox inserisco:
Me.TuaTxtBox=adhDoChois(Me.TuaTxtBox)
Forse ti ho fatto della confusione.
In ogni caso usando il tuo metodo io farei così:
1)Nel codice della Popup dichiari a livello di Modulo
   Dim ctlRemoto as Control
2)All'apertura della Form PoPup leggi l'argomento e lo associ:
   Set ctlRemoto=Eval(Me.Openargs)
3)Quando devi salvare il dato non fai altro che uguagliare:
    ctlRemoto=Me.TuoControllo
Ciao
@Alex.


title: problema con arcvio Access97

author: proxor

text:
ciao
per una svista ho cancellato un DB (come al solito la copia unica), poi
fortuna vuole, con R-Studio sono riuscito a recuperarlo.
ora però all'apertura acc97 mi dice che non può aprire il DB poichè un altro
utenta sta modificando gli stessi dati.
naturalmente nessuno sta lavorando su quel DB, pertanto cosa può essere
successo ????
per la precisione all'avvio avevo fatto in modo che si avviasse una
maschera, e pertanto togliendo l'avvio il db si avvia e posso lavorare
correttamente nelle tabelle.
ho provato a mettere mano alla maschera di avvio ma non riesco a fare
nessuna modifica e nemmeno la cancellazione del file, mi compare sempre
l'avviso del Microsoft Jetlab.
cosa può essere successo ???
il DB era su una macchina win2000 ma con abilitazione administrator per
tutti
grazie e saluti da valter - TV


title: problema con arcvio Access97

author: Emyr

text:


reimporta tutto su un vuoto?
Saluti.
Emanuele.


title: problema con arcvio Access97

text:
magari.
non riesco nemmeo a fare una copia della tabella con i dati, mi compare un
errore "file eliminato" e non si copia proprio nulla
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:4sbfju03tf3ncfdko...@4ax.com...



title: Query di dati non corrispondenti

author: Ronny

text:
Ciao a tutti,
non si riesce a fare una query per dati non corrispondenti con 2 chiavi ?
Esempio :
Testata : Cliente , Tipo
	     C100 B
Dettaglio : Cliente , Tipo
	     C100 A
Vorrei che nei dati non corrispondenti mi tirasse fuori il C100 B .
Se lo faccio solo per codice, mi frega perchè è presente sia in testa che in
detta
Grazie mille per l'aiuto
Ronny

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


title: Query di dati non corrispondenti

author: Roberto da casa

text:
"Ronny" <
pippo...@pippo.it
> ha scritto nel messaggio
news:194Z130Z244Z250Y...@usenet.libero.it...
>
> Ciao a tutti,
> non si riesce a fare una query per dati non corrispondenti con 2 chiavi ?
> Esempio :
>
> Testata : Cliente , Tipo
>      C100 B
>
> Dettaglio : Cliente , Tipo
>      C100 A
>
> Vorrei che nei dati non corrispondenti mi tirasse fuori il C100 B .
> Se lo faccio solo per codice, mi frega perchè è presente sia in testa che
in
> detta
HAi provato a crearti una query con l'Autocomposizione ricerca dati non
corrispondenti?
>
> Grazie mille per l'aiuto
Prego
> Ronny
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Query di dati non corrispondenti

text:
							Il 26 Mag 2006, 11:46, "Roberto da casa" <
r.masso...@libero.it
> ha
scritto:
>
> "Ronny" <
pippo...@pippo.it
> ha scritto nel messaggio
> news:194Z130Z244Z250Y...@usenet.libero.it...
> >
> > Ciao a tutti,
> > non si riesce a fare una query per dati non corrispondenti con 2 chiavi
?
> > Esempio :
> >
> > Testata : Cliente , Tipo
> > C100 B
> >
> > Dettaglio : Cliente , Tipo
> > C100 A
> >
> > Vorrei che nei dati non corrispondenti mi tirasse fuori il C100 B .
> > Se lo faccio solo per codice, mi frega perchè è presente sia in testa
che
> in
> > detta
>
> HAi provato a crearti una query con l'Autocomposizione ricerca dati non
> corrispondenti?
>
> >
> > Grazie mille per l'aiuto
>
Si, ma sembra che non sia possibile associare 2 campi nell'unione ...



title: Query di dati non corrispondenti

text:
"Ronny" <
spamm...@aaa.it
> ha scritto nel messaggio
news:194Z130Z244Z250Y...@usenet.libero.it...
> Il 26 Mag 2006, 11:46, "Roberto da casa" <
r.masso...@libero.it
> ha
> scritto:
> >
> > "Ronny" <
pippo...@pippo.it
> ha scritto nel messaggio
> > news:194Z130Z244Z250Y...@usenet.libero.it...
> > >
> > > Ciao a tutti,
> > > non si riesce a fare una query per dati non corrispondenti con 2
chiavi
> ?
> > > Esempio :
> > >
> > > Testata : Cliente , Tipo
> > > C100 B
> > >
> > > Dettaglio : Cliente , Tipo
> > > C100 A
> > >
> > > Vorrei che nei dati non corrispondenti mi tirasse fuori il C100 B .
> > > Se lo faccio solo per codice, mi frega perchè è presente sia in testa
> che
> > in
> > > detta
> >
> > HAi provato a crearti una query con l'Autocomposizione ricerca dati non
> > corrispondenti?
> >
> > >
> > > Grazie mille per l'aiuto
> >
> Si, ma sembra che non sia possibile associare 2 campi nell'unione ...
Ti sembra male: la mancata corrispondenza puoi chiederla su quanti campi ti
pare.
A questo punto mi viene il dubbio che tu abbia provato a crearti una query
con quel tipo di autocomposizione.



title: Query di dati non corrispondenti

text:
							Il 26 Mag 2006, 12:09, "Roberto da casa" <
r.masso...@libero.it
> ha

Eh si ... infatti mi crea :
SELECT Cst_testa.cliente, Cst_testa.RagioneSociale, Cst_testa.[ind sped],
Cst_testa.tpCliente
FROM Cst_testa LEFT JOIN Cst_detta ON Cst_testa.cliente = Cst_detta.codice
WHERE (((Cst_testa.tpCliente)=1) AND ((Cst_detta.codice) Is Null));
vuoi dire che basterebbe mettere una AND sula unione ??? e non ci ho nemmeno
pensato ??? ahhhhrg



title: Query di dati non corrispondenti

text:
"Ronny" <
nos...@aaaaaa.it
> ha scritto nel messaggio

Se le due tabelle si chiamano rispettivamente Tabella1 e Tabella2 ed hanno
la seguente struttura:
ID            Contatore e chiave primaria
campo1
campo2
campo3
La query che evidenzierà i record di Tabella1 che non hanno corrispondenza
in Tabella2 in base ai campi campo1 e campo2 avrà il seguenta codice SQL:
SELECT DISTINCTROW Tabella1.ID, Tabella1.campo1, Tabella1.campo2,
Tabella1.campo3
FROM Tabella1 LEFT JOIN Tabella2 ON Tabella1.campo1 = Tabella2.campo1 And
Tabella1.campo2 = Tabella2.campo2
WHERE (((Tabella2.campo1) Is Null) AND ((Tabella2.campo2) Is Null));



title: errore nel salvataggio report e conseguente inutilizzo

author: newsmino

text:
ho avuto una segnalazione di un errore nel salvataggio di un report
(mi è già capitato un'altra volta ma per fortuna avevo una copia
recente del db)
ora non riesco più in nessun modo a riaprirlo
ho provato ad importarlo ad esportarlo a compattare e ripristinare il
db ma nulla
ma è mai possibile che non posso più in nessun modo recuperarlo?
ciao a tutti


author: Roberto da Parma

text:
"newsmino" <
news...@gmail.com
> ha scritto nel messaggio
news:c2b746e1-9c3f-4ba6...@r27g2000yqn.googlegroups.com...
> ho avuto una segnalazione di un errore nel salvataggio di un report
> (mi � gi� capitato un'altra volta ma per fortuna avevo una copia
> recente del db)
>
> ora non riesco pi� in nessun modo a riaprirlo
>
> ho provato ad importarlo ad esportarlo a compattare e ripristinare il
> db ma nulla
>
> ma � mai possibile che non posso pi� in nessun modo recuperarlo?
>
> ciao a tutti
In modalit� struttura riesci ad aprirlo?
Se si controlla che non ci sia qualche errore nel codice o manchi qualche
riferimento.
Ciao
--
Roberto da Parma


title: Maschera di ricerca

author: Cancelli

text:
Ciao a tutti,
credo il mio sia un problema banale ma per un neofita di Access come me temo
non lo sia... veniamo al dunque...
ho una tabella di circa 1000 record con la mia brava chiave primaria ora
devo ricercare all'interno di questa tabella solo alcuni di questi record
che corrispondano ad alcune caratteristiche , ma visto che a volte la
discriminante della ricerca è solo il nome a volte solo il cognome a volte
la data di nascita a volte una combinazione di questi, non vorrei essere
costretto a dover fare una Query diversa per ogni tipo di ricerca... esiste
un modo per far questo ? ( risposte del tipo: " Si , esiste un modo " non
sono molto gradite...:-)  ) Quale?
Grazie in anticipo
Antonio


title: Maschera di ricerca

author: Antonio Biso

text:
Cancelli ha scritto nel messaggio <876ses$3t3$
1...@fe1.cs.interbusiness.it
>...

Il modo più semplice è questo.
Prepara una maschera in cui metterai dei controlli per ogni campo sui quali
poter filtrare. Il loro valore predefinito dovrà essere *.
Inoltre devi garantirti via codice che se i valori lì inseriti vengano
cancellati di nuovo venga scritto *.
La tua query, unica, sarà una query che per ogni campo da filtrare avrà
qualcosa come
Like [forms]![tuascheda]![controllo1]
Se non viene filtrato per quel controllo sarà like * e quindi nessun filtro,
altrimenti seleziona solo per quello che l'utente avrà scritto sulla
maschera
Antonio


title: Maschera di ricerca

author: Fabio Montagner

text:
Nell'evento dell'avvio della ricerca, inserisco il codice sotto che mi
permette di costruire dinamicamente la query di selezione dei dati che poi
andrò a visualizzare in altra maschera
dove "ME!..." indica che prelevo i dati dalla maschera di ricerca
    Dim MyDatabase As Database
    Dim MyQueryDef As QueryDef
    Dim strDlm As String
    Dim where As Variant
    strDlm = Chr$(34)
    Set MyDatabase = CurrentDb()
    On Error Resume Next
    MyDatabase.QueryDefs.Delete "qryDynAnagrafe"
    On Error GoTo 0
    where = Null
    If Not IsNull(Me![txtCognome]) Then
        If Left(Me![txtCognome], 1) = "*" Or Right(Me![txtCognome], 1) = "*"
Then
            where = where & " And [tblanagrafe].[str_Cognome] Like " &
strDlm + Me![txtCognome] + strDlm
        Else
            where = where & " And [tblanagrafe].[str_Cognome] = " + strDlm +
Me![txtCognome] + strDlm
        End If
    End If
    If Not IsNull(Me![txtNome]) Then
        If Left(Me![txtNome], 1) = "*" Or Right(Me![txtNome], 1) = "*" Then
            where = where & " And [tblanagrafe].[str_nome] Like " & strDlm +
Me![txtNome] + strDlm
        Else
            where = where & " And [tblanagrafe].[str_nome] = " + strDlm +
Me![txtNome] + strDlm
        End If
    End If
    If Not IsNull(Me![txtRagSoc]) Then
        If Left(Me![txtRagSoc], 1) = "*" Or Right(Me![txtRagSoc], 1) = "*"
Then
            where = where & " And [tblanagrafe].[str_ragSoc] Like " & strDlm
+ Me![txtRagSoc] + strDlm
        Else
            where = where & " And [tblanagrafe].[str_ragSoc] = " + strDlm +
Me![txtRagSoc] + strDlm
        End If
    End If
    If Not IsNull(Me![txtComune]) Then
        If Left(Me![txtComune], 1) = "*" Or Right(Me![txtComune], 1) = "*"
Then
            where = where & " And [tblanagrafe].[str_Comune] Like " & strDlm
+ Me![txtComune] + strDlm
        Else
            where = where & " And [tblanagrafe].[str_Comune] = " + strDlm +
Me![txtComune] + strDlm
        End If
    End If
    If Not IsNull(Me![txtPv]) Then
         where = where & " AND [tblanagrafe].[str_Pv]= " + Me![txtPv]
    Else
         where = where
    End If
    Set MyQueryDef = MyDatabase.CreateQueryDef("qryDynAnagrafe", _
        "Select tblanagrafe.*,qryCentroAttivo.lng_int_Salto from tblanagrafe
INNER JOIN qryCentroAttivo ON tblAnagrafe.lng_cnt_Centro =
qryCentroAttivo.LNG_CNT_CENTRO " & IIf(IsNull(where), "", "where " &
Mid(where, 6)) & " ORDER BY str_RagSoc, str_Cognome, tblanagrafe.str_Nome")
        DoCmd.OpenForm "frmAnagrafe"
        Forms!frmAnagrafe.RecordSource = "qryDynAnagrafe"


title: Maschera di ricerca

author: Tonio

text:
grazie, idea davvero geniale
Antonio


title: Maschera di ricerca

author: FasoN

text:
Ciao,
io utilizzo un metodo "particolare" ovvero inserisco nel tag del controllo
il valore di ricerca e da questo compongo la stringa da passare in SQL per
aprire la maschera.
Ti faccio un esempio:
poniamo di avere un controllo Cognome se dopo l'aggiornamento e' nullo
metto Cognome.Tag="" se invece ci sono dei valori faccio un controllo per
vedere se c'e' * e metto rispettivamente Cognome.Tag="<nomecampotabella>=" &
[Cognome] oppure Cognome.Tag="<nomecampotabella> like" & [Cognome].
Faccio cosi' per tutti i campi che mi interessano e sul filtro della
Maschera oppure sul rowsource dell'eventuale controllo in cui voglio
inserire l'output metto <controllo1>.Tag AND Controllo2.Tag
AND....Controllon.Tag nella clausula WHERE ovviamente controllando che il
tag non sia vuoto, volendo puoi far specificare tu se vuoi AND o OR, ma
ricordati poi le parentesi :)
Non ho mai provato, ma dovrebbe funzionare lo stesso anche se lasci solo il
LIKE evitando cosi' il controllo della presenza di *.
Ciao
<LuigI>
Cancelli <
canc...@polimedia.it
> wrote in message
876ses$3t3$1...@fe1.cs.interbusiness.it...
> Ciao a tutti,
>
> credo il mio sia un problema banale ma per un neofita di Access come me
temo
> non lo sia... veniamo al dunque...
> ho una tabella di circa 1000 record con la mia brava chiave primaria ora
> devo ricercare all'interno di questa tabella solo alcuni di questi record
> che corrispondano ad alcune caratteristiche , ma visto che a volte la
> discriminante della ricerca è solo il nome a volte solo il cognome a volte
> la data di nascita a volte una combinazione di questi, non vorrei essere
> costretto a dover fare una Query diversa per ogni tipo di ricerca...
esiste
> un modo per far questo ? ( risposte del tipo: " Si , esiste un modo " non
> sono molto gradite...:-)  ) Quale?
>
>
> Grazie in anticipo
>
> Antonio
>
>


title: Maschera di ricerca

author: Max

text:
Antonio Biso <
ch...@etruria.net
> wrote in message
876un5$ecr$1...@pegasus.tiscalinet.it...
> Il modo più semplice è questo.
> Prepara una maschera in cui metterai dei controlli per ogni campo sui
quali
> poter filtrare. Il loro valore predefinito dovrà essere *.
> Inoltre devi garantirti via codice che se i valori lì inseriti vengano
> cancellati di nuovo venga scritto *.
> La tua query, unica, sarà una query che per ogni campo da filtrare avrà
> qualcosa come
> Like [forms]![tuascheda]![controllo1]
> Se non viene filtrato per quel controllo sarà like * e quindi nessun
filtro,
> altrimenti seleziona solo per quello che l'utente avrà scritto sulla
> maschera
>
> Antonio
>
ottimo ma per i campi vuoti come faccio????
                                                        ciao Max


title: Maschera di ricerca

text:
Max ha scritto nel messaggio <879tj9$91l$
1...@fe1.cs.interbusiness.it
>...

Che cosa avevo scritto?
Il loro valore predefinito dovrà essere *.
>> Inoltre devi garantirti via codice che se i valori lì inseriti vengano
>> cancellati di nuovo venga scritto *.
Altrimenti dovrai scrivere questo come criterio WHERE
like iif([forms]![tuascheda]![tuocontrollo] = "" or
isnull([forms]![tuascheda]![tuocontrollo]);"*";[forms]![tuascheda]![tuocontr
ollo])
Antonio


title: Maschera di ricerca

author: barbi

text:
Cancelli <
canc...@polimedia.it
> wrote in message
876ses$3t3$1...@fe1.cs.interbusiness.it...
> Ciao a tutti,
>
> credo il mio sia un problema banale ma per un neofita di Access come me
temo
> non lo sia... veniamo al dunque...
> ho una tabella di circa 1000 record con la mia brava chiave primaria ora
> devo ricercare all'interno di questa tabella solo alcuni di questi record
> che corrispondano ad alcune caratteristiche , ma visto che a volte la
> discriminante della ricerca è solo il nome a volte solo il cognome a volte
> la data di nascita a volte una combinazione di questi, non vorrei essere
> costretto a dover fare una Query diversa per ogni tipo di ricerca...
esiste
> un modo per far questo ? ( risposte del tipo: " Si , esiste un modo " non
> sono molto gradite...:-)  ) Quale?
dopo averci lavorato su un po' direi che il modo c'e'
detto [contro] il controllo di ricerca nella maschera e [campo] il campo che
ci sta dietro,
metti nella struttura query nella colonna del [campo] il seguente criterio:
Iif(Forms!maschera![contro] Is Null;[campo];Forms!maschera![contro])
  il sistema dell'* non funziona con le combo associate a una colonna di ID
barbi


title: Maschera di ricerca

text:
barbi ha scritto nel messaggio ...
>  il sistema dell'* non funziona con le combo associate a una colonna di ID
>barbi
Che intendi?
Antonio


title: Maschera di ricerca

text:
Antonio Biso <
ch...@etruria.net
> wrote in message
87e8er$c2d$1...@lacerta.tiscalinet.it...

cioe' una combo di ricerca associata ad es. a un campo tipo IDprodotto, non
al campo NomeProdotto che e' quello significativo, e quindi e' fatta da due
colonne:
1)IDprodotto, invisibile, associata
2)NomeProdotto, visibile
se cerco di mettere * nel valore predefinito mi forza "*" e cosi' mi frega,
al lancio della maschera vedo tutto grigio.
barbi


title: Maschera di ricerca

text:
barbi ha scritto nel messaggio ...
>
>Antonio Biso <
ch...@etruria.net
> wrote in message
>87e8er$c2d$1...@lacerta.tiscalinet.it...
>> barbi ha scritto nel messaggio ...
>>
>> >  il sistema dell'* non funziona con le combo associate a una colonna di
>ID
>> >barbi
>>
>> Che intendi?
>>
>cioe' una combo di ricerca associata ad es. a un campo tipo IDprodotto, non
>al campo NomeProdotto che e' quello significativo, e quindi e' fatta da due
>colonne:
>1)IDprodotto, invisibile, associata
>2)NomeProdotto, visibile
>se cerco di mettere * nel valore predefinito mi forza "*" e cosi' mi frega,
>al lancio della maschera vedo tutto grigio.
Non capisco, deve funzionare lo stesso
Mi spieghi la tua struttura?
Antonio


title: Maschera di ricerca

text:
Antonio Biso <
ch...@etruria.net
> wrote in message
87gsqt$f1k$1...@pegasus.tiscalinet.it...
> barbi ha scritto nel messaggio ...
> >
> >cioe' una combo di ricerca associata ad es. a un campo tipo IDprodotto,
non
> >al campo NomeProdotto che e' quello significativo, e quindi e' fatta da
due
> >colonne:
> >1)IDprodotto, invisibile, associata
> >2)NomeProdotto, visibile
> >se cerco di mettere * nel valore predefinito mi forza "*" e cosi' mi
frega,
> >al lancio della maschera vedo tutto grigio.
>
>
> Non capisco, deve funzionare lo stesso
> Mi spieghi la tua struttura?
>
parlo del caso in cui la maschera e' associata a una query "principale" che
comprende alcuni campi tipo ID di una tabella "principale", piu' i
corrispondenti campi tipo "Nome" in altrettante tabelle "secondarie". La
combo generica di ricerca ha due colonne come descritto, prese dalla query
"secondaria". Se nella query "principale" pongo i criteri come hai detto tu
cioe'
Like Forms!maschera![contro], al lancio della maschera non mi appare niente
ma solo lo sfondo grigio; cio' significa che non ha trovato nessun record,
perche' e' la stessa cosa che succede a me col mio sistema del criterio:
Iif(Forms!maschera![contro] Is Null;[campo];Forms!maschera![contro]) quando
non trova nessun record (e' un inconveniente che va corretto, perche' se no
posso solo chiudere e riaprire la maschera).  Il fatto che non trova nessun
record lo attribuisco al fatto che, nell'elenco delle proprietą di [contro],
se tento di mettere valore predefinito = * mi forza "*" e penso che voglia
dire che lo considera solo come stringa e quindi non funziona con gli
interi, ma forse
mi sbaglio. Oppure non va bene perche' non e' nell'elenco dei valori
previsti dalla query "secondaria" per la combo, e non si riesce a porre
"solo in elenco"=no perche' la colonna associata alla combo e' invisibile.
barbi


title: Maschera di ricerca

author: ema

text:
Mio cugino mi ha detto che Antonio Biso <
ch...@etruria.net
> scrisse:
> Altrimenti dovrai scrivere questo come criterio WHERE
>
> like iif([forms]![tuascheda]![tuocontrollo] = "" or
> isnull([forms]![tuascheda]![tuocontrollo]);"*";[forms]![tuascheda]![tuocontr
> ollo])
>
piu` comodo: nel WHERE ci metti
like LeggiControllo (Forms!tuamaschera!tuocontrollo)
e LeggiControllo la metti in un modulo, con
function LeggiControllo (s as string) as string
	if isnull (s) then LeggiControllo = "*" else LeggiControllo = s
end function
--
Emanuele Cesena        <
ece...@penguinpowered.com
>
http://www.penguinpowered.com/~ecesena
Ci sono tre persone superstiti su un'isola, un poliziotto, un finanziere
ed un carabiniere.  Il poliziotto guarda, oltre il mare, verso la terra
del continente, stimata a circa 20 chilometri da loro.  Cosi' esclama:
"Provero' a raggiungere l'altra riva a nuoto".  Il poliziotto parte,
nuota per cinque chilometri, e si stanca parecchio.  Arriva a dieci
chilometri, ma non ce la fa piu' ed annega.  Il finanziere: "Mi chiedo
se ce l'abbia fatta.  Credo sia meglio se ci provo anch'io".  E si tuffa
anche lui.  Nuota per cinque, dieci chilometri.  Ma arriva a quindici
stanchissimo, non riesce ad andare avanti ed affoga.  Il carabiniere,
rimasto solo, si chiede: "Chissa' se ce l'hanno fatta...  Penso che sia
meglio se provo anch'io", e va.  Nuota per cinque chilometri, poi arriva
a dieci, quindici, DICIANNOVE chilometri dall'isola.  La costa del
continente e' bene in vista, ma lui, fra se', dice: "Sono troppo stanco
per proseguire, non ce la faccio piu'!", cosi' gira e torna indietro.
		-- Da it.hobby.umorismo


title: Maschera di ricerca

text:
Mio cugino mi ha detto che barbi <
barbi...@libero.it
> scrisse:
> cioe' una combo di ricerca associata ad es. a un campo tipo IDprodotto, non
> al campo NomeProdotto che e' quello significativo, e quindi e' fatta da due
> colonne:
> 1)IDprodotto, invisibile, associata
> 2)NomeProdotto, visibile
> se cerco di mettere * nel valore predefinito mi forza "*" e cosi' mi frega,
> al lancio della maschera vedo tutto grigio.
>
aggiungi un record alla tabella, tipo un "-- Seleziona --" che sara`
anche il predefinito della combo.
Poi fai una funzione tipo quella che ho proposto nell'altra risposta,
e se l'ID e` uguale a quello di "-- Seleziona --", allora ritorni "*"
bye!
--
Emanuele Cesena        <
ece...@penguinpowered.com
>
http://www.penguinpowered.com/~ecesena
America:
	L'ultima voga TV e' un quiz intitolato ``DEBITI''.  Chi vince,
vede saldati tutti i propri debiti.  Si tratta di rispondere a domande
sullo spettacolo.  Potremmo mandarci qualcuno del Governo a concorrere
per l'Italia.  Se vince, si ripiana il debito pubblico.  Magari
Veltroni: qualche videocassetta l'ha vista.  Un'idea che collimerebbe
con le sue posizioni politiche.  E' Veltroni infatti ad aver proposto
nuovi Gratta e Vinci per aumentare il gettito fiscale.  Ehi!  E allora
perche' non un 740 abbinato alla Lotteria?  Ogni 740 ha un numero
progressivo, come un biglietto della Lotteria.  A capodanno c'e'
l'estrazione.  Se viene estratto il tuo 740, vinci un miliardo.  Non so
voi, ma io pagherei le tasse piu' volentieri.
		-- Panfilo Maria Lippi, "TABLOID TABLOID"@"Mai Dire Gol"


title: Maschera di ricerca

text:
barbi ha scritto nel messaggio ...
>Antonio Biso <
ch...@etruria.net
> wrote in message
>87gsqt$f1k$1...@pegasus.tiscalinet.it...
>> barbi ha scritto nel messaggio ...
>> >
>> >cioe' una combo di ricerca associata ad es. a un campo tipo IDprodotto,
>non
>> >al campo NomeProdotto che e' quello significativo, e quindi e' fatta da
>due
>> >colonne:
>> >1)IDprodotto, invisibile, associata
>> >2)NomeProdotto, visibile
>> >se cerco di mettere * nel valore predefinito mi forza "*" e cosi' mi
>frega,
>> >al lancio della maschera vedo tutto grigio.
>>
>>
>> Non capisco, deve funzionare lo stesso
>> Mi spieghi la tua struttura?
>>
>parlo del caso in cui la maschera e' associata a una query "principale" che
>comprende alcuni campi tipo ID di una tabella "principale", piu' i
>corrispondenti campi tipo "Nome" in altrettante tabelle "secondarie". La
>combo generica di ricerca ha due colonne come descritto, prese dalla query
>"secondaria". Se nella query "principale" pongo i criteri come hai detto tu
>cioe'
>Like Forms!maschera![contro], al lancio della maschera non mi appare niente
>ma solo lo sfondo grigio; cio' significa che non ha trovato nessun record,
>perche' e' la stessa cosa che succede a me col mio sistema del criterio:
Hmmm....
A parte che in questi casi è meglio lasciare legata la colonna col nome e
riferirsi a column(1) per l'ID, prova a utilizzare un controllo nascosto
dove metterai *. All'evento dopo aggiornamento della combo scrivi nel
controllo invisibile il valore dell'ID cioè di column(1) e baserai la query
della maschera sul controllo invisibile...
Antonio


title: Maschera di ricerca

text:
Antonio Biso <
ch...@etruria.net
> wrote in message
87uc35$jlo$1...@pegasus.tiscalinet.it...
> >parlo del caso in cui la maschera e' associata a una query "principale"
che
> >comprende alcuni campi tipo ID di una tabella "principale", piu' i
> >corrispondenti campi tipo "Nome" in altrettante tabelle "secondarie". La
> >combo generica di ricerca ha due colonne come descritto, prese dalla
query
> >"secondaria". Se nella query "principale" pongo i criteri come hai detto
tu
> >cioe'
> >Like Forms!maschera![contro], al lancio della maschera non mi appare
niente
> >ma solo lo sfondo grigio; cio' significa che non ha trovato nessun
record,
> >perche' e' la stessa cosa che succede a me col mio sistema del criterio:
>
>
> Hmmm....
> A parte che in questi casi č meglio lasciare legata la colonna col nome e
> riferirsi a column(1) per l'ID, prova a utilizzare un controllo nascosto
> dove metterai *. All'evento dopo aggiornamento della combo scrivi nel
> controllo invisibile il valore dell'ID cioč di column(1) e baserai la
query
> della maschera sul controllo invisibile...
>
guarda, ormai non ne posso piů di provare varianti, in sostanza ho messo a
punto una maschera che mi costruisce i criteri della query in VBA, perň mi
sembrava attraente concludere il discorso col mio sistema del criterio
Iif(Forms!maschera![contro] Is Null;[campo];Forms!maschera![contro]) che
funziona salvo il caso di nessun record trovato, che si dovrebbe poter
intercettare in VBA, magari ci farň un pensierino
barbi


title: estrarre il valore massimo

author: Giancarlo

text:
Ciao a tutti. In A97 ho una tabella strutturata in questo modo:
Id_lavoro
lavoro
livello
stato
In pratica potrei avere [lavoro] = 1, [livello] = 0000 e [stato] che varia
da uno a 4. Poi potrei avere [lavoro] = 1 , [livello] = 0001 e [stato] che
varia da 1 a 4, quindi:
lavoro livello stato
1        0000  3
1        0001  1
1        0002  2
Come faccio ad estrarre il lavoro, livello e stato del lavoro con il livello
più elevato? Nell'esempio sopra dovrei estrarre   [lavoro]= 1   [livello]=
0002  [stato]=2.
Ho provato con la funzione max sul livello e group by, ma estraggo sempre
tutti i records perchè il valore di [stato] è diverso.
grazie a tutti
Giancarlo


title: estrarre il valore massimo

author: giorgio rancati

text:
"Giancarlo" <
thi...@libero.it
> ha scritto nel messaggio
news:427b15e2$1...@x-privat.org...

Ciao Giancarlo,
Puoi creare una prima Query che rende il lavoro (raggruppamento) e il
Max(Livello), la salvi e poi la metti in Join con la tua tabella collegando
i campi Lavoro e MaxDiLivello.
oppure se hai dimestichezza con il linguaggio SQL puoi fare tutto in una
sola Query
es...
--------------
Select T1.*
From Tabella AS T1
  Inner Join
     [Select Lavoro,Max(Livello) AS MaxDiLivello
      From Tabella Group By Lavoro]. AS T2
      ON T1.Lavoro=T2.Lavoro AND T1.Livello=T2.MaxDiLivello
---------------
Ciao Giorgio


title: estrarre il valore massimo

text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:427b40ff$0$2188$5fc...@news.tiscali.it...

Grazie. Funziona.
> Ciao Giorgio
>
>
>


title: repliche - w98 <-> wxp

author: Riccardo Casadei

text:
Sempre con il problema delle mie repliche mi sorge un dubbio dato che 2
macchine sono w98 (fisso e portatile e la replica funziona)
Quando il portatile si sposta nell'altra sede, si deve sincronizzare con un
fisso che ha wxp (e qui la sincronia non funziona, nel senso che non da
errore ma non avviene lo scambio di dati)
Possibile che sia questo il problema ???
Avete qualche idea per risolverlo ?
Rick


title: repliche - w98 <-> wxp

text:
"Riccardo Casadei" <
in...@ricweb.it
> ha scritto nel messaggio
news:cappun$d97$1...@fata.cs.interbusiness.it...

Mi rispondo da solo ... non credo dipenda dal SO, visto che tutte le tabelle
si sincronizzano tranne una.
Ma allora, perchè se provo sul mio pc (w2000) e con un'altro pc Wxp con gli
stessi dati del cliente funziona ?!?!?!?
Bohh ... non ne vengo a capo.
Rick


title: importare in 97 maschere create con 2002

author: Roberto Furlani

text:
avrei necessità di importare in Access 97 maschere create (dopo lunghe ore
di lavoro) con 2002.
Qualcuno ha qualche soluzione? (posso operare con 97, 2000, 2002)
Grazie
Roberto Furlani


author: Alessandro Baraldi

text:
"Roberto Furlani" <
furlani...@yahoo.it
> wrote in message
news:xfDjb.298063$
R32.9...@news2.tin.it

Esporta da A2002 in formato A97, poi lo apri con A97.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:37b4d72287d466e16d...@mygate.mailgate.org...

talmente semplice che manco ci ho pensato. ahi ahi. Grazie  :)
Roberto Furlani


title: Unire valore di due campi

author: Giuseppe

text:
Ciao a tutti
Devo unire il valore di due campi  in una tabella tipo:
Campo: CodiceCatalogo   Campo: Release
            001A                                01
            001A                                01
            003B                                03
            003B                                04
E farli diventare un nuovo Campo  tipo  Catalogo_Release
                                                                001A01
                                                                001A01
                                                                003B03
                                                                003B04
Non ho idea di come fare se non manualmente ,ma la cosa è un'pò improbabile
visto il numero dei record
Mi date una mano?
Ciao Giuseppe


title: Unire valore di due campi

text:
Fai una query sulla tabella Tabella includi i campi che vuoi e e definisci
il campo che ti interessa in modo che contenga [CodiceCatalogo]&[Release]
Non è difficile.
"Giuseppe" <
amrma...@tin.it
> ha scritto nel messaggio
news:0BdOb.104561$VW.42...@news3.tin.it...



title: Unire valore di due campi

author: AEOM

text:
"Giuseppe" <
amrma...@tin.it
> ha scritto nel messaggio
news:0BdOb.104561$VW.42...@news3.tin.it...

se la tabella che ha questi campi si chiama tabella1, aggiungi un campo
catalogo_release e creati questa query di aggiornamento:
UPDATE Tabella1 SET Tabella1.CodiceCatalogoRelease =
[CodiceCatalogo]+[release];
lanciala e il gioco è fatto
ciao, AEOM


title: Unire valore di due campi

text:
"AEOM" <
fuck...@motherfucker.it
> ha scritto nel messaggio
news:fPdOb.134225$_P.48...@news4.tin.it...

Perfetto    Grazie
Giuseppe