title: layout tabella da codice

text:
<
un...@37.com
> ha scritto nel messaggio
news:1140478486.1...@z14g2000cwz.googlegroups.com...
Garzie Carlo per la risposta, le proprietā che hai elencato non
modificano la tabella dati come chiedevo specificamente ma il form
visualizzato come tabella ...
cut
[risposta]
E no quello che ti ho scritto si riferisce proprio alle tabelle e fa
esattamente quello che tu desideri.
Questo un esempio di codice dove alla sub ImpostaProprieta devi passare il
nome della tabella e
al posto di ImpostaProprietāCampo tdfComuni![Provincia] puoi mettere il nome
di un campo a tua scelta
o aggiungerne di altri:
Public Sub ImpostaProprieta(TuaTbl As String)
Dim dbs As Database
Dim tdfComuni As TableDef
Set dbs = CurrentDb
Set tdfComuni = dbs.TableDefs(TuaTbl)
ImpostaProprietāTabella tdfComuni, "DatasheetFontItalic", dbBoolean, False
ImpostaProprietāTabella tdfComuni, "DatasheetFontUnderline", dbBoolean,
False
ImpostaProprietāTabella tdfComuni, "RowHeight", dbLong, 450
ImpostaProprietāCampo tdfComuni![Provincia], "ColumnWidth", dbInteger, 2160
DoCmd.OpenTable TuaTbl, acViewNormal
End Sub
Sub ImpostaProprietāTabella(tdfOggTabella As TableDef, strNomeProprietā As
String, _
        intTipoProprietā As Integer, varValoreProprietā As Variant)
       Const conErroreProprietāNonTrovata = 3270
    Dim prpProprietā As Property
    On Error Resume Next
    tdfOggTabella.Properties(strNomeProprietā) = varValoreProprietā
    If Err <> 0 Then
        If Err <> conErroreProprietāNonTrovata Then
            On Error GoTo 0
            MsgBox "Impossibile impostare la proprietā '" & strNomeProprietā
_
                & "' nella tabella '" & tdfOggTabella.Name & "'", 48,
"ImpostaProprietāTabella"
Else
            On Error GoTo 0
            Set prpProprietā =
tdfOggTabella.CreateProperty(strNomeProprietā, _
                intTipoProprietā, varValoreProprietā)
            tdfOggTabella.Properties.Append prpProprietā
        End If
    End If
    tdfOggTabella.Properties.Refresh
End Sub
Sub ImpostaProprietāCampo(fldCampo As Field, strNomeProprietā As String, _
        intTipoProprietā As Integer, varValoreProprietā As Variant)
Const conErroreProprietāNonTrovata = 3270
    Dim prpProprietā As Property
    On Error Resume Next
    fldCampo.Properties(strNomeProprietā) = varValoreProprietā
    If Err <> 0 Then
        If Err <> conErroreProprietāNonTrovata Then
            On Error GoTo 0
            MsgBox "Impossibile impostare la proprietā '" & strNomeProprietā
_
                & "' nel campo '" & fldCampo.Name & "'", 48,
"ImpostaProprietāCampo"
Else
            On Error GoTo 0
            Set prpProprietā = fldCampo.CreateProperty(strNomeProprietā, _
                intTipoProprietā, varValoreProprietā)
            fldCampo.Properties.Append prpProprietā
        End If
    End If
End Sub
Comunque se hai risolto diversemente e con la tua testa meglio cosė.
Ciao, Carlo


title: Thread in sospeso

author: Antonio Biso

text:
Chi ha thread in sospeso con me, potrà ricevere risposta solo da lunedì in
poi
Saluti
Antonio


title: Thread in sospeso

author: Graziano Franchi (Dal Portatile)

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:OXdt8.15820$SR5.4...@twister1.libero.it...

cosa è thread ???
Saluti


title: Thread in sospeso

author: Emyr

text:


è una serie di messaggi che costituiscono un unico argomento, i
gestori di news si occupano di raggruppare i vari messaggi per
argomento (nella fattispecie il primo oggetto sccritto da chi ha
postato il primo messaggio)
Saluti.
Emanuele.


title: Thread in sospeso

text:
"Graziano Franchi (Dal Portatile)" <
franchi....@tiscali.it
> ha scritto
nel messaggio news:a94rof$570$1...@pegasus.tiscalinet.it...

SIGH
Ogni messaggio con tutte le sue risposte successive costituiscono un thread
Antonio


title: ma la Rollback funziona?

author: Roberto

text:
Salve a tutti...
ma la serie BeginTrans, Rolback, Commit funziona o no?
O meglio x Access cos'è un transazione?
Ho una form Ordini con una subform OrdineDettagli in relazione:
    Ordini 1:1 ------- 1:n OrdineDettagli
purtroppo Access non gestisce la cardinalità 1:n ma solo le 0:n
    Ordini 1:1 ------- 0:n OrdineDettagli
a questo punto ho inserito nell'evento Form_Load della form Ordini
    Set wrkArea = DBEngine.Workspaces(0)
    wrkArea.BeginTrans
successivamente all'uscita nell'evento Form_Close
verifico una variabile che mi indica se ho inserito o meno qualche record in
OrdineDettagli e, alternativamente, eseguo o wrkArea.Rollback o
wrkArea.Commit...ma non funziona niente. Nonostante faccio la Rollback il
record che ho 'dovuto' inserire nella via form Ordini rimane allegramente in
archivio.
Naturalmente, mi piacerebbe usare la Rollback/Commit anche per
l'accettazione o rifiuto delle modifiche effettuate sulle mappe.
Sbaglio qualcosa? Access ha un concetto di transazione diverso? Magari un
task è sempre e solo legato ad una singola form dopo la quale, anche
semplicemente passando alla subform collegata effettua lui una Commit?
Cmq, al posto della Rollback ho inserito Undo...ma il risultato non cambia.
Ho dovuto scrivere una query che cancella il record su Ordini.
Grazie
Roberto
--
"Ieri non ero nessuno / Oggi sono diventato scemo" Freak Antoni (Skiantos)


title: ma la Rollback funziona?

author: Dario da PD

text:
Anch'io ho provato tempo fa ad usare le transazioni con le sottoschede, ma
mi sa che non funziona...
> Sbaglio qualcosa?
No.
>Access ha un concetto di transazione diverso? Magari un
> task è sempre e solo legato ad una singola form dopo la quale, anche
> semplicemente passando alla subform collegata effettua lui una Commit?
Diciamo di si, nel senso che le form e le subform probabilmente ignorano
qualsiasi forma di transazione.
Le puoi usare benissimo con DAO, ossia aprendo i recorset con comandi tipo
Set rs = CurrentDb.Openrecordset(ecc.), anzi devo dire che in questo caso
funzionano che è una meraviglia, ma con le subform mi sembra non si possa
fare proprio nulla.
Ciao
Dario da PD


title: ma la Rollback funziona?

author: Sib

text:
"Roberto" scrivette
> Salve a tutti...
> ma la serie BeginTrans, Rolback, Commit funziona o no?
> O meglio x Access cos'è un transazione?
>
> Ho una form Ordini con una subform OrdineDettagli in relazione:
>
>     Ordini 1:1 ------- 1:n OrdineDettagli
>
> purtroppo Access non gestisce la cardinalità 1:n ma solo le 0:n
Perdonami ma non ho capito, cosa intendi dire?
>     Ordini 1:1 ------- 0:n OrdineDettagli
>
> a questo punto ho inserito nell'evento Form_Load della form Ordini
>     Set wrkArea = DBEngine.Workspaces(0)
>     wrkArea.BeginTrans
>
> successivamente all'uscita nell'evento Form_Close
> verifico una variabile che mi indica se ho inserito o meno qualche record
in
> OrdineDettagli e, alternativamente, eseguo o wrkArea.Rollback o
> wrkArea.Commit...ma non funziona niente. Nonostante faccio la Rollback il
> record che ho 'dovuto' inserire nella via form Ordini rimane allegramente
in
> archivio.
> Naturalmente, mi piacerebbe usare la Rollback/Commit anche per
> l'accettazione o rifiuto delle modifiche effettuate sulle mappe.
>
> Sbaglio qualcosa? Access ha un concetto di transazione diverso? Magari un
> task è sempre e solo legato ad una singola form dopo la quale, anche
> semplicemente passando alla subform collegata effettua lui una Commit?
Sbagli solo una cosa.
Le transazioni funzionano all'interno delle routine. In pratica, vale per le
operazioni eseguite all'interno della routine.
Inoltre le operazioni eseguite tramite maschere sono automaticamente
confermate nel momento in cui si salva il record.
L'unico modo per fare cio' che vuoi e' usare delle tabelle di appoggio che
sfrutterai, a fine lavoro, per eseguire le modifice, cancellazioni e
inserimenti fatti o non userai se annulli il lavoro fatto.
Ciao, Sib


title: CASELLA COMBINATA

author: Rino

text:
Salve, non riesco a capire come mai quando klik su casella combinata e la
poso sulla struttura maschera non mi da nessuna opzione cioè si presenta la
casella con il suo numero.
ho combinato qlc? che faccio
vi ringrazio per l'aiuto
Rino


title: CASELLA COMBINATA

author: Sergio MAZZA

text:
"Rino" <
gensi...@alice.it
> ha scritto nel messaggio news:462cca1c$0$37195$4faf...@reader3.news.tin.it...

Controlla se sulla barra degli oggetti è attivato il bottone "Creazione guidate controllo", la bacchetta magica...
Ciao.
--
Sergio MAZZA


title: CASELLA COMBINATA

text:
> Controlla se sulla barra degli oggetti è attivato il bottone "Creazione
> guidate controllo", la bacchetta magica...
>
> Ciao.
> --
> Sergio MAZZA
ok fatto grazie 1000
Rino


title: problema con len

author: Lino

text:
salve!

vorrei estrapolare da una stringa composta da due o tre gruppi di parole
divisi tra loro da tre spazi, il secondo gruppo.

Grazie in anticipo


title: problema con len

text:

Se la Separazione tra i gruppi è FISSA(3 Spazzi) puoi convertire la
stringa in un'array e puntare al 2° elemento che è l'indice 1.
Esempio:
Dim varArray As Variant
Dim strTesto As String
strTesto = "PPP   AAA   CCC"
varArray = Split(strTesto, "   ")
Debug.Print varArray(1)

Saluti
@Alex


title: problema con len

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:ec81a56d-c4a3-4d25...@g9g2000vbl.googlegroups.com...
On 22 Mag, 16:06, "Lino" <
LinoLeoGra...@virgilio.it
> wrote:
> salve!
>
> vorrei estrapolare da una stringa composta da due o tre gruppi di parole
> divisi tra loro da tre spazi, il secondo gruppo.
>
> Grazie in anticipo

Se la Separazione tra i gruppi � FISSA(3 Spazzi) puoi convertire la
stringa in un'array e puntare al 2� elemento che � l'indice 1.
Esempio:
Dim varArray As Variant
Dim strTesto As String
strTesto = "PPP   AAA   CCC"
varArray = Split(strTesto, "   ")
Debug.Print varArray(1)

Saluti

grazie Alex


title: aggiungere una voce in fattura fra 2 voci

text:
ho una fattura in access composta da record di testata e tabella voci
fattura
quando inserisco ad esempio 5 voci, access mi stampa le voci in ordine di
inserimento in base al campo ID di tipo contatore, ma come faccio se voglio
inserire una voce dimenticata fra 5 voci già inserite e fargliela stampare
nella posizione giusta, ovvero in mezzo e non come ultima voce?
spero di essermi spiegato.
Grazie a tutti.


author: AEOM

text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:bvu65b$e0r$1...@lacerta.tiscalinet.it...

o sfrutti il taglia incolla dei record oppure io ho risolto così
ho aggiunto un campo al dettaglio fattura chiamato numriga
sull'inserimento di una riga faccio numriga=currentrecord*10
a questo punto mi trovo che le righe sono numerate 10...20..30
per aggiungere una riga tra due la carico e cambio il valore del campo
numriga mettendo es 15 se la voglio tra la prima e la seconda
ovviamente stampa e video sono ordinati in base al campo numriga
ciao, AEOM


title: creare mde da codice

author: Matteo

text:
Sto cercando di creare una specie di tool per la compilazione dei mie
progetti.
Il problema č che non riesco a creare l'mde da codice.
Qualche aiuto?
La funzione sul sito comune non funziona!


title: creare mde da codice

author: fabià

text:
On Tue, 23 Apr 2002 11:50:55 +0200, Matteo <
ba...@tecna.it
> wrote:
>Sto cercando di creare una specie di tool per la compilazione dei mie
>progetti.
>Il problema è che non riesco a creare l'mde da codice.
>Qualche aiuto?
>La funzione sul sito comune non funziona!
>
è a questo codice che ti riferisci?
-------------------------------------------
Private Sub EseguiBackup_Click()
Dim strpath As String
Dim be As String
strpath = Application.CurrentProject.Path & "\" &
Application.CurrentProject.Name
be = Left(strpath, Len(strpath) - 4) & "_be.mdb"
On Error GoTo Err_fine_Click
If MsgBox("Copiare e chiudere il database?", vbYesNo, "Fine") = vbYes
Then
    FileCopy be, Left(be, Len(be) - 4) & " " & Weekday(Date) & ".mde"
    DoCmd.Quit
End If
Err_fine_Click:
MsgBox Err.Description
End Sub
-------------------------------------------
Saluti
Fabià


title: creare mde da codice

author: Karl Donaubauer

text:
Matteo <
ba...@tecna.it
> ha scritto:
> Sto cercando di creare una specie di tool per la compilazione dei mie
> progetti.
> Il problema è che non riesco a creare l'mde da codice.
> Qualche aiuto?
> La funzione sul sito comune non funziona!
una riga:
http://groups.google.com/groups?as_usubject=creazione%20mde&as_uauthors=Dona
ubauer
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: creare mde da codice

text:

niente da fare. La soluzione non l'ho trovata. Altro suggerimento?


title: aggiornamento automatico tabella di riepilogo

author: alemelc

text:
Buonasera a tutti,
ho bisogno di importare in access una serie di tabelle di excel. Ho
risolto creando in una maschera un bottone di comando e lanciando
sull'evento click il metodo TransferSpreadsheet dell'oggetto Docmd. La
cosa funziona. Avrei però bisogno che, una volta cliccato il bottone,
oltre all'importazione, venga creato un record in una tabella (che ho
creato) in cui inserire questo tipo di informazioni:
CAMPO1: il percorso del file excel importato
CAMPO2: il numero di righe importate
Come posso fare?
Grazie


author: PBsoft

text:

Dunque, andiamo per gradi.
Per quanto riguarda aggiungere un record in una tabella, la soluzione più
veloce è utilizzare l'istruzione DoCmd.RunSQL "INSERT INTO tabella VALUES
....." (per la sintassi completa dell'INSERT INTO puoi trovare facilmente
riferimenti so Google Groups).
Per il valore del CAMPO1, non ci dovrebbero essere problemi perché se provvedi
ad importare il file, il suo percorso sarà certamente disponibile a runtime
perché memorizzato, ad esempio, in qualche variabile.
Per il valore del CAMPO2 la vedo leggermente più complicata. Facendo delle
supposizioni, tuttavia, la soluzione potrebbe essere semplice.
Infatti, supponendo che tu provvedi all'importazione da Excel verso una tabella
inizialmente vuota, allora al termine dell'importazione puoi utilizzare l'istruzione
DCount("*", "tabella").
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


title: Carico macchine di produzione

author: Alberto Franceschetti

text:
Buon Giorno a tutti,
dovrei realizzare una applicazione per gestiore il carico delle ore
produtttive  di una aziendina di produzione.
Cerco di spiegarmi:
supponiamo di avrere una zienda di produzione che dispone delle seguenti
macchine: Macchina A, macchina B, nacchina C e macchina D, tutte diverse
fra loro . Supponiamo anche che l'azienda decida di lavorare su due turni
giornalieri e che le ore di effettivo lavoro di ogni macchina possano
essere di 13 ogni giorno.
L'azienda conosce esattamente il cliclo di lavorazione di ogni articolo ed
i tempi di produzione unitari su ogni macchina con la relativa sequenza.
Supponiamo ora che l'azienda riceva l'ordine di 1000 pezzi dell'articolo
ALFA con consegna per il 29 novembre.
Il problema che io devo risolvere è il seguente: partendo dalla data di
consegna e dal quantitatico ordinato, a ritroso, devo determinare il
carico delle macchine ed il calendario di impegno delle stesse, e in caso
di sopposizione con altri ordini, la nuova data di consegna da proporre al
cliente.
Se qualcuno è in grado di fornirmi indicazioni o degli esempi utili a
trarre utili spunti, li ringrazio anticipatamente.
Grazie ancora.
Alberto
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Carico macchine di produzione


title: Carico macchine di produzione

author: Alessandro Cara

text:
Alberto Franceschetti wrote:
[cut]
Talvolta e' inutile riproporre il quesito.
> Il problema che io devo risolvere è il seguente: partendo dalla data di
> consegna e dal quantitatico ordinato, a ritroso, devo determinare il
> carico delle macchine ed il calendario di impegno delle stesse, e in caso
> di sopposizione con altri ordini, la nuova data di consegna da proporre al
> cliente.
Questa cosa che chiedi non si risolve in 2 sec.
Stai chiedendo una applicazione per la gestione dei fabbisogni e della
produzione. Se non sei piu' che esperto sia della materia che della
programmazione il mio consiglio e': lascia stare e acquista un pacchetto
che lo faccia. Su questi problemi e' defunto piu' di un "programmatore".
Cmq sul sito di A.Baraldi  (
www.alessandrobaraldi.it
) e su accessgroup
mi sembra ci sia qualcosa (
www.accessgroup.it
)
--
ac
y-1=x


title: Maschere e Report

author: Angelo

text:
Ciao a tutti.
Vorrei un piccolo aiuto per quanto riguarda le maschere e i report.
Io ho creato una Maschera dove inserisco dati
Dopo voglio stampare il record corrente.
Ho creato un pulsante che apre un anteprima del report
Ma l'anteprima non e mai quella corrente quindi mi tocca scorrere fino
all'anteprima del record che mi serve.(anche quando che inserisco i dati
per la prima volta, l'anteprima risulta vuota senza dati con solo le
etichette)
Come posso fare per ovviare questo problema.
E poi quando insersco piu'  dati nel mio data base e apro il report,
C'e' sempre una pagina bianca salvata dopo ogni report che voglio
stampare
 INDICE -------------------------------------------------
          |                |          |                 |
          V                V          V                 V
es REPORT(1) PAGINA BIANCA(2) REPORT (3) PAGINA BIANCA (4) ECT...
Ciao E Grazie ANGELO
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Maschere e Report

author: Roberto da casa

text:
"Angelo " <
ra...@libero.it
> ha scritto nel messaggio
news:8cdce40a91036870ad9...@mygate.mailgate.org...

Per prima cosa, se stai inserendo un nuovo record, prima di aprire
l'anteprima del report con il pulsante di controllo, salva il record
corrente con:
DoCmd.RunCommand acCmdSaveRecord
Per avere sul report solo l'anteprima del record corrente, apri l'anteprima
del report filtrando solo il dati del record corrente tramite la sua chiave
primaria.
Se, come penso, il report ha la stessa origine record della maschera.
Se il controllo della maschera che è associato alla chiave primaria si
chiama  ID come il campo cui è associato.
Se il report si chiama MioReport, prova ad aprire il report con:
DoCmd.OpenReport "MioReport", acViewPreview, , "ID=" & Me!ID
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Maschere e Report

text:
Grazie Roberto per la dritta
Ti faccio sapere come e' andata...
Ciao ANGELO



title: Valutare la dimensione di una cartella

text:
E' possibile sapere da access le dimensioni di una cartella ?
Grazie per l'aiuto
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Valutare la dimensione di una cartella

author: 'Roccia' Max

text:
On 26 Mar, 19:31,
nicola.bianchi1...@libero.it
 (nico47) wrote:
> E' possibile sapere da access le dimensioni di una cartella ?
Prova con:
dim FS as object
Set FS=createobject("Scripting.FileSystemObject")
Msgbox FS.Drives("C").RootFolder.SubFOlders("NomeCartelle").Size
cia'
Max


title: Valutare la dimensione di una cartella

text:
'Roccia' Max ha scritto:


> Prova con:

> cia'
> Max
Se non ho capitop male per avere la dimensione in MegaByte devo dividere
per 1024000. E' corretto ? Grazie e ciao Nicola



title: Valutare la dimensione di una cartella

text:
On 26 Mar, 20:02,
nicola.bianchi1...@libero.it
 (nico47) wrote:
> Se non ho capitop male per avere la dimensione in MegaByte devo dividere
> per 1024000. E' corretto ? Grazie e ciao Nicola
Uhmmm...  a naso direi per 1024^2..... aspetta che controllo...
si, 1024^2.
cia'
Max


title: Aiuto per Excel!!!

author: Tony Rossetti

text:
Scusatemi se chiedo aiuto in questo forum per Access, ma da voi ho
sempre avuto ottimi consigli per risolvere i miei problemi (purtroppo
sono alle prime armi). Questa volta mi serve un aiuto per Excel: ho una
cartella con 4 fogli diversi. Vorrei inserire un foglio nuovo in cui
mettere dei pulsanti o comunque qualcosa che mi consenta di richiamare
singolarmente ogni foglio.
Grazie infinite a chi potrą essermi d'aiuto.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Aiuto per Excel!!!

text:
"Tony Rossetti" <
tony...@excite.it
> ha scritto nel messaggio
news:c31783933eb0ac8e50b...@mygate.mailgate.org...
> Scusatemi se chiedo aiuto in questo forum per Access, ma da voi ho
> sempre avuto ottimi consigli per risolvere i miei problemi (purtroppo
> sono alle prime armi). Questa volta mi serve un aiuto per Excel: ho una
> cartella con 4 fogli diversi. Vorrei inserire un foglio nuovo in cui
> mettere dei pulsanti o comunque qualcosa che mi consenta di richiamare
> singolarmente ogni foglio.
> Grazie infinite a chi potrą essermi d'aiuto.
creai i 4 pulsanti e poi registri delle macro che vanno ogni volta in uno
dei 4 fogli
poi associ le macro ai pulsanti del foglio con i pulsanti.
ciao.


title: come fareste a gestire due tab madri e figli unici ...

author: Giuseppe

text:
il problema che vi pongo vorrei che trovasse soluzione senza scrivere codice
ma "accroccando", se possibile, gli oggetti di access in modo da costruire
qualcosa funzionante anche se grezza.
Allora,
ho due Tab che chiameremo TabMadri e TabFigliUnici (i nomi sono di
fantasia).
Ogni record di TabFigliUnici ha un corrispondente in TabMadri ma,
logicamente, ad un record di TabMadri potrebbe non corrispondere alcun
figlio in TabFigliUnici (potrebbe averlo in seguito!).
Dopo avere archiviato in un primo tempo le Madri, successivamente si
vorrebbe poterle scorrere e se si č verificata una "nascita" poter
archiviare il relativo FiglioUnico. Logicamente scorrendo le Madri si
vorrebbe poter vedere se hanno un figlio e nel caso vederne i dati.
Come fareste?
--
----------------
saluti
Giuseppe


author: ALESSANDRO Baraldi

text:
"Giuseppe" <
gcondoLev...@tiscali.it
> ha scritto nel messaggio
news:bl3u3b$gc7$1...@lacerta.tiscalinet.it...
> il problema che vi pongo vorrei che trovasse soluzione senza scrivere
codice
> ma "accroccando", se possibile, gli oggetti di access in modo da costruire
> qualcosa funzionante anche se grezza.
>
> Allora,
> ho due Tab che chiameremo TabMadri e TabFigliUnici (i nomi sono di
> fantasia).
>
> Ogni record di TabFigliUnici ha un corrispondente in TabMadri ma,
> logicamente, ad un record di TabMadri potrebbe non corrispondere alcun
> figlio in TabFigliUnici (potrebbe averlo in seguito!).
> Dopo avere archiviato in un primo tempo le Madri, successivamente si
> vorrebbe poterle scorrere e se si è verificata una "nascita" poter
> archiviare il relativo FiglioUnico. Logicamente scorrendo le Madri si
> vorrebbe poter vedere se hanno un figlio e nel caso vederne i dati.
>
> Come fareste?
>
> saluti
> Giuseppe
>
Con la 1° affermazione già ti sei inimicato il 90% del NG che ama il
Codice...!
Con la 2° il rimanente 10% che ha letto un libro sui FONDAMENTI di
Access.....!
1)Form(Principale) basata su TabMadri e Sottomaschera basata su TabFigli.
2)Form basata su TabMadri con un campo calcolato che restituisce il Num
figli+Polsante che apre la
relativa Form(Dettagli_Figli) basata sulla TabFigli.
Speriamo che 1 madre non voglia 2 figli.....!
@Alex.


text:
> Con la 1° affermazione già ti sei inimicato il 90% del NG che ama il
> Codice...!
:-)
che c'entra, anch'io amo il codice, ma quando ha il tempo e la voglia di
farlo! ;-)
> Con la 2° il rimanente 10% che ha letto un libro sui FONDAMENTI di
> Access.....!
:-))
> 1)Form(Principale) basata su TabMadri e Sottomaschera basata su TabFigli.
> 2)Form basata su TabMadri con un campo calcolato che restituisce il Num
> figli+Polsante che apre la
> relativa Form(Dettagli_Figli) basata sulla TabFigli.
>
> Speriamo che 1 madre non voglia 2 figli.....!
Non volevo offendere le vostre intelligenze!
Ma forse dovevo rimarcare con maggior enfasi che il figlio se c'è DEVE
essere UNICO ( altrimenti avrei chiamato la tabella TabFigli! )
Con il tuo suggerimento i figli possono crescere e la famiglia diventare
numerosa. :-)
Spero adesso di essere stato + preciso.
--
----------------
saluti
Giuseppe


text:
"Giuseppe" <
gcondoLev...@tiscali.it
> ha scritto nel messaggio
news:bl3vk3$h6v$1...@lacerta.tiscalinet.it...

Perfetto allor hai sbagliato impostazione del Database.
Le relazioni 1-1 sono inutili e poco pratiche.
Detto questo credo che non servano 2 tabelle perchè
avrebbero proprio la cnformazione 1-1.
Soluzione Monotabellare in cui rendi o meno visibili i dati relativi
all'eventuale Figlio solo se il figlio esiste.
Ti potrebbe essere d'aiuto una Struttura a schede in cui la Scheda Figlio
diventa Visibile solo nel caso esista........!
P.S.
Non si tratta di offendere le nostre intelligenze, e quì torno
al 2° suggerimento che ti ho dato sul quale hai sorriso......!
@Alex.


text:
> Perfetto allor hai sbagliato impostazione del Database.
> Le relazioni 1-1 sono inutili e poco pratiche.
> Detto questo credo che non servano 2 tabelle perchè
> avrebbero proprio la cnformazione 1-1.
>
> Soluzione Monotabellare in cui rendi o meno visibili i dati relativi
> all'eventuale Figlio solo se il figlio esiste.
> Ti potrebbe essere d'aiuto una Struttura a schede in cui la Scheda Figlio
> diventa Visibile solo nel caso esista........!
>
La soluzione monotabellare è un utile ripiego, non lo nascondo, ma
personalmente ritengo che tutto dipenda da quanti dati debba memorizzare del
figlio (e quanti delle madri).
Quando questi non sono pochi, pur concordando con te sulla scarsa praticità
della soluzione bi-tabellare, la preferisco (sai io sono dell'epoca in cui
si facevano i salti mortali per risparmiare qualche byte, e nonostante il
crollo di costo dei dischi rigidi il vizio mi è rimasto. Poi, non mi
andrebbe, "concettualmente" parlando, di mescolare dati di madri e dati di
figli. :-)
> P.S.
> Non si tratta di offendere le nostre intelligenze, e quì torno
> al 2° suggerimento che ti ho dato sul quale hai sorriso......!
PS
Il sorriso era bonario ;-)


text:
"Giuseppe" <
gcondoLev...@tiscali.it
> ha scritto nel messaggio
news:bl40nd$hpd$1...@lacerta.tiscalinet.it...

Anche il mio suggerimento....!
Non credo sia una soluzione di ripiego, in quanto non ci sono vincoli
stretti
sul numero dei campi in una tabella (credo oltre il centinaio....ne hai a
sufficienza..?)
Il suggerimento oltr a non essere un ripiego ti risparmia un sacco di
problemi
di gestione e/o aggiornamenti......!
Pazienza....!
Tornando al tuo problema allora io lo risolverei così:
From1 Madri
Form 2 Figli unici...!
Nella Form Madri inserisci un Pulsante di Visualizzazione che crei con
l'autocomposizione.
Se fai in modo che i dati delle Tab abbiano una Key che li lega
l'Autocomposizione
ti propone se non ricordo male di Aprire la Form Cercando il Riferimento in
base
alla selezione della Form1....!
Forse ho fatto un pò di caos, ma credo sia l'unico modo per rendere il tutto
più
funzionale senza usaremolto codice.
L'alternativa è creare la stringa di filtro da passare all'itruzione
OpenForm.
StrFilter="[NomeMadre]=" & chr(34) & Me.CtlNomeMadre & chr(34)
Questo supponendo che NomeMadre sia il Campo di legame....!
@Alex.


author: Gippe

text:
"Giuseppe" <
gcondoLev...@tiscali.it
> ha scritto nel messaggio
news:bl3u3b$gc7$1...@lacerta.tiscalinet.it...
> il problema che vi pongo vorrei che trovasse soluzione senza scrivere
codice
> ma "accroccando", se possibile, gli oggetti di access in modo da costruire
> qualcosa funzionante anche se grezza.
>
> Allora,
> ho due Tab che chiameremo TabMadri e TabFigliUnici (i nomi sono di
> fantasia).
>
Mi rivolgerei alla TabServiziSociali ;-)
Ciao
Gippe.


title: Progetto ADE: una sola connessione?!? [DK]

text:
Salve a tutti. Volevo riportarvi un fatto stranissimo che mi è
capitato con un progetto di Access 2000 (file ADE). Uso piattaforma
Microsoft con S.O. Windows XP ed ho copiato il progetto compilato .ade
su un server condiviso che utlizza Windows SERVER (su cui è impostata
una connessione illimitata degli utenti sui file).
Il problema nasce quando si viene a creare una multiconnessione:
sembrerebbe che il progetto funzioni con un solo utente per volta!!!
Possibile?!? Se un secondo utente provasse ad aprire il file genera
due tipi possibili di "errori":
1) non apre proprio il file senza dire nulla.. come se il doppio click
del mouse andasse a vuoto..
2) apre il progetto in sola lettura...
Se poi quel file .ADE lo copiassi in una sottocartella allora
funziona... come se il S.O. riconoscesse il file e vietasse più di una
connessione contemporanea.
Il dubbio è: se Access ha al massimo la possibilità di far connettere
256 utenti contemporaneamente, allora forse c'è qualche settaggio da
fare?!?
Grazie.
Luigi.


author: Simone Calligaris

text:
> Il dubbio è: se Access ha al massimo la possibilità di far connettere
> 256 utenti contemporaneamente, allora forse c'è qualche settaggio da
> fare?!?
Perchè vuoi aprire il Front-End in multisessione?
Saluti.


text:
>
> Perchè vuoi aprire il Front-End in multisessione?
>
> Saluti.
perchè il front-end può essere utilizzato da N utenti... e vorrei che
funzionasse come un db di Access in condivisione... L'unica soluzione
che vedo è quella di creare N copie dell'ADE una per ogni utente...
Possibile che ci sia questo limite?
Grazie.
Luigi


author: Alessandro Baraldi

text:
Igio80 ha scritto:
[CUT]
> perchè il front-end può essere utilizzato da N utenti... e vorrei che
> funzionasse come un db di Access in condivisione... L'unica soluzione
> che vedo è quella di creare N copie dell'ADE una per ogni utente...
> Possibile che ci sia questo limite?
> Grazie.
> Luigi
Questo non è un limite, anzi è un punto di Forza...!
Come puoi pensare di fare usare in MultiIstanza un applicativo
ad utenti Contemporanei che lavora sul SERVER...??
Anche se metti un solo ADE lato Server in realtà il programma
verrà aperto lato Client, ma con un sacco di scocciature di rete.
Questa è una distorsione di come si devono realizzare i gestionali
in rete.
Non troverai mai applicativi(se non basati su tecnologia WEB) che
funzionano
come dici tu, se non quelli fatti male.
@Alex
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
"Igio80" <
> perchè il front-end può essere utilizzato da N utenti... e vorrei che
> funzionasse come un db di Access in condivisione... L'unica soluzione
> che vedo è quella di creare N copie dell'ADE una per ogni utente...
> Possibile che ci sia questo limite?
Premessa: in genere è asssolutamente da evitare l'apertura in multisessione
di un .MDB/E ... rischia di corrompersi (non dimenticare che un .MDE, anche
con sole tabelle collegate, NON è un file a sola lettura).
Quindi, anche se possibile, è meglio evitare tale configurazione e far
risiedere i FE sui Clients.
Oppure creare N cartelle diverse sul Server (io lo faccio con le
installazioni Terminal Server).
Puoi verificare quanto ho scritto consultando qualunque documentazione
esaustiva inerente le cause di corruzioni di files di Access
Con gli .ADE la situazione cambierebbe: sono infatti files di progetto
rigorosamente a sola lettura e l'apertura in multisessione non causerebbe i
suddetti problemi.
Ora, la faccenda del messaggio "d'apertura a sola lettura" è stato sollevato
qualche volta, ma all'atto pratico non dovrebbe influenzare la corretta
esecuzione dei programmi.
Probabilmente i frequentatori di icaa non hanno mai approfondito la
faccenda, perchè per abitudine quasi nessuno consente l'apertura degli
applicativi in multisessione.
D'altro canto creare cartelle separate sul Server non è un problema (basta
creare un file .bat o Vbscript per automatizzare gli aggiornamenti).
Saluti.


text:
"Alessandro Baraldi"
> Questo non è un limite, anzi è un punto di Forza...!
> Come puoi pensare di fare usare in MultiIstanza un applicativo
> ad utenti Contemporanei che lavora sul SERVER...??
> Anche se metti un solo ADE lato Server in realtà il programma
> verrà aperto lato Client, ma con un sacco di scocciature di rete.
Sì è vero Alessandro, ma non dimenticare la configurazione "Terminal Server"
(mi sa che è il caso suo).
I tale situazione l'apertura in multisessione potrebbe essere comoda: anche
se va comunque benissimo creare N cartelle ognuna con la propria copia dei
programmi.
Saluti.


text:
"Simone Calligaris" <
simo...@libero.it
> wrote in message
news:ZFw4e.47027$
zZ1.1...@twister1.libero.it

Beh corretto, no ho letto da nessuna parte che si riferisse a TS,
nel qual caso le cose sono rivalutabili.
Io non uso TS perchè ormai in azienda ci si è mossi(io
ed un mio collega) per una soluzione Client-Server, che per poco
girerà ancora sotto SQL6.5+A97, tra breve migreremo tutto su
SQL2000 e A2003, ma non ho intenzione di rifare gli applicativi in
ADE, mi tengo i miei MDE convertendoli...!
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: giorgio rancati

text:
"Igio80" <
igi...@inwind.it
> ha scritto nel messaggio
news:2a3eb988.05040...@posting.google.com...

Ciao Luigi,
il comportamento che riscontri è assolutamente normale,
il primo utente che apre il tuo file ADE si connette a Sql server, questa
connessione viene registrata nelle proprietà del file ADE (vedi
Currentproject.Connection). A questo punto non è possibile da parte di un
secondo utente cambiare la connessione, andrebbe a scombinare ciò che vede
il primo utente, per fortuna i progetti ADP-ADE hanno questo meccanismo che
blocca il file in sola lettura dopo il primo accesso.
Ogni utente dovrebbe avere la sua copia del File ADE oppure (anche se con
qualche controindicazione) se la connessione a Sql Server non viene mai
cambiata puoi assegnare al file ADE l'attributo di sola lettura e farlo
aprire contemporaneamente da tutti.
Le controindicazioni a questo sistema sono di non poter vedere da Server chi
è connesso o meglio vedrai tante connessioni ma tutte con lo stesso Computer
Name.
Ciao Giorgio


text:
Un grazie a tutti quanti per le preziose info. Non ho mai parlato di
TS infatti perchè uso una connessione Client / Server.
Avete ragione sulla potenza di Access nel bloccare l'accesso in
scrittura ad un secondo utente... volevo solo avere conferma che
questa cosa non si potesse modificare da qualche impostazione... fermo
restando che in tal caso si tratterebbe di una applicazione "gestita
male".
Creerò quindi una copia dell'ADE per ogni utente perchè ho necessità
di multisessione nell'applicativo...
Il problema quindi è proprio di natura FILE SYSTEM e non di Access?!?
Grazie a tutti.
Luigi



text:
"Igio80" <
igi...@inwind.it
> ha scritto nel messaggio
news:2a3eb988.05040...@posting.google.com...
> Un grazie a tutti quanti per le preziose info. Non ho mai parlato di
> TS infatti perchè uso una connessione Client / Server.
> Avete ragione sulla potenza di Access nel bloccare l'accesso in
> scrittura ad un secondo utente... volevo solo avere conferma che
> questa cosa non si potesse modificare da qualche impostazione... fermo
> restando che in tal caso si tratterebbe di una applicazione "gestita
> male".
> Creerò quindi una copia dell'ADE per ogni utente perchè ho necessità
> di multisessione nell'applicativo...
> Il problema quindi è proprio di natura FILE SYSTEM e non di Access?!?
> Grazie a tutti.
Ciao Igio80,
è proprio una condizione impostata volutamente come mostrato qui
-----------
http://support.microsoft.com/default.aspx?scid=kb;en-us;318868
-----------
l'eventuale attributo Read Only impostato da File System evita il messaggio
di avviso.
Ciao Giorgio


title: piccolo ma grande aiuto di codice

author: rosalie

text:
Buongiorno.
Eccomi con il mio problema esposto.
 2 tabelle la prima prodotti,  rosso, viola, celeste, ect,
la seconda con ordine, ordine 1 ordine 2 ordine 3 ect.
un form con un box A e un box B
Sul box A, incollonati tutti i prodotti della prima tabella
esempio
rosso
viola
celeste
ect
Selezionando viola con doppio klic questo va à finire nel box B, scomparendo
da A
non tutti i colori  saranno selezionati questo dipenderà dall 'ordine
ricevuto.
Il box b Riceve colori  dal box A, dovrebbe incollonnare i risultati,
esempio:
grigio
rosso
nero
ect
 ma se necessario con doppio klic dovrei poter togliore colore da B e
rimandarlo in A
dopodiche premendo sul tasto finalizza, il risultato di B dovrebbe andare
nella tabella ordini
A si ricarica dalla tabella prodotti, B si svuota.
Mi aiuterete?
Vi ringrazio.


title: piccolo ma grande aiuto di codice

author: MA

text:

ciao c'è gia tutto pronto sul sito
comune.com
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: piccolo ma grande aiuto di codice

text:
una vera miniera il sitocomune.
grazie mille.
"MA" <
mas...@massimilianoamendola.it
> a écrit dans le message de news:
e9o0lu$mj3$1...@area.cu.mi.it...



title: piccolo ma grande aiuto di codice

author: Linea

text:
"rosalie" <
na...@altern.org
> ha scritto nel messaggio
news:44bf57a7$1...@news.bluewin.ch...

Questa cosa interessa anche a me, ho provato a vedere nelle form di
sitocomune.it
 ma non ho trovato niente.
Per favore mi dite dove devo vedere.
Grazie per l'aiuto


title: piccolo ma grande aiuto di codice

author: Roberto dal portatile

text:
"Linea" <
mcl...@libero.it
> ha scritto nel messaggio
news:4mSwg.50518$_J1.5...@twister2.libero.it...

Per vedere un esempi che mostri come palleggiarsi righe tra due caselle di
riepilogo vai sul Sito Comune (link qui sotto) e nella Sezione Forms leggi
la FAQ di Lbo intitolata "3.23 Trasferire righe tra due listbox.".
> Grazie per l'aiuto
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: richiesta strana

author: Gianni

text:
Premetto che non sono molto pratico di access
Diciamo che ho una tabella che si chiama fogli cosi composta
CAMPI           valore
id                       1
mese                11
anno                2005
o1
o2                        8
o3                        8
o4                        8
o5                        8
o6
o7                        8
o8                         8
o9                         8
o10                      7.30
o11                       8
o12
o13
o14
o15
o16
o17
o18
o19
o20
o21
o22
o23
o24
o25
o26
o27
o28
o29
o30
o31
posso creare una tabella    con i  campi     id     data    ore
sapendo che tutti i campi che iniziano con o  anno dentro un valore di ore ,
e il numero che lo segue identifica il numero del giorno
grazie


title: richiesta strana

text:
"Gianni" <
g.pi...@sinerco.it
> ha scritto nel messaggio
news:Ilgqf.18299$Cn4....@tornado.fastwebnet.it...
Penso che tu sia nuovo altrimenti avresti saputo che in questo NG non si
risponde a messaggi il cui subject è generico e non riassume il quesito
posto.
Nel tuo interesse ti consiglio di riaprire un altro thread riprponendo il
tuo quesito, questa volta usando un subject pertinente.
Buon Natale e Felice 2006.
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: richiesta strana

author: yronium

text:
....e quando scrivi il nuovo post, ricordati che "...hanno dentro un
valore..." si scrive con la H.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: richiesta strana

text:
"yronium" <
y...@yy.it
> ha scritto nel messaggio
news:151Z41Z186Z15Y1...@usenet.libero.it...
> ....e quando scrivi il nuovo post, ricordati che "...hanno dentro un
> valore..." si scrive con la H.
Immagino che con questo tuo messaggio volessi rispondere a Gianni e non a
me. ;-)
Buon Natale



title: richiesta strana

text:
> Immagino che con questo tuo messaggio volessi rispondere a Gianni e non a
> me. ;-)
Naturalmente. Solo che volevo farlo continuando il tuo discorso. Ciao e
auguri.



title: Crea maschera in formato .mde

author: Andrea Raveggi

text:
Salve a tutti,
ho questo piccolo (spero) problema:
ad un certo punto del codice viene creata una maschera con il comando
Set frm = CreateForm
e dentro ci viene inserito il risultato di una query.
Tutto bene finchè si sta sul file tipo mdb, ma quando lo compilo e
lancio il file corrispondente .mde
mi dice che il comando non è disponibile in formato MDE.
Cheffaccio ?
grazie in anticipo.
Andrea


title: Crea maschera in formato .mde

author: Alessandro Cara

text:
Andrea Raveggi ha scritto:

un lucano?
scusa non lo so'. Non ho mai creato form "dinamiche". Ma era troppo
invitante.
a.cara


title: Crea maschera in formato .mde

author: Federico Luciani

text:

infatti in un mde non e' possibile creare oggetti.
quello che non capisco e' perche' hai bisogno di creare una form al volo per
visualizzare il risultato di una query, ci sono varie alternative a seconda del
caso.
--
Federico
fluc...@paperino.sitocomune.com
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
mailto:
webm...@sitocomune.com
--------------------------------------


title: Crea maschera in formato .mde

text:
Federico Luciani wrote:
> Andrea Raveggi wrote:
> > Salve a tutti,
> > ho questo piccolo (spero) problema:
> > ad un certo punto del codice viene creata una maschera con il comando
> > Set frm = CreateForm
> > e dentro ci viene inserito il risultato di una query.
> > Tutto bene finchè si sta sul file tipo mdb, ma quando lo compilo e
> > lancio il file corrispondente .mde
> > mi dice che il comando non è disponibile in formato MDE.
> > Cheffaccio ?
> > grazie in anticipo.
> > Andrea
>
> infatti in un mde non e' possibile creare oggetti.
>
> quello che non capisco e' perche' hai bisogno di creare una form al volo per
> visualizzare il risultato di una query, ci sono varie alternative a seconda del
> caso.
>
> --
> Federico
Perchè i dati che vengono visualizzati nella query sono in numero variabile; cioè
l'utente puo selezionare quali e quanti campi vedere. E siccome la query è fatta
con un codice (per lo stesso motivo), il numero di campi che vorrei far vedere
sulla maschera devono essere variabili. La form al volo seguiva la query e creava
tanti campi quanti ne interessano all'utente (che li sceglie nella fase della
query).
Riassumendo: L'utente mentre imposta la query decide anche quali campi vedere o
nascondere.(tutto questo tramite codice). Il risultato della query dovrebbe essere
visualizzato in una maschera (tipo tabella) che sia concorde con i campi
selezionati. Quindi o li creo al volo o nascondo quelli che non interessano (ma mi
sembra che non si possa fare...)
Oppure ?
Grazie molte
Andrea


title: Crea maschera in formato .mde

text:
Andrea Raveggi wrote:
> Federico Luciani wrote:
> > Andrea Raveggi wrote:
> > > Salve a tutti,
> > > ho questo piccolo (spero) problema:
> > > ad un certo punto del codice viene creata una maschera con il comando
> > > Set frm = CreateForm
> > > e dentro ci viene inserito il risultato di una query.
> > > Tutto bene finchè si sta sul file tipo mdb, ma quando lo compilo e
> > > lancio il file corrispondente .mde
> > > mi dice che il comando non è disponibile in formato MDE.
> > > Cheffaccio ?
> > > Andrea
> >
> > infatti in un mde non e' possibile creare oggetti.
> > quello che non capisco e' perche' hai bisogno di creare una form al volo per
> > visualizzare il risultato di una query, ci sono varie alternative a seconda del
> > caso.
> > Federico
>
> Perchè i dati che vengono visualizzati nella query sono in numero variabile; cioè
> l'utente puo selezionare quali e quanti campi vedere. E siccome la query è fatta
> con un codice (per lo stesso motivo), il numero di campi che vorrei far vedere
> sulla maschera devono essere variabili. La form al volo seguiva la query e creava
> tanti campi quanti ne interessano all'utente (che li sceglie nella fase della
> query).
> Riassumendo: L'utente mentre imposta la query decide anche quali campi vedere o
> nascondere.(tutto questo tramite codice). Il risultato della query dovrebbe essere
> visualizzato in una maschera (tipo tabella) che sia concorde con i campi
> selezionati. Quindi o li creo al volo o nascondo quelli che non interessano (ma mi
> sembra che non si possa fare...)
> Oppure ?
> Grazie molte
> Andrea
lo sospettavo ;-)
prova a vedere se questo funziona in un mde:
- crea un query qualunque e salvala (qryProva)
- crea un modulo e scrivici
Sub s_CreaQuery()
  Dim dbs As Database
  Dim qdf As QueryDef
  Dim strSQL As String
  'modifica la seguente stringa con una valida
  strSQL = "SELECT Id, Cognome FROM Clienti"
  Set dbs = CurrentDb
  Set qdf = dbs.QueryDefs("qryProva")
  qdf.SQL = strSQL
  DoCmd.OpenQuery
qdf.name
  qdf.Close
  Set dbs = Nothing
End Sub
naturalmente sostituisci la stringa sql con una tua query valida
prova a vedere se funziona con un mde.
se funziona, di basta trasformarla in una sub alla quale passi la stringa sql
generata dall'utente.



title: Aggiornare i dati in una sottomaschera

author: Simone Sanfilippo - O.P.S.I. srl

text:
Salve a tutti.
Vi spiego brevemente il mio problema; ho un db con la maschera principale
che contiene una sottomaschera, tramite il pulsante di aggiunta record,
aggiungo in un nuovo form dei dati senza chiudere quella principale, quando
confermo questi dati, questi dovrebbero essere visualizzati nella
sottomaschera contenuta nel form principale, ma niente, devo scorrere i
record per poter vedere i dati, ma considerato che ora ci sono tanti record,
quando sarà operativo conterrà al più un record.
Se qualcuno può darmi una mano ne sarei grato
Simone


title: Aggiornare i dati in una sottomaschera

author: Fabio

text:
"Simone Sanfilippo - O.P.S.I. srl" <
simone.s...@opsi.it
> ha scritto
nel messaggio news:aodrdo$q48$1...@monty.lombardiacom.it...
> Salve a tutti.
> Vi spiego brevemente il mio problema; ho un db con la maschera principale
> che contiene una sottomaschera, tramite il pulsante di aggiunta record,
> aggiungo in un nuovo form dei dati senza chiudere quella principale,
quando
> confermo questi dati, questi dovrebbero essere visualizzati nella
> sottomaschera contenuta nel form principale, ma niente, devo scorrere i
> record per poter vedere i dati, ma considerato che ora ci sono tanti
record,
> quando sarà operativo conterrà al più un record.
Nell'evento chiusura del secondo form scrivi:
DoCmd.RunCommand acCmdRefresh
Ciao, FABIO


title: Aggiornare i dati in una sottomaschera

text:
Grazie mille Fabio, ora provo.
"Fabio" <
nospam_fa...@tin.it
> ha scritto nel messaggio
news:yRwq9.28732$RO.7...@twister1.libero.it...



title: Aiuto su SELECT

author: Andrea

text:
Salve a tutti,
sto sbattendo la testa su questa istruzione da due giorni.
Nel momento in cui esegue l' istruzione riportata di seguito mi tira fuori
il seguente errore:
Errore di Runtime '3061':
Parametri Insufficienti. Previsto 1.
Per favore qualcuno mi da indicare che cosa c'è che non va?
L' istruzione incriminata è la seguente:
Set rstOrdini = dbsOrdini.OpenRecordset("SELECT  * FROM Ordini WHERE Numero
= Forms!FrmSelOrdinidaFattura!EleOrdini;", dbOpenDynaset)
Specifico che la form specificata nell' istruzione è aperta.
Grazie anticipatamente per le eventuali risposte.
Saluti Andrea


title: Aiuto su SELECT

author: Antonio Biso

text:
Andrea ha scritto nel messaggio <85pfpa$1ki$
1...@nslave2.tin.it
>...
>Salve a tutti,
>sto sbattendo la testa su questa istruzione da due giorni.
>Nel momento in cui esegue l' istruzione riportata di seguito mi tira fuori
>il seguente errore:
>
>Errore di Runtime '3061':
>Parametri Insufficienti. Previsto 1.
>
>Per favore qualcuno mi da indicare che cosa c'è che non va?
>L' istruzione incriminata è la seguente:
>
>Set rstOrdini = dbsOrdini.OpenRecordset("SELECT  * FROM Ordini WHERE Numero
>= Forms!FrmSelOrdinidaFattura!EleOrdini;", dbOpenDynaset)
>
>Specifico che la form specificata nell' istruzione è aperta.
"SELECT  * FROM Ordini WHERE Numero = " &
Forms!FrmSelOrdinidaFattura!EleOrdini & ";"
Il riferimento alla form è come una variabile e quindi devi concatenare il
suo valore alla stringa, non scrivere il riferimento dentro la stringa
stessa!!!
Antonio


title: Aiuto su SELECT

author: Lorenzo Coronati

text:
Fai cosi':
Set rstOrdini = dbsOrdini.OpenRecordset("SELECT  * FROM Ordini WHERE
Numero = " & Forms!FrmSelOrdinidaFattura!EleOrdini & ";",
dbOpenDynaset)
Bai
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--


title: Aiuto su SELECT

text:
Grazie mille.
Andrea


title: Problema con Refresh maschera

author: MatteoC.

text:
Sull 'evento AfterUpdate di un campo di una maschera eseguo la chiamata a
due procedure che in base al valore inserito nel campo mi aggiornano altri
due campi. Questa maschera è collegata ad una tabella e le due procedure
vanno ad aggiornare i campi della tabella quindi ho inserito il metodo
Me.Refresh nel codice dell'evento di modo che io potessi immediatamente
visualizzare gli aggiornamenti anche sulla maschera. Il problema è che
questo non avviene, avviene solo se chiudo e apro la maschera. Possibile che
non ci sia altro modo? Perche non funziona il Refresh?
Qualcuno saprebbe darmi una mano?
Grazie anticipatamente per l'aiuto.
Ciao MatteoC.
--------------------------------
Inviato via
http://usenet.libero.it


title: Problema con Refresh maschera

author: Carlo Costarella

text:
"MatteoC." <kiesi#nospam#@
libero.it
> ha scritto nel messaggio
news:213Z26Z161Z136Y...@usenet.libero.it...

Prova con Recalc e poi Refresh se ci sono campi calcolati.
Ciao, Carlo


title: Problema con Refresh maschera

text:
> Prova con Recalc e poi Refresh se ci sono campi calcolati.
>
> Ciao, Carlo
Effettivamente cosě funziona!!!
Grazie ancora!!



title: Problema con Refresh maschera

author: Roberto da casa

text:
"MatteoC." <kiesi#nospam#@
libero.it
> ha scritto nel messaggio
news:213Z26Z161Z136Y...@usenet.libero.it...

Innanzitutto ti ricordo che nelle maschere non ci sono i campi (che sono
contenuti nelle queries e nelle tabelle) ma ci sono i controlli (come nei
reports).
Invece che con Me.Refresh prova con Me.Requery.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: pulsante attivo se esistono dati nella maschera correlata

text:
saluti a tutto il NG
ho una maschera con un pulsante che mi apre un'altra maschera
vorrei disabilitare il pulsante se non esistono record correlati.
Ho trovato questi esempi su vecchi post ma non mi funzionano
Me.Comando6.Enabled = Me.RecordsetClone.RecordCount > 0
Me!Comando6.Enabled = Not Me.RecordsetClone.EOF
Mi date una mano
grazie e buona notte
massimo


author: Karl Donaubauer

text:
mmanfr...@inwind.it
 wrote:
> ho una maschera con un pulsante che mi apre un'altra maschera
>
> vorrei disabilitare il pulsante se non esistono record correlati.
>
> Ho trovato questi esempi su vecchi post ma non mi funzionano
>
> Me.Comando6.Enabled = Me.RecordsetClone.RecordCount > 0
> ...
Dipende dove e come in tuo caso si puo controllare se esistono
"record correlati". Col codice postato controlli se esistono record
nella stessa maschera.
Se con "correlati" intendi record in una tabella diversa, devi
contare i record in questa tabella. Per i metodi diversi vedi:
www.donkarl.com/it?FAQ6.17
Il codice con DCount e correlazione su un campo Id sarebbe p.e.
Me!Comando6.Enabled = DCount("*", "MiaTabella","Id=" & Me!Id)>0
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Numero protocollo automatico (ultimo record + 1)

author: Fabrizio Mereu

text:
Dopo aver visto che non è comunque consigliabile di mettere un campo di
tipo "contatore", in un campo che stabilisce un numero di protocollo,
umilmente vi chiedo: per fare in modo che come valore predefinito in un
questo campo, abbia (lo stesso numero di protocollo dell'ultimo record +
1), come posso fare? conviene usare una query?
Fabrizio


author: vuLCan Karayan

text:

Usa una funzione e richiamala  nell'EVENTO "BeforeInsert" di un form:
Private Sub Form_BeforeInsert(Cancel As Integer)
    Me!NomeCampo=Nz(DMax("[NomeCampo]","[NomeTabella]"),0)+1
End Sub
Ciao


author: TheMax

text:

www.sitocomune.com
c'è un esempio su come farlo, cerca creare un contatore personalizzato o
qualcosa di simile.
>
> Fabrizio
Ciao,
Massimo


text:
TheMax ha scritto:

Effettivamente quell'esempio già lo avevo visto e già l'avevo
utilizzato, ma mi restituisce il valore #errore... E non so nemmeno di
che errore si tratti!
=Nz(DMax("nr prot";"protocollo corrispondenza in uscita");0)+1
Forse ho fatto un errore di sintassi? Probabile.
Fabrizio


author: MA

text:

Sì, è sempre prederire non usare nomi staccati, ma quando li trovi e ti
riferisci a questi li devi chiudere in parentesi quadre
 =Nz(DMax("[nr prot]";"[protocollo corrispondenza in uscita]");0)+1
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


text:

Presumo tu debba usare anche le parentesi quadrate visto che hai avuto la
"pessima" idea di mettere gli spazi nei nomi degli oggetti
Nz(DMax("[nr prot]";"[protocollo corrispondenza in uscita]");0)+1
PS: Consiglio, solitamente si sconsiglia l'uso di spazi nei campi, in quanto
ti obbliga ad usare parentesi e quindi da più problemini la cosa.
PPS: Consiglio 2, d'ora in poi, sui nuovi campi, scrivi tutto unito e semmai
usa la proprietà etichetta per scriverci quello che vuoi.
>
> Forse ho fatto un errore di sintassi? Probabile.
>
> Fabrizio
Ciao,
Massimo


text:
>>Effettivamente quell'esempio già lo avevo visto e già l'avevo
>>utilizzato, ma mi restituisce il valore #errore... E non so nemmeno di
>>che errore si tratti!
>>
>>=Nz(DMax("nr prot";"protocollo corrispondenza in uscita");0)+1
>>
>>Forse ho fatto un errore di sintassi? Probabile.
>>
>>Fabrizio
>
> Sì, è sempre prederire non usare nomi staccati, ma quando li trovi e ti
> riferisci a questi li devi chiudere in parentesi quadre
>  =Nz(DMax("[nr prot]";"[protocollo corrispondenza in uscita]");0)+1
Grazie, Massimo, grazie, grazie grazie!!
Fabrizio


author: Bruno Campanini

text:
"Fabrizio Mereu" <
wind...@libero.it
> wrote in message
news:43a02149$0$339$5fc...@news.tiscali.it...

Quando elimini un record (che non sia l'ultimo)
l'ultimo numero di protocollo ti viene assegnato due volte.
Ad evitare ciò va' a leggere il massimo numero di
protocollo già assegnato e aggiungi uno per ottenere il nuovo.
Bruno


author: sv

text:
Fabrizio Mereu ha scritto:




> Fabrizio
C'è l'errore di sintassi che già Massimiliano ti ha fatto notare.
Volevo aggiungere che comunque questo protocollo è sempre di tipo
incrementale, non tiene conto dell'inizio di un nuovo anno.
Poichè la tabella è quella di corrispondenza in uscita, penso che col
nuovo anno dovrebbe iniziare da 1.
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: cidi

text:
"sv" <
sal...@accessgroup.it
> ha scritto nel messaggio
news:dnpb49$l8s$1...@news.newsland.it...
Ciao Salvino
ho cercato di scaricare il tuo esempio di date dal sito di accessgroup.
mi dice che hanno rimosso la pagina.
come mai?
ti sei dimenticato di pagare l'ultima rata?
ti hanno chiesto l'aumento x lo spazio?
'sti napoletani!!!   :))
Daniele


text:
cidi ha scritto:


> Daniele
Ciao Daniele
Il web MA_ster mi stima poco...;-((((
--
Salvino



text:
cidi ha scritto:


> Daniele
Controlla la posta ... già inviati
--



text:
"sv" <
sal...@accessgroup.it
> ha scritto nel messaggio
news:dnphla$jiv$1...@news.newsland.it...
> cidi ha scritto:
>
>> "sv" <
sal...@accessgroup.it
> ha scritto nel messaggio
>> news:dnpb49$l8s$1...@news.newsland.it...
>
>> Ciao Salvino
>> ho cercato di scaricare il tuo esempio di date dal sito di accessgroup.
>> mi dice che hanno rimosso la pagina.
>> come mai?
>> ti sei dimenticato di pagare l'ultima rata?
>> ti hanno chiesto l'aumento x lo spazio?
>> 'sti napoletani!!!   :))
>
>> Daniele
>
> Ciao Daniele
> Il web MA_ster mi stima poco...;-((((
Noooo, non ci credo......
sicuramente sarà una svista dopo questo nostro
avvertimento vedrai che rimedierà.
> Salvino
>
> --
>
Grazie Salvino
Ciao, Daniele


text:

;-) Già ieri avevo indagato sul motivo, ma non c'ero arrivato.
Oggi, a neuroni freschi ho capito
in realtà il puntamento è ad un file exe autozippante, adesso provvedo a
trasformarlo in zip e quindi dovrebbe poterlo scaricare.
>
>> Salvino
Salvino ho già la faccia per terra, puoi salirci su e puoi anche muoverti.
>>
>> --
>>
>
> Grazie Salvino
> Ciao, Daniele
Il servo vostro
MAssimiliano



author: mario rossi

text: cerco esempio di generazione fattura elettronica xml (anche collaborazione a pagamento) grazie.


title: cerco esempio di generazione fattura elettronica xml (anche collaborazione a pagamento)

text:
Ciao amici,

Nel caso in cui sei interessato a qualcosa di multipiattaforma per la generazione di XML,
firma, invio e ricezione dall' SDICoop:

http://fatturaitalia.com/

Saluti



title: aggiornare BE da FE con muove tabelle

author: Claudio

text:
Un dubbio pervade la mia testolina
avendo, per ipotesi (siamo ancora nella face di progettazione) un DB
mde con un FE ed un BE, ditribuito a più soggetti,
dopo un certo periodo di tempo sento l'esigenza di aggiungere qalche
tab e magari qualche campo a delle tab esistenti.
che stada dovrei percorrere
1) aggiungere le tabelle all' BE vecchio (non posso visto che mde)
2) installare il nuovo BE e trasferire i dati dal vecchio, tutto questo
da codice è fattibile?? cioè implementare una sorta di aggiornamento
applicazione
il codice dovrebbe ferificare se nel VecchioBE c'è la tabella presente
nel NuovoBE, in caso affermativo trasferire i dati, e  nell'ipotesi in
cui nella nuova tab vi è un campo lasciarlo vuoto
Troppo complesso??
lascio fare una ricopiatura manuale all'utente??
attendo istruzioni
Grassie
CLaudio


title: aggiornare BE da FE con muove tabelle

text:
"Claudio" <
reale....@gmail.com
> ha scritto nel messaggio
news:1138362262.9...@g43g2000cwa.googlegroups.com...


che stada dovrei percorrere


Troppo complesso??

attendo istruzioni
Grassie
CLaudio
Se il BE è un mde hai fatto un errore: è meglio che sia un mdb visto che
contiene (o dovrebbe) solo tabelle.
Comunque anche ai file mde è possibile aggiungere tabelle o query.
Personalmente seguo una strada mista e cioè nel FE mi creo la tabella da
esportare nel BE e la chiamo ad esempio "MiaTabCrea". Questa verrà esportata
nel BE con il nome di "MiaTab". Ovviamente faccio così perchè si presuppone
che poi vorrò allegare la nuova tabella al FE. Poi eseguo il codice:
DoCmd.TransferDatabase acExport, "Microsoft Access", MiaDir & "\" &
"Frabase.mdb", acTable, "MiaTabCrea", "MiaTab", True
Prima di fare l'operazione verifico se esiste già la tabella....
Ciao, Carlo


title: aggiornare BE da FE con muove tabelle

text:
"Claudio" <
reale....@gmail.com
> wrote in message
news:1138362262.9...@g43g2000cwa.googlegroups.com...
> Un dubbio pervade la mia testolina
> avendo, per ipotesi (siamo ancora nella face di progettazione) un DB
> mde con un FE ed un BE, ditribuito a più soggetti,
> dopo un certo periodo di tempo sento l'esigenza di aggiungere qalche
> tab e magari qualche campo a delle tab esistenti.
> che stada dovrei percorrere
> 1) aggiungere le tabelle all' BE vecchio (non posso visto che mde)
Che senso ha creare un BE in modalità .MDE?
Bruno


title: aggiornare BE da FE con muove tabelle

text:
>Che senso ha creare un BE in modalità .MDE?
Sembr assurdo  lo so ma vi sono alcune particolari esigenze che mi
hanno spinto verso questa scelta
il DB in quesitone viene usato da più utenti, con diversi "livelli di
accesso".
Alcuni di questi utenti quali semplici operatori non hanno accesso alla
parte contabile.
Si è verificato che qualche furbetto sia entrato nel BE (quando era in
mdb) e ha modificato alcuni valori e visualizzandone di altri
per evitare questo inconveniente, ho inserito un modulo che nasconde
tutte le tabelle contabili, e per proteggere tale ultimo modulo ho
dovuto convertire il BE in mde
questo è quanto
Ciuaz
CLaudio


title: aggiornare BE da FE con muove tabelle

author: Alessandro Baraldi

text:
"Claudio" <
reale....@gmail.com
> wrote in message
news:1138370273....@f14g2000cwb.googlegroups.com

Quanto hai fatto non è corretto.
Il BE si protegge a livello UTENTE il FE invece PURE oppure
solo del FE si crea un MDE.
Io creo un MDE dopo aver protetto il FE a livello utente.
Usando in modo corretto la protezione a livello utente non
è possibile combinare danni.
Per aggiornare un BE credo che la soluzione migliore sia
quella che ti ha suggerito Claudio Costarella, con un punto di
prova(preventivo) di cui non sono certo....!
In pratica se la tua Copia(BE) è uguale alla vecchia e la modifichi
ti basterà copiare nel vecchio BE solo le modifiche, se hai aggiunto
tabelle dovrebbe anche ricreare le relazioni(questo è da verificare).
Per le tabelle modificate invece quanto ti ha suggerito Carlo è OK.
Alternativa(un pò complicata)
Si potrebbe fare tutto via codice, generando le tabelle nuove
e/o modificando le già presenti con codice SQL,
poi occorrerebbe gestire le Relazioni a codice per le Nuove....!
Personalmente lo trovo un pò complesso ma sicuramente più
tecnico, e considerando che sia DAO che ADOX ti permettono
di fare tutto.
ADO/X non ti permette poi di compattarlo.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: aggiornare BE da FE con muove tabelle

author: Napoleone

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:43da0baf$0$27294$4faf...@reader2.news.tin.it...

..............
Ciao Carlo,
ho letto questo tuo post e ne volevo un pò discutere.
Buona domenica
Cataldo Formaro


title: problema fileExist

author: stefano

text:
Buon giorno
Uso questa funzione per determinare l'esistenza di alcuni file, ho provato
su un computer che ha windows98 e funziona ma su un altro che ha windows xp
no, non vede i file.
potete aiutarmi?
Function FileExist(nomefile As String) As Boolean
    FileExist = Len(Dir$(nomefile)) > 0
End Function
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: problema fileExist

author: Morgan

text:
"stefano" <
vivag...@tiscali.it
> ha scritto nel messaggio
news:151Z44Z134Z204Y...@usenet.libero.it...
> Buon giorno
>
> Uso questa funzione per determinare l'esistenza di alcuni file, ho provato
> su un computer che ha windows98 e funziona ma su un altro che ha windows
> xp
> no, non vede i file.
>
> potete aiutarmi?
>
>
> Function FileExist(nomefile As String) As Boolean
>
>    FileExist = Len(Dir$(nomefile)) > 0
> End Function
>
Io uso questa su W00 e XP.
Public Function FileExists(sFilename As String) As Boolean
On Error GoTo ErrHandle
     FileExists = CBool(Len(Dir(sFilename)) <> 0)
ErrHandle:
If Err.Number = 0 Then Exit Function
If Err.Number = 52 Then
    MsgBox "Attenzione! file cercato non esiste od è stato spostato.",
vbInformation,
    Exit Function
End If
End Function
Morgan


title: problema fileExist

text:
stefano ha scritto:
> Buon giorno
>
> Uso questa funzione per determinare l'esistenza di alcuni file, ho provato
> su un computer che ha windows98 e funziona ma su un altro che ha windows xp
> no, non vede i file.
>
> potete aiutarmi?
>
>
> Function FileExist(nomefile As String) As Boolean
>
>     FileExist = Len(Dir$(nomefile)) > 0
> End Function
Con Windows XP SP2 funziona benissimo, sto provandolo ora....
Sei certo che non ti manchino delle librerie nei Riferimenti...?
Hai l'abitudine di usare Option Explicit nel codice e compilarlo per
verificare eventuali
anomalie...?
@Alex


title: scrivere in origine controllo

author: lolince

text:
Salve a tutti ragazzi , mi facevo una domanda , o meglio cercavo di
risolvere un problema , in una maschera , ho un campo dove scrivendo ad
esempio un codice in automatico tramite query mi da ad esempio
descrizione e prezzo , ora mi chiedevo se io volessi cmq abilitare il
campo del prezzo per poterci scrivere manualmente , cioe' se mi va bene
lo lascio altriemnti lo modifico come si puo fare? grazie a tutti in
anticipo.


title: scrivere in origine controllo

author: Sergio MAZZA

text:
"lolince" <
lol...@hotmail.com
> ha scritto nel messaggio
news:1166611904.0...@n67g2000cwd.googlegroups.com...

Associ la casella di testo [prezzo] al campo di tabella [prezzo]...
Ciao.
--
Sergio MAZZA


title: scrivere in origine controllo

text:
Sergio MAZZA ha scritto:

cioe? scusami ma non ho capito come fare


title: scrivere in origine controllo


title: scrivere in origine controllo

text:
"lolince" <
lol...@hotmail.com
> ha scritto nel messaggio
news:1166633276.2...@n67g2000cwd.googlegroups.com...
>
> cioe? scusami ma non ho capito come fare
Devi creare una casella si testo ed associarla (proprietą: origine
controllo) al campo della tabella dove devi memorizzare il prezzo...
Ciao.
--
Sergio MAZZA


title: scrivere in origine controllo

text:
no non va bene , mi cambia il prezzo nella tabella dove lo legge e non
dove lo scrive , e questo gia me lo permetteva di fare in query ,
grazie cmq


title: scrivere in origine controllo

text:
"lolince" <
lol...@hotmail.com
> ha scritto nel messaggio
news:1166690379.0...@79g2000cws.googlegroups.com...
> no non va bene , mi cambia il prezzo nella tabella dove lo legge e non
> dove lo scrive , e questo gia me lo permetteva di fare in query ,
> grazie cmq
Lolince, con le pochissime (diciamo nulle) informazioni che hai dato neanche
Houdini avrebbe indovinato...(fa pure rima)
Ciao.
--
Sergio MAZZA


title: scrivere in origine controllo

text:
hai ragione , pardon , mi spiego meglio in una tabella "tempo" ho dei
dati , questa la unisco in una query e scrivendo in un campo il codice
, la query ovviamente di da tutti i dati inseriti , tra cui anche il
campo "temp" che e l'oggetto di discussione , ora a fine lavoro con un
update aggiorno la una tabella dove mi scrive anche il tempo
estrapolato nella query. ora la mia domanda era questa il campo che
visualizzo in maschera "temp" non e  altro che il risultato dato dalla
queri prelevata dalla tabella tempo , ma io volevo cambiare se era
possibile nell'altra tabella , quando viene visualizzata in maschera
quindi come scrivere direttamente nella seconda tabella , perche
associando la prima mi scrive nella tabella tempo e non nella seconda .
spero di essere stato un po piu chiaro e ringrazio sempre per la
gentilezza


title: scrivere in origine controllo

text:
"lolince" <
lol...@hotmail.com
> ha scritto nel messaggio
news:1166698499.3...@42g2000cwt.googlegroups.com...

Ma hai scritto trattendo il fiato?
Mi scrivi la struttura delle tabelle?
Mi scrivi il codice SQL della query (Visualizza - Visualizzazione SQL)?
Ciao.
--
Sergio MAZZA


title: scrivere in origine controllo

text:
SELECT ofmanoo.ol, ofmanoo.data, ofmanoo.tipo, ofmanoo.inc,
ofmanoo.codspesa, ofmanoo.codoper, ofmanoo.descri, ofmanoo.temp,
ofmanoo.sc
, ofmanoo.codleg, ofmanoo.cost_mo, ofmanoo.NET1,
ofmanoo.net
,
([net]*(100-[sc])/100) AS s, tempario.iva
FROM ofmanoo INNER JOIN tempario ON (ofmanoo.tipo = tempario.tipo) AND
(ofmanoo.codoper = tempario.codoper);


title: scrivere in origine controllo

text:

Pape Satan, pape satan aleppe
--
--
Massimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: scrivere in origine controllo

text:
"lolince" <
lol...@hotmail.com
> ha scritto nel messaggio
news:1166716863.7...@i12g2000cwa.googlegroups.com...

Sempre più criptica la situazione.
Questa è la query dove fai la selezione; l'espressione che ti serve è
([net]*(100-[sc])/100)?
Mi scrivi la struttura delle tabelle?
Le maschere che utilizzi per modificare i dati?
Io da domani e fino al prossimo anno probabilmente non mi collego e se
prosegui a dare informazioni con il contagocce, per oggi non se ne parla di
arrivare ad una conclusione.
Vedi tu...
Ciao.
--
Sergio MAZZA


title: scrivere in origine controllo

author: VedoTondo

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:emebcp$tps$1...@tdi.cu.mi.it...
> Pape Satan, pape satan aleppe
Mi piace questa soluzione :-)
--
Saluti Andrea
Access 2003 - Windows XP


title: scrivere in origine controllo

text:
VedoTondo wrote:
> "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
> news:emebcp$tps$1...@tdi.cu.mi.it...
>
>> Pape Satan, pape satan aleppe
>
> Mi piace questa soluzione :-)
la nomenclatura è importante
La tua sembrava un ò oscura e criptica



title: scrivere in origine controllo

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:emekee$a5d$1...@tdi.cu.mi.it...
> la nomenclatura è importante
> La tua sembrava un ò oscura e criptica
Però con il metodo "lioppa.pampa, pampa source" la connecting string avrebbe
avuto meno problemi :-)
Saluti Andrea


title: scrivere in origine controllo

text:
"lolince" <
lol...@hotmail.com
> ha scritto nel messaggio
news:1166716863.7...@i12g2000cwa.googlegroups.com...

Uno Strike e zero Bool...
Ciao.
--
Sergio MAZZA


title: scrivere in origine controllo

author: Alessandro Cara

text:

Ma siete "strani"? uno che codifica, credo, i nomi di una tabella lo
trattate cosi? Si vede che non hai "esperienza" di far stare le labels
entro gli 8 caratteri, "recluta"  ;<)
Buon anno Sergio
--
ac
y-1=x


title: scrivere in origine controllo

text:
"Alessandro Cara" <
alessan...@ay-1asistemi.it
> ha scritto nel messaggio
news:JJtmh.13770$AA.1...@tornado.fastwebnet.it...
> Ma siete "strani"? uno che codifica, credo, i nomi di una tabella lo
Ahaaaa... "Credi"!! Quindi il dubbio ce l'hai anche tu.
> trattate cosi? Si vede che non hai "esperienza" di far stare le labels
> entro gli 8 caratteri, "recluta"  ;<)
Touchet!
> Buon anno Sergio
Buon anno anche a te.
> --
> ac
> y-1=x
Ciao.
--
Sergio MAZZA


title: Help - Riferimento a Form

author: MarcoS

text:
Cercherň di spiegarmi al meglio:
Passo a una funzione il nome della Maschera, poi perň non riesco ad
assegnare il riferimento (set SS ...) passandogli la variabile che contiene
il nome della Maschera --> vNameForm = S_Officina_Ric
Public Sub Find_02(ByVal vNameForm As String)
Dim db As Database, QQ As QueryDef, SS As Form, sSql As String, vNrOrd As
String, vForm As Variant
Set db = CurrentDb
Set QQ = db.QueryDefs("Q_Ric_sql")
Set SS = Form_S_Officina_Ric                'Volevo sostituire questa
istruzione
vForm = "Form_" & vNameForm            'Questo metodo non funziona
Set SS = vForm                                           'Genera Errore
run-time '424'
---- CUT
End Sub
Grazie 1000
--
Ciao Marco S.
http://digilander.iol.it/santimarco


title: Help - Riferimento a Form

text:
MarcoS <
marco...@libero.it
> wrote in message
9f50lb$558$1...@pinco.nettuno.it...
> Set SS = Form_S_Officina_Ric                'Volevo sostituire questa
> vForm = "Form_" & vNameForm            'Questo metodo non funziona
> Set SS = vForm                                           'Genera Errore
Set SS = Forms(vNameForm)                        'Funzione
Grazie cmq
--
Ciao Marco S.


title: Help - Riferimento a Form

author: Basjlico

text:
On Thu, 31 May 2001 10:46:24 +0200, "MarcoS" <
marco...@libero.it
>
wrote:
L'errore 424 vuo. dire che serve un oggetto invece tu gli passi una
stringa.
In access per impostare un riferimento ad una form questa deve far
parte dell'insieme forms. Il quale è composto da tutte le forms
*aperte* dall'applicaizione.
Una via semplice potrebbe essere qualla di caricare la form (magari
nascosta) con
DoCmd.OpenForm vNameForm[, , , , , acHidden]
e poi (se serve) impostare il riferimento con
set SS = forms(vNameForm)
ciao
>Cercherò di spiegarmi al meglio:
>Passo a una funzione il nome della Maschera, poi però non riesco ad



title: Help - Riferimento a Form

text:
Basjlico <
basj...@basjlico.com
> wrote in message
750dhtkcivhkp44kr...@4ax.com...
> On Thu, 31 May 2001 10:46:24 +0200, "MarcoS" <
marco...@libero.it
>
> wrote:
>
> L'errore 424 vuo. dire che serve un oggetto invece tu gli passi una
> stringa.
> In access per impostare un riferimento ad una form questa deve far
> parte dell'insieme forms. Il quale è composto da tutte le forms
> *aperte* dall'applicaizione.
> Una via semplice potrebbe essere qualla di caricare la form (magari
> nascosta) con
> DoCmd.OpenForm vNameForm[, , , , , acHidden]
> e poi (se serve) impostare il riferimento con
> set SS = forms(vNameForm)
>
La soluzione esatta è - Set SS = Forms(vNameForm)
Per passaglierla uso semplicemente vNameForm = Me.Name quando lancio dalla
form la function.
Ti ringrazio cmq molto per l'interessamento.



title: Selezionare Campo

author: Gracious

text:
Nell'utilizzo di una maschera per inserire dati in tabella, come posso
automaticamente impostare che alla pressione del tasto nuovo record il
cursore del mouse mi lampeggi nel campo che desidero, senza che ogni volta
io debba fare clic con il mouse sul campo per poi iniziare la digitazione?
Grazie 1000, anzi 10000000
Gracious


title: Selezionare Campo

author: Emyr

text:
On Wed, 17 Jul 2002 08:44:31 GMT, "Gracious" <
grac...@libero.it
>
wrote:

su evento click
me.nomecontrollo.setfocus
Saluti.
Emanuele.


title: Selezionare Campo

author: Alfio

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:5tbaju4c2inus73jc...@4ax.com...
> On Wed, 17 Jul 2002 08:44:31 GMT, "Gracious" <
grac...@libero.it
>
> wrote:
>
> >Nell'utilizzo di una maschera per inserire dati in tabella, come posso
> >automaticamente impostare che alla pressione del tasto nuovo record il
> >cursore del mouse mi lampeggi nel campo che desidero, senza che ogni
volta
> >io debba fare clic con il mouse sul campo per poi iniziare la
digitazione?
> >
> >
Vai nelle proprietą del pulsante di comando "nuovo record"
vai in evento su clic e nel codice, dopo "DoCmd.GoToRecord , , acNewRec"
aggiungi "me.nomecontrollo.setfocus"
Ciao
Alfio


title: Selezionare Campo

text:
Grazie emyr e alfio.
Ho risolto proprio in quel modo
Grazie mille
Gracious
"Gracious" <
grac...@libero.it
> ha scritto nel messaggio
news:P7aZ8.58216$K_4.1...@twister1.libero.it...



title: Selezionare Campo

text:
"Gracious" <
grac...@libero.it
> ha scritto nel messaggio
news:4XiZ8.60482$K_4.1...@twister1.libero.it...
> Grazie emyr e alfio.
>
> Ho risolto proprio in quel modo
>
> Grazie mille
>
Prego, in cambio potresti fare un favore? Impara a quotare......
Ciao
Alfio


title: Non stampa sottoreport da anteprima

author: namor

text:
In un db su A2000 SP3 sotto Win2000 mi si presenta questo problema:
su una maschera ho due pulsanti che da vba permettono la stampa e
l'anteprima di un report con sottoreport.
Il codice sui due pulsanti è questo:
Anteprima:
  DoCmd.OpenReport "Ordini di lavoro", acViewPreview, , "IDodl=" & Me.IDodl
Stampa:
  DoCmd.OpenReport "Ordini di lavoro", acViewNormal, , "IDodl=" & Me.IDodl
Il pulsante Stampa funziona sempre, e stampa sempre bene report e
sottoreport sulla stampante predefinita.
Il pulsante anteprima funziona pure lui bene e mostra correttamente
l'anteprima a video di report e sottoreport, ma se poi dall'anteprima
mando in stampa il report mi stampa solo il report principale senza il
sottoreport, come se questo non esistesse, benchè -ripeto- in anteprima
sia visualizzato!
Quindi non posso stampare dall'anteprima, il che mi toglie la possibilità
di aprire la finestra di dialogo "Stampa" per poter selezionare
l'intervallo di pagine nei casi in cui non lo voglia stampare tutto.
Quale può essere la causa?
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Non stampa sottoreport da anteprima

author: S. Savoldi

text:
"namor" <...
> In un db su A2000 SP3 sotto Win2000 mi si presenta questo problema:
> su una maschera ho due pulsanti che da vba permettono la stampa e
> l'anteprima di un report con sottoreport.
> Il codice sui due pulsanti è questo:
> Anteprima:
>   DoCmd.OpenReport "Ordini di lavoro", acViewPreview, , "IDodl=" &
Me.IDodl
> Stampa:
>   DoCmd.OpenReport "Ordini di lavoro", acViewNormal, , "IDodl=" & Me.IDodl
>
> Il pulsante Stampa funziona sempre, e stampa sempre bene report e
> sottoreport sulla stampante predefinita.
> Il pulsante anteprima funziona pure lui bene e mostra correttamente
> l'anteprima a video di report e sottoreport, ma se poi dall'anteprima
> mando in stampa il report mi stampa solo il report principale senza il
> sottoreport, come se questo non esistesse, benchè -ripeto- in anteprima
> sia visualizzato!
Questo problema si verifica con vari modelli di stampante o una sola?
> Quindi non posso stampare dall'anteprima, il che mi toglie la possibilità
> di aprire la finestra di dialogo "Stampa" per poter selezionare
> l'intervallo di pagine nei casi in cui non lo voglia stampare tutto.
> Quale può essere la causa?
Hai usato variabili globali nel modulo di classe in questione per
visualizzare/nascondere il sottoreport in dipendenza di qualche condizione?
Ciao: Silvio


title: Non stampa sottoreport da anteprima

text:
S. Savoldi ha scritto:
> "namor" <...
> > In un db su A2000 SP3 sotto Win2000 mi si presenta questo problema:
> > su una maschera ho due pulsanti che da vba permettono la stampa e
> > l'anteprima di un report con sottoreport.
> > Il codice sui due pulsanti è questo:
> > Anteprima:
> >   DoCmd.OpenReport "Ordini di lavoro", acViewPreview, , "IDodl=" &
> Me.IDodl
> > Stampa:
> >   DoCmd.OpenReport "Ordini di lavoro", acViewNormal, , "IDodl=" & Me.IDodl
> >
> > Il pulsante Stampa funziona sempre, e stampa sempre bene report e
> > sottoreport sulla stampante predefinita.
> > Il pulsante anteprima funziona pure lui bene e mostra correttamente
> > l'anteprima a video di report e sottoreport, ma se poi dall'anteprima
> > mando in stampa il report mi stampa solo il report principale senza il
> > sottoreport, come se questo non esistesse, benchè -ripeto- in anteprima
> > sia visualizzato!
> Questo problema si verifica con vari modelli di stampante o una sola?
Su tutte le stampanti provate (quattro).
> > Quindi non posso stampare dall'anteprima, il che mi toglie la possibilità
> > di aprire la finestra di dialogo "Stampa" per poter selezionare
> > l'intervallo di pagine nei casi in cui non lo voglia stampare tutto.
> > Quale può essere la causa?
> Hai usato variabili globali nel modulo di classe in questione per
> visualizzare/nascondere il sottoreport in dipendenza di qualche condizione?
> Ciao: Silvio
I due report non hanno codice (Possiede modulo=No) nè controlli nascosti.
Il report ha un'intestazione report di circa 24 cm che finisce con
un'interruzione pagina, l'intestazione pagina, il corpo che contiene il
sottoreport e il piè pagina report.
Il sottoreport ha un'intestazione  e piè pagina di gruppo, il corpo con i
dettagli e il piè pagina report.
Ho provato a stampare in 3 modi ma il risultato non cambia:
  da menù File - Stampa
  da mouse tasto destro - Stampa
  da barra strumenti - icona con stampante
Quello che mi lascia perplesso è che la stampa diretta viene completa, e
in anteprima si vede tutto, quindi il report dovrebbe essere a posto,
mentre solo se stampo dall'anteprima non viene il sottoreport.
Credo sia un bug di access, ma ho già il SP3.



title: Non stampa sottoreport da anteprima

text:
"namor" :
> Quello che mi lascia perplesso è che la stampa diretta viene completa, e
> in anteprima si vede tutto, quindi il report dovrebbe essere a posto,
> mentre solo se stampo dall'anteprima non viene il sottoreport.
> Credo sia un bug di access,
Già: così parrebbe.
Probabilmente ha problemi ha formattare due volte l'intero report (anteprima
e poi stampa).
In un menù di scelta rapida richiama la seguente funzione globale e prova ad
applicarla all'anteprima: poi si rivede il sottoreport?
Public Function Riformatta()
  With Screen.ActiveReport
       '
       If .Filter = vbNullString Then
             .FilterOn = True
             .Filter = " "
             .Filter = vbNullString
       Else
             .Filter = .Filter
             .FilterOn = True
       End If
  End With
End Function


title: Non stampa sottoreport da anteprima

text:
S. Savoldi ha scritto:
> "namor" :




No, dopo l'esecuzione della function il sottoreport sparisce anche
dall'anteprima.



title: Non stampa sottoreport da anteprima

text:
"namor" <
> No, dopo l'esecuzione della function il sottoreport sparisce anche
> dall'anteprima.
Su una copia di backup procedi a togliere elementi dal report e modificare
l'altezza delle sezioni finchè troverai cosa da fastidio.
La funzione che ti ho postato t'aiuterà a risparmiare carta durante le
prove...


title: Non stampa sottoreport da anteprima

text:
S. Savoldi ha scritto:
> "namor" <


Proverò la prox settimana, perchè domani mattina parto per praga e devo
ancora preparare tutto! Porterò il db anche sul mio PC a casa, per vedere
se si comporta alla stessa maniera, poi vi faccio sapere.
Per le prove avevo bloccato la coda di stampa e mi bastava andare a
guardare quante pagine metteva in coda, senza sprecare fogli, adesso
proverò con la function.
Ciao, grazie. A giovedì.



title: Non stampa sottoreport da anteprima

text:
namor ha scritto:
> S. Savoldi ha scritto:
> > "namor" <
> > > No, dopo l'esecuzione della function il sottoreport sparisce anche
> > > dall'anteprima.
> > Su una copia di backup procedi a togliere elementi dal report e
> > modificare l'altezza delle sezioni finchè troverai cosa da fastidio.
> > La funzione che ti ho postato t'aiuterà a risparmiare carta durante le
> > prove...
> Proverò la prox settimana, perchè domani mattina parto per praga e devo
> ancora preparare tutto! Porterò il db anche sul mio PC a casa, per vedere
> se si comporta alla stessa maniera, poi vi faccio sapere.
> Per le prove avevo bloccato la coda di stampa e mi bastava andare a
> guardare quante pagine metteva in coda, senza sprecare fogli, adesso
> proverò con la function.
> Ciao, grazie. A giovedì.
> Namor
Rieccomi qua. Praga è bellissima, per chi non c'è già stato merita farci
un giro.
Ho risolto il problema. Era dovuto al fatto che avevo messo nel
sottoreport una textbox di nome "IDodl" che aveva come origine dati il
campo IDodl. Poi ho cambiato idea e al posto di IDodl ho messo
nell'origine dati della textbox questa banalissima formula:
  =[Categoria] & " - " & [Descriz tipologia]
Si vede che mettere una formula in un controllo che ha lo stesso nome di
uno dei campi dell'origine dati gli dà fastidio in fase di
riformattazione. E' bastato cambiare nome alla textbox per risolvere il
problema.
L'inconveniente si presentava anche sul mio PC di casa, quindi è da
escludere il fatto che possa derivare da una particolare configurazione di
office, dev'essere proprio un bug di access.
Ciao, grazie.



title: Query a campi incrociati e date

author: Axel

text:
Ciao, ho un problemino con una query a campi incrociati e la data espressa
con questa stringa:
Data:
DateSerial(Val(Left([UltimaData];4));Val(Mid([UltimaData];5;2));Val(Right([U
ltimaData];2)))
Le date in oggetto sono quelle della query:
TRANSFORM
First(DateSerial(Val(Left([UltimaData],4)),Val(Mid([UltimaData],5,2)),Val(Ri
ght([UltimaData],2)))) AS Data
La data che devo trasformate è 20010501 in 01/05/2001 oppure 01/05/01 e dove
non è presente non avere nulla.
Il problema è che dopo aver esaminato le varie tabelle access mi dà
l'errore: Uso di null non valido.(Codice errore 94.È stato utilizzato un
valore Null o un'espressione che dà come risultato Null in un'istruzione, in
una procedura Sub o Function oppure in una funzione intrinseca che non
accetta un valore Null.)
Spero esser stato chiaro, grazie e arrivederci.
Axel


title: Perche' e dove usare dlookup?

text:
Il soggetto vi potra' sembrare strano ma effettivamente non capisco dove
come e quando sia conveniente usare la dlookup (stessa cosa per
dmax,dmin), perche' non ne ho mai sentito la mancanza.
C'e' qualcuno che mi illumina?
(e non cominciamo con la storia di comprarmi una lampadina?) ;<)))
--
Alessandro Cara


title: Perche' e dove usare dlookup?

author: lbo dal portatile

text:
>Il soggetto vi potra' sembrare strano ma effettivamente non capisco dove
>come e quando sia conveniente usare la dlookup (stessa cosa per
>dmax,dmin), perche' non ne ho mai sentito la mancanza.
perche' conosci l'sql...
credo sia una convenienza di tipo "logistico".  mettiti nei panni di
un principiante, o di qualcuno che non scrive una applicazione ben
analizzata o strutturata ma deve buttare li' due righe di codice al
volo.  si fa prima a capire come funziona dlookup o dmax che non ad
impararsi come scrivere una query in sql.
comunque, adesso sto scrivendo delle applicazioni asp.  certo le
applicazioni asp non sono applicazioni access, giranop in tutt'altro
ambiente, ma comunque un'idea ce la possiamo fare.
in vbscript, come sai, non ci sono dlookup, dmax, dmin, dcount e
compagnia  e me le sono riscritte (neanche iif e nz e mi sono
riscritto pure quelle).
perche'?  dlookup per decodificare al volo una descrizione dato un id,
o viceversa.  tu mi dirai, ti fai il select della descrizione e
dell'id e buona notte.
vero, ma considera il caso di un input <select...> html, cioe'
dell'equivalente di una casella combinata in access.  equivalente per
modo di dire, perche' non possiede colonne multiple che magari si
spossono anche stringere a 0 cm e che ti permettono una decodifica
immediata per mezzo di .column().
ovviamente in una combo o in un <select ...> ci devi mettere una
descrizione parlante, non il numerello di id che all'utente non dice
niente (e che e' meglio non sospetti nemmeno che esista).  pero' nello
script oggetto dell'action della form che contiene il <select...> ti
serve l'id, non la descrizione.  magari potresti scriverti un join, ma
perche' complicarsi la vita?  una bella dlookup, come se fosse una
sottoquery, e passa la paura.
dmax la uso in pratica per generare un id numerico quando aggiungo un
record: id=1+dmax...
potrei settare un recordset sul max(id) della tabella, ma faccio prima
a scrivere una volta per tutte il codice che mi occorre e chiamarlo
dmax...
comunque in access credo servano soprattutto a chi comincia e/o va di
fretta.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: Perche' e dove usare dlookup?

text:
lbo dal portatile wrote:
> perche' conosci l'sql...
>
ok, il dubbio mi era venuto
> [cut]
> volo.  si fa prima a capire come funziona dlookup o dmax che non ad
> impararsi come scrivere una query in sql.
sono d'accordo

> [cut]
> in vbscript, come sai, non ci sono dlookup, dmax, dmin, dcount e
> compagnia  e me le sono riscritte (neanche iif e nz e mi sono
> riscritto pure quelle).
fuori tema ma bravo, manda, che' non ho tempo e vedi se puoi fare anche
la format

> perche'?  dlookup per decodificare al volo una descrizione dato un id,
> o viceversa.  tu mi dirai, ti fai il select della descrizione e
> dell'id e buona notte.
>
> vero, ma considera il caso di un input <select...> html, cioe'
> dell'equivalente di una casella combinata in access.  equivalente per
> modo di dire, perche' non possiede colonne multiple che magari si
> spossono anche stringere a 0 cm e che ti permettono una decodifica
> immediata per mezzo di .column().
potresti sempre scrivere una bella funzione/oggetto che lo faccia, mi
interesserebbe

> ovviamente in una combo o in un <select ...> ci devi mettere una
> descrizione parlante, non il numerello di id che all'utente non dice
> niente (e che e' meglio non sospetti nemmeno che esista).  pero' nello
> script oggetto dell'action della form che contiene il <select...> ti
> serve l'id, non la descrizione.  magari potresti scriverti un join, ma
> perche' complicarsi la vita?  una bella dlookup, come se fosse una
> sottoquery, e passa la paura.
>
> dmax la uso in pratica per generare un id numerico quando aggiungo un
> record: id=1+dmax...
>
> potrei settare un recordset sul max(id) della tabella, ma faccio prima
> a scrivere una volta per tutte il codice che mi occorre e chiamarlo
> dmax...
>
vedo che hai studiato.
Meriti una laurea "ad honorem" che preferisci? matematica o ingegneria
gestionale ho disponibili solo quelle.
> comunque in access credo servano soprattutto a chi comincia e/o va di
> fretta.
questo motivo invece non mi convince!
Chi comincia rischia di prendere una brutta piega, come con il qbe, che
per me e' ancora un'affare strano, e la fretta certe volte fa fare dei
casini!!!!
Sei stato molto esauriente.
--
Alessandro Cara


title: Perche' e dove usare dlookup?

text:
>> [cut]
>> in vbscript, come sai, non ci sono dlookup, dmax, dmin, dcount e
>> compagnia  e me le sono riscritte (neanche iif e nz e mi sono
>> riscritto pure quelle).
>
>fuori tema ma bravo, manda, che' non ho tempo e vedi se puoi fare anche
>la format
dove opportuno do' per scontato che sia settata una connessione cn a
visibilita' globale.
<%
function DLookUp(NomeCampo, NomeTabella, ParteWhere)
	dim ssql
	dim rst
	ssql = "SELECT " & NomeCampo & " FROM " & NomeTabella
	if ParteWhere <> "" then
		ssql = ssql & " WHERE " & ParteWhere
	end if
	set rst=cn.execute(ssql)
	if rst.bof and rst.eof then
		DLookUp = Null
	else
		DLookUp = rst(0)
	end if
	rst.close
end function
%>
<%
function DCount(NomeCampo, NomeTabella, ParteWhere)
	dim ssql
	dim rst
	ssql = "SELECT Count(" & NomeCampo & ") FROM " & NomeTabella
	if ParteWhere <> "" then
		ssql = ssql & " WHERE " & ParteWhere
	end if
	set rst=cn.execute(ssql)
	DCount = rst(0)
	rst.close
end function
%>
<%
function DMax(NomeCampo, NomeTabella, ParteWhere)
	dim ssql
	dim rst
	ssql = "SELECT Max(" & NomeCampo & ") FROM " & NomeTabella
	if ParteWhere <> "" then
		ssql = ssql & " WHERE " & ParteWhere
	end if
	set rst=cn.execute(ssql)
	DMax = rst(0)
	rst.close
end function
%>
<%
function DMin(NomeCampo, NomeTabella, ParteWhere)
	dim ssql
	dim rst
	ssql = "SELECT Min(" & NomeCampo & ") FROM " & NomeTabella
	if ParteWhere <> "" then
		ssql = ssql & " WHERE " & ParteWhere
	end if
	set rst=cn.execute(ssql)
	DMin = rst(0)
	rst.close
end function
%>
<%
function nz(TestVal, AltVal)
	if isnull(TestVal) then
		nz=AltVal
	else
		nz=TestVal
	end if
end function
%>
<%
function iif(Espressione, Valore1, Valore2)
	if Espressione = True then
		iif = Valore1
	else
		iif = Valore2
	end if
end function
%>



title: totale

author: kkk

text:
Come si può ottenere in una query  anche il totale progressivo parziale del
campo tabella [A] , ovvero da una certa data in poi,  e non di tutto il
campo [A] ?
Grazie


title: totale

author: Roberto da casa

text:
"kkk" <
swabNO-SP...@libero.it
> ha scritto nel messaggio
news:c272hi$1qgm2v$1...@ID-155344.news.uni-berlin.de...

Nella Sezione  Queries del Sito Comune (link qui sotto) trovi una FAQ che ti
dice come ottenere un totale progressivo: per ottenere il totale progressivo
solo da una certa data basta che modifichi la funzione pubblicata nella FAQ
di cui sopra filtrando solo i record che desideri.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: totale

text:
Ho usato la funzione rs.filter("<miocampodata> >= 01/01/04") ma non funziona
nè senza parentesi nè con #
Ci sono altre soluzioni ?
"Roberto da casa" <
r.ma...@libero.it
> wrote in message
news:JRE1c.47351$Kc3.1...@twister2.libero.it...



title: totale

text:
"kkk" <
swabNO-SP...@libero.it
> ha scritto nel messaggio
news:c27eq1$1qjvk8$1...@ID-155344.news.uni-berlin.de...
> Ho usato la funzione rs.filter("<miocampodata> >= 01/01/04") ma non
funziona
> nè senza parentesi nè con #
> Ci sono altre soluzioni ?
>
[CUT]
Per prima cosa quando rispondi scrivi DOPO e non prima del testo dei
messaggi precedenti.
Poi certamente quella non è una sintassi giusta; prova con:
rs.Filter = "MiaData >= #01/01/04#"
Naturalmente la costante data deve essere espressa nella forma mm/gg/aaaa e
non gg/mm/aaaa.



title: totale

text:
"Roberto da casa" <
r.ma...@libero.it
> wrote in message
news:0GH1c.47754$Kc3.1...@twister2.libero.it...

Non va,
 né con data access mese/giorno/anno
 né con data access e pc mese/giorno/anno


title: totale

text:
"kkk" <
swabNO-SP...@libero.it
> ha scritto nel messaggio
news:c27jak$1q3dc8$1...@ID-155344.news.uni-berlin.de...

Forse è meglio se posti tutto il codice VBA cge stai usando e ci indichi
anche l'esatta struttura della tabella.
Infice ci dici che risultato vuoi ottenere.



title: totale

text:
> Forse č meglio se posti tutto il codice VBA cge stai usando e ci indichi
> anche l'esatta struttura della tabella.
> Infice ci dici che risultato vuoi ottenere.
>
> --
> Roberto
>
Tabella ID, km, data,      query ID, Data, totale_ km
id : contatore
km:  numerico precisione doppia standard posizioni decimali 2
data: data/ora data estesa
totale_ km: standard posizioni decimali 2
codice suggerito:
query su tabella
totale_km: CDbl(TotProgrQry("ID";[ID];"Km";"Query1"))
modulo:
Option Compare Database
Option Explicit
Function TotProgrQry(KeyName As String, _
KeyValue, FieldNameToGet As String, _
NomeTabella As String) As Double
Dim rs As DAO.Recordset
On Error GoTo Err_TotProgrQry
TotProgrQry = 0
Set rs = CurrentDb().OpenRecordset(NomeTabella, _
dbOpenDynaset)
rs.Filter = "MiaData >= #01/01/04#"
' Trova il record corrente
Select Case rs.Fields(KeyName).Type
    ' La chiave č Numerica?
    Case DB_INTEGER, DB_LONG, DB_CURRENCY, DB_SINGLE, _
        DB_DOUBLE, DB_BYTE
        rs.FindFirst "[" & KeyName & "] = " & KeyValue
    ' La chiave č di tipo Data/ora?
    Case DB_DATE
        rs.FindFirst "[" & KeyName & "] = #" & _
        Format(KeyValue, "mm/dd/yyyy") & "#"
    ' La chiave č di tipo Testo?
    Case DB_TEXT
        rs.FindFirst "[" & KeyName & "] = '" & _
        KeyValue & "'"
    Case Else
        MsgBox "ERRORE: Tipo dati della chiave non valido!"
        Exit Function
   End Select
Do Until rs.BOF
    TotProgrQry = TotProgrQry + rs(FieldNameToGet)
    rs.MovePrevious
Loop
Set rs = Nothing
Bye_TotProgrQry:
    Exit Function
Err_TotProgrQry:
    Resume Bye_TotProgrQry
End Function
I km sono stati fatti in momenti e anni diversi, a me interessa sapere ed
aggiornare quelli da un certo momento in poi in particolare quelli fatti dal
primo gennaio 2004.
grazie


title: totale

text:
"kkk" <
swabNO-SP...@libero.it
> ha scritto nel messaggio
news:c27pg0$1q3kh2$1...@ID-155344.news.uni-berlin.de...

Se le cose stanno cosě penso che la cosa piů facile sia quella di non
toccare la funzione TotProgrQry ma di scrivere nei criteri della query
relativi al campo Data:
>= #01/01/2004#
Comunque ti sconsiglio di chiamare Data un tuo campo, č un nome riservato e
potresti trovarti davanti a inspiegabili malfunzionamenti dell'applicativo.



title: totale

text:
"Roberto da casa" <
r.ma...@libero.it
> wrote in message
news:BR12c.53183$FJ6.1...@twister1.libero.it...
>
> "kkk" <
swabNO-SP...@libero.it
> ha scritto nel messaggio
> news:c27pg0$1q3kh2$1...@ID-155344.news.uni-berlin.de...
>>
>> > Forse è meglio se posti tutto il codice VBA cge stai usando e ci

>>     ' La chiave è Numerica?
>>     Case DB_INTEGER, DB_LONG, DB_CURRENCY, DB_SINGLE, _
>>         DB_DOUBLE, DB_BYTE
>>         rs.FindFirst "[" & KeyName & "] = " & KeyValue
>>     ' La chiave è di tipo Data/ora?
>>     Case DB_DATE
>>         rs.FindFirst "[" & KeyName & "] = #" & _
>>         Format(KeyValue, "mm/dd/yyyy") & "#"
>>     ' La chiave è di tipo Testo?
>>     Case DB_TEXT
>>         rs.FindFirst "[" & KeyName & "] = '" & _
>>         KeyValue & "'"
>>     Case Else
>>         MsgBox "ERRORE: Tipo dati della chiave non valido!"
>>         Exit Function
>>    End Select
>> Do Until rs.BOF
>>     TotProgrQry = TotProgrQry + rs(FieldNameToGet)
>>     rs.MovePrevious
>> Loop
>> Set rs = Nothing
>> Bye_TotProgrQry:
>>     Exit Function
>> Err_TotProgrQry:
>>     Resume Bye_TotProgrQry
>> End Function
>>
>> I km sono stati fatti in momenti e anni diversi, a me interessa sapere ed
>> aggiornare quelli da un certo momento in poi in particolare quelli fatti
> dal
>> primo gennaio 2004.
>> grazie
>
> Se le cose stanno così penso che la cosa più facile sia quella di non
> toccare la funzione TotProgrQry ma di scrivere nei criteri della query
> relativi al campo Data:
>
>>= #01/01/2004#
>
> Comunque ti sconsiglio di chiamare Data un tuo campo, è un nome riservato
> e
> potresti trovarti davanti a inspiegabili malfunzionamenti
> dell'applicativo.
>
> --
> Roberto
>
> ---------------------------------------------
> il Sito Comune di it.comp.appl.access:
>
http://www.sitocomune.com
> ---------------------------------------------
Le soluzioni per avere il dato che mi serve possono essere molte:
si può usare la RunningSum o fare due query, come ho fatto.
Ho preferito modificare la funzione,  piuttosto che creare query.
La funzione per la mia esigenza può essere modificata nel seguente modo,
editando i vari dati:
Set rs = CurrentDb().OpenRecordset("SELECT * FROM <NomeTabella> WHERE
<NomeCampoData>   >= #<Data># ", dbOpenDynaset)
Grazie


title: Calcoli su date

author: Maurizio

text:
Sono ancora io per chiedere delucidazioni su quanto in oggetto, in quanto
inserendo la data iniziale e la data finale di assenza, dovrei calcolare le
ore di assenza di un alunno. Vorrei approfittare, è possibile diattivare il
tasto SHIFT all'avvio di una maschera??
Grazie a chiunque voglia darmi consigli.
Maurizio
Scusate la brevità forse eccessiva, ma non voglio creare un msg troppo lungo
che magari mi incasino io.


title: Calcoli su date

text:
"Maurizio" <
calma2...@libero.it
> ha scritto nel messaggio
news:JdUt9.71604$%M1.18...@twister2.libero.it...
> Sono ancora io per chiedere delucidazioni su quanto in oggetto, in quanto
> inserendo la data iniziale e la data finale di assenza, dovrei calcolare
le
> ore di assenza di un alunno.
 Vai sul Sito Comune (lik qui sotto) e nella Sezione General leggiti la FAQ
di G. Paolo Bizzaro e Silvio Mazzetto intitolata "Conteggio dei giorni
lavorativi tra due date". La funzione ContaLavorativi, a seconda di come la
richiami considera o meno la settimana corta (sabato festivo).
Devi anche fare una piccola modifica della funzione Festivo per fargli
considerare festivo anche il Santo Patrono, che non è stato considerato
perché differente in ogni città.
Naturalmente le funzioni non considerano le feste natalizie, quelle pasquali
e il periodo di ferie estive.
Una volta che sai il numero dei giorni compreso tra le due date, non credo
sia un problema ricavare le ore di lezione.
> Vorrei approfittare, è possibile diattivare il
> tasto SHIFT all'avvio di una maschera??
Sempre sul Sito Comune e sempre nella Sezione General, trovi tre FAQ che ti
dicono come attivare/disattivare il tasto SHIFT all'avvio di un database e
non di una maschera.
> Grazie a chiunque voglia darmi consigli.
> Maurizio
>
> Scusate la brevità forse eccessiva, ma non voglio creare un msg troppo
lungo
> che magari mi incasino io.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Calcoli su date

author: BiBi

text:
On Thu, 24 Oct 2002 15:21:13 GMT, "Maurizio" <
calma2...@libero.it
>
wrote:

datediff("h",date1,date2)
Non è possibile disattivare il tasto shift, io ho risolto chiamando
l'applicazione da una maschera logIn da un altro database e prima di
aprire l'applicazione verifico se il tasto è premuto.
Ciao BB