title: Nascondere colonne vuote in un report

author: Marco Pizzamiglio

text:
emibal ha scritto:

E' stata progettata male la struttura tabellare del database, non è
normalizzata e quindi come sempre in questi casi poi sorgono problemi
quando vai a fare query e report.
Se è possibile e se vuoi fare un bel lavoro dovresti normalizzarla
dividento i dati in due tabelle, una tabella Prodotti e una
Caratteristiche, collegate con una relazione.
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: Nascondere colonne vuote in un report

author: OneEDP

text:

Mi sa mi sa che "Tabella - valori in riga" non ti piaceva tanto... :-)
Ciao
--
Daniele
Rispondere scartando OneEDP, spam e 32


title: Nascondere colonne vuote in un report

author: emibal

text:

Assolutamente!! Valori in riga li ho utilizzati con grande
soddisfazione per un altro scopo e ti ringrazio!
E' un po' difficile da spiegare ma non penso che il mio database non
sia normalizzato... Ho effettuato la scelta di mettere alcune
caratteristiche in riga (si trattano di misure di alcune parti di un
prodotto) per velocizzare l'inserimento dati che sarebbe stato
altrimenti molto lento nel caso in cui avessi utilizzato delle sotto
tabelle correlate.
Ora ho questa esigenza: quella di nascondere le colonne inutilizzate
nel report... suggerimenti??


title: Nascondere colonne vuote in un report

text:
emibal ha scritto:
[cut]
> Assolutamente!! Valori in riga li ho utilizzati con grande
> soddisfazione per un altro scopo e ti ringrazio!
> E' un po' difficile da spiegare ma non penso che il mio database non
> sia normalizzato...
Il tuo database non è normalizzato. Hai messo più caratteristiche in
un'unico record.
> Ho effettuato la scelta di mettere alcune
> caratteristiche in riga (si trattano di misure di alcune parti di un
> prodotto) per velocizzare l'inserimento dati che sarebbe stato
> altrimenti molto lento nel caso in cui avessi utilizzato delle sotto
> tabelle correlate.
Questo è un altro discorso. A volte per vari motivi si sceglie
consapevolmente di lavorare con database non normalizzati, mi sono già
capitati altri casi.
> Ora ho questa esigenza: quella di nascondere le colonne inutilizzate
> nel report... suggerimenti??
Questa è la prima conseguenza della scelta di lavorare su un db non
normalizzato: non riesci a fare i report.
Hai due possibilità: controlli il report con un sacco di codice VBA o
normalizzi la tabella con una query di unione e poi la usi per alimentare
un report normale.
Es.:
SELECT ID, caratt1 FROM Tabella WHERE caratt1 Is Not Null
UNION ALL SELECT ID, caratt2 FROM Tabella WHERE caratt2 Is Not Null
UNION ALL SELECT ID, caratt3 FROM Tabella WHERE caratt3 Is Not Null
UNION ALL SELECT ID, caratt4 FROM Tabella WHERE caratt4 Is Not Null
....
UNION ALL SELECT ID, caratt30 FROM Tabella WHERE caratt30 Is Not Null;



title: Nascondere colonne vuote in un report

text:

Perché molto lento?
Forse più difficile ma implementare nelle tue form, ma come vedi la
denormalizzazione ti fa risparmiare da una parte ma ha effetti
disastrosi dall'altra.
E' probabile che hai bisogno di "tipizzare" le caratteristiche di un
prodotto e mostrare solo quelle "righe" (e non colonne) tipiche di un
prodotto.
E' un comportamento che puoi attuare ad esempio mediante l'uso di una
tabella di tipizzazione dei campi (strada sconsigliata) o tramite filtri
su campi indicizzati.
Ad esempio:
Per il prodotti ID = 1 mostrami solo le caratteristiche x, y, z.
Purtroppo con access la recursività non viene gestita in modo agevole
come in
http://www.wrox.com/WileyCDA/Section/SQL-Server-2005-Programmability-Enhancements-Page-2.id-291639.html
> Ora ho questa esigenza: quella di nascondere le colonne inutilizzate
> nel report... suggerimenti??
Quando parli di alcune stai parlando di trenta colonne?
Se sono trenta non ci stai neanche in un A2 (il quadruplo di un A4)
Per attuare la tua soluzione bisogna inventarsi qualche query su tabelle
temporanee...
Ma oggi hai il problema dei report, e domani chissà



title: Nascondere colonne vuote in un report

text:

> come inhttp://
www.wrox.com/WileyCDA/Section/SQL-Server-2005-Programmability-.
..
>
> > Ora ho questa esigenza: quella di nascondere le colonne inutilizzate
> > nel report... suggerimenti??
>
> Quando parli di alcune stai parlando di trenta colonne?
> Se sono trenta non ci stai neanche in un A2 (il quadruplo di un A4)
>
> Per attuare la tua soluzione bisogna inventarsi qualche query su tabelle
> temporanee...
>
> Ma oggi hai il problema dei report, e domani chissà
> Ciao
>
> --
> Daniele
> Rispondere scartando OneEDP, spam e 32
Ho capito... grazie a tutti... mi metto a testa bassa e....
normalizzo!!!


title: Nascondere colonne vuote in un report

text:
Scusate ma... mi sono già bloccato.. forse non sono del tutto
convinto. Vorrei un'ultima opinione:
In effetti quei 30 campi che ho definito caratteristiche, forse non
sono così... e non sono neanche ricursivi.
Vi faccio l'esempio di quello che ho:
ID, Articolo, Larghezza, Altezza, Lunghezza, Peso, Volume, Area,
ecc....
Come vedete sono tutti campi il cui valore è un numero sempre diverso
l'uno dall'altro.
In qualche articolo vanno compilati solo Larghezza e altezza, in altri
solo il Peso e il volume...
Come faccio a normalizzare la tabella? Secondo me questa è già
normalizzata.. o mi perdo in un bicchier d'acqua??!?!?!?


title: Nascondere colonne vuote in un report

author: Bruno Campanini

text:
"emibal" <
emi...@libero.it
> wrote in message
news:daa2bab6-d14c-488f...@l20g2000yqm.googlegroups.com...

Sì, certo, col criterio di mettere tutto nello stesso sacco
la tabella è già normalizzata.
Dovrai cercare di suddividere i prodotti per categorie
omogenee onde ottenere un numero limitato di campi
che vengano, nella normalità, tutti compilati o quasi.
Ovvero definire alcuni campi che accolgano valori
comuni a tutti i prodotti e riservare un campo Text
(o Memo) che accolga le caratteristiche specifiche
di ciascun prodotto.
Se devi catalogare dei chiodi da scarpe e vino
contenuto in botti potresti avere come campi "comuni"
la quantità, il valore, la data di acquisto, la scorta minima, etc,
e avere nel campo "specifiche" l'indicazione di unità di misura
(peso per i chiodi, litri per il vino, area per i campi da tennis,
lunghezza per i cavi elettrici, altezza..., larghezza...)
Sto cercando di creare una tabella temporanea che derivi
da quella principale avendo quivi eliminato le colonne blank,
Ma non riesco a definire quando una colonna è blank se non
facendo una scansione su tutti i campi... il che è assurdo!
Bruno


title: Nascondere colonne vuote in un report

text:

Cosa intendi per scansione dei campi?
Stai eseguendo una concatenazione?
Se la esegui con "+" anche in presenza di un null tutto diventa null,
diversamente dall'operatore "&"
Ma forse non ho compreso
> Bruno



title: Nascondere colonne vuote in un report

text:

Relazione uno a molti
Anagrafica: IDAnagrafica, Descrizione, IDTipoProdotto
(chiave primaria IDAnagrafica)
CaratteristicheAnagrafica: IDAnagrafica, IDCaratteristica, CampoValore
(chiave primaria IDAnagrafica, IDCaratteristica)
TipologieProdotti: IDTipoProdotto, IDCaratteristica
(chiave primaria IDProdotto, IDCaratteristica)
Caratteristiche: IDCaratteristica, DescrizioneCaratteristica
(chiave primaria IDCaratteristica)
All'utente dovrai far popolare la tabella CaratteristicheAnagrafica
secono quanto indicato dalle caratteristiche presenti nella tabella
TipologieProdotti ricercando IDTipoProdotto
In definitiva TipologieProdotti è l'elenco delle caratteristiche
associate ad una IDAnagrafica, Caratteristiche è solo descrittiva
A questo punto avrai nel subreport certamente CaratteriticheAnagrafica,
da 0 a nmila detail. In ogni caso non potresti piazzare più di una
decina di caratteristiche...
Ciao



title: Nascondere colonne vuote in un report

author: Karl Donaubauer

text:
emibal wrote:
> Questa č tosta...
> ho 1 tabella contenente codice prodotto e 30 colonne indicanti le
> caratteristiche del prodotto.
> Con questa ho creato un report suddiviso per gruppi in base alla
> cateogria principale.
> Il problema č che in ogni gruppo la maggior parte di colonne č
> vuota e ciň crea molta confusione.
> E' possibile nascondere le colonne vuote in ogni gruppo???
Cosa intendi con "colonne" in riguardo al report?
Si tratta di un report tabellare con un campo accanto all'altro?
Non posso credere che hai fatto questo per 30 colonne.
Se invece si tratta di un report standard "a colonne", cioč un
campo sotto l'altro, basta
www.donkarl.com/it?FAQ5.14
.
--
Ciao
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Nascondere colonne vuote in un report

text:
On 31 Ago, 13:35, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:
> emibal wrote:
> > Questa è tosta...
> > ho 1 tabella contenente codice prodotto e 30 colonne indicanti le
> > caratteristiche del prodotto.
> > Con questa ho creato un report suddiviso per gruppi in base alla
> > cateogria principale.
> > Il problema è che in ogni gruppo la maggior parte di colonne è
> > vuota e ciò crea molta confusione.
> > E' possibile nascondere le colonne vuote in ogni gruppo???
>
> Cosa intendi con "colonne" in riguardo al report?
> Si tratta di un report tabellare con un campo accanto all'altro?
> Non posso credere che hai fatto questo per 30 colonne.
>
> Se invece si tratta di un report standard "a colonne", cioè un
> campo sotto l'altro, basta
www.donkarl.com/it?FAQ5.14
.
>
> --
> Ciao
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
Già, trattasi di report tabellare con un campo accanto all'altro...
quindi con colonna intendevo "campo"....
Ammetto di aver fatto un grave errore non pensando a ciò che sarebbe
accaduto nei report!....


title: Nascondere colonne vuote in un report

text:

In effetti ciò che hai proposto è semplice ed efficace... senonché ho
omesso di dire che
in questa tabella:
> CaratteristicheAnagrafica: IDAnagrafica, IDCaratteristica, CampoValore
> (chiave primaria IDAnagrafica, IDCaratteristica)
il "CampoValore" non sempre ha formato numerico (ho bisogno di formato
testo, numerico a precisione doppia, formato numerico per correlare
valori con casella combinata)....
In effetti lo scenario era lievemente più ampio ma ciò non toglie che
io abbia commesso degli errori....
Grazie a tutti per il supporto, ora vado a meditare ma....
prima di stravolgere tutto (purtroppo ho circa 3.000 records già
popolati)
stavo provando sul report una routine sulla formattazione del
raggruppamento "Tipologia".
Forse, trovando che la somma dei campi è vuota, potrei impostare la
Width della cella =0...
Lo so che questo sarebbe solo un palliativo, ma per il momento mi
risparmierebbe tanto lavoro!!! Speriamo che funzioni ma non sembra
così semplice..
Emiliano


title: Nascondere colonne vuote in un report

text:

Workaround:
tutto formato testo
e aggiungi a
Caratteristiche: IDCaratteristica, DescrizioneCaratteristica, IDTipoDato
TipiDati: IDTipoDato, Descrizione
esempio:
1, Intero
2, Testo
3, Numerico
4, Data
Con questa tabellina di traduzione applichi
1) applichi la convalida dei dati (purtroppo mi repelle, ma non vedo
altro per ora)
2) condizioni runtime come mostrare i dati a video (form, report, ecc...)
Ciao
--



title: Nascondere colonne vuote in un report

text:
"OneEDP" <
daniele....@spamgmail32.com
> wrote in message
news:4c7cdafb$0$18991$4faf...@reader5.news.tin.it...
> Cosa intendi per scansione dei campi?
> Stai eseguendo una concatenazione?
> Se la esegui con "+" anche in presenza di un null tutto diventa null,
> diversamente dall'operatore "&"
> Ma forse non ho compreso
Data una tabella con 30 campi e un migliaio di record, come
faccio a determinare quale colonna (quale campo per tutta la tabella)
è blank, in modo da poterlo temporaneamente eliminare ai fini
della determinazione del RecordSource per un Report?
Bruno


title: Nascondere colonne vuote in un report

text:

Mi sembra ottimistico predire che un migliaio di record una colonna sarà
null in tutte le righe... ma se può fa con una select correlata ciclando
per i fields ado o adox.
1) TotRighe = Conta tutte le righe
  for each fld in rst.Fields
  conta  Dcount( fld.Name, "tbl", fld.Name & " Is Null ")
   if conta = TotRighe then "insert into tblvuoti values( '" & fldName& "' "
next
Al termine tblVuoti contiene tutti i "campi" nulli
Ciao



title: Nascondere colonne vuote in un report

text:
"OneEDP" <
daniele....@spamgmail32.com
> wrote in message
news:4c7d1aea$0$18653$4faf...@reader3.news.tin.it...
> Mi sembra ottimistico predire che un migliaio di record una colonna sarà
> null in tutte le righe... ma se può fa con una select correlata ciclando
> per i fields ado o adox.
E io che avevo detto?
"facendo una scansione su tutti i campi... il che è assurdo!"
Bruno


title: Nascondere colonne vuote in un report

text:

Mi sono perso nel 3d..
Allora quale era la domanda? :-)



title: [Per Giorgio PRX] ancora su seriale

author: AEOM

text:
Ciao Giorgio
grazie al tuo esempio adesso riesco a far funzionare il collegamento tra PC
e registratore di cassa.
parlando con un tecnico mi ha confermato che il registratore di cassa
risponde agli invii con due chr(13).
Ti chiedo un consiglio...qual'è il modo migliore per aspettare la risposta
del registratore prima di inviare una nuova stringa?
Grazie 1000 dell'aiuto
Ciao, AEOM


title: [Per Giorgio PRX] ancora su seriale

author: Giorgio Prx

text:
"AEOM" <in...@FUCK-LAMER.com> ha scritto nel messaggio
news:dE5ob.67468$e5.24...@news1.tin.it...
> Ciao Giorgio
>
> grazie al tuo esempio adesso riesco a far funzionare il collegamento tra
PC
> e registratore di cassa.
> parlando con un tecnico mi ha confermato che il registratore di cassa
> risponde agli invii con due chr(13).
>
> Ti chiedo un consiglio...qual'č il modo migliore per aspettare la risposta
> del registratore prima di inviare una nuova stringa?
>
> Grazie 1000 dell'aiuto
> Ciao, AEOM
>
Ciao AEOM
Dopo ogni comando che invii "Tx(stringa)" leggi la risposta "If
Leggi_Risposta() =False Then ... errore " ad esempio con una
funzione tipo questa che se non riceve il doppio CHR(13) dopo 5 secondi ti
avvisa con il messaggio d' errore di timeout e rende false.
(ps l'ho buttata giů senza provarla ma dovrebbe funzionare)
Ciao Giorgio.
========================
Function Leggi_Risposta() As Boolean
  Dim Risposta As String
  Dim T1 As Long
  T1 = Int(Timer)
  Do
     'DoEvents
     Risposta = Risposta  & Rx(hCom)  'Vedi function allegata
     If Risposta = CHR(13)+CHR(13)  Then 'Se ricevi il doppio chr(13)
          Leggi_Risposta = True
          Exit Function
     End If
     If T1 + 5 < Int(Timer) Then 'dopo 5 secondi rende false
        MsgBox "Errore di Time out"
        Leggi_Risposta = False
        Exit Function
     End If
  Loop
End Function
===========================
Questa invece č la function che legge da Rs232 simile a quella presente
nell'evento timer del mio esempio.
===========================
Function Rx(ByVal hCom As Long) As String
   ' effettua una lettura periodica dalla
   ' porta seriale, usando un buffer di 15 byte;
   Const BufferLen = 20
   Dim ReceivedBytes As Long
   Dim Buffer(1 To BufferLen) As Byte
   Dim i As Long
   Dim fSuccess As Integer
   Dim ferror As Integer
   Dim txtReceive As String
   ' legge dalla porta seriale; in particolare, imposta a 0 (NULL)
   ' l'ultimo parametro della ReadFile, poiche' la comunicazione
   ' sara' sincrona (non overlapped)
   fSuccess = ReadFile(hCom, Buffer(1), BufferLen, ReceivedBytes, 0)
   If (fSuccess <> 0) Then
      If ReceivedBytes <> 0 Then
         For i = 1 To ReceivedBytes
             txtReceive = txtReceive & Chr(Buffer(i))
         Next i
      End If
   Else
      ferror = Err.LastDllError
      ' gestione errore
   End If
   Rx = txtReceive
End Function


title: [Per Giorgio PRX] ancora su seriale

text:
"Giorgio Prx" <
giorgio...@nospamtiscalinet.it
> ha scritto nel messaggio
news:bnr4io$rb0$1...@lacerta.tiscalinet.it...
>
> "AEOM" <in...@FUCK-LAMER.com> ha scritto nel messaggio
> news:dE5ob.67468$e5.24...@news1.tin.it...
> > Ciao Giorgio
> >
> > grazie al tuo esempio adesso riesco a far funzionare il collegamento tra
> PC
> > e registratore di cassa.
> > parlando con un tecnico mi ha confermato che il registratore di cassa
> > risponde agli invii con due chr(13).
> >
> > Ti chiedo un consiglio...qual'č il modo migliore per aspettare la
risposta
> > del registratore prima di inviare una nuova stringa?
> >
> > Grazie 1000 dell'aiuto
> > Ciao, AEOM
> >
>
> Ciao AEOM
> Dopo ogni comando che invii "Tx(stringa)" leggi la risposta "If
> Leggi_Risposta() =False Then ... errore " ad esempio con una
> funzione tipo questa che se non riceve il doppio CHR(13) dopo 5 secondi ti
> avvisa con il messaggio d' errore di timeout e rende false.
> (ps l'ho buttata giů senza provarla ma dovrebbe funzionare)
>
> Ciao Giorgio.
>
cut
Perfetto!!!!
MITTTICO!!!
non so come ringraziarti!!! a buon rendere
Ciao
AEOM


title: Sottrazione in Access

author: maurizio

text:
Ok ci riprovo spiegandomi meglio. Ho creato un db per un mio amico medico
dietista che gli serve per tenere memorizzati i dati relativi al peso, alla
circonferenza delle vita eccc, dei clienti. Fino a qui niente di difficile,
ci sono riuscito. Il mio problema, che mi sono creato, č quello di
visualizzargli la differenza dei valori fra le varie volte che il cliente č
andato da lui e la differenza dall'inizio della cura.
Il db č cosě formato:
tblanagrafica clienti - id cliente-nome-cognome ..
Tblvaloriiniziali - idvaloreiniziale-idcliente-data-peso-circvita ecc
Tblvaloriattuali - idvaloreattuale-idcliente-data-peso-circvita eccc
Quindi per esempio se nella tabella valori attuali di un determinato cliente
ho come peso: 95 - 90 - 85 .come faccio a fargli fare la differenza tra 90 e
95, tra 85 e 90 ecc? Cosě pure la differenza tra l'ultimo valore registrato
e il valore iniziale? Es valore attuale 85(che č l'ultimo) con il valore
iniziale che č ipotesi 98?
Ringraziando:-)) per la cortesia e sperando che stavolta mi sia fatto capire
meglio
Maurizio
calma27<NOSPAM>@
libero.it
     Di solito gli uomini
disprezzano le cose
    che non capiscono
                  Johann Wolfgang von Goethe


title: Sottrazione in Access

author: Roberto dal portatile

text:
"maurizio" <
cal...@libero.it
> ha scritto nel messaggio
news:ijCu7.13007$0Y2.2...@news.infostrada.it...

Ma io per prima cosa cambierei un po' la struttura della tue tabelle.
Poiché ritengo che la tabella Tblvaloriiniziali contiene i valori rilevati
durante la prima visita del cliente (quando cioč viene anche registrato un
nuovo record nella tblanagrafica), io eliminerei la tabella
Tblvaloriiniziali e registrerei i suoi dati nella tabella anagrafica. Se
lasci invece in essere la tabella Tblvaloriiniziali, potrebbe capitarti che
per un cliente hai piů record con date diverse: in questo caso quali vanno
usati come valori iniziali?
Valuta se le mie considerazioni sono valide per la tua problematica.
Quanto alla tabella Tblvaloriattuali io userei una struttura simile:
idvaloreattuale        Contatore e chiave primaria
idcliente                  Numerico
data                        Data/ora
TipoValore             Testo o Numerico
Valore                    Numerico
Stabilita la struttura delle tabelle, in una query e/o in una maschera e/o
in un report, si puň, a mio avviso, rilevare i valori del sottraendo ed del
sottrattore delle tue sottrazioni facendo ricorso alle funzioni di
aggregazione sui dominii.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: copiare una tabella da un db ad un altro non quello in uso

author: Logan

text:
Ciao a tutti, correi copiare una tabella da un db ad un altro ma non riesco
a capire come utilizzare la funzione TransferDatabase; pensavo di utilizzare
una funzione di questo tipo
Set app = New Application
app.OpenCurrentDatabase filedaimportare
app.DoCmd.TransferDatabase acExport, "Microsoft Access", filedestinazione,
acTable, nometabella
però mi presenta il seguente errore:
2075 Per l'operazione è necessario un database aperto
Potete aiutarmi?
Ciao by Logan bye bye


author: Sergio MAZZA

text:
"Logan" <
loga...@hotmail.com
> ha scritto nel messaggio
news:2gel7eF...@uni-berlin.de...

Utilizza il Metodo CopyObject (vedi help)...
Ciao.
--
Sergio MAZZA


title: Cambio stampante via codice VBA

author: Roland Mayr - Chipware

text:
Salve a tutti,
qualcuno mi sa dire come programmare un cambio stampante in un report mdb.
Ho provato con PrtDevMode pero sembra non funzionare.
Saluti
rolly


title: Cambio stampante via codice VBA

author: Alessandro Baraldi

text:
"Roland Mayr - Chipware" <
info.c...@tin.it
> wrote in message
news:cajtl5$l2l$
1...@newsreader.mailgate.org

Se usi XP hai l'oggetto Printer.
Se hai versioni < allora PrtDevMode funziona, avrai commesso
qualche errore.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Cambio stampante via codice VBA

text:
Salve Alessandro,
> Se usi XP hai l'oggetto Printer.
> Se hai versioni < allora PrtDevMode funziona, avrai commesso
intenti Access XP oppure il sistema operativo XP ?
saluti
rolly


title: Cambio stampante via codice VBA

author: Samuele

text:
anch'io sono interessatissimo alla cosa.
se qualcuno postasse un po' di codice mi farebbe un gran piacere.
Samuele



title: Cambio stampante via codice VBA

text:
Ciao Samuele,
"Samuele" <
samoas...@afici.it
> schrieb im Newsbeitrag
news:xsxzc.466453$rM4.19...@news4.tin.it...

purtroppo anchio non riesco ad utilizzare il PrtDevMode (con Access97 e
WinXP). La variabile strDeviceName mi da solo dei ??? invece del nome della
stampante. Le altre cose invece, come cambio cassetto carta etc. funzionano.
Se trovi una soluzione fammi sapere per favore.
saluti
rolly


title: Cambio stampante via codice VBA

text:
"Roland Mayr - Chipware" <
info.c...@tin.it
> ha scritto nel messaggio
news:camdmq$j4g$1...@newsreader.mailgate.org...

Ricerchina con google in questo NG no eh?
Per esempio:
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&q=cambio%2Bstampante&btnG=Cerca&meta=group%3Dit.comp.appl.access
Ciao.
--
Sergio MAZZA


title: Cambio stampante via codice VBA

text:
Salve Sergio,
purtroppo non sono riuscito a trovare niente di serio. Mi puoi dare un
dritta o farmi avere un esempio di codice.
saluti
rolly


title: Cambio stampante via codice VBA

author: Paolo opg

text:
"Roland Mayr - Chipware" <
info.c...@tin.it
> wrote in news:cb0o16$5hh
$
1...@newsreader.mailgate.org
:

se non ti fermi al primo e leggi il secondo risultato della ricerca che t
hanno postato, trovi anche il codice.
leggi il thread, però, non solo il singolo post o il titolo che google ti
presenta!
--
+-------
| Paolo opg
|
| janickg ( at ) hotmail ( dot ) com
| (fake address in reply-to field!)
+-------


title: Indirizzo cd-rom

author: Pasquale Antonacci

text:
Forse a poco a che fare con M. Access ma come faccio a intercettare l'indirizzo del drive del cd-rom??
Bye bye a tutti.
      Lino
--
Posted from
sirio.tno.it
 [138.66.200.5]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Indirizzo cd-rom

author: Carmel

text:
On Fri, 6 Apr 2001 15:54:15 +0000 (UTC),
p.ant...@tno.it
 (Pasquale
Antonacci) wrote:
>Forse a poco a che fare con M. Access ma come faccio a intercettare l'indirizzo del drive del cd-rom??
>Bye bye a tutti.
>
>      Lino
Se per indirizzo del Cd-Rom intendi la lettera assegnata ti può essere
utile questo codice preso da
http://www.mvps.org/access/index.htm
Ps. Togli quello che non ti serve.
Ciao
'************ Code Start **************
'This code was originally written by Terry Kreft
'and Dev Ashish.
'It is not to be altered or distributed,
'except as part of an application.
'You are free to use it in any application,
'provided the copyright notice is left unchanged.
'
' Original Code by Terry Kreft
' Modified by Dev Ashish
'
'Drive Types
Private Const DRIVE_UNKNOWN = 0
Private Const DRIVE_ABSENT = 1
Private Const DRIVE_REMOVABLE = 2
Private Const DRIVE_FIXED = 3
Private Const DRIVE_REMOTE = 4
Private Const DRIVE_CDROM = 5
Private Const DRIVE_RAMDISK = 6
' returns errors for UNC Path
Private Const ERROR_BAD_DEVICE = 1200&
Private Const ERROR_CONNECTION_UNAVAIL = 1201&
Private Const ERROR_EXTENDED_ERROR = 1208&
Private Const ERROR_MORE_DATA = 234
Private Const ERROR_NOT_SUPPORTED = 50&
Private Const ERROR_NO_NET_OR_BAD_PATH = 1203&
Private Const ERROR_NO_NETWORK = 1222&
Private Const ERROR_NOT_CONNECTED = 2250&
Private Const NO_ERROR = 0
Private Declare Function WNetGetConnection Lib "mpr.dll" Alias _
        "WNetGetConnectionA" (ByVal lpszLocalName As String, _
        ByVal lpszRemoteName As String, cbRemoteName As Long) As Long
Private Declare Function GetLogicalDriveStrings Lib "kernel32" Alias _
    "GetLogicalDriveStringsA" (ByVal nBufferLength As Long, _
    ByVal lpBuffer As String) As Long
Private Declare Function GetDriveType Lib "kernel32" Alias
"GetDriveTypeA" _
    (ByVal nDrive As String) As Long
Private Function fGetDrives() As String
'Returns all mapped drives
    Dim lngRet As Long
    Dim strDrives As String * 255
    Dim lngTmp As Long
    lngTmp = Len(strDrives)
    lngRet = GetLogicalDriveStrings(lngTmp, strDrives)
    fGetDrives = Left(strDrives, lngRet)
End Function
Private Function fGetUNCPath(strDriveLetter As String) As String
    On Local Error GoTo fGetUNCPath_Err
    Dim Msg As String, lngReturn As Long
    Dim lpszLocalName As String
    Dim lpszRemoteName As String
    Dim cbRemoteName As Long
    lpszLocalName = strDriveLetter
    lpszRemoteName = String$(255, Chr$(32))
    cbRemoteName = Len(lpszRemoteName)
    lngReturn = WNetGetConnection(lpszLocalName, lpszRemoteName, _
                                       cbRemoteName)
    Select Case lngReturn
        Case ERROR_BAD_DEVICE
            Msg = "Error: Bad Device"
        Case ERROR_CONNECTION_UNAVAIL
            Msg = "Error: Connection Un-Available"
        Case ERROR_EXTENDED_ERROR
            Msg = "Error: Extended Error"
        Case ERROR_MORE_DATA
               Msg = "Error: More Data"
        Case ERROR_NOT_SUPPORTED
               Msg = "Error: Feature not Supported"
        Case ERROR_NO_NET_OR_BAD_PATH
               Msg = "Error: No Network Available or Bad Path"
        Case ERROR_NO_NETWORK
               Msg = "Error: No Network Available"
        Case ERROR_NOT_CONNECTED
               Msg = "Error: Not Connected"
        Case NO_ERROR
               ' all is successful...
    End Select
    If Len(Msg) Then
        MsgBox Msg, vbInformation
    Else
        fGetUNCPath = Left$(lpszRemoteName, cbRemoteName)
    End If
fGetUNCPath_End:
    Exit Function
fGetUNCPath_Err:
    MsgBox Err.Description, vbInformation
    Resume fGetUNCPath_End
End Function
Private Function fDriveType(strDriveName As String) As String
    Dim lngRet As Long
    Dim strDrive As String
    lngRet = GetDriveType(strDriveName)
    Select Case lngRet
        Case DRIVE_UNKNOWN 'The drive type cannot be determined.
            strDrive = "Unknown Drive Type"
        Case DRIVE_ABSENT 'The root directory does not exist.
            strDrive = "Drive does not exist"
        Case DRIVE_REMOVABLE 'The drive can be removed from the drive.
            strDrive = "Removable Media"
        Case DRIVE_FIXED 'The disk cannot be removed from the drive.
            strDrive = "Fixed Drive"
        Case DRIVE_REMOTE  'The drive is a remote (network) drive.
            strDrive = "Network Drive"
        Case DRIVE_CDROM 'The drive is a CD-ROM drive.
            strDrive = "CD Rom"
        Case DRIVE_RAMDISK 'The drive is a RAM disk.
            strDrive = "Ram Disk"
    End Select
    fDriveType = strDrive
End Function
Sub sListAllDrives()
    Dim strAllDrives As String
    Dim strTmp As String

    strAllDrives = fGetDrives
    If strAllDrives <> "" Then
        Do
            strTmp = Mid$(strAllDrives, 1, InStr(strAllDrives,
vbNullChar) - 1)
            strAllDrives = Mid$(strAllDrives, InStr(strAllDrives,
vbNullChar) + 1)
            Select Case fDriveType(strTmp)
                Case "Removable Media":
                    Debug.Print "Removable drive :  " & strTmp
                Case "CD ROM":
                    Debug.Print "   CD Rom drive :  " & strTmp
                Case "Fixed Drive":
                    Debug.Print "    Local drive :  " & strTmp
                Case "Network Drive":
                    Debug.Print "  Network drive :  " & strTmp
                    Debug.Print "       UNC Path :  " & _
                                fGetUNCPath(Left$(strTmp, Len(strTmp)
- 1))
            End Select
        Loop While strAllDrives <> ""
    End If
End Sub


title: Re: Data da invio Otloolk

author: MA

text:
Fabrizio_LoL wrote:
> Salve rgazzi,
>
> ho un problema, nel mio database ho l'esigenza di crearmi un campo
> tipo DataMessaggio che prenda direttamente il valore del giorno e
> l'ora in cui ho spedito quel messaggio con outlook.
>
> Come posso risolvere questa situazione?
>
> Grazie in anticipo.
Now
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


Re: Data da invio Otloolk


title: Re: Data da invio Otloolk

text:
Grazie per la risposta.
Ma se immetto nel campo la funzione Now() non prenso solo la data del
sistema di windows?.
Outlook ha la stessa funzionalità?
Mi spiego meglio, io ho una maschera di gestione ordini, a cui ho applicato
un comando Sped.Ordini che mi spedisce ordini via email in formato snp. io
richiamo il mio ordine attraverso un query con parametri.
Se applico la funzione now() al mio campo, non li applico a tutti quelli che
creo nuovi?
Ora io vorrei che mi gestisse la sola funzionalità della data e dell'ora
solo per quel'ordine che ho spedito.
Grazie Ulteriormente.
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:X3eye.23693$TR5....@news.edisontel.com...



title: Re: Data da invio Otloolk

text:
Fabrizio_LoL wrote:
> Grazie per la risposta.
>
> Ma se immetto nel campo la funzione Now() non prenso solo la data del
> sistema di windows?.
>
> Outlook ha la stessa funzionalità?
>
> Mi spiego meglio, io ho una maschera di gestione ordini, a cui ho
> applicato un comando Sped.Ordini che mi spedisce ordini via email in
> formato snp. io richiamo il mio ordine attraverso un query con
> parametri.
>
> Se applico la funzione now() al mio campo, non li applico a tutti
> quelli che creo nuovi?
>
> Ora io vorrei che mi gestisse la sola funzionalità della data e
> dell'ora solo per quel'ordine che ho spedito.
>
> Grazie Ulteriormente.
Scrivi DOPO il quoting
Come chiami l'automazione?



title: Re: Data da invio Otloolk

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:38qye.23763$TR5....@news.edisontel.com...

In che senso, non ho capito!!!
Scusami!!!
Credo non abbia importanza come chiamarla, l'importante che quando, con il
mio comando invia per posta elettronica, mi si compili un campo Spedito Il
con la data di invio di outlook!!!! di quell'ordine in particolare.......
Grazie per la risposta!!!


title: Re: Data da invio Otloolk

text:
Fabrizio_LoL wrote:
> "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
> news:38qye.23763$TR5....@news.edisontel.com...
>> Fabrizio_LoL wrote:
>>> Grazie per la risposta.
>>>
>>> Ma se immetto nel campo la funzione Now() non prenso solo la data
>>> del sistema di windows?.
>>>
>>> Outlook ha la stessa funzionalità?
>>>
>>> Mi spiego meglio, io ho una maschera di gestione ordini, a cui ho
>>> applicato un comando Sped.Ordini che mi spedisce ordini via email in
>>> formato snp. io richiamo il mio ordine attraverso un query con
>>> parametri.
>>>
>>> Se applico la funzione now() al mio campo, non li applico a tutti
>>> quelli che creo nuovi?
>>>
>>> Ora io vorrei che mi gestisse la sola funzionalità della data e
>>> dell'ora solo per quel'ordine che ho spedito.
>>>
>>> Grazie Ulteriormente.
>>
>> Scrivi DOPO il quoting
>>
>> Come chiami l'automazione?
>>
> In che senso, non ho capito!!!
> Scusami!!!
>
> Credo non abbia importanza come chiamarla, l'importante che quando,
> con il mio comando invia per posta elettronica, mi si compili un
> campo Spedito Il con la data di invio di outlook!!!! di quell'ordine
> in particolare.......
va beh, allora se sai come si fa, stiamo a posto
>
> Grazie per la risposta!!!



title: Re: Data da invio Otloolk

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:kNyye.23951$TR5...@news.edisontel.com...

> Info:
www.donkarl.com/itf
Scusami forse ho frainteso la tua domanda o no ho cpaito prorio scuami!!!!
ma non so proprio come risolvere questa cosa!!!!
Ti riferivi ad una funzione pubblica!!!
non saprei come chiamarla !!!


title: Attachment PDF in FT Xml

text:
Qualcuno ha affrontato il problema dell'eventuale Attachment (generalmente PDF) alla Fattura XML?

<Attachment>  base64Binary [RFC 2045]


title: Attachment PDF in FT Xml

text:
Ciao Simome, se il problema è esclusivamente tecnico inerente alla conversione Binaria codificata, era il medesimo metodo che s ì usava quando si generavano le mail con codifica MIME ed Attachment.
In sostanza si apre il file e lo si converte inserendolo come blocco testo codificato.
In un mio vecchio demo di Mailing fatto con winsock avevo scritto anche questa parte.

Quindi se il tuo quesito riguarda questo posso vedere se recupero qualche cosa...
Altrimenti se intendevi altro di più specifico della fatturazione elettronica non sono in grado di dare supporto.

Ciao
@Alex


title: Attachment PDF in FT Xml

text:
> Ciao Simome, se il problema è esclusivamente tecnico inerente alla conversione Binaria codificata, era il medesimo metodo che s ì usava quando si generavano le mail con codifica MIME ed Attachment.
> In sostanza si apre il file e lo si converte inserendolo come blocco testo codificato.

>

Ciao @Alex,

Il problema è esclusivamente tecnico: convertire un .pdf in formato binario e inserire la codifica nel (fottuto) xml

Saluti da Simone


title: Attachment PDF in FT Xml

text:
La cinversione di qualsiasi file avviene aprendolo in formato binary leggendo le stringArray e convertendole singolarmente in Base64.

Qui trovi 2 esempi:

https://stackoverflow.com/questions/169907/how-do-i-base64-encode-a-string-efficiently-using-excel-vba

https://stackoverflow.com/questions/48351495/generating-pdf-from-base64-string-in-vba

L'inserimento nel file XML avviene in blocco... tu avrai uno stringarray oppure un blocco stringa unico che incolli nel file XML in base alle metodiche indicate, che io non conosco nell'accezione fiscale, ma normalmente dovrebbero esserci dei TAG che consentono poi d riconoscerli... quindi iserirai probabilmente un Node con i TAG e poi il malloppone.

Se, come avveoncompreso, non usi DOM devi farlo da codice mentre scrivi il file... se il file è già scritto era meglio usare DOM perché ti tocca rileggerlo e trovare il punto di inserimento, inserire, proseguire con la lettura e riscriverei tutto.

Ciao
@Alez


title: Attachment PDF in FT Xml

text:
> La cinversione di qualsiasi file avviene aprendolo in formato binary leggendo le stringArray e convertendole singolarmente in Base64.

> Qui trovi 2 esempi:
>
>
https://stackoverflow.com/questions/169907/how-do-i-base64-encode-a-string-efficiently-using-excel-vba

>
>
https://stackoverflow.com/questions/48351495/generating-pdf-from-base64-string-in-vba

Grazie per i links @Alex

> Se, come avveoncompreso, non usi DOM devi farlo da codice mentre scrivi il file... se il file è già scritto era meglio usare DOM perché ti tocca rileggerlo e trovare il punto di inserimento, inserire, proseguire con la lettura e riscriverei tutto.
>

Quello non è un problema  ;-)

Saluti da Simone


title: casella di testo data formato ggmmaa

text:
Salve,
ho un campo DATA e lo voglio visualizzare in una casella di testo nel
formato
gg mm aa
nella proprietà della casella di testo ho impostato
formato 'data in cifre'
e dati/maschera di input 00/00/00;0;_
quello che succede è che inserisco il campo data nel formato gg/mm/aa
e poi viene visualizzato come gg/mm/aaaa con 4 cifre per l'anno
quello che non mi piace è che se modifico il campo devo cancellare le
prime due cifre dell'anno,
per esempio se ho 19/03/1972 e voglio cambiare il giorno in '20'
se sovrascrivo il giorno e scrivo 20/03/1972 mi da errore
' il valore immesso non è valido per la maschera di input 00/00/00;0;_
specificata per il campo'
Come faccio a visualizzare la data nello stesso formato della maschera
di input, cioè nel formato gg/mm/aa con due cifre per l'anno?
grazie
siddhana


title: casella di testo data formato ggmmaa

author: Cinzia

text:
<
sidd...@yahoo.it
> ha scritto nel messaggio
news:1136461132.0...@g14g2000cwa.googlegroups.com...


Ciao siddhan,
nelle proprietà Formato della casella di testo metti "GG/MM/AA"
--
Cinzia
---------------------------------------
|
http://www.riolab.org
  |
---------------------------------------


title: casella di testo data formato ggmmaa

text:
WOW semplicissimo, grazie!!!
siddhanA
 :-)


title: Grafici in form

author: Pasquale Regina

text:
Un saluto a tutti.
Non riesco a risolvere un problema relativo all' aggiornamento via
codice VBA in un form di un grafico.
Ho un gruppo di opzioni e un grafico che su open della maschera è non
visibile.
Il grafico si chiama Grafico25, classe ole Grafico di Microsoft Graph,
tipo ole incorporato, classe MSGraph.Chart.8 con origine riga iniziale
la stessa query della opzione15 in basso.
Su azione GotFocus dell' opzione passo l' istruzione rowsource al
grafico e quindi requery e poi aggiungo l' intestazione in una casella
di testo. di seguito il codice utilizzato:
Option Compare Database
Private Sub Comando0_Click()
On Error GoTo Err_Comando0_Click
    DoCmd.Close
Exit_Comando0_Click:
    Exit Sub
Err_Comando0_Click:
    MsgBox err.Description
    Resume Exit_Comando0_Click
End Sub
Private Sub Form_Load()
Me.Grafico25.Visible = False
Me.Etichetta27.Visible = False
End Sub
Private Sub Opzione15_GotFocus()
Me.Grafico25.Visible = True
Me.Grafico25.RowSource = "SELECT Export_output.Provincia,
Sum(Export_output.Somma_erbacei/Province_SAU.ST*1000) AS
Residui_erbacei, " & _
                            "Sum(Export_output.Somma_legnosi/
Province_SAU.ST*1000) AS Residui_legnosi " & _
                            "FROM Export_output INNER JOIN
Province_SAU " & _
                            "ON Export_output.Cod_provincia =
Province_SAU.Cod_provincia " & _
                            "GROUP BY Export_output.Provincia;"
Me.Grafico25.Requery
Me.Etichetta27.Visible = True
Me.Etichetta27.Caption = "Indice territoriale Potenziale lordo /
Superficie totale"
End Sub
Private Sub Opzione17_GotFocus()
Me.Grafico25.Visible = True
Me.Grafico25.RowSource = "SELECT Export_output.Provincia,
Sum(Export_output.Somma_erbacei/Province_SAU.SAT*1000) AS
Residui_erbacei, " & _
                            "Sum(Export_output.Somma_legnosi/
Province_SAU.SAT*1000) AS Residui_legnosi " & _
                            "FROM Export_output INNER JOIN
Province_SAU " & _
                            "ON Export_output.Cod_provincia =
Province_SAU.Cod_provincia " & _
                            "GROUP BY Export_output.Provincia;"
Me.Grafico25.Requery
Me.Etichetta27.Visible = True
Me.Etichetta27.Caption = "Indice territoriale Potenziale lordo /
Superficie agricola totale"
End Sub
Private Sub Opzione19_GotFocus()
Me.Grafico25.Visible = True
 Me.Grafico25.RowSource = "SELECT Export_output.Provincia,
Sum(Export_output.Somma_erbacei/Province_SAU.SAU*1000) AS
Residui_erbacei, " & _
                            "Sum(Export_output.Somma_legnosi/
Province_SAU.SAU*1000) AS Residui_legnosi " & _
                            "FROM Export_output INNER JOIN
Province_SAU " & _
                            "ON Export_output.Cod_provincia =
Province_SAU.Cod_provincia " & _
                            "GROUP BY Export_output.Provincia;"
Me.Grafico25.Requery
Me.Etichetta27.Visible = True
Me.Etichetta27.Caption = "Indice territoriale Potenziale lordo /
Superficie agricola utilizzata"
End Sub
Apro la maschera e clicco sulla opzione 1, il grafico diventa visibile
(il riquadro del grafico) ma non il contenuto a meno che non clicchi
con il mouse sul riquadro o prema il tasto tab.
Questo anche cambiando, switchando tra le tre opzioni (sempre il TAB o
click del mouse per la visualizzazione).
Il contenuto è effettivamente aggiornato e quindi le istruzioni su
nuova rowsource e requery funzionano ma non riesco a visualizzarli se
non con una delle due operazioni precedenti, tab o click nel riquadro.
Se invece del clic faccio il doppio clic per aprire l' oggetto (o
anche manualmente con tasto dx a apro oggetto grafico e quindi mi
presenta la visualizzazione foglio dati del grafico) e poi lo richiudo
cliccando su uno spazio vuoto della form allora ottengo il
comportamento da me desiderato e cioè riesco a fare lo switch fra le
opzioni e immediatamente mi aggiorna il contenuto e la visualizzazione
del grafico.
Ho già provato via codice con il setfocus sul grafico, ma niente.
Anche salvando le query e assegnando quindi al rowsource query
statiche, il risultato non cambia.
Avete delle dritte da consigliarmi? Grazie in anticipo.
Pasquale.


title: mdb vedo i nomi dei moduli ma non si aprono più

author: pfm

text:
salve

non capisco cosa sia successo:

ho un mdb che si e' chiuso in modo non corretto

ora aprendolo vedo l'elenco dei moduli che avevo scritto

ma provando ad aprirli
mi dice

il nome del modulo 'mioModulo' non e' digitato correttamente o fa riferimento a un modulo inesistente

cosa posso fare per recuperarli?

GRAZIE


author: BFS

text:

capitato anche a me settimana scorsa
solo che a me lo faceva con un solo modulo
non ho trovato alcuna soluzione se non ripristinare dal cloud-backup

ciao


text:

Provate ad effettuare un SaveAsTExt, membro nascosto di Application:

Sub SaveAsText(ObjectType As AcObjectType, ObjectName As String, FileName As String)
    Membro di Access.Application

Quindi rimuovete o rinominate il Modulo e con il Metodo LoadFromText lo recuperate:
Application.LoadFromText acModuke, "YourFormName", "C:\Temp\NomeModulo.txt"

Molte volte questo metodo elimina corruzioni del codice... se volete fare un ciclo su Form e Moduli... diventa un metodo per fare Pulizia...

@Alex


author: RobertoA

text:
Il 16/02/2018 11:08, pfm ha scritto:

Prova con CTRL-G ad entrare in modalita' Editor di codice e verifica se
riesci a leggere il codice del modulo
Se ci riesci puoi sempre salvarlo su file di testo, poi creare un nuovo
modulo, ed incollarci il testo salvato in precedenza


text:

grazie moltissimo
ho trovato su tuo suggerimento
https://access-programmers.co.uk/forums/showthread.php?t=99179

che lo adattato al mio caso per i soli moduli, ma purtroppo non ho recuperato nulla


title: query confronto fra 2 campi

author: Arold

text:
ho una tabella con campo "scortaminima" e campo "disponibile" vorrei
visualizzare solo i record in cui il campo disponibile è minore del campo
scortaminima che criterio devo mettere nel campo scortaminima?
Grazie.


title: query confronto fra 2 campi

text:

Struttura query
Ciccio: nz(scortaminima) - nz(disponibile)
nei criteri < 0
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


title: Problema Colore in maschera continua

author: Zut

text:
Gestione di aule che vengono occupate da alcuni corsi per cui vorrei
fare in modo che in base al corso inserito mi venisse un colore (di
testo o sfondo) diverso... tutto qui?

Di solito ci sono sempre riuscito usando la formattazione condizionale.

Ma questa volta non so cosa inventarmi:

Il problema è che i valori inseriti variano da 1 a 100.

Solitamente i valori sono "impacchettati" cioè sequenziali di otto in otto.

Come posso risolvere per fare in modo che

corso1= giallo
corso1= giallo
.....
corso2=rosso
corso2=rosso
.....
corso3=verde
corso3=verde
.....

e poi

corso4=giallo
...
corso5=rosso
....
corso6=verde
...

L'importante che i colori siano almeno 3

Cosa posso inventarmi?


title: Problema Colore in maschera continua

text:
Forse riuscirei a fare qualcosa se riuscissi a riportare ogni valore
inserito a 1 ... 2 ... o 3 in modo alternato.

Ma come posso fare questo?


title: Problema Colore in maschera continua

text:

Sono riuscito a fare qualcosa ma solo a due colori (pari e dispari)...
vabbè ... visto che non arrivano aiuti mi accontenterò.


title: Problema Colore in maschera continua

author: Marco Pizzamiglio

text:
Il giorno martedì 16 febbraio 2016 11:56:00 UTC+1, Zut ha scritto:

Usa l'operatore Mod, che restituisce il resto della divisione.
Valore mod 3  ti darà i valori 0, 1 e 2 alternati.
3 mod 3 = 0
4 mod 3 = 1
5 mod 3 = 2
6 mod 3 = 0
7 mod 3 = 1
8 mod 3 = 2
ecc.......
Ciao.
-Marco-


title: Problema Colore in maschera continua

text:
> Usa l'operatore Mod, che restituisce il resto della divisione.
> Valore mod 3  ti darà i valori 0, 1 e 2 alternati.
> 3 mod 3 = 0
> 4 mod 3 = 1
> 5 mod 3 = 2
> 6 mod 3 = 0
> 7 mod 3 = 1
> 8 mod 3 = 2
> ecc.......

Sei un grande!!!! Proprio quello che mi serviva !!!
Ti ringrazio


title: Utilizzo timer

author: Nao

text:
Nella mia form ho un bottone pippo, vorrei fare una cosa del tipo che quando
clicco sul bottone pippo, parte un timer che dopo 10 secondi mi apre
un'altra form pluto.
Come posso fare?
PS: il timer, l'ho impostato a 1000ms con su evento on timer l'aggiornamento
dell'orologio.
Si possono mettere due timer in una form?
grazie Nadir
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Utilizzo timer

author: Gabriele Bertolucci

text:
> Nella mia form ho un bottone pippo, vorrei fare una cosa del tipo che
quando
> clicco sul bottone pippo, parte un timer che dopo 10 secondi mi apre
> un'altra form pluto.
Devi impostare la proprietą "Intervallo timer" della form che contiene il
pulsante.
Poi devi inserire il codice per aprire la form all'interno dell'evento Timer
del form in questione.
Se devi eseguire questa apertura una sola volta, devi anche ricordarti di
reimpostare a 0 (zero) la proprietą "Intervallo timer" precedentemente
modificata.
> PS: il timer, l'ho impostato a 1000ms con su evento on timer
l'aggiornamento
> dell'orologio.
Ok per l'intervallo timer, ma cosa avresti messo nell'evento timer?
> Si possono mettere due timer in una form?
No.
--
Gabriele Bertolucci
PBsoft
www.pbsoft.it


title: Utilizzo timer

author: omasnc

text:
"Nao" <OOOnaon...@inwind.itOOO> ha scritto nel messaggio
news:212Z159Z223Z113...@usenet.libero.it...
> Nella mia form ho un bottone pippo, vorrei fare una cosa del tipo che
quando
> clicco sul bottone pippo, parte un timer che dopo 10 secondi mi apre
> un'altra form pluto.
> Come posso fare?
>
> PS: il timer, l'ho impostato a 1000ms con su evento on timer
l'aggiornamento
> dell'orologio.
>
> Si possono mettere due timer in una form?
>
> grazie Nadir
Non puoi mettere due timer in una maschera, ma puoi utilizzare il timer di
un'altra maschera che aprirai appositamente, magari tenendola nascosta:
guarda la risposta che ho dato a Giampaolo nel thread "Evento timer" del
29/11/03: è un barbatrucco, ma funziona.
Ciao
Galliano


title: Ricerca su singole caselle combinate e di testo

author: Luigi Corinna

text:
access 97
maschera preventivo
sottomaschera preventivo
in sottomaschera
inserisco le righe preventivo (records) chiamando il codice articolo con il
lettore ottico....bene
ma se in codice articolo o in altri campi che compongono il record vorrei
fare una ricerca di cio che non riesco a trovare in anagrafica articoli...
per esempio digitando le iniziali su uno dei campi far apparire
un dragdop che ha scremato l'anagrafica articoli con l'imput delle iniziali
da me dato.
il record di sottomaschera preventivo e' composto da:
codice_articolo (casella combinata linkata ad anagrafica articoli)
articolo da fornitore (casella testo)
descrizione (casella testo)
ma accontenterei di fare ricerche specifiche su questi e 3 campi....
per poi poter scegliere quello voluto con un semplice clic!!!!
Grazie


author: Emyr

text:


caselle di controllo non associate, evento lostfocus poi puoi usare i
filtri (me.filter) oppure le ricerche (docmd.findrecord)
Saluti.
Emanuele.


title: Invio automatico di e-mail da pulsante.

author: Skorza

text:
Sub SendMailAutomation()

Dim Ol_App As New Outlook.Application
Dim Ol_Item As Outlook.MailItem

Set Ol_Item = Ol_App.CreateItem(olMailItem)

With Ol_Item
     .To = "
destin...@dominio.it
" '
     .subject = "Oggetto del Messaggio"
     .Body = "Questo è il Body o corpo"
     .Attachments.Add "C:\Documents\fichier.jpg"
     .Save
     .send
End With
Set Ol_Item = Nothing
Set Ol_App = Nothing
End Sub

Questo codice messo su un pulsante manda in automatico una mail da MSO,
ma come si trasforma per rendere possibile l'invio tramite il programma
di posta predefinito del sistema (come ad esempio thinderbird)?
Io devo fare esattamente quello che fa questo codice ma usando
thunderbird (se non si era capito ;-).

Grazie per l'aiuto.


title: Invio automatico di e-mail da pulsante.

author: Carlo Costarella

text:
"Skorza" <and...@NOSPAMpettenon.com> ha scritto nel messaggio
news:jgu0u8$o3b$1...@speranza.aioe.org...

Passa a Blat...semplice veloce e gratis.

Ciao, Carlo


title: Invio automatico di e-mail da pulsante.

text:

mi inserisco per chiederti una informazione su questo blat che non ho
mai provato con mano
tempo fa avevo dato un'occhiata sul sito e mi pare che non supporti SSL
ha tuttora questa pecca?

ciao
BFS


title: Invio automatico di e-mail da pulsante.

text:
"BFS" <B...@BFSBFS.it> ha scritto nel messaggio
news:4f33724f$0$1387$4faf...@reader1.news.tin.it...
> Il 08/02/2012 18:50, Carlo Costarella ha scritto:
>> "Skorza"<and...@NOSPAMpettenon.com>  ha scritto nel messaggio
>> news:jgu0u8$o3b$1...@speranza.aioe.org...
cut
> mi inserisco per chiederti una informazione su questo blat che non ho mai
> provato con mano
> tempo fa avevo dato un'occhiata sul sito e mi pare che non supporti SSL
> ha tuttora questa pecca?
>
> ciao
> BFS
>
>

Sì Blat non supporta SSL ma ci sono varie possibilità di aggirare
l'ostacolo.
Qui un esempio:
http://buildmyown.blogspot.com/2011/03/use-blat-with-stunnel-to-send-email-via.html

e qui trovi un suo possibile uso:
http://www.autohotkey.com/forum/topic4486.html

Ciao, Carlo


title: Invio automatico di e-mail da pulsante.

text:

interessante...
grazie
BFS


title: Runtime Access 2003 e avviso di protezione.

author: Maurizio

text:
Ho modificato a "bassa" la protezione per le macro in Access 2003 e creato
l'mde del db (convertito dal formato 2000) per poi creare il pacchetto con
il runtime.
Quando lo vado ad eseguire (ho provato in 2 pc dove Access non era
installato di base) mi compare per primo un fastidiosissimo messaggio di
protezione che mi chiede la conferma di apertura del db in quanto potrebbe
(potrebbe) contenere codice dannoso per il pc.
C'è un sistema per eliminarlo?
Grazie e buona Pasqua a tutti.
Maurizio.


author: madas

text:
avevo chiesto la stessa cosa poco sopra.
ti incollo la risposta..che ho provato e funziona.
----------------------------------------
madas wrote:
 >> Karl Donaubauer wrote:
Con la versione runtime i chiavi del registro sono diversi della
versione completta di Access. È necessario di creare 2 chiavi
nuovi sul registro per uccidere tutti messaggi:
per il livello di sicurezza
\\HKEY_LOCAL_MACHINE\Software\Microsoft\Office\11.0\Access\Security
nuovo chiave: level
valore: #00000001
per il SandboxMode:
\\HKEY_LOCAL_MACHINE\Software\Microsoft\Jet\4.0\Engines
nuovo chiave: SandBoxMode
valore: #00000002
-- HTH Karl ********* Access FAQ:
www.donkarl.com/it
 + CISA1, Arezzo,
4+5/6/2005 la prima Conferenza Italiana per Sviluppatori di Access


text:
"madas" <
a...@ff.com
> ha scritto nel messaggio
> avevo chiesto la stessa cosa poco sopra.
Non me ne ero accorto. E pensare che ci avevo anche guardato!
E' sintomo di cottura avanzata.
>
> ti incollo la risposta..che ho provato e funziona.
> ----------------------------------------
> madas wrote:
>
> >> Karl Donaubauer wrote:
>
> Con la versione runtime i chiavi del registro sono diversi della
> versione completta di Access. Č necessario di creare 2 chiavi
> nuovi sul registro per uccidere tutti messaggi:
>
> per il livello di sicurezza
> \\HKEY_LOCAL_MACHINE\Software\Microsoft\Office\11.0\Access\Security
> nuovo chiave: level
> valore: #00000001
>
> per il SandboxMode:
> \\HKEY_LOCAL_MACHINE\Software\Microsoft\Jet\4.0\Engines
> nuovo chiave: SandBoxMode
> valore: #00000002
>
Grazie, anche se speravo si risolvesse in maniera piů semplice.
Buona Pasqua.
Ciao.


text:
>
> Grazie, anche se speravo si risolvesse in maniera piů semplice.
> Buona Pasqua.
> Ciao.
>
>
purtroppo sembra che sia l'unico modo.
io ho fatto che appena il db si apre la prima volta va a creare le
chiavi in oggetto...pero ovviamente la prima volta quei messaggi li
avrai sempre...mentre dalla seconda apertura in poi non vedrai alcun
messaggio.
in effetti e' un po brutto che un cliente appena apre il db abbia 3
messaggi da leggere..pero dopo quelli non ne avra altri..e poi son pochi
gli utenti che non hanno gia access installato con relativi permessi.
ciao


title: ciclo...

author: Dany

text:
Salve, sono nuova ed ho questo quesito:
devo fare un ciclo di intervalli tra date di una tabella.
Mi spiego:
Data iniziale  Data finale
01.05.05      03.05.05
devo fare una stampa per ciscuno dei giorni che intercorrono tra la data
iniziale e la data finale ovvero prendere: 01.05.05 - 02.05.05 - 03.05.05...
per altre necessità devo anche scomporre in ciascun ciclo la singola
data...ovvero:
giorno=01
mese=05
anno=2005
come indico l'intervallo con il codice ?
per la scomposizione non ho problemi perchè ho usato DATEPART...etc
Mi sono abbastanza incasinata...qualche anima pia mi illumina la strada ?
10x


title: ciclo...

author: Gaspare

text:
"Dany" <
De...@libero.it
> ha scritto nel messaggio
news:429f3e38$0$17091$5fc...@news.tiscali.it...

Ciao,
potrei essere l'anima pia o forse no...lo si può scoprire!
La data insomma da spezzare ha questo formato 01.05.05 o 01/05/05? Da quello
che ti capisco ti rimane questo da risolvere...illuminami altrimenti


title: ciclo...

text:
"Gaspare" <
in...@studioieducation.com
> ha scritto nel messaggio
news:4dHne.973753$b5.42...@news3.tin.it...

>l
a data ha il formato 01/05/2005 per spezzarla ho usato il DATEPART e fin qui
nessun problema.
Il problema è che lo spezzettamento è all'interno di un ciclo che non riesco
a definire ovvero
for....= 01/05/2005 to 03/05/2005


title: ciclo...

text:
"Dany" <
De...@libero.it
> ha scritto nel messaggio
news:429f4174$0$17086$5fc...@news.tiscali.it...

Penso che una soluzione potrebbe essere quella di dterminarsi la differenza
(in termini di giorni) fra la data finale e quella iniziale (limite massimo
da usare come contatore nel ciclo) dopodichè degli array di stringhe per
memorizzare i giorni mesi ed anni estrapolati durante il ciclo
Adesso vediamo un pò...nel frattempo magari arriverà qualche altro consiglio


title: ciclo...

text:
"Gaspare" <
in...@studioieducation.com
> ha scritto nel messaggio
news:gCHne.973887$b5.42...@news3.tin.it...

Un'ultima cosa..determini differenze fra date in 2 mesi diversi? es.
02/06/2005 - 25/0572005


title: ciclo...

text:
[CUT]
Giacchè non mi rispondi...ipotizzando che la differenza fra date viene
determinata nell'ambito dello stesso mese, puoi utilizzare il seguente
codice all'interno del click di un pulsante
Dim cont As Integer
Dim diff As Integer
Dim data(31) As String
Dim mese As String
Dim anno As String
Dim DataInizio As Date
Dim DataFine As Date
DataInizio = "07/05/2005"
DataFine = "10/05/2005"
diff = DateDiff("d", DataInizio, DataFine)
If diff <= 0 Then
   Exit Sub
End If
mese = Mid(DataInizio, 4, 2)
anno = Right(DataInizio, 4)
cont = 1
Do While (cont <= diff)
    data(cont) = "giorno=" & Left(DataInizio, 2) + cont & " mese=" & mese &
" anno=" & anno
    MsgBox data(cont)
    cont = cont + 1
Loop
Notte
Gaspare


title: ciclo...

text:
[CUT]
Ciao,
ti ho sistemato il codice in maniera tale che non sei vincolata dai mesi o
dagli anni...va bene qualunque data di fine o d'inizio purchè ovviamente
l'intervallo sia positivo
Private Sub cmdPulsante_Click()
Dim DataInizio As Date
Dim DataFine As Date
Dim DataSuccessiva As String
Dim Giorno(365) As String
Dim Mese As String
Dim Anno As String
Dim cont As Integer
Dim diff As Integer
DataInizio = "25/12/2005"
DataFine = "07/01/2006"
diff = DateDiff("yyyy", DataInizio, DataFine)
If diff < 0 Then
 MsgBox "Occhio al'anno iniziale e finale"
 Exit Sub
End If
diff = DateDiff("m", DataInizio, DataFine)
If diff < 0 Then
 MsgBox "Occhio al mese iniziale e finale"
 Exit Sub
End If
diff = DateDiff("d", DataInizio, DataFine)
If diff <= 0 Then
    MsgBox "Occhio al giorno finale ed iniziale"
   Exit Sub
End If
cont = 1
Do While (cont <= diff)
DataSuccessiva = DateAdd("d", cont, DataInizio)
Giorno(cont) = Left(DataSuccessiva, 2)
'Qui memorizzi il giorno incrementato di 1 dalla data iniziale
'Es. giorno=26
Mese = Mid(DataSuccessiva, 4, 2)
'Qui memorizzi il Mese
'Es. mese=12
Anno = Right(DataSuccessiva, 4)
'Qui memorizzi l'Anno
'Es anno=2005
MsgBox Giorno(cont) & "/" & Mese & "/" & Anno
cont = cont + 1
Loop
End Sub
---------
Ti ho inviato all'indirizzo email l'esempio...se hai bisogno di qualche
chiarimento non esitare a contattarmi -> "IL SERVIZIO DI HELP DESK E'
GRATUITO DURANTE LE VACANZE" ;-)
Notte
Gaspare


title: ciclo...

text:
"Gaspare" <
in...@studioieducation.com
> ha scritto nel messaggio
news:7RNne.975053$b5.42...@news3.tin.it...

avevo anche trovato un'altra soluzione...ma vorrei anche provare la tua che
mi pare molto + completa.
..ad ogni modo grazie infinite per lo sforzo e la dedizione !
Ciao e grazie


title: ciclo...

author: yronium

text:
> Salve, sono nuova ed ho questo quesito:
> devo fare un ciclo di intervalli tra date di una tabella.
> Mi spiego:
> Data iniziale Data finale
> 01.05.05 03.05.05
> devo fare una stampa per ciscuno dei giorni che intercorrono tra la data
> iniziale e la data finale ovvero prendere: 01.05.05 - 02.05.05 -
03.05.05...
> per altre necessità devo anche scomporre in ciascun ciclo la singola
> data...ovvero:
> giorno=01
> mese=05
> anno=2005
> come indico l'intervallo con il codice ?
> per la scomposizione non ho problemi perchè ho usato DATEPART...etc
se hai già usato il DatePart sei a cavallo
    Dim i As Integer
    For i = DatePart("d", dataInizio) To DatePart("d", dataFine)
        MsgBox "Oggi è il " & i
        ' qui puoi mettere il codice per stampare
    Next i
qs. codice si aspetta una data di inizio con un giorno inferiore di quello
nella data di fine, cioè, non puoi stampare dal 24 aprile al 15 maggio, e
non tiene conto del mese, cioè dal 15 aprile al 25 maggio stampa solo 10
numeri, non 40.
Se hai capito come funziona, te lo puoi modificare a piacere.
Spero di essere stato di aiuto . Ciao
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: ciclo...


title: ciclo...

text:
[CUT]
>>
> avevo anche trovato un'altra soluzione...ma vorrei anche provare la tua
> che mi pare molto + completa.
> ..ad ogni modo grazie infinite per lo sforzo e la dedizione !
> Ciao e grazie
>
>
Di nulla figurati...ci si diverte un pò a scrivere qualche riga di codice!
;-)...


title: ciclo...

author: Roberto dalla campagna

text:
"Dany" <
De...@libero.it
> ha scritto nel messaggio
news:429f3e38$0$17091$5fc...@news.tiscali.it...
> Salve, sono nuova ed ho questo quesito:
> devo fare un ciclo di intervalli tra date di una tabella.
> Mi spiego:
> Data iniziale  Data finale
> 01.05.05      03.05.05
> devo fare una stampa per ciscuno dei giorni che intercorrono tra la data
> iniziale e la data finale ovvero prendere: 01.05.05 - 02.05.05 -
03.05.05...
Il ciclo che ti serve potrebbe essere il seguente:
Dim Pippo As Date
For Pippo = DataIniziale To DataFinale
    ' effetua qui le tue stampe
Next Pippo
> per altre necessità devo anche scomporre in ciascun ciclo la singola
> data...ovvero:
> giorno=01
> mese=05
> anno=2005
> come indico l'intervallo con il codice ?
> per la scomposizione non ho problemi perchè ho usato DATEPART...etc
> Mi sono abbastanza incasinata...qualche anima pia mi illumina la strada ?
> 10x
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: ciclo...

text:
[CUT]
 >>"IL SERVIZIO DI HELP DESK E'
>> GRATUITO DURANTE LE VACANZE" ;-)
Questa è 1 battutaccia delle mie...non farci caso :-)


title: ciclo...

text:
Ciao yronium,
come va? Tutto bene? :-)


title: ciclo...

text:
> Ciao yronium,
> come va? Tutto bene? :-)
abbastanza, grazie



title: ciclo...

author: MA

text:
Dany wrote:
> Salve, sono nuova ed ho questo quesito:
Ti sei già "presentata"

Devi crearti una querydef passare il parametro e lanciare la stampa
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Info:
www.donkarl.com/it


title: ciclo...

author: Pablitomf (Maurizio Facciuti)

text:
>
> Devi crearti una querydef passare il parametro e lanciare la stampa
>
E un Beetween ... And... sulla query ? ;-P


title: ciclo...

text:
Pablitomf (Maurizio Facciuti) wrote:
>> Devi crearti una querydef passare il parametro e lanciare la stampa
>>
>
> E un Beetween ... And... sulla query ? ;-P
Sì, ma la deve sempre ciclare



title: connect e nomi campo di tabelle. AIUTO!

author: Borant

text:
Quando cerco di allegare come tabella un file testo con Visual Basic
tramitre l'istruzione CREATETABLEDEF e successivamente con CONNECT, come
nome del campo mi mette il primo record o riga (dato che è un file testo).
C'è un modo per mettere il nome del campo che si vuole ???
Spero di essere stato chiaro, Aiutatemi !!


title: connect e nomi campo di tabelle. AIUTO!

author: LaLo

text:
"Borant" <
bor...@libero.it
> ha scritto nel messaggio
news:B2Z07.6125$D03.2...@news.infostrada.it...

Come imposti la stringa su 'Connect'? Perchè non utilizzi una specifica di
importazione? (Dovrebbe essere referenziata sulla stringa 'Connect' con
'DSN=<nome della specifica>')
HTH
LaLo


title: scheda PC Wireless

author: Butta

text:
Buona giornata.
Devo installare una scheda di rete Wireless della Belkin modello F5D7001 su
un PC dove ho installato Fedora Core 4.
Nel Cd della scheda non ci sono i driver per Linux.
Sapete aiutarmi?  ....sono un neofila di Linux.
Grazie in anticipo. Butta


title: scheda PC Wireless

text:
scusate ho sbagliato newsgroup :-))))
ore e ore davanti al PC
Succede!!!
Ciao a tutti .... BUTTA
"Butta" <
bu...@allegracompagnia.com
> ha scritto nel messaggio
news:uQkhf.4452$S6.7...@twister2.libero.it...



title: scheda PC Wireless

text:
Butta wrote:
> scusate ho sbagliato newsgroup :-))))
>
> ore e ore davanti al PC
>
> Succede!!!
>
> Ciao a tutti .... BUTTA
Spero che il tuo nick non sia un presagio
>
> "Butta" <
bu...@allegracompagnia.com
> ha scritto nel messaggio
> news:uQkhf.4452$S6.7...@twister2.libero.it...
>> Buona giornata.
>> Devo installare una scheda di rete Wireless della Belkin modello
>> F5D7001 su
>> un PC dove ho installato Fedora Core 4.
>> Nel Cd della scheda non ci sono i driver per Linux.
>>
>> Sapete aiutarmi?  ....sono un neofila di Linux.
>>
>> Grazie in anticipo. Butta
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: confronto apertura tabella ed esecuzione query

author: Renato

text:
mi potete spiegare in quali casi aprire una tabella (di un db Access) e
cercare dentro i dati necessari (con movenext o seek) č piů efficiente di
fare una query Select con le opportune clausole Where?
Grazie


author: Alessandro Romeo

text:
"Renato" <
rsimo...@replay.it
> ha scritto nel messaggio
news:a26sss$bhh$1...@fe1.cs.interbusiness.it...
> mi potete spiegare in quali casi aprire una tabella (di un db Access) e
> cercare dentro i dati necessari (con movenext o seek) è più efficiente di
> fare una query Select con le opportune clausole Where?
> Grazie
>
Dipende da molti fattori uno dei quali può essere la mole di dati trattati e
un 'altro la faciita' di esecuzione di una query.
E.G.
Se dopo avere aperto la tabella devi comunque filtrare i campi ti conviene
fae prima un filtro, esegui la query e non hai appesantito tutto quanto con
una apertura inutile della tabella.
Ciao Alessandro


author: Alessandro

text:
"Alessandro Romeo" <
alessand...@hotmail.com
> wrote in message
news:4CD18.1985$ly.4...@twister1.libero.it...
>
> "Renato" <
rsimo...@replay.it
> ha scritto nel messaggio
> news:a26sss$bhh$1...@fe1.cs.interbusiness.it...
> > mi potete spiegare in quali casi aprire una tabella (di un db Access) e
> > cercare dentro i dati necessari (con movenext o seek) è più efficiente di
> > fare una query Select con le opportune clausole Where?
> > Grazie
> >
>
Probabilmente se la quantità di dati è consistente > 10000 Records conviene
Utilizzare una QRY Parametrica e PASSARE i PARAMETRI con il METODO
PARAMETERS di QUERYDEF....!!!
La cosa forse è ancora più evidente se lavori con un BE condiviso in RETE.
Alessandro.(@Alex)
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: Antonio Biso

text:
Renato <
rsimo...@replay.it
> wrote in message
a26sss$bhh$1...@fe1.cs.interbusiness.it...
> mi potete spiegare in quali casi aprire una tabella (di un db Access) e
> cercare dentro i dati necessari (con movenext o seek) è più efficiente di
> fare una query Select con le opportune clausole Where?
> Grazie
Dipende da quello che vuoi fare
Antonio


title: guadagna con i messaggi sms

author: Fabrizio

text:
il primo servizio operativo al mondo che ti paga
per ricevere la pubblicità sul tuo telefonino
lo trovi su
http://www.freeweb.org/hobby/bonsainet/
http://www.freeweb.org/hobby/bonsainet/


title: Campo testo in tabella che diventa collegamento in query

author: Andrea

text:
Ho una tabella "domini" che nel campo "nome" un elenco di domini web:
pippo.it
,
pluto.com
, ecc.
Ho creato una query di selezione che combina il campo "nome" con del
testo creando così un indirizzo web.
Vorrei che questo campo "indirizzo" sia cliccabile.
Meglio ancora se potessi aprire gli indirizzi così formati in una
pagina nuova.
Mi serve per verificare il posizionamento di siti internet nei motori
di ricerca.
Sto impostando la cosa e posso anche ricominciare se ci sono strade
migliori.
Grazie


text:
"Andrea" <
andrea.a...@imola.nettuno.it
> ha scritto nel messaggio
news:1126712208....@f14g2000cwb.googlegroups.com...
>Ho una tabella "domini" che nel campo "nome" un elenco di domini web:
>
pippo.it
,
pluto.com
, ecc.
>Ho creato una query di selezione che combina il campo "nome" con del
>testo creando cosě un indirizzo web.
>Vorrei che questo campo "indirizzo" sia cliccabile.
Se "l'indirizzo web" lo inserisci in un campo di tipo Collegamento
ipertestuale, quando ci clicchi sopra con il mouse access ti apre la pagine
web relativa; vai perň sull'help e ripassati quale č la struttura dei dati
memorizzati all'interno di un campo di tipo Collegamento ipertestuale.
[CUT]
>Grazie
Prego
Roberto


text:
Non ho capito il tuo consiglio.
L'"indirizzo" non lo scrivo, lo ottengo nella query con una espressione
che combina il "nome" con altre cose.
Il risultato è corretto,ma va copiato e incollato.
Ho provato a partire con un campo Collegamento nella tabella "domini"
ma non riesco a farlo funzionare lo stesso.
Grazie


author: Carlo Costarella

text:
"Andrea" <
andrea.a...@imola.nettuno.it
> ha scritto nel messaggio
news:1126712208....@f14g2000cwb.googlegroups.com...
Ho una tabella "domini" che nel campo "nome" un elenco di domini web:
pippo.it
,
pluto.com
, ecc.
Ho creato una query di selezione che combina il campo "nome" con del
testo creando cosě un indirizzo web.
Vorrei che questo campo "indirizzo" sia cliccabile.
Meglio ancora se potessi aprire gli indirizzi cosě formati in una
pagina nuova.
Mi serve per verificare il posizionamento di siti internet nei motori
di ricerca.
Sto impostando la cosa e posso anche ricominciare se ci sono strade
migliori.
Grazie
In aggiunta a quello che ti ha detto Roberto e se sei obbligato a mantenere
la struttura della tabella, potresti creare una tabella temporanea con un
solo campo tipo "Collegamento ipertestuale".
Dinamicamente accoderai a questa tabella il risultato dell'unione dei due
campi "domini" e "Nome" della tua query.
Ciao, Carlo


text:
"Andrea" <
andrea.a...@imola.nettuno.it
> ha scritto nel messaggio
news:1126715065.6...@g49g2000cwa.googlegroups.com...
>Non ho capito il tuo consiglio.
>L'"indirizzo" non lo scrivo, lo ottengo nella query con una espressione
>che combina il "nome" con altre cose.
>Il risultato è corretto,ma va copiato e incollato.
Forse è corretto se devi memorizzarlo in un campo di tipo testo e non avessi
la necessità di effettuare il collegamento cliccando sul campo o su un
controllo a lui associato. Però è possibile che se non conosci quale sia la
corretta struttura delle infomazioni da memorizzare in un campo di tipo
Collegamento ipertestuale il risultato non sia adatto ad essere memorizzato
in ub campo di tale tipo.
>Ho provato a partire con un campo Collegamento nella tabella "domini"
>ma non riesco a farlo funzionare lo stesso.
Scusami, ma hai poi provato, come ti avevo consigliato, a leggere sull'help
quale sia la corretta struttura dei dati da inserire in un campo di tipo
Collegamento ipertestuale?
>Grazie
Prego
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: macro per esportare dati in odbc

author: ringo

text:
Salve a tutti,
avrei bisogno di esportare delle tabelle in un'origine
dati ODBC....
non sň come scrivere la stringa di connessione ODBC
qualcuno mi puň dare una dritta?
grazie
ringo!


title: Oggetto senza nome

author: Valery From The Mountain

text:
A cosa si riferisce la scritta "oggetto senza nome" in una maschera in
visualizzazione foglio dati sui pulsanti di scorrimento record?


title: Oggetto senza nome

text:
On 17 Mag, 18:00, "Valery From The Mountain" <val...@invalid.inv>
wrote:
> A cosa si riferisce la scritta "oggetto senza nome" in una maschera in
> visualizzazione foglio dati sui pulsanti di scorrimento record?
Hai, per caso, cambiato nome alla tabella in relazione con quella che
stai guardando?
Saluti.


title: Query lenta DK

text:
Ciao a tutti.
Volevo chiedervi secondo voi perchč, una query si fatta con il VBA di
ACCESS e lanciata in una qualsiasi maschera del mio progetto di
ACCESS, risulti lentissima... tempi di attesa pari a circa 3-4 minuti:
SqlStringa = "SELECT Descrizione, Data, " & _
    "SUM(DateDiff(n, OraInizio, OraFine)) As Somma " & _
    "FROM tRicInt, tTipo, tInt, tCon " & _
    "WHERE tRicInt.IDTipo = tTipo.IDTipo AND " & _
    "tRicInt.IDRic = tInt.IDRic AND " & _
    "tInt.IDInt = tCon.IDInt AND " & _
    "DataIntervento >= '" & DataISO & "' " & _
    "GROUP BY Data, Descrizione " & _
    "ORDER BY Data
Rs.Open SqlStringa... ... ...
Utilizzando il QUERY ANALYZER ho scoperto che č corretta perchč la
esegue tranquillamente ed č pure istantanea... č come se ci fosse
qualcosa nel VBA di ACCESS che rallenta l'esecuzione...
Ho scoperto anche che togliendo la SUM la query č veloce...
Sapete dirmi perchč?
Grazie.
Luigi.


title: Query lenta DK

author: Fob

text:
> risulti lentissima... tempi di attesa pari a circa 3-4 minuti:
Dimensioni del database?
Hai indicizzato a dovere?
Ciao
Fob
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Query lenta DK

author: Cinzia

text:
"Igio80" <
igi...@inwind.it
> ha scritto nel messaggio
news:2a3eb988.0412...@posting.google.com...
> Ciao a tutti.
> Volevo chiedervi secondo voi perchè, una query si fatta con il VBA di
> ACCESS e lanciata in una qualsiasi maschera del mio progetto di
> ACCESS, risulti lentissima... tempi di attesa pari a circa 3-4 minuti:
>
> SqlStringa = "SELECT Descrizione, Data, " & _
>     "SUM(DateDiff(n, OraInizio, OraFine)) As Somma " & _
>     "FROM tRicInt, tTipo, tInt, tCon " & _
>     "WHERE tRicInt.IDTipo = tTipo.IDTipo AND " & _
>     "tRicInt.IDRic = tInt.IDRic AND " & _
>     "tInt.IDInt = tCon.IDInt AND " & _
>     "DataIntervento >= '" & DataISO & "' " & _
>     "GROUP BY Data, Descrizione " & _
>     "ORDER BY Data
> Rs.Open SqlStringa... ... ...
>
> Utilizzando il QUERY ANALYZER ho scoperto che è corretta perchè la
> esegue tranquillamente ed è pure istantanea... è come se ci fosse
> qualcosa nel VBA di ACCESS che rallenta l'esecuzione...
>
> Ho scoperto anche che togliendo la SUM la query è veloce...
> Sapete dirmi perchè?
> Grazie.
>
> Luigi.
Ciao Luigi,
una query creata da codice, deve essere passata a sql che la deve
"compilare", "ottimizzare" ed eseguire, probabilmente otterresti risultati
migliori
creando una stored procedure in SQL che accetta un parametro DataIso e
richiamando la stored da vb usando l'oggetto Ado.Command e il metodo
execute.
Già che ci sei potresti anche provare a sostituire le condizioni Where sugli
ID con delle INNER JOIN.
Saluti
Cinzia


title: Query lenta DK

author: Alessandro Cara

text:
> Ho scoperto anche che togliendo la SUM la query č veloce...
> Sapete dirmi perchč?
> Grazie.
invece di togliere la sum prova a togliere la datediff e vedi che succede.
--
a.cara


title: Query lenta DK

author: giorgio rancati

text:
Ciao Igio80
"Igio80" <
igi...@inwind.it
> ha scritto nel messaggio
news:2a3eb988.0412...@posting.google.com...
> Ciao a tutti.
> Volevo chiedervi secondo voi perchè, una query si fatta con il VBA di
> ACCESS e lanciata in una qualsiasi maschera del mio progetto di
> ACCESS, risulti lentissima... tempi di attesa pari a circa 3-4 minuti:
>
[CUT]
>
> Utilizzando il QUERY ANALYZER ho scoperto che è corretta perchè la
> esegue tranquillamente ed è pure istantanea... è come se ci fosse
> qualcosa nel VBA di ACCESS che rallenta l'esecuzione...
La tua query viene valutata ed eseguita da Sql server nello stesso tempo
impiegato da Query Analyzer.
Le differenze di velocità tra i due client (Access e QA) possono essere
dovute al tipo di cursore e alla sua dislocazione (che purtroppo non ci hai
mostrato) quindi al tempo necessario per trasmettere i dati dal server
all'applicazione client.
> Ho scoperto anche che togliendo la SUM la query è veloce...
> Sapete dirmi perchè?
be, perchè non deve fare nessun raggruppamento ne somme. La trovi più veloce
dove ?  in Qa o in Access ?
Ciao Giorgio


title: Stampare fattura

author: Sturmtruppen

text:
Salve a tutti,
Sono un newbie e nonostante avessi un manuale access della jackson non sono
riuscito a risolvere un problemino :-(
Devo stampare su una fattura ed ho semplicemente creato una tabella, una
maschera ed un report di stampa. Infondo alla maschera ho aggiunto un
bottone di comando per la stampa del report.
Problema: Ogni volta che mando in stampa in effetti stampo tutte le fatture.
Cioč se inserisco la fattura 1 e stampo allora stampo solo la fattura 1.
Se inserisco la fattura 2 e stampo allora stampo la fattura 1 e 2.
E cosi via.
Ho letto che devo usare l'azione ApriReport con la condizione WHERE ma non
ci ho capito nulla
Grazie in anticipo a chiunque mi possa dare una mano.
Salve salvino.
Sturmtruppen
--
Provare che ho ragione significherebbe riconoscere che posso aver torto.
Teoria delle fasi di un progetto:
1.Entusiasmo
2.Disillusione
3.Panico
4.Ricerca del colpevole
5.Punizione dell'innocente
6.Gloria ed onori ai non partecipanti
mailto:
mic...@tiscalinet.it
website:
http://web.tiscalinet.it/michant/


title: Stampare fattura

author: Fabio Montagner

text:
>Ho letto che devo usare l'azione ApriReport con la condizione WHERE ma non
>ci ho capito nulla
Questo è quello che inserisco nell'evento "suclick" per stampare il report
selezionando un corso.
Private Sub cmdAttiva_Click()
If Nz(Me.cmbCommessa, 0) > 0 Then
    Dim stDocName As String
    Dim stLinkCriteria As String
    stLinkCriteria = "lng_cnt_corso=" & Me.cmbCommessa
    stDocName = "rptRegistro"
    DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria
Else
    MsgBox "Inserire il corso!", vbOKOnly + vbExclamation
    Exit Sub
End If
Exit_cmdAttiva_Click:
    Exit Sub
End Sub
Me.cmbCommessa è una combobox dove seleziono il corso e quindi passo l'ID
dello stesso
stLinkCriteria è il parametro col quale passo il filtro al report, che
altrimenti mostrerebbe tutti i records (i corsi) presenti.


title: Un problemino e un consiglio...

author: esmal

text:
Salve a tutti ho un piccolo problemino e un consiglio da sottoporre all
vostra attenzione:
1-in una form "a" ho tre campi che eseguono calcoli ma non vengono
visualizzati nella tbl"a" corrispondente.
2-il consiglio: vorrei creare da una form "contratti" un pulsante di comando
che mi fa stampare una fattura che ho preparato in un file excel.
grazie a tutti delle risposte


title: Un problemino e un consiglio...

text:
"esmal" <
es...@tiscalinet.it
> ha scritto nel messaggio
news:9n5b2g$umq$1...@pegasus.tiscalinet.it...
> Salve a tutti ho un piccolo problemino e un consiglio da sottoporre all
> vostra attenzione:
> 1-in una form "a" ho tre campi che eseguono calcoli ma non vengono
> visualizzati nella tbl"a" corrispondente.
Eh! E allora?
> 2-il consiglio: vorrei creare da una form "contratti" un pulsante di
comando
> che mi fa stampare una fattura che ho preparato in un file excel.
>
> grazie a tutti delle risposte
E le domande?
Antonio
P.S.
1) Giusto cosě, ogni volta i calcoli vengono fatti nei controlli (non campi)
della form
2) Preparati una fattura con un report di access!


title: Un problemino e un consiglio...

text:
Antonio Biso <
ch...@etruria.net
> wrote in message
Xhql7.1924$kA5....@news.infostrada.it...

> Chiedo scusa per la poca chiarezza della prima domanda che e': perche' i
calcoli che eseguo nei controlli della maschera non vengono visualizzati
nella tabella corrispondente e come debbo fare per renderli visibili?
Grazie per la prima e la seconda questione.
Ciao.
>
>


title: Un problemino e un consiglio...

text:
"esmal" <
es...@tiscalinet.it
> ha scritto nel messaggio
news:9n79nk$is4$1...@lacerta.tiscalinet.it...
>
> > 1) Giusto così, ogni volta i calcoli vengono fatti nei controlli (non
> campi)
> > della form
> > 2) Preparati una fattura con un report di access!
> >
> > Chiedo scusa per la poca chiarezza della prima domanda che e': perche' i
> calcoli che eseguo nei controlli della maschera non vengono visualizzati
> nella tabella corrispondente e come debbo fare per renderli visibili?
La maschera rappresenta un modo per visualizzare i dati di una tabella. Per
fare questo devi associare la maschera ad un origine record (supponiamo per
semplicità una semplice tabella) e poi i campi della tabella ad una serie di
controlli nella maschera stessa. Se tu metti nella maschera dei controlli
che non sono legati cioè non associati a campi della tabella, i valori che
si scriveranno in essi non verranno salvati nella tabella, ovviamente.
I valori nei controlli non associati possono provenire da espressioni (e in
questo caso si parla di controlli calcolati) i cui operandi possono essere
valori contenuti nei controlli associati e quindi nei campi della tabella.
Il risultato di queste espressioni non verrà salvato nella tabella, perchè
il controllo non è associato ad alcun campo.
MA!!!
Visto che i valori che calcolano l'espressione sono comunque salvate nella
tabella e quindi, in qualunque momento il risultato è calcolabile, NON è
necessario nè consigliabile salvare anche il risultato dell'espressione.
Per visualizzarlo successivamente, basta mettere su una maschera di
consultazione un controllo calcolato contenente la solita espressione che
pesca i dati dai campi della tabella.
Antonio


title: Un problemino e un consiglio...

text:
Antonio Biso <
ch...@etruria.net
> wrote in message
8mGl7.4256$2b5.1...@news.infostrada.it...

> La maschera che utilizzo per immettere dati nella  tabella associata ha
tre espressioni di calcolo,nel dettaglio:
a-calcola interesse;
b-totale importo lire;
c-totale importo euro;
Ovviamente i valori non sono visualizzati nella tabella corrispondente in
quanto non sono associati ai campi della tabella. Ma il mio problema e' che
non visualizzando i risultati non posso costrire ad esempio una query per
una stampa di fatture, oppure stampare in un report la situazione
dettagliata degli importi,ecc.Ho come  hai suggerito creato una maschera di
consultazione per visualizzare il risultato delle espressioni ma il
risultato e' stato deprimente :-(
Sicuramente faccio commetto qualche errore.....
Ciao


title: Un problemino e un consiglio...

text:
"esmal" <
es...@tiscalinet.it
> ha scritto nel messaggio
news:9n7m44$mtm$1...@lacerta.tiscalinet.it...
>
> > Per visualizzarlo successivamente, basta mettere su una maschera di
> > consultazione un controllo calcolato contenente la solita espressione
che
> > pesca i dati dai campi della tabella.
> >
> > Antonio
> >
> > La maschera che utilizzo per immettere dati nella  tabella associata ha
> tre espressioni di calcolo,nel dettaglio:
> a-calcola interesse;
> b-totale importo lire;
> c-totale importo euro;
> Ovviamente i valori non sono visualizzati nella tabella corrispondente in
> quanto non sono associati ai campi della tabella. Ma il mio problema e'
che
> non visualizzando i risultati non posso costrire ad esempio una query per
> una stampa di fatture, oppure stampare in un report la situazione
> dettagliata degli importi,ecc.
Ma chi l'ha detto?!?
Nella query ci puň essere un campo calcolato sulla base degli altri campi
della tabella. E nel report si possono mettere controlli calcolati come si
fa sulle maschere.
select [tab]![a],[tab]![b],"la somma č: " & [a] + [b] as Somma from tab;
Questo č un esempio di query con campo calcolato
=[a]+[b]
e questa č l'espressione da mettere in una casella di testo nel report
Antonio


title: Query

author: sd

text:
Salve a tutti,
avrei la necessità tramite un query di estrarre da una tabella il record
che ha la data più alta...
come posso fare?
grazie
sdamy


title: Query

text:
"sd" <
sd...@tiscalinet.it
> ha scritto nel messaggio
news:a5kpp3$r7n$1...@pegasus.tiscalinet.it...
> Salve a tutti,
>
> avrei la necessità tramite un query di estrarre da una tabella il record
> che ha la data più alta...
Ti serve proprio una query o puoi ovviare con una Dmax da codice?
Antonio


title: Query

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:slmf8.39019$v7.14...@twister1.libero.it...

Anzi, puoi anche farlo con una query con la dmax
Metti come criterio sotto la data
dmax([data];"tuatabella")
Antonio


title: Query

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:xmmf8.39025$v7.14...@twister1.libero.it...

GRAZIE 1000
ciao ciao
sdamy


title: Definizione query su 2 istanze dello stesso file Opzioni

author: William

text:
Egregi,
vorrei capire se il problema è risolvibile in qualche modo, ossia:
Ho una query che viene definita all'apertura di un file mde. Se apro
una seconda volta il file chiedendo di modificare la definizione
(sql)
della query, viene cambiata anche sul primo file aperto.
Esiste un modo affinchè la query venga modificata solo, diciamo,
sull'istanza corrente e non su tutte quelle aperte?
Utilizzo office 2003
Grazie in anticipo


author: Karl Donaubauer

text:
William wrote:
> vorrei capire se il problema � risolvibile in qualche modo, ossia:
> Ho una query che viene definita all'apertura di un file mde. Se apro
> una seconda volta il file chiedendo di modificare la definizione
> (sql) della query, viene cambiata anche sul primo file aperto.
Certo se si tratta dello stesso file.
> Esiste un modo affinch� la query venga modificata solo, diciamo,
> sull'istanza corrente e non su tutte quelle aperte?
>
> Utilizzo office 2003
No.
Potresti solo lavorare con SQL nel codice (esegurlo con Execute ecc.).
Per� come mai hai questa situazione?
Di solito non si apre lo stesso Frontend due volte.
Se non hai diviso l'applicazione, vedi:
 Divisione in Frontend e Backend

www.donkarl.com/it?FAQ1.35
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


text:

Egregio Karl,
grazie per il tuo post.
> Per come mai hai questa situazione?
> Di solito non si apre lo stesso Frontend due volte.
La mia applicazione è divisa, ma è mia abitudine aprire più di una
istanza dello stesso file mde.
Normalmente il progetto gira bene, solo uno ha la particolarità di
usare un sistema di tabelle dinamico (n tabelle per ogni anno), quindi
mi si crea il problema.
Creerò dinamicamente una copia del file mde.
Alla prox.
William


title: [ANCORA] - Richiesta di salvatagfgio record su utente concorrente

author: Giulio Severini

text:
Mi sono accorto di una cosa: Access NON sempre mi chiede se voglio salvare
i dati di un record aperto quando lo modifico...a volte sia volte no,e più
spesso quando aggiorno campi memo.
Ma è una cosa normale, questa? Quali potrebbero essere le cause, a parte
quelle segnalate da Alessandro Cara che non sono in grado di risolvere?
Grazie.
--
Non avere mai pura dei momenti bui perchè, facci caso, anche le stelle
hanno bisogno della notte per brillare.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: MA

text:
Giulio Severini wrote:
> Mi sono accorto di una cosa: Access NON sempre mi chiede se voglio
> salvare i dati di un record aperto quando lo modifico...a volte sia
> volte no,e più spesso quando aggiorno campi memo.
>
> Ma è una cosa normale, questa? Quali potrebbero essere le cause, a
> parte quelle segnalate da Alessandro Cara che non sono in grado di
> risolvere?
>
> Grazie.
Se non hai update tuoi, non te lo chiede MAI
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


text:
> Se non hai update tuoi, non te lo chiede MAI
?
Lo sto usando in questo momento... a volte lo chiede a volte no.
La copia che hai tu e identica alla mia.
A te lo chiede?



text:
Giulio Severini wrote:
>> Se non hai update tuoi, non te lo chiede MAI
>
>
> ?
>
> Lo sto usando in questo momento... a volte lo chiede a volte no.
> La copia che hai tu e identica alla mia.
>
> A te lo chiede?
Bisogna vedere se salva o fallisce



text:
> Bisogna vedere se salva o fallisce
Salva, sto controllando. Ma non ho idea di come impedire questa cosa....



title: Report con controlli riferiti a una maschera

author: Valeria

text:
Ho creato un report che dovrebbe contenente controlli che fanno
riferimento
ad una maschera.
In un controllo(non associato) ho inserito
"=Forms![SELEZ_LIB]![Sottomaschera ENTRATE]![DATA]" e l'ho
posizionato nella sezione corpo del report.
Non capisco perchè sul report compare solo il primo valore del del campo
"DATA" e non l'intera lista come nella
sottomaschera "ENTRATE" impostata a visualizzazione maschere multiple.
Grazie.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
Il 08 Apr 2003, 13:36, "Valeria" <
mai...@tin.it
> ha scritto:
> Ho creato un report che dovrebbe contenente controlli che fanno
> riferimento
> ad una maschera.
> In un controllo(non associato) ho inserito
> "=Forms![SELEZ_LIB]![Sottomaschera ENTRATE]![DATA]" e l'ho
> posizionato nella sezione corpo del report.
> Non capisco perchč sul report compare solo il primo valore del del campo
> "DATA" e non l'intera lista come nella
> sottomaschera "ENTRATE" impostata a visualizzazione maschere multiple.
> Grazie.
Perchč questa sintassi si riferisca al controllo attivato non alla
sottomaschera a cui ti riferisci. Per ottenere ciň che vuoi creati un
sottoreport con la stessa origine della sottomaschera.
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


author: Sergio MAZZA

text:
"Valeria" <
mai...@tin.it
> ha scritto nel messaggio
news:09b9dc4fb78768e62d1...@mygate.mailgate.org...
> Ho creato un report che dovrebbe contenente controlli che fanno
> riferimento
> ad una maschera.
> In un controllo(non associato) ho inserito
> "=Forms![SELEZ_LIB]![Sottomaschera ENTRATE]![DATA]" e l'ho
> posizionato nella sezione corpo del report.
> Non capisco perchè sul report compare solo il primo valore del del campo
> "DATA" e non l'intera lista come nella
> sottomaschera "ENTRATE" impostata a visualizzazione maschere multiple.
> Grazie.
>
>
Non è meglio un sottoreport?
Ciao.
--
Sergio MAZZA


title: Prestazioni ODBC DBF

author: Fumok

text:
Prima di tutti un grazie a chi ultimamente mi sta dando un validissimo
aiuto (chideo cusa, tra gli altri, a Roberto per la mia uttisità, Google è
un ottimo docente).
In un db A2K ho dei collegamenti a delle tabelle DBF (sia DBASE che
VisualFOXPRO) che sono molto corpose. Morale per estrapolare anche poche
righe JET si cucca in locale tutti i dati per poi filtrarli.
Penso che il problema sia essenzialmente che non ho un db server alle
spalle che faccia i lavori pesanti.
Da quello che dice Google penso che una soluzione sia il BDE messo sul
server penso, oppure ci sono altre soluzioni per mettere le ali ai piedi al
mio db A2K?
Ed ancora se un db server non posso usare le query pass-through, vero?
Grazie
--
Fumok
[Toglimi le MUTANDE se vuoi rispondermi]


title: Prestazioni ODBC DBF

author: S. Savoldi

text:
> Da quello che dice Google penso che una soluzione sia il BDE messo sul
> server penso
E cosa cambia?
oppure ci sono altre soluzioni per mettere le ali ai piedi al
> mio db A2K?
Cambiare configurazione: fai girare tutto sul Server utilizzando i servizi
"Terminal Server" di Win 2000 e ai clients andranno solo i segnali video
delle varie sessioni aperte.
> Ed ancora se un db server non posso usare le query pass-through, vero?
XBase e VFPro non sono motori Client-Server.
Ciao.


title: Prestazioni ODBC DBF

text:
"S. Savoldi" <
war...@libero.it
> ha scritto in
news:xQPRa.184979$
Ny5.5...@twister2.libero.it
:
>> Da quello che dice Google penso che una soluzione sia il BDE messo
>> sul server penso
>
> E cosa cambia?
Vero, ho detta una sciocchezza.
> Cambiare configurazione: fai girare tutto sul Server utilizzando i
> servizi "Terminal Server" di Win 2000 e ai clients andranno solo i
> segnali video delle varie sessioni aperte.
Terminal Server potrebbe essere un'idea, ma sto pensando al costo delle
licenze ...
Googlando ho scoperto Advantage Database Server[1], in pratica un db
server pensato per quie vecchi applicativi con gigantesche tabelle DBF.
Ne avete mai sentito parlare? Non ho capito quanto costa la versione
server per NT/2K ...
[1]
http://www.advantagedatabase.com/ADS/default.htm



title: errore su routine automazione Access- Word

text:
Access 2003 / 2010

Buongiorno a tutti, spero mi possiate aiutare a risolvere questo problema.
sto cercando di utilizzare la seguente routine per automatizzare
l'inserimento di alcuni dati di un record corrente in un documento dot di
word,
ma nel lanciare la routine, nella parte della variabile di cui sotto mi da
il seguente errore: errore di compilazione Tipo definito dall'utente non
definito

Dim myApp As Word.Application, myDoc As Word.Document

Ho provato a vedere l'aiuto senza capirci nulla e in rete meno che meno.
Si parla di un'istruzione Type...End Type. Di cosa si tratta.

Mille grazie, Bruno

Private Sub Semestre_DblClick(Cancel As Integer)
Dim myApp As Word.Application, myDoc As Word.Document
Set myApp = CreateObject("Word.Application")
Set myDoc = myApp.Documents.Add("SchedaAdd.dot")

Dim myData As DAO.Database, myRec As DAO.Recordset
Set myData = CurrentDb
Set myRec = Me.Addestramento.Recordset.Clone
'myData.OpenRecordset("SELECT * FROM Tabella WHERE IDValore = X)

myDoc.FormFields("TipoAerom").Result = myRec![TipoAerom]

End Sub


text:
Bruno62 wrote:
> Access 2003 / 2010
> ...
> ma nel lanciare la routine, nella parte della variabile di cui sotto
> mi da il seguente errore: errore di compilazione Tipo definito
> dall'utente non definito
>
> Dim myApp As Word.Application, myDoc As Word.Document.
> ...

Questo codice richiede un riferimento alla libreria di Word.
Cio�, nell'editore di VBA scegli la voce di men�
Strumenti - Riferimenti e aggiungi un riferimento a

Microsoft Word x.x Object Library

dove x.x � la versione.

Per� spesso � meglio di non lavorare con un riferimento, p.e.
se vuoi distribuire l'applicazione ad altri che hanno una versione
diversa di Word. In questo caso puoi usare "Late Binding".
Con questo termine di ricerca dovresti trovare tanti esempi.

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


text:

Come ti ha detto KARL devi accertarti dei Riferimenti... quello che
non capisco è perchè usi CREATEOBJECT se usi EARLYBINDING...?

Normalmente il codice che hai esposto si struttura così quando si
Sviluppa, e lo si fa in EARLYBINDING, per poi modificarlo in
distribuzione definendo gli Oggetti come OBJECT per
passare a LATEBINDING.... ma se si usa EARLY si dichiare l'Oggetto
come NEW ... Oggetto...

Credo tu abbia fatto un pò di confusione ereditando il codice da altri
esempi.

@Alex


text:
E' vero, ho un pocchino di confusione in testa dovuto alla mia scarsissima
conoscenza di VBA, comunque sono riuscito a far funzionare una routine
trovata in rete.

Vi ringrazio amcora per la disponibilit�.

Alla proxima volta.

Ciao, Bruno

[CUT]
Come ti ha detto KARL devi accertarti dei Riferimenti... quello che
non capisco � perch� usi CREATEOBJECT se usi EARLYBINDING...?

Normalmente il codice che hai esposto si struttura cos� quando si
Sviluppa, e lo si fa in EARLYBINDING, per poi modificarlo in
distribuzione definendo gli Oggetti come OBJECT per
passare a LATEBINDING.... ma se si usa EARLY si dichiare l'Oggetto
come NEW ... Oggetto...

Credo tu abbia fatto un p� di confusione ereditando il codice da altri
esempi.

@Alex


title: Caselle combinate collegate in una sottomaschera

author: Pasquale

text:
Salve a tutto il NG ,
   non riesco a collegare il comportamento di due caselle combinate in una
sottomaschera (entrambre facenti riferimento ad una stessa tabella collegata
molti-a-uno con un'altra tabella, ovviamente) perchè dopo avere aperto la
prima casella combinata e avere scelto un valore, la seconda casella
combinata non funziona ossia ACCESS mi chiede di fornirgli il parametro
della query di selezione che ho inserito, come se non vedesse il
[forms]![Sottomaschera].[Combo1] della prima casella combinata dalla
maschera principale aperta (ho cmq già inserito Requery su Combo2 associato
all'evento "after update" di Combo1)
Se invece apro solo la sottomaschera, la query funziona perfettamente e la
seconda casella combinata mi apre solo i valori associati alla prima casella
combinata della sottomaschera.
Come posso fare per risolvere il problema.
Spero di essere stato chiaro. Grazie e a presto. Pasquale.


author: Roberto da casa

text:
"Pasquale" <
psi...@libero.it
> ha scritto nel messaggio
news:77MU6.11825$fG4.4...@news.infostrada.it...

Non è corretto ciò che hai scritto nei criteri della query.
Prova con:
[Forms]![NomeMaschera]![NomeControlloSottomaschera]![Combo1]
Quanto al requery prova con
Me![Combo2].Requery
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: aiuto access: aggregare ogni 10 record

text:
Ciao a tutti.

non riesco a fare questa semplice operazione:
da una tabella in cui ho 90 valori numerici avrei esigenza di effettuare una media ogni 10 record.

Per esempio: sul tabulato seguente ho 90 record e io dovrò fare la media tra i primi 10, poi tra i secondi 10 e cosi via fino ad ottenere dalla mia query 9 valori finali

5112	prima decade
177409	prima decade
194923	prima decade
186569	prima decade
37340	prima decade
7075	prima decade
313440	prima decade
312339	prima decade
309957	prima decade
306326	prima decade
296336	seconda decade
43307	seconda decade
6859	seconda decade
317096	seconda decade
320091	seconda decade
312506	seconda decade
301430	seconda decade
290002	seconda decade
43914	seconda decade
7421	seconda decade
310933	terza decade
313053	terza decade
.....   .....

Grazie mille a chi potrà aiutarmi


title: aiuto access: aggregare ogni 10 record

author: sv

text:
ciro.c...@gmail.com
 ha scritto:

> ......   .....

> Grazie mille a chi potrà aiutarmi

Raggruppa per descrizione e fai la media della parte numerica.

--
sv

--

questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: aiuto access: aggregare ogni 10 record

text:
Ciao e grazie.
Scusami ma mi rendo conto di non essere stato molto chiaro nel mio messaggio precedente. Nella tabella non c'è alcuna descrizione (prima decade, seconda decade ecc. l'ho messe io per far capire il tipo di raggruppamento che desidererei fare). Nella tabella ho solo i valori e le date (che non ho specificato prima)

Volendo riproporre un esempio più esaustivo ecco un nuovo esempio con una tabella più semplice contente la data e un valore numerico. Supponiamo che io volessi fare una media sui primi cinque valori consecutivi, poi sui secondi 5 e poi continuare fino alla fine dei dati disponibili (in verità saranno 90 record totali e quindi 18 medie)

2013-03-01 5
2013-03-02 10
2013-03-03 2
2013-03-04 7
2013-03-05 23 ----> 9,4
2013-03-06 7
2013-03-07 33
2013-03-08 67
2013-03-09 6
2013-03-10 1 ----> 22,8
.....
2013-03-31 4
2013-04-01 9
2013-04-02 11
2013-04-03 12
2013-04-04 41----> 15,4

Alla fine mi piacerebbe che la query mi desse come risultato solo i valori:
9,4
22,8
15,4

Riflettendoci meglio credo che non sia una cosa semplice.... anzi penso non sia realizzabile proprio.

Comunque grazie 1000



title: aiuto access: aggregare ogni 10 record

text:

Ma qual'è il criterio per il raggruppamento? Sempre 5 record? Tutti i record ogni 5 giorni? Altro? Forse sapendolo, qualcosa si può...


title: aiuto access: aggregare ogni 10 record

author: Bruno Campanini

text:
e...@ev-electronicvillage.com
 pretended :

Penso si possa fare anche con una query... ma al momento non mi viene.
Quattro righe di codice VBA non vanno bene?

Bruno


title: aiuto access: aggregare ogni 10 record

text:
e...@ev-electronicvillage.com
 ha scritto:

Aggiungi alla tabella un nuovo campo (di tipo numerico) con cui individui
il raggruppamento. Un cosa di questo tipo:

 2013-03-01 5  1
 2013-03-02 10 1
 2013-03-03 2  1
 2013-03-04 7  1
 2013-03-05 23 1
 2013-03-06 7  2
 2013-03-07 33 2
 2013-03-08 67 2
 2013-03-09 6  2
 2013-03-10 1  2

Potresti utilizzare una combo con i valori da 1 a 18 e associ ad ogni
record il valore preso dalla combo.

Poi raggruppi..



title: Database migliore

author: Giangiacomo Lucà

text:
Ho una domanda da proporre. ho un prg che proddottocon access. attual mente
il file di database č naturalmente access.
Ultimamente ho scoperto che il db di access non permette molte connessioni
contemporaneamente; visto che il prg dovrebbe essere utilizzato in rete con
circa 75 pc  ho pensato di mantenere il prg costruito inaccess e cambiare il
db con uno piů potente e performante. quale db mi consigliate ? ho sentito
parlare di sql server cosa ne pensate?
Il mio scopo č di utilizzare un db buono ma non troppo complesso da
utilizzare.
Ringrazio chiunque possa darmi una mano
giangio