title: Vorrei salvare dei file con VBA

author: Linux

text:
Vorrei una volta fatto il preventivo, la fattura, il DDt, lo storno, da un
DB Access, salvare questi dati (Divisi chiaramente per cliente) come file,
magari di testo, formattati, che si possano leggere chiaramente anche con
Word(*.Doc), o Notepad(*.Txt). E' possibile?
GraziE Mille. Kevin


title: Vorrei salvare dei file con VBA

author: Simone Bianchi

text:
La funzione da usare č: TRASFERISCI DATABASE.
Ti conviene fare una macro č piů semplice.
Ciao Nicola
"Linux" <
gemcompu...@virgilio.it
> ha scritto nel messaggio
news:RFpe9.67913$ub2.1...@news1.tin.it...



title: Vorrei salvare dei file con VBA

author: FACE ONE

text:
"Linux" <
gemcompu...@virgilio.it
> ha scritto nel messaggio
news:RFpe9.67913$ub2.1...@news1.tin.it...

DoCmd.OutPutTo ti permette di esportare in HTML, in TXT, in RTF, in XLS ed
altri formati
FACE ONE


title: riparare un indice di tabella

author: melchiorre

text:
Aprendo una maschera associata a una tabella contenente i saldi contabili di
alcune ditte  ( 4000 record) , mi compariva subito l'errore "apporto
modifiche
non riuscito perch� si � tentato di duplicare un indice o la chiave primaria
etc..." quando cercavo di visualizzare i dati di una certa azienda.
Per risolvere , ho dovuto eliminare un range di un centinaio di record della
tabella , relativi a tale azienda ( si sono poi ricreati al volo lanciando
un'altra procedura del programma ) , e cos� adesso va bene.
Era la tabella parzialmente danneggiata ?
la chiave non era danneggiata ( ho infatti provato a rimuoverla e poi a
rimetterla , e non mi segnalava duplicazioni ) , era l'indice danneggiato?
Uso Access 2000
Buongiorno


title: riparare un indice di tabella

author: Riccardo Baldinotti

text:
On 9 Nov, 16:34, "melchiorre" <m...@yugtbh.oi> wrote:
> Aprendo una maschera associata a una tabella contenente i saldi contabili di
> alcune ditte  ( 4000 record) , mi compariva subito l'errore "apporto
> modifiche
> non riuscito perchè si è tentato di duplicare un indice o la chiave primaria
> etc..." quando cercavo di visualizzare i dati di una certa azienda.
>
> Per risolvere , ho dovuto eliminare un range di un centinaio di record della
> tabella , relativi a tale azienda ( si sono poi ricreati al volo lanciando
> un'altra procedura del programma ) , e così adesso va bene.
>
> Era la tabella parzialmente danneggiata ?
> la chiave non era danneggiata ( ho infatti provato a rimuoverla e poi a
> rimetterla , e non mi segnalava duplicazioni ) , era l'indice danneggiato?
>
> Uso Access 2000
>
> Buongiorno
A me quell'errore compare solo "scrivendo" un record, e non
visualizzandolo. Non è che quella maschera, all'apertura, scriva
qualche valore?
Inoltre, come hai riscritto i record che avevi cancellato?
Riccardo Baldinotti


title: riparare un indice di tabella

text:
<A me quell'errore compare solo "scrivendo" un record, e non
<visualizzandolo. Non � che quella maschera, all'apertura, scriva
<qualche valore?
<Inoltre, come hai riscritto i record che avevi cancellato?
c'� la procedura RICALCOLA SALDI CONTABILI
ciao


title: riparare un indice di tabella

text:
On 10 Nov, 14:39, "melchiorre" <m...@yugtbh.oi> wrote:
> <A me quell'errore compare solo "scrivendo" un record, e non
> <visualizzandolo. Non è che quella maschera, all'apertura, scriva
> <qualche valore?
> <Inoltre, come hai riscritto i record che avevi cancellato?
>
> c'è la procedura RICALCOLA SALDI CONTABILI
>
> ciao
Vuoi dire una procedure che scrive in quella tabella? Così a naso, non
è che raggruppi i dati e ti escono due record a parità di id ditta, o
qualche altro campo indicizzato con "duplicati non ammessi'? Se usi
una query di raggruppamento in quella procedura, prova a guardare che
righe produce, magari trovi un doppione.
Da quello che scrivi, non mi è chiaro se hai due tabelle, una con dati
da cui trai i totali per la seconda tabella, o che altro.
Riccardo Baldinotti


title: Corsi on line di programmazione Access, SQL, Visual Basic

author: di fusco francesco

text:
Impara a Programmare in VBA per Microsoft Access con i corsi on line
di programmazione Access. Impara secondo i tuoi tempi ed i tuoi ritmi.
Inoltre, corsi di Visual Basic ed SQL.
Per informazioni, contattare
fdif...@mclink.it


text:
Impara a Programmare in VBA per Microsoft Access con i corsi on line
di programmazione Access. Impara secondo i tuoi tempi ed i tuoi ritmi.
Inoltre, corsi di Visual Basic ed SQL.
Inizio nuovi corsi il 22 Marzo.
Per informazioni, contattare
fdif...@mclink.it


title: Esiste una Soluzione ??

author: Pier

text:
Ho costruito un database in access che archivia e stampa tute le
informazioni possibili dei libri. (tipo lo schedario di una biblioteca).
Tutto ok ma e' sorto un grosso problema:
un campo della scheda si chiama "Biografia dell'autore".
Ovviamente il campo ha parecchi caratteri e l'ho messo come memo.
Nel report ho fatto la casella espandibile e cosi' stampa tutta la biografia
perfettamente...... e fin qui tutto bene.
Il problema e' che nel campo memo non riesco a selezionare parte del testo e
trasformarla per esempio in grassetto...poiche' mi trasforma tutto in
grassetto.
E poi facendo il copia-incolla da un doc Word formattato me lo Sformatta
tutto......
C'e' un opzione per risolvere questo problema?
Potrei usare l'oggetto Ole ...e inserire un doc word....... ma non e'
espandibile.
Spero di essere stato chiaro.
Grazie
Pier
pi...@fastwebnet.it


title: Esiste una Soluzione ??

author: Carlo Costarella

text:
"Pier" <
p...@fastwebnet.it
> ha scritto nel messaggio
news:21jZ9.4474$YL4....@tornado.fastwebnet.it...

Potresti usare un ocx che si chiama richtx32.ocx. E' gratuito e liberamente
distribuibile se hai la versione Developer di Office o VB.
Anche sul sito di
http://www.lebans.com
 potrai trovare qualcosa.
Ciao, Carlo


title: Esiste una Soluzione ??

text:
> Potresti usare un ocx che si chiama richtx32.ocx. E' gratuito e
liberamente
> distribuibile se hai la versione Developer di Office o VB.
> Anche sul sito di
http://www.lebans.com
 potrai trovare qualcosa.
>
> Ciao, Carlo
Provero'
Grazie!!!!!!!


title: Esiste una Soluzione ??

author: Antonio Biso

text:
"Pier" <
p...@fastwebnet.it
> ha scritto nel messaggio
news:21jZ9.4474$YL4....@tornado.fastwebnet.it...
Certo!
Basta scrivere correttamente DOPO il quoting!!!
Antonio


title: Contatore di accessi

author: Sandrobi

text:
E' possibile memorizzare in un contatore le volte che si č aperto un
database? Se metto il controllo su una maschera, questa puň essere chiusa e
aperta piů volte nella stessa sessione per cui il contatore andrebbe avanti
anche se in effetti il database non č stato chiuso..........
Sandrobi


title: Contatore di accessi

author: ALESSANDRO Baraldi

text:
"Sandrobi" <
sandb...@libero.it
> ha scritto nel messaggio
news:AfbPd.28313$QG6.4...@twister2.libero.it...

Fai eseguire alla macro AutoExec una funzione di incremento
di un campo nella tabella Accessi, oppure usa un registro.
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Contatore di accessi

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:420d40b6$0$6309$5fc...@news.tiscali.it...
> "Sandrobi" <
sandb...@libero.it
> ha scritto nel messaggio
> news:AfbPd.28313$QG6.4...@twister2.libero.it...
> > E' possibile memorizzare in un contatore le volte che si č aperto un
> > database? Se metto il controllo su una maschera, questa puň essere
chiusa
> e
> > aperta piů volte nella stessa sessione per cui il contatore andrebbe
> avanti
> > anche se in effetti il database non č stato chiuso..........
> >
> > Sandrobi
>
> Fai eseguire alla macro AutoExec una funzione di incremento
> di un campo nella tabella Accessi, oppure usa un registro.
>
> Ciao
> --
> @Alex (Alessandro Baraldi)
Si, non avevo pensato all'Autoexec.
Grazie.
Sandrobi


title: SQL : Mi date una mano per favore ?

author: Webmaster

text:
Problema :
- devo realizzare un confronto tra due listini,
- identificare gli articoli con codice uguale,
- confrontare i prezzi,
- aggiornare il prezzo del Listino1 con il prezzo del Listino2 nel caso in
cui sia diverso
In visual basic saprei come fare scomponendo il problema in piccole parti ,
creando qualche recordset, una manciata di If..Then..Else... , un pizzico di
Do.... Loop.. , qualche NoMatch.
Mi stavo chiedendo, pero', se fosse possibile realizzare la stessa cosa
utilizzando SQL in maniera "secca".
Visto, pero', che non sono riuscito a farlo, provo a chiedere a voi nella
speranza che ci sia qualcuno appassionato di SQL .. oppure di sfide !   ;-)
Grazie in anticipo


title: SQL : Mi date una mano per favore ?

author: Sib

text:
"Webmaster" <
webm...@nospam.com
> ha scritto nel messaggio
news:1zSf8.52311$fa5.1...@twister2.libero.it...
> Problema :
>
> - devo realizzare un confronto tra due listini,
> - identificare gli articoli con codice uguale,
> - confrontare i prezzi,
> - aggiornare il prezzo del Listino1 con il prezzo del Listino2 nel caso in
> cui sia diverso
>
> In visual basic saprei come fare scomponendo il problema in piccole parti
,
> creando qualche recordset, una manciata di If..Then..Else... , un pizzico
di
> Do.... Loop.. , qualche NoMatch.
>
> Mi stavo chiedendo, pero', se fosse possibile realizzare la stessa cosa
> utilizzando SQL in maniera "secca".
Naturale, se non fosse possibile fare una cosa simile in SQL, ridurremmo
l'SQL a semplice "estrattore di dati".
Devi fare una query di aggiornamento del tipo:
UPDATE Listino1 SET Listino1.Prezzo=Listino2.Prezzo WHERE
((Listino1.CodProdotto=Listino2.CodProdotto) AND
(Listino1.Prezzo<>Listino2.prezzo))
Cosi' all'impronta mi viene cosi', nello scrivere mi puo' essere sfuggito
qualcosa ma non mi sembra.
Ciao


title: SQL : Mi date una mano per favore ?

text:
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:OiTf8.48659$v7.17...@twister1.libero.it...
>
> "Webmaster" <
webm...@nospam.com
> ha scritto nel messaggio
> news:1zSf8.52311$fa5.1...@twister2.libero.it...
> > Problema :
> >
> > - devo realizzare un confronto tra due listini,
> > - identificare gli articoli con codice uguale,
> > - confrontare i prezzi,
> > - aggiornare il prezzo del Listino1 con il prezzo del Listino2 nel caso
in
> > cui sia diverso
---cut---
> > Mi stavo chiedendo, pero', se fosse possibile realizzare la stessa cosa
> > utilizzando SQL in maniera "secca".
>
> Naturale, se non fosse possibile fare una cosa simile in SQL, ridurremmo
> l'SQL a semplice "estrattore di dati".
> Devi fare una query di aggiornamento del tipo:
> UPDATE Listino1 SET Listino1.Prezzo=Listino2.Prezzo WHERE
> ((Listino1.CodProdotto=Listino2.CodProdotto) AND
> (Listino1.Prezzo<>Listino2.prezzo))
> Cosi' all'impronta mi viene cosi', nello scrivere mi puo' essere sfuggito
> qualcosa ma non mi sembra.
Ho paura che qualcosa ti sia sfuggito.... :-)
Infatti non funziona.
Access continua a chiedermi come parametro tutti i campi relativi la tabella
"Listino2".
Boh... ?!?!?
Ciao


title: SQL : Mi date una mano per favore ?

author: Roberto da casa

text:
"Webmaster" <
webm...@nospam.com
> ha scritto nel messaggio
news:1zSf8.52311$fa5.1...@twister2.libero.it...

Prova con una query che abbia il seguente codice SQL:
UPDATE Listino1 INNER JOIN Listino2 ON Listino1.Articolo1 =
Listino2.Articolo2 SET Listino1.Prezzo1 = [Listino2].[Prezzo2]
WHERE (((Listino1.Prezzo1)<>[Listino2].[Prezzo2]));
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: SQL : Mi date una mano per favore ?

text:
"Webmaster" <
webm...@nospam.com
> ha scritto nel messaggio
> "Sib" <si...@SPAMiol.it> ha scritto nel messaggio
> > "Webmaster" <
webm...@nospam.com
> ha scritto nel messaggio
> > > - devo realizzare un confronto tra due listini,
> > > - identificare gli articoli con codice uguale,
> > > - confrontare i prezzi,
> > > - aggiornare il prezzo del Listino1 con il prezzo del Listino2 nel
caso in
> > > cui sia diverso
> ---cut---
CUT
> > Devi fare una query di aggiornamento del tipo:
> > UPDATE Listino1 SET Listino1.Prezzo=Listino2.Prezzo WHERE
> > ((Listino1.CodProdotto=Listino2.CodProdotto) AND
> > (Listino1.Prezzo<>Listino2.prezzo))
> > Cosi' all'impronta mi viene cosi', nello scrivere mi puo' essere
sfuggito
> > qualcosa ma non mi sembra.
>
> Ho paura che qualcosa ti sia sfuggito.... :-)
> Infatti non funziona.
> Access continua a chiedermi come parametro tutti i campi relativi la
tabella
> "Listino2".
Ti sarebbe bastato aprire la query in modalità grafica e aggiungere la
tabella Listino2.
Comunque basta scrivere
UPDATE Listino1, Listino2 SET .... para para come sopra
Sib


title: SQL : Mi date una mano per favore ?

text:
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:iv5g8.52235$v7.18...@twister1.libero.it...
> Ti sarebbe bastato aprire la query in modalità grafica e aggiungere la
> tabella Listino2.
> Comunque basta scrivere
> UPDATE Listino1, Listino2 SET .... para para come sopra
Grazie mille !!!
Ora funziona.
Non sapevo che bisognasse mettere la lista di tutte le tabelle dopo l'
UPDATE.
Pensavo che bisognasse specificare solo quella dove vengono effettuati gli
aggiornamenti.
Vabbe'... ne ho imparata un'altra, grazie a te!
Ciao


title: SQL : Mi date una mano per favore ?

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:Qs0g8.50228$v7.18...@twister1.libero.it...
>
> Prova con una query che abbia il seguente codice SQL:
>
> UPDATE Listino1 INNER JOIN Listino2 ON Listino1.Articolo1 =
> Listino2.Articolo2 SET Listino1.Prezzo1 = [Listino2].[Prezzo2]
> WHERE (((Listino1.Prezzo1)<>[Listino2].[Prezzo2]));
>
> --
> Roberto
Grazie anche a te Roberto !
Ciao
P.S.
Che ne dici di cambiare il tuo nick con una cosa del tipo : "Roberto
l'onnipresente" ???
Visto che sia "da casa" che "dal portatile", sei sempre pronto a dare una
mano ???
:-)


title: SQL : Mi date una mano per favore ?

text:
"Webmaster" <
webm...@nospam.com
> ha scritto nel messaggio
> "Sib" <si...@SPAMiol.it> ha scritto nel messaggio
> > Comunque basta scrivere
> > UPDATE Listino1, Listino2 SET .... para para come sopra
CUT
> Non sapevo che bisognasse mettere la lista di tutte le tabelle dopo l'
> UPDATE.
> Pensavo che bisognasse specificare solo quella dove vengono effettuati gli
> aggiornamenti.
La cosa somiglia un po' alla dichiarazione di variabili, per dichiarare che
intendi usare i campi di una certa tabella devi indicarla, per questo prima
ti chiedeva i parametri, perche' non sapeva dove andare a prendere i valori
indicati.
Sib


title: SQL : Mi date una mano per favore ?

text:
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:rXbg8.57805$fa5.1...@twister2.libero.it...
> La cosa somiglia un po' alla dichiarazione di variabili, per dichiarare
che
> intendi usare i campi di una certa tabella devi indicarla, per questo
prima
> ti chiedeva i parametri, perche' non sapeva dove andare a prendere i
valori
> indicati.
Ok
Ora la cosa e' chiara.
Grazie mille per la delucidazione.
Ciao


title: etichetta e collegamento ipertestuale

author: Max

text:
Access 97
vorrei che l'etichetta e il collegamento di un controllo collegamento
ipertestuale in una maschera continua prendesse i dati da un campo di una
query.
Spero essere stato chiaro nella esposizione del problema
distinti saluti
Max


title: etichetta e collegamento ipertestuale

author: sv

text:
Max ha scritto:

In Acc2000 come segnalibro, però se non ricordo male puoi puntare ad un
oggetto del Database ma non ad un campo specifico.
Ad esempio:
MioCampo=##Query MiaQuery punta alla qry MiaQuery.
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Io non ne so di VB, ma in voi speravo

author: Marco

text:
Già dal topic volevo solo lanciare una provocazione in quanto so ke questo
Ng è visitato da persone valide che fin'ora mi hanno dato sempre buoni
consigli anche se poi forse avvolte ho scelto altre soluzioni anche
migliori. Il punto è che ho postato + volte un quesito facile
facile(penso),ma non per me ;-( , a cui non avete saputo rispondere.
Praticamente :in una maschera chiamata "the mask" ho 5 caselle di
controllo chiamate casella1, casella2, casella3, etc.. e 8 campi : campo1,
campo2,campo3 , etcc...
In piu ho un semplice bottone. Vorrei che alla pressione del bottone, il
valore del campo1 venga duplicato in altrettanti record per quante sono le
casella di controllo=True, inoltre (altrimenti troppo facile), se
casella1=true then campo5="valore", se casella2=true campo5="valore", se
casella3=True then campo5="altro valore" e cosi via per tutti le caselle
selezionate.
Il valore da assegnare è un valore fisso diverso a seconda di quale
casella sia uguale a true.
quindi si avranno n°copie record=n°caselle controllo=true ma con camppo5
di diverso valore.
Grazie di tutto, e spero mi possiate ancora aiutare. Saluti Marco
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Io non ne so di VB, ma in voi speravo

author: Rob

text:
"Marco" <
es...@tiscalinet.it
> ha scritto nel messaggio
news:ak5sia$3lb$1...@news.newsland.it...

Se, al posto di casella1, casella2, campo1, campo2, valore1, altro valore,
ecc., ci mettessi dei nomi concreti e spiegassi meglio ciò che ti serve,
sarebbe più facile esaminare il tuo caso e venirti incontro.
Mandi Rob.


title: Io non ne so di VB, ma in voi speravo

text:
"Marco" <
es...@tiscalinet.it
> ha scritto nel messaggio
news:ak5sia$3lb$1...@news.newsland.it...

Ciao Marco.
Non sempre trovi qualcuno disposto a rispondere alle richieste. Importante e
non pretenderle...
Le risposte non sempre sono il massimo ma certamente il meglio o la strada
più semplice che, chi ti risponde, pensa di proporre per una soluzione.
OK. Nelle maschere ci sono i controlli e non i campi; i pulsanti e non i
bottoni.
Non sei stato molto chiaro nella richiesta...comunque proverò a proporti una
soluzione.
La cosa che mi sembra più importante è quella di sapere quante caselle di
controllo abbiano il valore True (o vero):
metterai un controllo nascosto sulla maschera chiamato
"ControlloNascostoSullaMaschera"
poi questo semplice codice fornirà il numero delle CeckBox impostate a true
e attribuisce il valore al controllo nascosto.
Dim CC As Control, NCC As Integer
NCC = 0
For Each CC In Me.Controls
    If CC.ControlType = 106 Then
        If CC = True Then
        NCC = NCC + 1
        End If
    End If
Next
Me.ControlloNascostoSullaMaschera = NCC
Subito dopo devi accodare (in una tabella) altrettanti record uguali al
campo1 (meglio chiamarlo Controllo1), così:
Dim RCS As Recordset, i As Integer
Set RCS = CurrentDb.OpenRecordset("TuaTabella")
    For i = 1 To NCC
        With RCS
        .AddNew
        !TuoNomeCampoInTabella = Me.Campo1
        .Update
        End With
    Next i
 RCS.Close
Infine per realizzare quello che scrivi con "inoltre (altrimenti troppo
facile), se
casella1=true then campo5="valore", se casella2=true campo5="valore", se
casella3=True then campo5="altro valore" e cosi via per tutti le caselle
 selezionate."
userai un sempli ciclo con If... Then... Else del tipo
If Me.Casella1 = true then me.Campo5 = "quello che vuoi"
If Me.Casella2 = true then Me.CampoN = "quello che vuoi"
...ecc.
Spero che abbia interpretato bene quello che chiedevi.
Ciao, Carlo


title: Io non ne so di VB, ma in voi speravo

text:
Carlo Costarella wrote:
>[Marco...]
>>  so ke questo
> > Ng è visitato da persone valide che fin'ora mi hanno dato sempre buoni
> > consigli anche se poi forse avvolte ho scelto altre soluzioni anche
> > migliori.
[Carlo...]
> Ciao Marco.
> Non sempre trovi qualcuno disposto a rispondere alle richieste. Importante e
> non pretenderle...
La mia non voleva essere un accusa, anzi scusate per il malinteso,
[Marco...]
>>  so ke questo
> > Ng è visitato da persone valide che fin'ora mi hanno dato sempre buoni
> > consigli anche se poi forse avvolte ho scelto altre soluzioni anche
> > migliori.
Ora provo il codice che mi avete fornito e vi faccio sapere. Grazie a
presto



title: Io non ne so di VB, ma in voi speravo

text:
Per tutto il NG, potrebbe essere utile.
Ciao Carlo scusa se ti sto assillando,
ma riuscire a sviluppare questo sistema di posta per me  è molto
importante.
Ho inserito il codice che molto gentilmente e pazientemente mi hai fornito
con alcune semplici modifiche.
Funziona al 99 percento e non capisco perche la variabile NID assegna il
valore numerico <<zero>> a tutti i record duplicati.
Ti riporto il codice esatto che ho inserito :
Private Sub Comando20_Click()  'Tasto Invia"
Dim iI As Integer
Dim Copia As String
Dim cc As Control, ncc As Integer
Dim RCS As Recordset, i As Integer, j As Integer
On Error GoTo Err_Comando20_Click
If tipom = 3 Then
ncc = 0
   [tipom] = 3
   Copia = [Messaggio]
For Each cc In Forms![Posta]![destin].Controls   ' Le checkbox si trovano
in una sottomaschera e non sono associate a  nessun origine controllo
   If cc.ControlType = 106 Then
       If cc = True Then
          Call AccodaRecord(cc.Name)
       End If
   End If
Next
Me.ControlloNascosto = ncc
End If
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
Me.Refresh
Exit_Comando20_Click:
    Exit Sub
Err_Comando20_Click:
    MsgBox Err.Description
    Resume Exit_Comando20_Click
End Sub
Private Sub AccodaRecord(chk As String)
Dim RCS As Recordset, i As Integer, NID As Long
Set RCS = CurrentDb.OpenRecordset("Posta")
    Copia = [Messaggio]
    Select Case chk
        Case marco    ' credo che l'errore stia qui in quanto i record
vengono duplicati tranquillamente , ma non assegna
                                L'IDDestinatario,cioè lo assegna a tutti i
record duplicati=0, inoltre da ricordare che le check si trovano in una
                                sottomaschera chiamata "Destin".
          NID = 19
        Case giz
          NID = 15
        Case angela
          NID = 15
     End Select
     DoCmd.GoToRecord , , acNewRec
     [Messaggio].Value = Copia
     [IDDestinatario] = NID
     [IDMittente] = Forms![Posta]![Aiuto]![facile]
     [Mittente] = [IDMittente]
End Sub
Riesci a capire dove sta l'errore??? Ho fatto 3mila prove ma nada :-(
Fammi sapere e nuovamente Grazie, Saluti Marco



title: Report Fatture Northwind

text:
Sull' esempio del database Northwind , ho impostato il mio database per la
liquidazioni delle missioni ai nostri dipendenti.
Mi è rimasto solo un particolare da correggere e non riesco a capire come :
In breve ho creato una query perfettamente uguale alla query Fatture in
Northwind, quando però vado a stampare o visualizzare il report con la
missione da liquidare, mi riporta tanti report (duplicati della missione)
quanti sono i prodotti (nel mio caso rimborsi spese: aereo,taxi,bus ecc) che
ho aggiunto .
Esempio del report con filtro sul numero della missione:
                    Missione nr 210
Taxi         10 Euro
Bus          10 Euro
pagina seguente
                    Missione nr 210
Taxi         10 Euro
Bus          10 Euro
se invece la missione contiene un solo rimborso , regolarmente mi viene
filtrata un solo report.
Nel report per visualizzare i rimborsi ho inserito un sottoreport collegando
i campi master e secondario su IdMissione.
 la query sulla quale è basato il report  e così :
SELECT [Archivio Italia].IDMissione, [Archivio Italia].Nominativo,
Anagrafico.Livello, Anagrafico.Profilo,
IIf([DiariaApplicata]="6",0,IIf([DiariaApplicata]="1",[Diaria],IIf([DiariaAp
plicata]="2",[Diaria]*2/3,IIf([DiariaApplicata]="4",[Diaria]*1/3,IIf([Diaria
Applicata]="3",[Diaria]*1/2,IIf([DiariaApplicata]="5",[Diaria]*30/100))))))
AS [Dato Base], Int([Allo]-[Dallo]) AS [Giorni/Diaria], ([Dato
Base]*[Giorni/Diaria]) AS Totale,
IIf([DiariaApplicata]="6",0,IIf([DiariaApplicata]="1",[DiariaOR],IIf([Diaria
Applicata]="2",arrotondaeuro([DiariaOR]*0.666),IIf([DiariaApplicata]="4",arr
otondaeuro([DiariaOR]*0.333),IIf([DiariaApplicata]="3",arrotondaeuro([Diaria
OR]*0.5),IIf([DiariaApplicata]="5",arrotondaeuro([DiariaOR]*0.3))))))) AS
[Diaria Oraria], Round((([Allo]-[Dallo])-Int([Allo]-[Dallo]))*24) AS Ore,
puglisi(([Allo]-[Dallo])-Int([Allo]-[Dallo])) AS Orex, [Diaria oraria]*[Ore]
AS TotaleDiariaOraria, NZ([Totale],0)+Nz([TotaleDiariaOraria],0) AS [Totale
Diaria], [Archivio Italia].Acconto, [Archivio Italia].Contributo, [Archivio
Italia].Città, [Archivio Italia].Dallo, [Archivio Italia].Allo, [Archivio
Italia].Capitolo, [Archivio Italia].Liquidata, [Liquidata]*12 AS Liq,
[Archivio Italia].DiariaApplicata, [Archivio Italia].Motivazione, [Diarie
Italia].Diaria, arrotondaeuro([Diaria]/24) AS DiariaOR,
IIf([DiariaApplicata]="1","Intera",IIf([DiariaApplicata]="2","Due
Terzi",IIf([DiariaApplicata]="3","Un Mezzo",IIf([DiariaApplicata]="4","Un
Terzo",IIf([DiariaApplicata]="5","Trenta",IIf([DiariaApplicata]="6","Senza
Diaria")))))) AS DiariaTesto, [Rimborso Italia].Tiporimborso AS Tip,
[Rimborso Italia].Descrizione, [Rimborso Italia].Euro,
IIf([Tip]=2,[Euro]*0.05,IIf([Tip]=11,[Euro]*0.1,IIf([Tip]=1,[Euro]*0.1))) AS
Rimborsoviaggio, CCur(NZ([Rimborso Italia].Euro,0+NZ([Rimborsoviaggio],0)))
AS RimborsoComplessivo
FROM Rimborso RIGHT JOIN ([Diarie Italia] RIGHT JOIN ((Anagrafico INNER JOIN
[Archivio Italia] ON Anagrafico.Nominativo = [Archivio Italia].Nominativo)
LEFT JOIN [Rimborso Italia] ON [Archivio Italia].IDMissione = [Rimborso
Italia].IDMissione) ON [Diarie Italia].Livello = Anagrafico.Livello) ON
Rimborso.IDTipo = [Rimborso Italia].Tiporimborso;
grazie .


title: Problemi apertura D.B. Access

author: Aky

text:
Ho capito, l'MDB che non riesco ad aprire è stato creato con V.B. per dos.
come posso fare ad estrarre i dati ? (purtroppo non possiedo V.B. per dos)
Grazie e ciao
Aky


title: Assegnare un valore in una casTesto da una CasCombinata

author: Ginuzz

text:
Capito come funziona rifaccio la domanda...
Ciao NG
Problemino: ho creato una tabella dove inserisco (da una maschera) la
corrispondenza dei colleghi di ufficio, fin quì bene, mi complico
sull'Assegnato (a chi va la posta) scelgo il nominativo da una casella
combinata che prende i dati da una tabella secondaria. La tabella porta
Nome, Cognome e numero d'interno.
Vi chiedo come faccio ad assegnare il "numero d'interno" in una casella di
testo, o etichetta che sia, in maniera automatica, cioè quando scelgo, dalla
casella combinata il nominativo al clic nella casella di testo deve apparire
il relativo numero telefonico...
Ho pensato di utilizzare codice Visual Basic (comando Select Case) ma come?
Grazie
TOGLIERE "-nospam" per risposte


author: Karl Donaubauer

text:
Ginuzz wrote:
> Problemino: ho creato una tabella dove inserisco (da una maschera) la
> corrispondenza dei colleghi di ufficio, fin quì bene, mi complico
> sull'Assegnato (a chi va la posta) scelgo il nominativo da una casella
> combinata che prende i dati da una tabella secondaria. La tabella porta
> Nome, Cognome e numero d'interno.
> Vi chiedo come faccio ad assegnare il "numero d'interno" in una casella di
> testo, o etichetta che sia, in maniera automatica, cioè quando scelgo,
> dalla casella combinata il nominativo al clic nella casella di testo deve
> apparire il relativo numero telefonico...
> Ho pensato di utilizzare codice Visual Basic (comando Select Case) ma
> come?...
Se non solo la tabella ma anche la casella combinata porta il numero
in una colonna vedi
www.donkarl.com/it
FAQ 4.15 Casella combinata/di riepilogo - Accesso all'ennesima colonna
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
 + iscriviti alla prima Conferenza
Italiana per Sviluppatori di Access (CISA 1), Arezzo, 4+5/6/2005


title: errore con MSysObjects

author: Claudio

text:
Salve ragazzi. Ho una routine che utilizza la seguente funzione dLookup
  per restituirmi il percorso delle tabelle utilizzate:
DLookup("Database", "MSysObjects", "Type=6")
Nel mio pc funziona correttamente, nel pc del cliente mi ritorna un
valore null
Stesse versioni di S.O e di Access (WinXP e Access2003)
Cosa può essere?Grazie


title: errore con MSysObjects

author: Alessandro Cara

text:

non ci sono tabelle collegate?
--
ac
y-1=x


title: errore con MSysObjects

text:
Alessandro Cara ha scritto:

Ora mi hai messo la pulce nell'orecchio..e se al cliente invece di
collegare  le tabelle le avessi importate? è possibile che l'errore sia
dipeso da questo?


title: errore con MSysObjects

text:

se la dlookup "non trova" torna "null"
DLookup("Database", "MSysObjects", "1=6")
prova e vedi che succede
--
ac
y-1=x


title: Stampa/esportazione della STRUTTURA di una maschera

author: Balestri Paride

text:
Per il programma che sto creando ho la necessità di avere una stampa con la
struttura (inteso il nome dei controlli) delle mie maschere.
Mi
accontento anche di poterle passare in VB e poi le stampo da li.
L'unica
azione che riesco a fare e' la stampa della maschera, ma con i dati delle
tabelle.
Qualcuno sa darmi qualche suggerimento?
P.S.: Sono gia' a
quota 85 maschere!
P.P.S.: Mi accontento anche di trasformare l'MDB in
progettino di VB. Mi bastano anche solo le form in formato .FRM di VB
GRAZIE MILLE
Paride
--------------------------------
Inviato via
http://usenet.iol.it


author: Roberto - Syd

text:
"Balestri Paride" <
paride....@libero.it
> ha scritto nel messaggio
news:195Z223Z139Z82Y...@usenet.iol.it...

Per ottenere quello che chiedi basta che vai su Strumenti -> Analizza ->
Analizzatore, si apre una maschera dove scegli gli oggetti di cui vuoi
sapere le caratteristiche es.: Maschere selezioni tutte le maschere vai su
Opzioni... e scegli di stampare solo i nomi dei controlli infine fai click
su OK e sarà generato un report con tutte le informazioni di cui avevi
bisogno.
Ciao Roberto - Syd


title: Excel

author: Galvy

text:
qualcuno mi può dire dove sbaglio.....
Private Sub prova_Click()
On Error GoTo Err_prova_Click
Dim xlapp As Excel.Application
    If isappthere("Excel.Application") = False Then
        Set xlapp = CreateObject("Excel.Application")
        xlapp.Visible = True
    Else
        Set xlapp = GetObject(, "Excel.application")
    End If
    If MsgBox("Close XL ?", vbYesNo, "SQR") = vbYes Then
        xlapp.Quit
        Set xlapp = Nothing
    End If
Exit_prova_Click:
    Exit Sub
Err_prova_Click:
    MsgBox Err.Description
    Resume Exit_prova_Click
End Sub
Function isappthere(appname) As Boolean
On Error Resume Next
    Dim mobjapp As Object
        isappthere = True
        Set objapp = GetObject(, appname)
        If Err.Number <> 0 Then
            isappthere = False
        End If
End Function
Praticamnete sia se dico no che si excel mi si chiude.....???
Why??
Saluti Galvy


title: Excel

author: Antonio Ganci

text:
> Praticamnete sia se dico no che si excel mi si chiude.....???
> Why??
Probabilmente ti si chiude quando la funzione termina poichč la variabile
xlapp č stata dichiarata locale alla funzione.
Prova a dichiararla come globale e vedrai che non si chiude piů.


title: Excel

text:
Scusa sono un novellino dell'office automation..... come devo dichiarare????
Grazie Galvy


title: Esporta query in un txt..

author: AA

text:
Ancora io..Mi avete dato la soluzione giusta, e viringrazio..Ci sono
riuscito, e funziona!Solo più un'ultimissima cosa: esportando la query
in un file txt, all'inizio e alla fine di ogni record della
query,quindi di ogni riga del txt, ci sono le virgolette " ...Perchè?
Come faccio a toglierle?Grazie!Ciao!
--
AA
Inviato da
www.mynewsgate.net


title: Esporta query in un txt..

text:
AA <
6175i...@mynewsgate.net
> ha scritto:
> Ancora io..Mi avete dato la soluzione giusta, e viringrazio..Ci sono
> riuscito, e funziona!Solo più un'ultimissima cosa: esportando la query
> in un file txt, all'inizio e alla fine di ogni record della
> query,quindi di ogni riga del txt, ci sono le virgolette " ...Perchè?
> Come faccio a toglierle?Grazie!Ciao!
>
Ritiro la domanda..Ho risolto da solo, e con questo ho raggiunto il mio
scopo..Senza di voi non ce l'avrei mai fatta!



title: Esporta query in un txt..

author: MA

text:
"AA" <
6175i...@mynewsgate.net
> ha scritto nel messaggio
news:200411121...@mynewsgate.net...
> Ancora io..Mi avete dato la soluzione giusta, e viringrazio..Ci sono
> riuscito, e funziona!Solo più un'ultimissima cosa: esportando la query
> in un file txt, all'inizio e alla fine di ogni record della
> query,quindi di ogni riga del txt, ci sono le virgolette " ...Perchè?
> Come faccio a toglierle?Grazie!Ciao!
Lo hai settato come specifiche di esportazione.
Puoi toglierlo.
Guarda la specifica, delimitatore di campo
MAssimiliano


title: Esporta query in un txt..

author: ALESSANDRO Baraldi

text:
"AA" <
6175i...@mynewsgate.net
> ha scritto nel messaggio
news:200411121...@mynewsgate.net...

Non sò che strada hai seguito per l'Esportazione, ma io uso
DoCmd.TransferText acExportDelim, , "NOME QUERY", "C:\FileTxt.txt"
Ora se dai un'occhiata all'Help noti che il primo parametro:acExportDelim
può avere diverse impostazioni a seconda di ciò che intendi fare:
acExportDelim
acExportFixed
acExportHTML
acExportMerge
acImportDelim (impostazione predefinita)
acImportFixed
acImportHTML
acLinkDelim
acLinkFixed
acLinkHTML
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Memoria Esaurita

author: Francesco

text:
Buongiorno,
su un applicativo access che ho usato per un paio di anni,
all'improvviso su molte maschere alla pressione di tasti legati a
procedure VB esce il messaggio "Memoria Esaurita".
Non sono state fatte modifiche all'applicativo.
L'applicativo gira lato client, i db sono sul server.
Questi i cambiamenti fatti in quel periodo:
infezione della rete dal virus downloadr. relativa pulizia totale
aggiornamento di tutti i pc della rete (XP)
aggiornamento del server 2003 all'ultima service pack
accesso db sul server via iis (ho provato a disabilitare questa
possibilità ma il problema si ripresenta comunque)
qualcuno puo' darmi una mano ?


title: Memoria Esaurita

text:
Francesco ha scritto:
> Buongiorno,
grazie
> su un applicativo access che ho usato per un paio di anni,
> all'improvviso su molte maschere alla pressione di tasti legati a
> procedure VB esce il messaggio "Memoria Esaurita".
> Non sono state fatte modifiche all'applicativo.
uhmmm.....dubbiosamente ci credo, a seguire il motivo
> L'applicativo gira lato client, i db sono sul server.
> Questi i cambiamenti fatti in quel periodo:
> infezione della rete dal virus downloadr. relativa pulizia totale
non dovrebbe incidere
> aggiornamento di tutti i pc della rete (XP)
non dovrebbe ma le vie del signore sono infinite
> aggiornamento del server 2003 all'ultima service pack
potrebbe incidere
> accesso db sul server via iis (ho provato a disabilitare questa
> possibilitą ma il problema si ripresenta comunque)
non ho capito cosa intendi per accesso al db via iis.
Ma non dovrebbe incidere
>
> qualcuno puo' darmi una mano ?
Normalmente questa cosa succede quando c'e' una chiamata ricorsiva
Dovresti cercare di *confinare* il problema. Dovresti cioe' spiegare in
quale omento succede, alla partenza, alla apertura di un form, a seguito
di qualche evento,..... "etsetera etsetera etsetera" (cit)
--
ac


title: Memoria Esaurita

text:
On 31 Gen, 12:58, Alessandro Cara <
a...@ay-1asistemi.it
> wrote:
> Francesco ha scritto:> Buongiorno,
> grazie
> > su un applicativo access che ho usato per un paio di anni,
> > all'improvviso su molte maschere alla pressione di tasti legati a
> > procedure VB esce il messaggio "Memoria Esaurita".
> > Non sono state fatte modifiche all'applicativo.
>
> uhmmm.....dubbiosamente ci credo, a seguire il motivo> L'applicativo gira lato client, i db sono sul server.
> > Questi i cambiamenti fatti in quel periodo:
> > infezione della rete dal virus downloadr. relativa pulizia totale
>
> non dovrebbe incidere> aggiornamento di tutti i pc della rete (XP)
>
> non dovrebbe ma le vie del signore sono infinite> aggiornamento del server 2003 all'ultima service pack
[...]
>
> Normalmente questa cosa succede quando c'e' una chiamata ricorsiva
> Dovresti cercare di *confinare* il problema. Dovresti cioe' spiegare in
> quale omento succede, alla partenza, alla apertura di un form, a seguito
> di qualche evento,..... "etsetera etsetera etsetera" (cit)
> --
> ac
è difficile da dire visto che lo fa un po' ovunque.
non ci sono chiamate ricorsive.
lo fa addirittura usando la funzione di compilazione del codice vb..
appena faccio il debug esce l'errore, ma non mi indica il punto in cui
si blocca


title: Memoria Esaurita

author: Giuli el Dabro

text:
Il /01 feb 2009/, *Francesco* ha scritto:
> è difficile da dire visto che lo fa un po' ovunque.
> non ci sono chiamate ricorsive.
> lo fa addirittura usando la funzione di compilazione del codice
> vb.. appena faccio il debug esce l'errore, ma non mi indica il
> punto in cui si blocca
A me da questo problema quando i moduli o le form contengono troppo
codice basic. Prova a spostare più sub o function su moduli esterni
alla singola form (se possibile), oppure se i moduli sono troppo
grandi spezzali in più moduli più piccoli.


title: Memoria Esaurita

text:
On 2 Feb, 10:52, Giuli el Dabro

E' una cosa piuttosto bizzarra... *forse* è stato eliminato un report
in quanto quando cerco ti editare codice VB ottengo:
"il nome di report 'Eventi_personali' immesso nella finestra delle
proprietà o in una macro è errato o fa riferimento ad un report
inesistente. Se il nome di report non valido è in una macro, scegliere
OK. Il nome della macro ed i relativi argomenti verranno visualizzati
in una finestra di dialogo di azione non riuscita. Aprire la finestra
della macro e immettere il nome di report corretto"
inutile dire che spingendo ok il messaggio si ripete diverse volte ma
non appare nessuna finestra di dialogo.
chiudendo la finestra con la X invece che con ok.. stesso risultato.
Ho verificato che in effetti il report non c'e', ma è presente in VB
negli oggetti di classe.
Se ci clicco sopra per vedere il codice.. ottengo il messaggio di cui
sopra.
Ho provato ad importare il report da un backup (vecchio ) del db..  e
non lo importava..
importandolo con un nome diverso lo importa... (evidentemente quel
report è stato eliminato non totalmente.. e ha degli strascichi..)
Andando in VB Debug / compila NomeAppl   esce immediatamente il
messaggio "Memoria Esaurita"
All'avvio del progetto l'errore non si verifica.
Si verifica ad esempio sul pulsante in una maschera che esegue
semplicemente:
Private Sub giusto_Click() ' VALIDO
   On Error GoTo Err_giusto_Click
   Me.Sottomaschera_timbrature.Form!corretto = True
   DoCmd.GoToRecord , , acNext
Exit_giusto_Click:
    Exit Sub
Err_giusto_Click:
    MsgBox Err.Description
    Resume Exit_giusto_Click
End Sub
anche settando il punto di interruzione sulla dichiarazione della sub
l'errore si presenta ugualmente.. quindi immagino si verifichi a
priori.. se provo a fare qualsiasi modifica al codice ottengo "memoria
esaurita" appena batto "enter" o cambio riga di codice (anche con le
freccette)
non esiste un modo di fare un "debug" più approfondito per scoprire la
natura dell'errore ?
scusate, sono un po' in apprensione perché l'applicativo è stato
"fatto" da diverse "mani" che ora non ci sono piu'.
e' per un'associazione di volontariato e rimanere a piedi crea non
pochi problemi :(


title: Memoria Esaurita

text:
On 2 Feb, 12:56, Francesco <
vi...@tiscali.it
> wrote:
> On 2 Feb, 10:52, Giuli el Dabro
>
> <
TOGLImathuiotLEM...@DALLAtiscali.BOCCA.it
> wrote:
> > Il /01 feb 2009/, *Francesco* ha scritto:
>
[...]
>
> scusate, sono un po' in apprensione perché l'applicativo è stato
> "fatto" da diverse "mani" che ora non ci sono piu'.
> e' per un'associazione di volontariato e rimanere a piedi crea non
> pochi problemi :(
Praticamente tutte le maschere che hanno codice vb danno problemi.
qualcuno mi ha detto che basta che sia saltato un "end sub" da qualche
parte per creare problemi simili...
ho verificato infatti che togliendo il codice vb dalle maschere che
non si aprono.. il problema si risolve.. ma ovviamente le maschere non
fanno piu' quello che dovrebero...
come posso fare per verificare tutto ?
grazie


title: Memoria Esaurita

author: CIDI

text:
"Francesco" <
vi...@tiscali.it
> ha scritto nel messaggio
news:4b5b113f-3722-4241...@z28g2000prd.googlegroups.com...



in struttura maschera/modulo ...visualizza codice.......debug ....compila
Ciao
Daniele


title: Memoria Esaurita

text:
On 2 Feb, 14:13, "CIDI" <
dadonz...@spamtin.it
> wrote:
> "Francesco" <
vi...@tiscali.it
> ha scritto nel messaggionews:4b5b113f-3722-4241...@z28g2000prd.googlegroups.com...
> On 2 Feb, 12:56, Francesco <
vi...@tiscali.it
> wrote:
[...]
> come posso fare per verificare tutto ?
>
> in struttura maschera/modulo ...visualizza codice.......debug ....compila
>
> Ciao
> Daniele
già fatto. risultato appena premo "compila":
"memoria esaurita"


title: Memoria Esaurita

author: Roberto da Parma

text:
"Francesco" <
vi...@tiscali.it
> ha scritto nel messaggio
news:84d798c9-4d33-42db...@v39g2000pro.googlegroups.com...


E' un bug di access 2003 se non ricordo male.......fai tutti gli
aggiornamenti del caso hotfix vari e SP...
Potrebbe essere anche che ti si sia corrotto l'mdb
Nel caso crea un nuovo db
e importa tutto tranne le tabelle MSys nelle opzioni trovi il modo di
visualizzarle per non importarle
Ciao
--
Roberto da Parma


title: Memoria Esaurita

author: geppo

text:
Ciao "Francesco" <
vi...@tiscali.it
> ha scritto nel messaggio
news:84d798c9-4d33-42db...@v39g2000pro.googlegroups.com...


Oltre ai riferimenti che ti ho postato su MPIOA, segui queste indicazione
sempre del grande karl:
www.donkarl.com/it?FAQ7.13
--
Ciao
Geppo


title: backup msde

author: Logan

text:
Ciao vorrei eseguire il backup di un db creato in msde tramite codice.
Avete qlc suggerimento?
Ciao by Logan bye bye


title: backup msde

author: Giorgio Prx

text:
"Logan" <
loga...@hotmail.com
> ha scritto nel messaggio
news:bu16mf$c4mv5$1...@ID-141292.news.uni-berlin.de...
> Ciao vorrei eseguire il backup di un db creato in msde tramite codice.
>
> Avete qlc suggerimento?
>
> Ciao by Logan bye bye
>
>
Esempio
-----------------------------------------------------
Dim strSql as String
strSql="BACKUP DATABASE nomeDb " & _
           "TO DISK = 'c:\nomeDb.bak'"
Currentproject.Connection.execute strSql
-----------------------------------------------------
Aggiungi WITH INIT se vuoi cancellare il vecchio Backup, in altro caso il
file .Bak conterrà tutti i backup fatti.
Il comando Backup comprende molte opzioni, e per queste ti rimando al
manuale in linea.
Ciao Giorgio


title: backup msde

text:
"Giorgio Prx" <
giorgio...@nospamtiscalinet.it
> ha scritto nel messaggio
news:bu2sv1$gti$1...@lacerta.tiscalinet.it...

Grz 1k
Provo subito



title: OT? copiare file su cartella senza password

author: oliones

text:
forse è fuori topa
con l'autocomposizione esporto i dati da una tabella i un file di testo
problema:
gli "esperti" di SAP (scusate le 2 parole) hanno deciso che tale file deve
essere
messo in una direttory (NT) a cui l'utente non può accedere.
si può da codice durante l'esportazione da tabella a testo o al limite anche
dopo
trasferire il file nella direttory specificando da codice l'utente e la
relativa passwords ?
(con odbc si può specificare l'utente e password ma di cosa e come ?)


author: Sergio MAZZA

text:
"oliones" <
oli...@tiscalinet.it
> ha scritto nel messaggio
news:9h1fvi$vs4$1...@lacerta.tiscalinet.it...

La topa è la topa è non è mai fuori posto... O no?
Comunque prova con uno script:
Es.
'-------------
Sub wshMapDrive()
Dim WshNet
Set WshNet = CreateObject("Wscript.Network")
WshNet.MapNetworkDrive "Z:", "\\NomeComputer\nomeRisorsa", ,
"Administrator", "Password"
Set WshNet = Nothing
End Sub
'-------------
'-------------
Sub wshUnMapDrive()
Dim WshNet
Set WshNet = CreateObject("Wscript.Network")
WshNet.RemoveNetworkDrive "Z:"
Set WshNet = Nothing
End Sub
'-------------
Praticamente ti mappi la risorsa (disco o cartella che sia) come se fosse un
disco locale ci fai quello che devi fare e poi togli la connessione...
Ciao.
P.S. Per funzionare devi aver installato la libreria script wshom.ocx
"Windows Script Host Object Model..."
Ari-Ciao


text:

GRAZIE


title: Incrementare valore campo se nullo in base a valore massimo

author: slumpolo

text:
Buongiorno a tutti,
Ho un problema forse banale che non riesco a risolvere.
Ho una tabella temporanea che genero con una query con un campo numerico che non sempre è popolato. Nel caso in cui è popolato è un semplice numero sequenziale che va da 1 a X dove X rappresenta l'ultimo numero della sequenza.

Nome Campo - Campo Numerico
Campo 1 - 5
Campo 2 - 3
Campo 3 - 2
Campo 4 - 1
Campo 5 - 4
Campo 6
Campo 7
Campo 8
Campo 9
Campo 10

Vorrei far si che il campo numerici null siano aggiornato col numero max incrementato di 1 di volta in volta in modo alla fine da avere una situazione tipo questa:

Nome Campo - Campo Numerico
Campo 1 - 5
Campo 2 - 3
Campo 3 - 2
Campo 4 - 1
Campo 5 - 4
Campo 6 - 6
Campo 7 - 7
Campo 8 - 8
Campo 9 - 9
Campo 10 - 10

Ho provato varie formule con dmax ma non arrivo al risultato voluto. Chiaramente potrei gestire il tutto anche in fase di creazione tabella temporanea senza passare da una seconda query.
Grazie a tutti per l'eventuale risposta.


text:

Provo a rispondermi da solo, ma non so se c'è una soluzione più semplice :)

Dim db As DAO.Database
Dim rcd As DAO.Recordset
Dim Max As Long

Set db = CurrentDb
Set fld = db.OpenRecordset("SELECT * FROM [tabella] WHERE (IsNull([tabella].[campo_numerico]));", dbOpenDynaset)

Max = DMax("campo_numerico", "tabella")

Do While Not rcd.EOF
    Max = Max + 1
    fld.Edit
    fld.Fields![giro_visita].Value = Max
    fld.Update
    fld.MoveNext
Loop

fld.Close
Set fld = Nothing
db.Close
Set db = Nothing


title: replication manager

author: andrea lojelo

text:
da dove posso scaricare un aggiornamento del REPLICATION MANAGER? ho già
quello per access 97 e mi servirebbe quello nuovo.
esistono altri programmi simili?
sapete i link?
ciao a tutti e grazie


title: replication manager

author: Karl Donaubauer

text:
andrea lojelo ha scritto:
> da dove posso scaricare un aggiornamento del REPLICATION MANAGER? ho già
> quello per access 97 e mi servirebbe quello nuovo.
> esistono altri programmi simili?
> sapete i link?
Per programmare c'é il TSI Synchronizer
http://support.microsoft.com/support/Access/Content/repl/repltsi.asp
http://www.trigeminal.com/utility.asp?ItemID=9#9
--
HTH
Karl
*********
Scusate il mio malissimo italiano. Faccio solo esercizi qui.
Access-FAQ (tedesco):
http://www.donkarl.com


title: Qualcuno usa la True Db Grid Pro con Access ?

author: RobertoA

text:
In ambiente Visual Basic fino al 6, la True Db Grid (prima Apex poi C1)
e' stata una delle griglie sicuramente di maggior successo
Sapete se sia possibile usarla su una form Access ?
Ciao e grazie
RobertoA


author: Alessandro Cara

text:

Na folla!
Per quanto mi ricordo (usata) bestemmiavo perche', pur avendo un paio
di cose interessanti, mi faceva rimpiangere le form continue (almeno
per l'uso che ne dvevo fare).

--
ac (x=y-1)
Aborro il Killfile
(La violenza e' l'ultimo rifugio degli incapaci -Salvor Hardin-)


author: Bruno Campanini

text:
RobertoA wrote :
> In ambiente Visual Basic fino al 6, la True Db Grid (prima Apex poi C1) e'
> stata una delle griglie sicuramente di maggior successo
> Sapete se sia possibile usarla su una form Access ?
Mai sentita nominare... a che serve?

Bruno


title: problemino

author: Giuseppe

text:
salve a tutti
nel mio DB Access devo fare in modo di calcolare la provvigione in base agli
sconti che do al cliente
ES: dal 12% al 18% prov 6 dal 19% al 25% prov 5% e cosě via c'č un modo per
fare in modo che access rileva gli sconti a applica la provvigione
dell'intervallo ES: do il 15% l'intervallo č del 12-18 prov 6
Grazie Mille
Giuseppe


title: problemino

text:
"Giuseppe" <
mj...@tiscali.it
> wrote in message
news:428b58f4$0$15896$5fc...@news.tiscali.it...

Supponi di avere una tabella coi campi [Valore], [Sconto],
[Provvigione]; i primi due vengano compilati, il terzo
venga calcolato successivamente.
Supponi che la tabella sconti-provvigioni sia la seguente:
    0    -    10            10%
>10    -    15             9%
>15    -    20             8%
>20                         7%
La Update Query seguente esegue il calcolo e
la compilazione del campo [Provvigioni].
UPDATE MyTable SET MyTable.Provvigione =
IIf([Sconto] Between 0 And 10,[Valore]*0.1,
IIf([Sconto]>10 And [Sconto]<=15,[Valore]*0.09,
IIf([Sconto]>15 And [Sconto]<=20,[Valore]*0.08,
IIf([Sconto]>20,[Valore]*0.07))));
Perň il sistema migliore sarebbe calcolare e compilare
il campo [Provvigioni] con procedura in BeforeUpdate
della scheda con la quale si procede all'immissione
dati.
Bruno


title: evitare modifiche a DB

author: SuperPippo®

text:
ciao a tutti...ho un piccolo problema
per evitare una modifica ad una sottomaschera
in visualizzazione foglio dati...
come si fa a bloccare i campi in maniera
da non muoverli + dato che se si mette il mouse tra i due campi
compare la doppia freccia e fa spostare i campi...
grazie...


title: evitare modifiche a DB

author: Roberto da casa

text:
"SuperPippo®" <ik0qd...@SPAMlibero.it> ha scritto nel messaggio
news:WUkia.3843$mg5.1...@twister2.libero.it...

Perchè non cambi la visualizzazione della maschera da Foglio dati a Maschere
continue?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: evitare modifiche a DB

text:
Roberto da casa wrote:
> "SuperPippo®" <ik0qd...@SPAMlibero.it> ha scritto nel messaggio
>> come si fa a bloccare i campi in maniera
>> da non muoverli + dato che se si mette il mouse tra i due campi
>> compare la doppia freccia e fa spostare i campi...
>> grazie...
>
> Perchè non cambi la visualizzazione della maschera da Foglio dati a
> Maschere continue?
-------------------
sei troppo forte... !!!
grazie Roberto...
Ciao...


title: [XPOST] Re: Auguri

author: VT @ home

text:
Il Fri, 21 Dec 2007 08:04:30 +0100, "serber" <
sbert...@alice.it
> ha scritto:
>(.....)
>Auguro a tutto il newsgroup un sereno natale ed un felice anno nuovo.
>ciao
>serber
>
Function AuguriNatale() As String
  If Month(Date())=12 Then
      AuguriNatale="Tanti auguri di"
     If Day(Date())<=24 Then
    	AuguriNatale=AuguriNatale & " buon Natale e "
     End If
     AuguriNatale=AuguriNatale & " un felice" & Str$(Year(date)+1)
  Else
      AuguriNatale=""
  EndIf
End Function
Non l'ho provata, ma dovrebbe funzionare.
In ogni caso il concetto dovrebbe essere chiaro
Vincenzo Turturro
Certificato Eucip Core Level
ITA 0000-002299 del 14/05/2007
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
risorse Access:
http://www.accessgroup.it
---------------------------------------------
Il sito comune di it.comp.as400
http://www.faq400.com
---------------------------------------------


title: [XPOST] Re: Auguri

author: Maurizio Borrelli

text:
"levami-levami" wrote in message
news:4c7om318o11ns9v4i...@4ax.com
:
[...]
(Ciao Vincenzo. Ottimo XPOST!)
Tanti auguri di Felici Feste e Ottimo Nuovo Anno 2008 a tutti i
frequentatori.
--
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------


title: [XPOST] Re: Auguri

author: IvanDaBologna

text:
"VT @ home" <
V...@home.it
> ha scritto nel messaggio
news:4c7om318o11ns9v4i...@4ax.com...
> Il Fri, 21 Dec 2007 08:04:30 +0100, "serber" <
sbert...@alice.it
> ha
> scritto:
>>(.....)
>
>>Auguro a tutto il newsgroup un sereno natale ed un felice anno nuovo.
>>ciao
>>serber
>>
> Function AuguriNatale() As String
>
>  If Month(Date())=12 Then
>      AuguriNatale="Tanti auguri di"
>     If Day(Date())<=24 Then
>    AuguriNatale=AuguriNatale & " buon Natale e "
>     End If
>     AuguriNatale=AuguriNatale & " un felice" & Str$(Year(date)+1)
>  Else
>      AuguriNatale=""
>  EndIf
> End Function
>
> Non l'ho provata, ma dovrebbe funzionare.
> In ogni caso il concetto dovrebbe essere chiaro
>
> Vincenzo Turturro
>
.....
mandami il listato che te lo testo io sotto le Feste.
Te lo rimando con una renna di Babbo, a Natale !
IvanDaBologna


title: [XPOST] Re: Auguri

author: ciroteo

text:
On 21 Dic, 21:18, "VT @ home" <
V...@home.it
> wrote:

Anche a te e alla tua famiglia e a tutti gli amici di icaa .
Matteo


title: [XPOST] Re: Auguri

author: CIDI

text:
"VT @ home" <
V...@home.it
> ha scritto nel messaggio
news:4c7om318o11ns9v4i...@4ax.com...
> Il Fri, 21 Dec 2007 08:04:30 +0100, "serber" <
sbert...@alice.it
> ha
> scritto:
>>(.....)
>
>>Auguro a tutto il newsgroup un sereno natale ed un felice anno nuovo.
>>ciao
Auguri di buone feste a tutti voi
Daniele


title: [XPOST] Re: Auguri

author: Carlo Costarella

text:
"VT @ home" <
V...@home.it
> ha scritto nel messaggio
news:4c7om318o11ns9v4i...@4ax.com...
> Il Fri, 21 Dec 2007 08:04:30 +0100, "serber" <
sbert...@alice.it
> ha
> scritto:
>>(.....)
>
>>Auguro a tutto il newsgroup un sereno natale ed un felice anno nuovo.
>>ciao
>>serber
>>
> Function AuguriNatale() As String
>
>  If Month(Date())=12 Then
>      AuguriNatale="Tanti auguri di"
>     If Day(Date())<=24 Then
>    AuguriNatale=AuguriNatale & " buon Natale e "
>     End If
>     AuguriNatale=AuguriNatale & " un felice" & Str$(Year(date)+1)
>  Else
>      AuguriNatale=""
>  EndIf
> End Function
>
> Non l'ho provata, ma dovrebbe funzionare.
> In ogni caso il concetto dovrebbe essere chiaro
>
> Vincenzo Turturro
>
Molto originale e perfettamente in tema!
Auguri anche a te e a tutto il NG.
Ciao, Carlo


title: [XPOST] Re: Auguri

author: Pablitomf

text:
> Non l'ho provata, ma dovrebbe funzionare.
Funziona funziona :-D
Tanti auguri pure a te
--
---
Ciao
Pablitomf (Maurizio Facciuti)
Web Master
www.accessgroup.it


title: [XPOST] Re: Auguri

author: Sergio MAZZA

text:

VBA?
Ahaa... Ma da te mi sarei aspettato un:
Insert Into SottoAlberoDiNatale Values(Regalone) Where NG In
("ICAA","MPIOA")
Ciao.
--
Sergio MAZZA


title: [XPOST] Re: Auguri

text:
Il Sun, 23 Dec 2007 09:30:13 +0100, "Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto:
>(.....)
>VBA?
>
>Ahaa... Ma da te mi sarei aspettato un:
>Insert Into SottoAlberoDiNatale Values(Regalone) Where NG In
>("ICAA","MPIOA")
Acc !
Non ci avevo pensato !
Magari, per la befana, chissà  ...
>
>Ciao.



title: [XPOST] Re: Auguri

author: Vit

text:
auguroni a tutti e grazie degli infiniti aiuti!!!!!!!!!!!!!!
buon natale e buon anno nuovo!!!!!!!!!!!
Vit


title: [XPOST] Re: Auguri

author: Massimo Piubelli

text:
VT @ home wrote:
> Il Fri, 21 Dec 2007 08:04:30 +0100, "serber" <
sbert...@alice.it
>
> ha scritto:
>> (.....)
>
>> Auguro a tutto il newsgroup un sereno natale ed un felice anno nuovo.
>> ciao
>> serber
>>
> Function AuguriNatale() As String
>
>  If Month(Date())=12 Then
>      AuguriNatale="Tanti auguri di"
>     If Day(Date())<=24 Then
>    AuguriNatale=AuguriNatale & " buon Natale e "
>     End If
>     AuguriNatale=AuguriNatale & " un felice" & Str$(Year(date)+1)
>  Else
>      AuguriNatale=""
>  EndIf
> End Function
>
update auguri set mittente = mittente + ' Massimo Piubelli' where auguri.tipo = 'natale'
;-)
oh... l'sql non so se funziona (anzi, di sicuro non funziona) il mio cervello è già in ferie da tempo!!!!
Ciao,
Max


title: Campo calcolato su report che 'non calcola'

text:
Sto leggendo dalla tabella FATTURETESTATE
Alcuni dei campi sono IMPONIBILE, GT
Creo un report, come origine record ci metto la tabella indicata
Nelle righe numero, data, ditta, totale_imponibile, gt
Sono tante righe, uan per ogni fattura, raggruppate per mese
Nel piede del raggruppamente vorrei stamparci il valore di Imponibile,
ed altri valori del mese corrente
Uno dei campi nel corpo del documento e' GT, e' un numerico da 0 a 1000000
Nel corpo documento ho due textbox, nella prima visualizzo il valore di
Imponibile se GT e' inferiore o uguale a 100, nella seconda se maggiore
di 100

Quindi nella prima textbox, nel controlsource ci metto:
=IIf([GT]<=100;[Imponibile];0)

Mente nella seconda ci metto:
=IIf([GT]>100;[Imponibile];0)

E funziona tutto come desiderato, nella riga del corpo vengono
visualizzati tutti i campi e vengono valorizzate la textbox1 oppure la
textbox2, in funzione del valore di GT

Il problema sta nelle somme che metto sul piede del raggruppamento
Sul piede ho tre textbox, la prima per visualizzare la somma del valore
Imponibile di tutte le fatture del mese
=somma(Imponibile)

La seconda e la terza per visualizzare la somma degli importi come
visualizzati dalle textbox1 e textbox2 sul corpo del documento
=somma(IIf([GT]>100;[Imponibile];0))
=somma(IIf([GT]<=100;[Imponibile];0))

Ora, mentre la textbox con la somma del Imponibile si vede
correttamente, le altre due che dovrebbero mostrare la somma di un campo
calcolato, non funzionano nel senso che tento di avviare il report mi dice
"Tipo di dati non corrispondenti nell'espressione criterio"

Ho pensato che il valore Imponibile potesse essere un null, e l'ho
racchiuso con un nz ma niente da fare, il report non vuol partire
Da cosa puo' dipendere?


text:

Era il campo GT
Davo per scontato fosse fosse numerico, invece era testo
Elora la domanda successiva e':
ma come mai sulla riga il confronto GT>100 funziona?
Se funziona evidentemente Access ci mette del suo per convertire il tipo
dati da testo a numerico, e quindi come mai la IIF su riga funziona, e
la la somma(IIF...) sul piede gruppo non funziona?


author: GiorgioDaPrato

text:
>
> Era il campo GT
> Davo per scontato fosse fosse numerico, invece era testo
> Elora la domanda successiva e':
> ma come mai sulla riga il confronto GT>100 funziona?
> Se funziona evidentemente Access ci mette del suo per convertire il tipo
> dati da testo a numerico, e quindi come mai la IIF su riga funziona, e
> la la somma(IIF...) sul piede gruppo non funziona?

mi sa che IIF "restituisca" SOLO stringhe, (o altro), non "commestibili" per sommatorie.

Personalmente ho riscontrato varie (MOLTE) volte che nelle sommatorie occorre FORZARE, con val() per esempio, i parziali che arrivano da uso di funzioni interne che comunque restituiscono "qualcosa" che (per noi) ha l'aspetto di un numero


author: RobertoA

text:

Beh, nel mio caso, una volta sistemato a numerico il tipo dati nel db,
tutto e' tornato funzionante come prima
Quindi anche la somma sul piede del gruppo, del contenuto di una textbox
col ControSource=(IIF...)


title: Stampare con showPrinter e come passo il documento alla stampante ??

author: Jim

text:
Ho una domanda che credo abbia una risposta banale, ma io non ci arrivo.
Devo stampare in Access una maschera da codice VBA con
Command1.showPrinter...fin qui tutto bene
ma non so come passare l'invio della maschera alla stampante. In MSDN ho
trovato questo codice
ma proprio nel punto dove mi serve sapere come far stampare la maschera dice
"  Inserire qui il
codice per l'invio dei ' dati alla stampante."
Qualcuno per cortesia mi aiuta a riempire la parte mancante del codice
sottostante.
avendo una maschera che si chiama Pippo ?? Grazie 1000
 Private Sub Command1_Click()
    Dim BeginPage, EndPage, NumCopies, i
    ' Imposta CancelError su True.
    CommonDialog1.CancelError = True
    On Error GoTo ErrHandler
    ' Visualizza la finestra di dialogo Stampa.
    CommonDialog1.ShowPrinter
    ' Legge i valori selezionati dall'utente nella
    ' finestra di dialogo.
    BeginPage = CommonDialog1.FromPage
    EndPage = CommonDialog1.ToPage
    NumCopies = CommonDialog1.Copies
    For i = 1 To NumCopies
        ' Inserire qui il codice per l'invio dei
        ' dati alla stampante.
    Next i
    Exit Sub
ErrHandler:
    ' L'utente ha scelto il pulsante Annulla.
    Exit Sub
End Sub


title: memorizzare valore controllo

text:
Salve.
Ho una maschera "menu dipendenti" con un controllo "IdAzienda". Dopo
aver selezionato la ditta, tramite delle caselle di testo, su evento
click apro un'altra maschera "variazione dipendenti" che all'apertura
ha come valore del controllo IdAzienda quello della maschera chiusa.
Ho messo sul click del pulsante la seguente routine :
Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "variazione dipendenti"
    stLinkCriteria = "[idAzienda]=" & Me![IDAzienda]
    DoCmd.OpenForm stDocName, , , stLinkCriteria
mentre su caricamento dell'altra maschera :
Forms![variazione dipendenti].IDAzienda = Forms![menu
dipendenti].IDAzienda
In questo modo ottengo il risultato sperato, ma sono costretto a
lasciare la maschera "menu dipendenti" aperta, perchè se aggiungo il
comando docmd.close prima dell'apertura della maschera "variazione
dipendenti" il valore non viene passato.
Come posso memorizzare il valore IdAzienda, chiudendo la prima
maschera e attribuirlo al controllo della seconda maschera??
Grazie.
Giuseppe.


title: memorizzare valore controllo

author: Marco Pizzamiglio

text:
Giuseppe ha scritto:
> Salve.
> Ho una maschera "menu dipendenti" con un controllo "IdAzienda". Dopo
> aver selezionato la ditta, tramite delle caselle di testo, su evento
> click apro un'altra maschera "variazione dipendenti" che all'apertura
> ha come valore del controllo IdAzienda quello della maschera chiusa.
> Ho messo sul click del pulsante la seguente routine :
> Dim stDocName As String
>     Dim stLinkCriteria As String
>     stDocName = "variazione dipendenti"
>     stLinkCriteria = "[idAzienda]=" & Me![IDAzienda]
>     DoCmd.OpenForm stDocName, , , stLinkCriteria
> mentre su caricamento dell'altra maschera :
> Forms![variazione dipendenti].IDAzienda = Forms![menu
> dipendenti].IDAzienda
> In questo modo ottengo il risultato sperato, ma sono costretto a
> lasciare la maschera "menu dipendenti" aperta, perch� se aggiungo il
> comando docmd.close prima dell'apertura della maschera "variazione
> dipendenti" il valore non viene passato.
> Come posso memorizzare il valore IdAzienda, chiudendo la prima
> maschera e attribuirlo al controllo della seconda maschera??
> Grazie.
> Giuseppe.
Usa l'ultimo parametro di OpenForm, OpenArgs (vedi help <F1>) per passare
l'IDazienda alla maschera che devi aprire.
  DoCmd.OpenForm "variazione dipendenti", , , "[idAzienda]=" &
Me![IDAzienda],,me.idazienda
Nell'evento Su Apertura della seconda form trovi l'IDazienda nella
variabile OpenArgs:
Private Sub Form_Open(Cancel As Integer)
    msgbox "E' stato passato l'IDazienda " & OpenArgs
End Sub
Ciao.
-Marco-
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: memorizzare valore controllo

author: Giuseppe

text:
On 9 Set, 09:36,
marco.pizzamig...@gmail.com
 (Marco Pizzamiglio)
wrote:
> Giuseppe ha scritto:
>
>
>
> > Salve.
> > Ho una maschera "menu dipendenti" con un controllo "IdAzienda". Dopo
> > aver selezionato la ditta, tramite delle caselle di testo, su evento
> > click apro un'altra maschera "variazione dipendenti" che all'apertura
> > ha come valore del controllo IdAzienda quello della maschera chiusa.
> > Ho messo sul click del pulsante la seguente routine :
> > Dim stDocName As String
> >     Dim stLinkCriteria As String
> >     stDocName = "variazione dipendenti"
> >     stLinkCriteria = "[idAzienda]=" & Me![IDAzienda]
> >     DoCmd.OpenForm stDocName, , , stLinkCriteria
> > mentre su caricamento dell'altra maschera :
> > Forms![variazione dipendenti].IDAzienda = Forms![menu
> > dipendenti].IDAzienda
> > In questo modo ottengo il risultato sperato, ma sono costretto a
> > lasciare la maschera "menu dipendenti" aperta, perchè se aggiungo il
> > comando docmd.close prima dell'apertura della maschera "variazione
> > dipendenti" il valore non viene passato.
> > Come posso memorizzare il valore IdAzienda, chiudendo la prima
> > maschera e attribuirlo al controllo della seconda maschera??
> > Grazie.
> > Giuseppe.
>
> Usa l'ultimo parametro di OpenForm, OpenArgs (vedi help <F1>) per passare
> l'IDazienda alla maschera che devi aprire.
>   DoCmd.OpenForm "variazione dipendenti", , , "[idAzienda]=" &
> Me![IDAzienda],,me.idazienda
>
> Nell'evento Su Apertura della seconda form trovi l'IDazienda nella
> variabile OpenArgs:
>
> Private Sub Form_Open(Cancel As Integer)
>     msgbox "E' stato passato l'IDazienda " & OpenArgs
> End Sub
>
> Ciao.
> -Marco-
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad
ab...@newsland.it
Grazie Marco per la risposta.
Quello che non mi è chiaro è
> Private Sub Form_Open(Cancel As Integer)
>     msgbox "E' stato passato l'IDazienda " & OpenArgs
> End Sub
All'apertura il messaggio esce ma il controllo IdAzienda resta vuoto.
Cosa devo sostituire al msgbox?
Grazie.
Ciao.


title: memorizzare valore controllo

text:
Giuseppe ha scritto:
> On 9 Set, 09:36,
marco.pizzamig...@gmail.com
 (Marco Pizzamiglio)
> wrote:
> > Giuseppe ha scritto:
> >
> >
> >
> > > Salve.
> > > Ho una maschera "menu dipendenti" con un controllo "IdAzienda". Dopo
> > > aver selezionato la ditta, tramite delle caselle di testo, su evento
> > > click apro un'altra maschera "variazione dipendenti" che all'apertura
> > > ha come valore del controllo IdAzienda quello della maschera chiusa.
> > > Ho messo sul click del pulsante la seguente routine :
> > > Dim stDocName As String
> > > � � Dim stLinkCriteria As String
> > > � � stDocName = "variazione dipendenti"
> > > � � stLinkCriteria = "[idAzienda]=" & Me![IDAzienda]
> > > � � DoCmd.OpenForm stDocName, , , stLinkCriteria
> > > mentre su caricamento dell'altra maschera :
> > > Forms![variazione dipendenti].IDAzienda = Forms![menu
> > > dipendenti].IDAzienda
> > > In questo modo ottengo il risultato sperato, ma sono costretto a
> > > lasciare la maschera "menu dipendenti" aperta, perch� se aggiungo il
> > > comando docmd.close prima dell'apertura della maschera "variazione
> > > dipendenti" il valore non viene passato.
> > > Come posso memorizzare il valore IdAzienda, chiudendo la prima
> > > maschera e attribuirlo al controllo della seconda maschera??
> > > Grazie.
> > > Giuseppe.
> >
> > Usa l'ultimo parametro di OpenForm, OpenArgs (vedi help <F1>) per passare
> > l'IDazienda alla maschera che devi aprire.
> > � DoCmd.OpenForm "variazione dipendenti", , , "[idAzienda]=" &
> > Me![IDAzienda],,me.idazienda
> >
> > Nell'evento Su Apertura della seconda form trovi l'IDazienda nella
> > variabile OpenArgs:
> >
> > Private Sub Form_Open(Cancel As Integer)
> > � � msgbox "E' stato passato l'IDazienda " & OpenArgs
> > End Sub �
> >
> > Ciao.
> > -Marco-
> Grazie Marco per la risposta.
> Quello che non mi � chiaro �
> > Private Sub Form_Open(Cancel As Integer)
> >     msgbox "E' stato passato l'IDazienda " & OpenArgs
> > End Sub
> All'apertura il messaggio esce ma il controllo IdAzienda resta vuoto.
> Cosa devo sostituire al msgbox?
> Grazie.
> Ciao.
Hai il valore nella variabile, puoi farci quello che vuoi, anche copiarlo
in un controllo della maschera.
Puoi metterci per esempio questo:
  if len(openargs)>0 then
    me.idazienda=openargs
  else
    msgbox "Non � stato passato nessun IDazienda."
  end if
Ciao.
-Marco-
--
questo articolo e` stato inviato via web dal servizio gratuito



title: memorizzare valore controllo

text:
On 9 Set, 10:44,
marco.pizzamig...@gmail.com
 (Marco Pizzamiglio)
wrote:
> Giuseppe ha scritto:
>
>
>
> > On 9 Set, 09:36,
marco.pizzamig...@gmail.com
 (Marco Pizzamiglio)
> > wrote:
> > > Giuseppe ha scritto:
>
> > > > Salve.
> > > > Ho una maschera "menu dipendenti" con un controllo "IdAzienda". Dopo
> > > > aver selezionato la ditta, tramite delle caselle di testo, su evento
> > > > click apro un'altra maschera "variazione dipendenti" che all'apertura
> > > > ha come valore del controllo IdAzienda quello della maschera chiusa.
> > > > Ho messo sul click del pulsante la seguente routine :
> > > > Dim stDocName As String
> > > >     Dim stLinkCriteria As String
> > > >     stDocName = "variazione dipendenti"
> > > >     stLinkCriteria = "[idAzienda]=" & Me![IDAzienda]
> > > >     DoCmd.OpenForm stDocName, , , stLinkCriteria
> > > > mentre su caricamento dell'altra maschera :
> > > > Forms![variazione dipendenti].IDAzienda = Forms![menu
> > > > dipendenti].IDAzienda
> > > > In questo modo ottengo il risultato sperato, ma sono costretto a
> > > > lasciare la maschera "menu dipendenti" aperta, perchè se aggiungo il
> > > > comando docmd.close prima dell'apertura della maschera "variazione
> > > > dipendenti" il valore non viene passato.
> > > > Come posso memorizzare il valore IdAzienda, chiudendo la prima
> > > > maschera e attribuirlo al controllo della seconda maschera??
> > > > Grazie.
> > > > Giuseppe.
>
> > > Usa l'ultimo parametro di OpenForm, OpenArgs (vedi help <F1>) per passare
> > > l'IDazienda alla maschera che devi aprire.
> > >   DoCmd.OpenForm "variazione dipendenti", , , "[idAzienda]=" &
> > > Me![IDAzienda],,me.idazienda
>
> > > Nell'evento Su Apertura della seconda form trovi l'IDazienda nella
> > > variabile OpenArgs:
>
> > > Private Sub Form_Open(Cancel As Integer)
> > >     msgbox "E' stato passato l'IDazienda " & OpenArgs
> > > End Sub
>
> > > Ciao.
> > > -Marco-
> > Grazie Marco per la risposta.
> > Quello che non mi è chiaro è
> > > Private Sub Form_Open(Cancel As Integer)
> > >     msgbox "E' stato passato l'IDazienda " & OpenArgs
> > > End Sub
> > All'apertura il messaggio esce ma il controllo IdAzienda resta vuoto.
> > Cosa devo sostituire al msgbox?
> > Grazie.
> > Ciao.
>
> Hai il valore nella variabile, puoi farci quello che vuoi, anche copiarlo
> in un controllo della maschera.
> Puoi metterci per esempio questo:
>   if len(openargs)>0 then
>     me.idazienda=openargs
>   else
>     msgbox "Non è stato passato nessun IDazienda."
>   end if
> Ciao.
> -Marco-
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad
ab...@newsland.it
Tutto ok.
Grazie Marco.
Giuseppe.


title: sintassi query access 2003

author: cld

text:
buongiorno a tutto il gruppo.
sono del tutto novizio sui database e su access. con pazienza ho creato le
mie 2 tabelle (!), ora mi cimento in una query.
vorrei creare una query che mi visualizzi tutti i campi a partire da una
data fino ad un'ltra data. le due date devono essere passare come
arghomento , mutano di volta in volte. mi occorre una message box che mi
chieda in input tali valori e poi applichi la query.
se qualcuno ha dei link ad una documentazioen valida e semplice ecco che
accetterei volentieri tale informazione. intanto mi sto' leggendo la guida
in linea , ma appare complessa , alemno per me,
grazie a tutti
--


title: sintassi query access 2003

author: Simona

text:
"cld" <
r...@stssc.it
> ha scritto nel messaggio
news:4777d337$0$16036$5fc...@news.tiscali.it...

Secondo me lo capisci meglio con l'esempio.
Apri la query in struttura, porta i campi che vuoi vedere nella griglia
della query. Sul campo che contiene la tua data vai nella riga Criteri e
scrivi:
Between [DataIniziale] And [DataFinale]
L'effetto sarà che si aprirà una message box che ti chiede la DataIniziale e
poi un'altra che ti chiede la DataFinale.
L'operatore Between nei Criteri farà sì che la quey filtri solo i record fra
le due date specificate in input.
Ciao,
Simona


title: report

author: Sigar

text:
Ciao a tutti,
all'interno dell'azienda abbiamo parecchi database in ms-access a contorno
dell'ERP.
Io avrei la necessità di uno strumento che mi permetta di realizzare dei
report partendo sia dai database di Access, sia da altri DB, ma che possa
essere "lanciato" per esempio da file batch direttamente dall'ERP,
passandogli dei parametri.
Potrei anche usare un db di access opportunamente strutturato, ma non è
bello veder partire access cliccando sul menù dell'ERP, o comunque qui non
piace.
Avete qualche idea?
Esiste qualcosa di free?
Grazia a tutti.
Sigar.


title: report

author: mauro

text:
Sigar ha scritto:




> Grazia a tutti.
> Sigar.
Che io sappia Access non è "comandabile" da altre applicazioni. Forse puoi
provare a realizzare del codice in Vb o qualche altro linguaggio
(personalmente credo che sia un lavoro abnorme per il risultato che vuoi
ottenere). Se il tuo problema è "non far vedere" che lavora access prova
ad usare qualche "trucchetto" (link sui desktop, finestre nascoste....).
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: report

text:
"Sigar" <
si...@soulnet.it
> ha scritto nel messaggio
news:vaOpb.89699$vO5.3...@twister1.libero.it...

Puoi utilizzare access via OLE con un script VBS o WSH...
Ciao.
--
Sergio MAZZA


title: report

author: Emanuele Vinciarelli

text:
Sto formattando un report in base ad una query comandata da una maschera nel
quale c'è un testo molto lungo.Ho la necessità di far comparire, a seconda
della condizione di una casella di contolo della maschera (e quindi della
tabella collegata), due scritte diverse, ad esempio:
quando la condizone è vera, deve apparire scritto"Urgente", altrimenti
"Normale".
Ho provato ad inserire
iif(nomecasella=vero,"Urgente","Normale), nell'origine dati di una casella
di testo, ma ottengo solo errori o l'apparizione della formula formattata
come testo.
Dove sbaglio?


title: report

author: Antonio Biso

text:
"Emanuele Vinciarelli" <
e.vinc...@inwind.it
> ha scritto nel messaggio
news:IUaqb.92862$vO5.3...@twister1.libero.it...

Devi mettere un uguale davanti all'espressione
Antonio


title: Pannello dei comandi

author: Super David

text:
Ciao a tutti,
ho letto molti post relativi hai problemi con il pannello dei comandi
soprattutto se importato da A97 a A00....ma la mia domanda e' la seguente:
"Che pregi ha il pannello dei comandi rispetto al menu tradizionale?? cosa
mi consigliate di usare?? qual'e' il piu' semplice per l'utente finale poco
esperto??"
..bhe a dir la verita' erano piu' d'una...cmq pazienza....
scherzi a parte...vorrei avere una vostra opinione in merito...
Ciao
Grazie
* SuperDavid *


title: Pannello dei comandi

author: Mad® Milox

text:
"Super David" <
david...@yahoo.com
> ha scritto nel messaggio
news:6bp27.26266$rh.4...@news6.giganews.com...

Io personalmente utilizzo tutti e due .. sia i menu' tradizionali che il
pannello comandi ....
Il pannello comandi lo utilizzo anche perche' restando sempre aperto gli
faccio eseguire una serie di operazioni in background di controllo ,
impostazioni di access e cosi' via ... e piuttosto che mettere una form
senza nella per fare queste cose preferisco il pannello che almeno serve
anche all'utente. per menu' tradizionali intendi il classico "File" ,
"Modifica" , etc.. anche li ho riportato le stesse cose del pannello cosi'
gli utenti possono scegliere a loro piacimento.
Ciao,
--
(^o^))~    Lorenzo   (^o^))~
"La follia e' l'unica cosa capace di prolungare la giovinezza e tenere
lontano la molesta vecchiaia."
(Erasmo da Rotterdam)


title: A97, odbc e W2000

author: P. Bianchi

text:
Una applicazione in access97 che sotto w98 funziona, portata sotto w2000
professional mi fallisce.
l'applicazione e' molto semplice , legge i dati da una tabella oracle di
produzione e li copia su una tabella mysql di accumulo dati storici e
interrogazione web. Access cioe' fa solo da ponte.
Una prima query  collega le due tabelle oracle e mysql attraverso un campo
id e seleziona i soli record che sono presenti su oracle e nulli su mysql;
una seconda query  accoda le righe cosi' trovate al database mysql.
la procedura in ambiente W98 gira perfettamente da due anni, adesso invece
avendola portata sotto W2000 la query di selezione fallisce con errore
ORA-00960 dicendo che il nome della colonna di selezione e' ambiguo.
Indubbiamente poiche' il database mysql e' un clone del database oracle, le
colonne delle due tabelle hanno nomi identici, e la sintassi della query e':
SELECT ORACLE_TBLANAGRAFICAPERSONE.*
FROM ORACLE_TBLANAGRAFICAPERSONE LEFT JOIN MYSQL_TBLANAGRAFI
ON
ORACLE_TBLANAGRAFICAPERSONE.STRIDPERSONA = MYSQL_TBLANAGRAFI.STRIDPERSONA
WHERE
(((MYSQL_TBLANAGRAFI.STRIDPERSONA) IS NULL));
Poiche' la colonna STRIDPERSONA usata per la join e' prefissato dai due
diversi identificatori di database, dov'e' l'ambiguita'?  Infatti sotto W98
andava
Quindi penso a una incompatibilita' fra driver, che sono:
I dati oracle stanno su un server oracle 7.3 che viene collegato tramite
servizio oracle oracle for windows NT e odbc Intersolv 2.11.00.00 (ho
provato anche i servizi di oracle 8 con odbc della stessa Oracle 8.01.07.00,
stesso risultato)
I dati mysql stanno su un server linux, che ospita mysql 3.23 e che viene
visto  tramite my_odbc 3.51.
W2000 apaprtiene al nuovo computer aziendale e non e' sostituibile - idem
oracle 7.3. Il resto e' negoziabile. Secondo voi dove sta l'inghippo?
Grazie grazie
P. Bianchi


title: problema con campo indicizzato

author: francesco

text:
ma è possibile che quando imposto un campo come indicizzato, duplicati non
ammessi e vado ad inserire i dati non nella tabella ma in una maschera
aperta in modalità immissione nuovi dati e in questa tabella inserisco un
valore duplicato, che esiste già all'interno della tabella non mi compaia
nessun messaggio di errore ma che anzi io riesca a chiudere senza problemi
la tabella??? ed è possibile che poi se ripeto l'operazione il numero appena
inserito sia perduto?? il contatore assume il valore successivo?. grazie a
chi mi sa rispondere. ciao
--------------------------------
Inviato via
http://usenet.libero.it


title: problema con campo indicizzato

author: Roberto da casa

text:
"francesco" <
ga...@libero.it
> ha scritto nel messaggio
news:81Z72Z126Z200Y1...@usenet.libero.it...
> ma è possibile che quando imposto un campo come indicizzato, duplicati non
> ammessi e vado ad inserire i dati non nella tabella ma in una maschera
> aperta in modalità immissione nuovi dati e in questa tabella inserisco un
> valore duplicato, che esiste già all'interno della tabella non mi compaia
> nessun messaggio di errore ma che anzi io riesca a chiudere senza problemi
> la tabella??? ed è possibile che poi se ripeto l'operazione il numero
appena
> inserito sia perduto?? il contatore assume il valore successivo?. grazie a
> chi mi sa rispondere. ciao
>
In teoria non è possibile.
Se tu ci sei riuscito meriti un elefantino d'oro. ;-)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: *** DOMANDA FACILE x Voi ***

text:
Scusate un attimo,
mi potete scrivere un Es. semplice comrese le dichiarazioni dele variabili
necessarie:
Ho un file in c:\temp\test.xls
Vorrei da Access fare una scansione della colonna c del file test.xls e se
trova il valore 100 emana un msg "TROVATO".
Non penso vi ci voglia una giornata,
ma non riesco a capire essendo alle prime armi di VBA come fare.
Mi hanno anche detto di guardare Create o GetObject.
BOOOOOO!!!
Grazie mille !!!
IMPORTANT NOTICE:
This email is confidential, may be legally privileged, and is for the
intended recipient only. Access, disclosure, copying, distribution, or
reliance on any of it by anyone else is prohibited and may be a criminal
offence. Please delete if obtained in error and email confirmation to the sender.
--
Posted from
mail-out-01.piro.net
 [194.64.31.8]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: *** DOMANDA FACILE x Voi ***

author: Lbo

text:
>Ho un file in c:\temp\test.xls
>
>Vorrei da Access fare una scansione della colonna c del file test.xls e se
>trova il valore 100 emana un msg "TROVATO".
>
>Non penso vi ci voglia una giornata,
una giornata no, ma tre quarti d'ora sì (ci vuole molto di più a
scriverlo che a farlo), e adesso proprio non posso, sicché ti dò delle
indicazioni generiche che sicuramente potrai approfondire sull'help.
alleghi o importi il file excel come tabella (transferspreadsheet o
proprietà connect, su questa c'è da smanettare un pochino ma troverai
degli esempi).
ci setti sopra un recordset, lo scorri, quando arrivi al valore che ti
interessa fai partire un msgbox.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: database in siti internet

author: Domarr

text:
ciao a tutti
ho un sito personale ed ho provato ad insire una pagina di accesso ai dati
nel mio sito utilizzando FTP per il trasferimento dei file (quindi nella mia
directory del sito ho il file della pagina internet + il file del database).
Quando visito il mio sito da un altro computer ed apro la pagina in
questione, mi dice che ci vuole un dato programma Microsoft.....
Che cosa posso fare per risolvere questo problema; preciso che il file del
database non lo messo nella cartella mdb-database
grazie e saluti


title: database in siti internet

author: Fabrizo yQy

text:


Prova a chiedere su it.comp.www.asp
Ti serve:
- che il server che ospita il sito sia un server che ha come sistema
operativo Windows NT Server o WIndows 2000 Server
- Il server deve avere IIS 4/5 (Server Web di microsoft)
- Linguaggio ASP (3.0) installato sul server
- Linguaggio ASP con permessi di esecuzione nella tua cartella del
sito
- il database.mdb deve risiedere possibilmente nella stessa cartella
delle pagine ASP
- La pagina di accesso ai dati deve essere nominata pagina.asp e non
pagina.htm o pagina.html
.-..e altre cose di questo genere.
Se il server č linux/unix SCORDATI ASP e sviluppati una pagina in PHP.
in questo caso vai su:
it.comp.www.php
Ciao :))


title: [A2000 DK] Dove acquistare?

author: BabboNatale

text:
Salve a tutti,
vorrei acquistare il pacchetto Access2000 developer kit (in italiano).
Nei negozi che ho visitato hanno cercato di rifilarmi la versione XP
dicendomi che quello che chiedevo non č piů in commercio.
Come devo fare? Vorrei essere in regola con la legge, alcuni amici mi hanno
proposto di acquistare il loro pacchetto che "non utilizzano piů", č legale
ciň? Posso acquistare il pacchetto da altri "privati" o mi devo rivolgere ai
negozi?
Conoscete qualche negozio che vende ancora Access2000 developer kit (in
italiano)?
Grazie a tutti quelli che mi aiuteranno.
PEO
www.studiopasquali.it


title: [A2000 DK] Dove acquistare?

author: Emyr

text:
On Thu, 4 Apr 2002 09:42:05 +0200, "BabboNatale"
<
babbonatal...@libero.it
> wrote:
>Salve a tutti,
>vorrei acquistare il pacchetto Access2000 developer kit (in italiano).
>Nei negozi che ho visitato hanno cercato di rifilarmi la versione XP
>dicendomi che quello che chiedevo non è più in commercio.
>Come devo fare? Vorrei essere in regola con la legge, alcuni amici mi hanno
>proposto di acquistare il loro pacchetto che "non utilizzano più", è legale
>ciò? Posso acquistare il pacchetto da altri "privati" o mi devo rivolgere ai
>negozi?
>Conoscete qualche negozio che vende ancora Access2000 developer kit (in
>italiano)?
>Grazie a tutti quelli che mi aiuteranno.
>PEO
>
www.studiopasquali.it
>
>
puoi comprarlo tranquillamente da altri privati, se vuoi essere sicuro
leggiti la loro licenza
su questo NG tempo fa c'erà uno che vendeva il developer Kit del 2000
Saluti.
Emanuele.


title: Connessione db Access in rete

author: Francesco Lo Monaco - Gestel Spa

text:
Ho una applicazione ASP che gira su una macchina della mia LAN,database
Access 2000
compreso.
Ho la  necessità di accedere a tale DB da un'altra macchina in rete.
Penso che debba cambiare la stringa di connessione ma in che modo oppure
cos'altro devo cambiare?
Grazie per l'eventuale risposta!


title: Connessione db Access in rete

author: Luciano (DOC)

text:
Francesco Lo Monaco - Gestel Spa ha scritto nel messaggio
<9q6b45$nrs$
1...@fe1.cs.interbusiness.it
>...
>Ho una applicazione ASP che gira su una macchina della mia LAN,database
>Access 2000
>compreso.
>Ho la  necessità di accedere a tale DB da un'altra macchina in rete.
>Penso che debba cambiare la stringa di connessione ma in che modo oppure
>cos'altro devo cambiare?
Dipende dal tipo di connessione.
Comunque, in linea di massima, se la 2A macchina e' mappata come unita'
logica sulla prima basta che gli dai il path di rete.
Saluti.
Luciano


title: inserimento di una cartella ad ogni record

author: Gerry Agrò

text:
Desidererei conoscere come poter associare ad ogni record del database una
cartella che possa contenere file di tipo Word, excel e JPEG.
sono alle prime armi con access.
Vi ringrazio anticipatamente
Gerry


title: Intestazione e piede report ...

author: Sandro

text:
Ciao.
Ho fatto un report che mi stampa le bolle d'accompagnamento.
Suddetto report ha intestazioni e pie pagina del report, cosě che sulla
prima e l'ultima pagina del report mi vengano stampate alcune cose, che non
voglio siano stampate su quelle intermedie.
Ora, se stampo UNA bolla per volta tutto va bene. Ma se lancio il report su
di un gruppo di bolle, le intestazioni e piedi di pagina mi vengono solo
sulla prima e l'ultima pagina stampata, non sulla prima e l'ultima pagina di
ogni bolla.
In che modo posso "upgradare" questo report per poter stampare "a raffica"
un gruppo di bolle?
TIA, Sandro.
--------------------------------
Inviato via
http://usenet.libero.it


title: Intestazione e piede report ...

author: Riccardo Baldinotti

text:
"Sandro" <
sandro...@yahoo.com
> ha scritto nel messaggio
news:212Z210Z230Z100Y...@usenet.libero.it...
> Ciao.
>
> Ho fatto un report che mi stampa le bolle d'accompagnamento.
>
> Suddetto report ha intestazioni e pie pagina del report, cosě che sulla
> prima e l'ultima pagina del report mi vengano stampate alcune cose, che
non
> voglio siano stampate su quelle intermedie.
>
> Ora, se stampo UNA bolla per volta tutto va bene. Ma se lancio il report
su
> di un gruppo di bolle, le intestazioni e piedi di pagina mi vengono solo
> sulla prima e l'ultima pagina stampata, non sulla prima e l'ultima pagina
di
> ogni bolla.
>
> In che modo posso "upgradare" questo report per poter stampare "a raffica"
> un gruppo di bolle?
>
> TIA, Sandro.
>
Mi par di capire che ogni bolla sia su piů pagine; č cosě?
In tal caso, come gestisci il salto pagina?
Ciao
Riccardo


title: Intestazione e piede report ...

author: Lorenzo Coronati

text:
Scrisse
sandro...@yahoo.com
 (Sandro):
>In che modo posso "upgradare" questo report per poter stampare "a raffica"
>un gruppo di bolle?
non basta fare un ciclo e stampare una bolla per volta?
--
lorenzo coronati
---


title: Intestazione e piede report ...

text:
"Sandro" <
sandro...@yahoo.com
> ha scritto nel messaggio
news:212Z210Z230Z100Y...@usenet.libero.it...
> Ciao.
>
> Ho fatto un report che mi stampa le bolle d'accompagnamento.
>
> Suddetto report ha intestazioni e pie pagina del report, cosě che sulla
> prima e l'ultima pagina del report mi vengano stampate alcune cose, che
non
> voglio siano stampate su quelle intermedie.
>
> Ora, se stampo UNA bolla per volta tutto va bene. Ma se lancio il report
su
> di un gruppo di bolle, le intestazioni e piedi di pagina mi vengono solo
> sulla prima e l'ultima pagina stampata, non sulla prima e l'ultima pagina
di
> ogni bolla.
>
> In che modo posso "upgradare" questo report per poter stampare "a raffica"
> un gruppo di bolle?
>
> TIA, Sandro.
>
Forse non ho capito bene il tuo problema, ma se raggruppi il report per
NumeroBolla, quello che oggi fai nell'intestazione e nel pič di pagina
report, domani lo farai invece nell'intestazione e nel pič di pagina di
gruppo ovvero di NumeroBolla.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Intestazione e piede report ...

text:
Il 16 Ott 2002, 11:49, lorenzo.coronati@liberopuntoit (Lorenzo Coronati) ha
scritto:
> non basta fare un ciclo e stampare una bolla per volta?
Beh, ... si. A questa ci avevo pensato. Ma non volevo scomodare il vba per
una cosa che, di per se stessi, i report fanno regolarmente. Il problema è
mio, che non so come la cosa vada affrontata.
Grazie comunque, Sandro.



title: Intestazione e piede report ...

text:
Il 15 Ott 2002, 19:19, "Riccardo Baldinotti" <
bld...@libero.it
> ha scritto:
> Mi par di capire che ogni bolla sia su piů pagine; č cosě?
Certo. E' cosě.
> In tal caso, come gestisci il salto pagina?
In che senso? Le pagine intermedie vanno per i fatti loro, sfruttando il
body del report. Su prima ed ultima vengono fuori intestazione e pič.
Ciao, Sandro.



title: Intestazione e piede report ...

text:
Il 16 Ott 2002, 14:42, "Roberto da casa" <
r.ma...@libero.it
> ha scritto:
> Forse non ho capito bene il tuo problema, ma se raggruppi il report per
> NumeroBolla, quello che oggi fai nell'intestazione e nel piè di pagina
> report, domani lo farai invece nell'intestazione e nel piè di pagina di
> gruppo ovvero di NumeroBolla.
Come al solito hai capito benissimo.
Ho fatto qualche prova, ed è proprio, come tu mi suggerisci, con i
raggruppamenti che la cosa si risolve.
Davvero grazie.
Sandro



title: funzione addiziona solo giorni lavorativi

author: Marco

text:
ciao a tutti, ho la necessità di creare una funzione che partendo da
una data mi addizioni alla stessa un determinato numero di giorni,
considerando nel calcolo solo i gg lavorativi. Riprendendo la funzione
calcolo gg lavorativi presente sul sitocomune ho scritto:
Public Function addizgglav(DataIniziale As Date, gglav As Integer) As
Date

   Dim DataDaContar As Date, accum As Integer

   DataDaContar = DataIniziale - 1
            If Weekday(DataDaContar) <> 7 Or Weekday(DataDaContar) <>
1 Then
            Do
            DataDaContar = DataDaContar + 1
            accum = accum + 1
            Loop Until accum = gglav
            End If
         addizgglav = DataDaContar
End Function
Però il risultato che ottengo è sbagliato! Esempio: data iniziale
=03/02/03 gg=10
dovrei ottenere 14/02/03 ed invece ottengo 12/02/03.
Dove sbaglio? Grazie e ciao.


text:
mcor...@parker.com
 (Marco) wrote in message news:<
d4311add.03021...@posting.google.com
>...

Sob! Nessuno risponde al mio messggio...ROBERTO DA CASA dove sei?
Ciao.


text:
"Marco" <
mcor...@parker.com
> ha scritto nel messaggio
news:d4311add.03021...@posting.google.com...

Scusami, ero andato a prendermi un caffè. ;-)
Non vado a ricercare l'errore sul tuo codice, visto che fra l'altro
considera come giorni non lavorativi solamente i sabati e le domeniche e non
considera le altre festività infrasettimanali.
Registra in un modulo del tuo database le tre funzioni che hai trovato nella
FAQ del Sito Comune intitolata "Conteggio dei giorni lavorativi tra due
date".
Se la casella di testo che contiene la data di partenza si chiama
DataInizio.
Se la casella di testo che contiene i giorni lavorativi da sommare si chiama
Giorni
Se la data finale la vuoi in una casella di testo chiamata DataFine.
Quando vuoi ottenere il risultato cercato esegui il seguente codice VBA:
Dim Conta As Long
Conta = 0
Do Until 1 = 2
If ContaLavorativi(Me!DataInizio, _
Me!DataInizio + Conta, True) = Me!Giorni Then
    Exit Do
Else
    Conta = Conta + 1
End If
Loop
Me!DataFine = Me!DataInizio + Conta
Stai attento che la funzione Festivo contiene due inesattezze; devi
sostituire la seguente riga di codice:
DayMax = DateValue("20/4/" & Anno)
con la seguente riga di codice:
DayMax = DateValue("21/4/" & Anno)
altrimenti per quest'anno non considererebbe festivo il lunedì di Pasqua,
che cade appunto il 21 aprile.
Devi inoltre modificare la funzione per fargli considerare festivo anche il
giorno del Santo Patrono, che penso non sia stato considerato perché è
diverso per ogni città.
> Ciao.
Ora posso tornare al bar?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


author: Alessandro Cara

text:
Roberto da casa wrote:
[cut]
> Ora posso tornare al bar?
No. La tua presenza e' richiesta h24 altrimenti sarai LICENZIATO!
--
a.cara
Togli qualcosa dall'email


text:
"Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
news:3E4BB073...@blunet.it...
> Roberto da casa wrote:
> [cut]
> > Ora posso tornare al bar?
> No. La tua presenza e' richiesta h24 altrimenti sarai LICENZIATO!
>
Beh, se le cose stanno così vorrà dire che il caffè me lo faccio portare su
dal ragazzo del bar.
> --
> a.cara



author: Antonio Biso

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:JVO2a.113784$YG2.3...@twister1.libero.it...
>
> "Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
> news:3E4BB073...@blunet.it...
> > Roberto da casa wrote:
> > [cut]
> > > Ora posso tornare al bar?
> > No. La tua presenza e' richiesta h24 altrimenti sarai LICENZIATO!
> >
>
> Beh, se le cose stanno così vorrà dire che il caffè me lo faccio portare
su
> dal ragazzo del bar.
Ecco qua, caldo, caldo...
20 Euri grazie...
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:I9Q2a.114232$ZE.31...@twister2.libero.it...

Seeeeeeeeh, 20 Euri!
T'ho mica detto che voglio comprare tutta la piantagione di caffè.
> Antonio



text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:DwQ2a.114115$YG2.3...@twister1.libero.it...
>
> > > > > Ora posso tornare al bar?
> > > > No. La tua presenza e' richiesta h24 altrimenti sarai LICENZIATO!
> > > >
> > >
> > > Beh, se le cose stanno così vorrà dire che il caffè me lo faccio
portare
> > su
> > > dal ragazzo del bar.
> >
> > Ecco qua, caldo, caldo...
> > 20 Euri grazie...
> >
>
> Seeeeeeeeh, 20 Euri!
> T'ho mica detto che voglio comprare tutta la piantagione di caffè.
>
Ueh!
Ho lasciato il banco del bar, con 30 avventori davanti.
Sono uscito che nevicava, ho incontrato una squinzia che mi si voleva
trombare e ho dovuto rinunciare, mi sono fatto 1 chilometro a piedi, 8 piani
di scale senza ascensore e pensi che non vada bene?!?!?!
Hai ragione, 30 Euri!!!
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:7BQ2a.114314$ZE.31...@twister2.libero.it...

Questo è l'esempio di cosa succede a chi non sa afferrare al volo gli affari
che gli passano davanti!
Proprio vero che non c'è limite al peggio! :-)



text:
"Roberto da casa" <
r.ma...@libero.it
> wrote in message news:<N_N2a.113741$
ZE.31...@twister2.libero.it
>...

Grazie Roberto, come al solito la soluzione che suggerisci è perfetta!
Se hai 5 minuti di tempo, visto che sono un scrittore di codice
moooolto in erba, puoi evidenziarmi dove ho sbagliato? (a parte il
discorso delle festività che avevo omesso volontariamente per
chiarezza di esposizione).
Grazie ancora e.......AVVERTICI QUANDO VAI A PRENDERE IL CAFFE' così
evitiamo di sbavare davanti al monitor in attesa di una tua
risposta!!!! ;-) ;-) ciao.


author: MA

text:
> > > > > > Ora posso tornare al bar?
> > > > > No. La tua presenza e' richiesta h24 altrimenti sarai LICENZIATO!
> > > > Beh, se le cose stanno così vorrà dire che il caffè me lo faccio
> portare
> > > su
> > > > dal ragazzo del bar.
> > >
> > > Ecco qua, caldo, caldo...
> > > 20 Euri grazie...
> > >
> >
> > Seeeeeeeeh, 20 Euri!
> > T'ho mica detto che voglio comprare tutta la piantagione di caffè.
> >
>
> Ueh!
Allora analiziamo la situazione.
> Ho lasciato il banco del bar, con 30 avventori davanti.
Questo caffè potrebbe essere l'ultimo della tua carriera visto che i 30
avventori si stanno spazzolando tutto il tuo bar e dovrai cessare
l'attività: e tu l'ultimo caffè... quello del tuo commiato da questa
attività... quello x il nostro Roberto... non lo vuoi offrire??? NOn ci
voglio credere...
> Sono uscito che nevicava,
Quindi arriverà freddo...
ho incontrato una squinzia che mi si voleva
> trombare e ho dovuto rinunciare,
quindi sarà pieno di bestemmie e potrebbe andare di traverso (è quasi
un'arma bianca... assassino!!!)
mi sono fatto 1 chilometro a piedi, 8 piani
> di scale senza ascensore
Quindi il bicchiere arriverà sporco del tuo sudore... (che schifo!!!)
e pensi che non vada bene?!?!?!
>
> Hai ragione, 30 Euri!!!
Hai ragione tu!!! 30 Euri, anzi 50 Euri ... che devi tu a Roberto!!!!
>
> Antonio
;-D
ciao MAssimiliano

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


text:
"Marco" <
mcor...@parker.com
> ha scritto nel messaggio
news:d4311add.03021...@posting.google.com...
[CUT]
> Se hai 5 minuti di tempo, visto che sono un scrittore di codice
> moooolto in erba, puoi evidenziarmi dove ho sbagliato? (a parte il
> discorso delle festività che avevo omesso volontariamente per
> chiarezza di esposizione).
[CUT]
Così come hai scritto la tua routine il risultato sarà sempre uguale alla
data di partenza più i giorni meno uno (nel tuo esempio 03/02/03 - 1 + 10 =
12/02/03).
Tutto colpa della tua If: due confronti per diverso (<>) di una stessa
variabile messi in OR in una If restituiscono SEMPRE un valore booleano
True, in quanto una delle due condizioni si verifica sempre.
Se avessi usato l'operatore AND sarebbe stato ugualmente logicamente
inesatto e ti avrebbe restituito un risultato errato in quanto la If avrebbe
restituito sempre un valore False e quindi il risultato sarebbe sempre stato
uguale alla data iniziale meno uno.
Avresti dovuto inserire la If all'interno del ciclo Do ... Loop e non
viceversa ed inoltre l'operatori dei due confronti sarebbero dovuto essere
l'uguale (=) e non il diverso (<>).



title: Valori Combo da altra Combo.

author: ThaiChi

text:
Salve a tutti,
ho il seguente problema:
Ho una maschera dove ho inserito anche due combo, la seconda prende i valori
filtrati della prima.
Sull'evento su Uscita della Combo 1 ho inserito il requery della seconda
Combo (me!secondacombo.requery), nella seconda combo ho inserito nei criteri
della query in corrispondenza del campo della prima query di cui deve
filtrare i dati, la seguente riga:
[forms]![Nome Maschera].[PrimaCombo]
ma non funziona, nel senso che mi fa apparire i valori del primo record e
tutti quelli successivi che sono uguali al primo, se vado a dare invio in un
altro valore, mi spariscono i valori precedenti ed appaiono tutti quelli
uguali a dove ho dato l'invio.
Qualcuno mi sa aiutare ???
Ho A2000 e W2K
Grazie
ThaiChi


title: Valori Combo da altra Combo.

author: Carlo Costarella

text:
"ThaiChi" <
011...@bigfoot.com
> ha scritto nel messaggio
news:ak501q$2lg$1...@fe2.cs.interbusiness.it...

Verifica se la colonna associata della prima combo corrisponde al criterio
della seconda combo.
Ciao, Carlo


title: Valori Combo da altra Combo.

text:
"ThaiChi" <
011...@bigfoot.com
> ha scritto nel messaggio
news:ak501q$2lg$1...@fe2.cs.interbusiness.it...

Non ho capito cosa non funziona. Comunque nella seconda combo metti select
distinct
Antonio


title: Valori Combo da altra Combo.

author: Antonio Ganci

text:

Meglio l'evento dopo aggiornamento.
Dovresti specificare meglio cosa vuoi ottenere da quello che hai scritto
sembrerebbe corretto il risultato  che hai ottenuto poichč con l'istruzione:
[forms]![Nome Maschera].[PrimaCombo]
ottieni il valore selezionato nella combo  e non l'elenco dei valori.
Se devi filtrare in base all'elenco dei valori e' un po' piu' complicato nel
senso che devi fare un ciclo per tutti gli elementi della combo tramite un
ciclo for utilizzando il metodo column e poi crearti una query per la
seconda combo che metta in OR tutti gli elementi ciclati.
Saluti, Antonio.