text:
> Su, giù le spade e basta. Forse non vi incontrerete mai, quindi perchè
> accanirsi tanto?
>
> Ciao
> E come sempre a disposizione (come già capitato)
>
> --
> Ciao
> Pablitomf (Maurizio Facciuti)
> Access : Ver.97 - 2K
>
concordo pienamente


title: su tasto destro far uscire form al posto del menu contestuale

author: Sergio MAZZA

text:
"Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
news:cvmrdj$gnh$1...@news.newsland.it...
>
> Dai, su, non iniziamo un altra "STUPIDA" ruffa.
> Non ha senso, quest'intervento, ammettilo.
> E' brutto vedere quest'atteggiamento, e non parlo solo di te ovviamente,
> parlo di chiunque lo tenga. Io, insieme a tanti altri, sono un
> frequentatore di questo NG da tanto, e non mi va di leggere post che non
> siano in armonia con il senso per cui lo stesso NG è stato creato, ovvero
> quello di prestare un utile servizio per utenti che ne hanno bisogno.
>
> Su, giù le spade e basta. Forse non vi incontrerete mai, quindi perchè
> accanirsi tanto?
>
> Ciao
> E come sempre a disposizione (come già capitato)
>
> --
> Ciao
> Pablitomf (Maurizio Facciuti)
> Access : Ver.97 - 2K
>
> ----------------------------------
>
http://www.accessgroup.it/
>
http://www.sitocomune.com/
> ----------------------------------
> Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
> acceso e i piedi nel congelatore statisticamente ha una temperatura media.
Che dici è ora che sguinzaglio i "mastini della guerra"?
Ciao.
--
Sergio MAZZA


author: Pablitomf

text:
Sergio MAZZA ha scritto:
[CUT]
> Che dici è ora che sguinzaglio i "mastini della guerra"?
Booooooonooooooo! :-D (i mastini tienili in gabbia!) ;)
--
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito



title: raggruppamento per data

text:
ho questo problema...
parto subito con esempio:
in un gestionale alberghiero devo visualizzare la disponibilità delle
camere libere e vorrei che la
visualizzazione delle date fosse visualizzata come l'esempio
sottostante
ho queste date
camera1:13-06-07
camera1:14-06-07
camera1:15-06-07
camera1:21-06-07
camera1:22-06-07
camera1:25-06-07
camera2:13-06-07
vorrei visualizzare e chiedo quindi se è possibile,
camera1 disponibile dal13-06-07  al15-06-07, dal 21-06-07  al
22-06-07, 25-06-07
camera2:13-06-07


title: raggruppamento per data

author: Gianluca

text:

Direi di sì, ma premetto che non sapendo come / dove vuoi visualizzare
il risultato cercato ti dò un'indicazione di massima.
Prima di tutto, se l'elenco delle disponibilità lo ottieni con un
recordset, puoi ad ogni loop del recordset verificare se il [giorno
del record n] = [giorno del record n-1] + 1 all'interno dello stesso
mese / anno (ovvero se 14=13+1).
In questo modo puoi costruire una stringa che ti riporta esattamente
ciò che cerchi (ovvero: se la condizione di cui sopra, allora la
stringa sarà: [stringa]=[stringa] & "disponibile dal ... al... ").
Lavoraci un pò, non è così complicato.
Resto sintonizzato, se hai problemi


title: raggruppamento per data

text:

Speravo ci fosse qualcosa di già realizzato.
Ti ringrazio per la delucidazione tempestiva e la tua disponibilità.
L'algoritmo l'avevo già in testa il problema è far interagire l'sql
con il vba per recuperare tale stringa.
Nuovamente ringrazio


title: raggruppamento per data

text:
> Speravo ci fosse qualcosa di già realizzato.
Non in mie mani   : (
> L'algoritmo l'avevo già in testa il problema è far interagire l'sql
> con il vba per recuperare tale stringa.
Non è così problematico: sempre premettendo che non so struttura del
codice, delle tabelle etc, in linea di massima:
1. select di tutti i record per cui non è prevista una prenotazione,
ordinata per camera e data (crescente) e raggruppata per mese
2. inizi a scorrere il recordset e valuti la condizione che ti dicevo,
relativa al n° del giorno
3. con una bella select case costruisci la stringa del risultato da
ottenere, valutando i casi in cui due giorni siano consequenziali o
meno (occhio al salto tra due mesi!)
4. record successivo fino alla fine del recordset
5. mostri la stringa.
Se vuoi una mano in più ricontattami, potremmo lavorare sul db (ehm...
che versione usi? Io sono al 97...)


title: raggruppamento per data

author: DemonMike

text:
Ecco qui: perfettamente testato!
nel caso in cui si abbiano date quali:
01/12/2007
02/12/2007
03/12/2007
07/12/2007
08/12/2007
09/12/2007
il risultato sarà:
dal 01/12/2007 al 03/12/2007; 07/12/2007; dal 08/12/2007 al 09/12/2007
Function concatenaDate(idCamera as Integer) As String
Dim dataIn As Date, dataFi As Date
Dim Rs As New ADODB.Recordset
Dim sql As string
Dim inizio As Boolean
Dim flag As Boolean
    sql = "SELECT data FROM tbPrenotazioni WHERE idCamera=" & idCamera
& " ORDER BY data ASC"
    Rs.Open sql, CurrentProject.Connection, adOpenKeyset,
adLockOptimistic
    concatenaDate = ""
    inizio = False
    flag = False
    Rs.MoveFirst
    While Not Rs.EOF
        If inizio = False Then
            inizio = True
            dataIn = Rs!data
            dataFi = Rs!data
        Else
            If dataFi = Rs!data Then
                dataFi = Rs!data
            ElseIf dataFi = Rs!data - 1 Then
                flag = true
                dataFi = Rs!data
            Else
                If flag = True Then
                    concatenaDate = concatenaDate & "dal " & dataIn &
" al " & dataFi & "; "
                    flag = False
                Else
                    concatenaDate = concatenaDate & dataFi & "; "
                End If
                dataIn = Rs!data
                dataFi = Rs!data
            End If
        End If
        Rs.MoveNext
    Wend
    If dataIn = dataFi Then
        concatenaDate = concatenaDate & dataFi & "; "
    Else
        concatenaDate = concatenaDate & "dal " & dataIn & " al " &
dataFi & "; "
    End If
    Rs.Close
    Set Rs = Nothing
    concatenaDate = left(concatenaDate, Len(concatenaDate) - 2)
End Function


title: TranserText (esportare)

author: Pino

text:
Ho la necessita' di trasportare delle funzionalita' di un db
elefantiaco in un altro db creato appositamente per ospitare quelle
funzioni. Una di queste e' l'esportazione in formato testo di alcune
informazioni. Porto tabelle, query che mi servono insieme al codice
nel nuovo db...tutto bene fin quando deve esportare perche' il codice
del vecchio db prevede una specifica di esportazione
(necessaria)...che non viene riconosciuta nel nuovo db. Ho capito che
la specifica di esportazione e' incorporata nel db ma se io voglio
copiarla e trasferirla in un altro db come posso fare?
Insomma....la specifica di esportazione...dove la trovo? Se e' stata
creata e memorizzata deve trovarsi da qualche parte....


title: TranserText (esportare)

author: Alessandro Cara

text:
Pino ha scritto:
[cut]
> Insomma....la specifica di esportazione...dove la trovo? Se e' stata
> creata e memorizzata deve trovarsi da qualche parte....
msSysIMEXspecs e mSysIMEXColumns (tabelle di sistema)
--
ac


title: Per esperti Oracle-Access performance

author: Davi

text:
Ciao a tutti,
sono un novellino di Access, alle prese con problemi di performance.

Uso un file Access 2010 con tabelle collegate ad un DB Oracle di
fatturazione (che vedo in sola lettura).

Tramite maschera e controlli, l'utente crea delle insert che prelevano
dati da queste tabelle collegate per inserirle in tabelle locali.

Il problema è che le relative SELECT fatte girare su Toad o SQL
Developer impiegano 2-10s per essere eseguite, mentre su ACCESS, con
le tabelle collegate il tempo è di 20-30 minuti.
Da quel che ho capito Access sembra che si scarichi in locale le
tabelle per poi fare la query in locale... per tabelle piccole
andrebbe bene, ma io ho in join una tabella da svariate decine di
milioni di record con se stessa.

C'è qualche trucchetto che posso sfruttare?
In rete ho trovato un bel po' di materiale, ma non una soluzione.
Un'idea, venuta ad altri a quanto ho letto, sarebbe quella di
collegarmi via ADO e inserire tutto in un recordset, da qui poi
copiare il recordset in una tabella attraverso un ciclo. Peccato che
proprio con questo ciclo di "insert" perderei in performance.
Non trovo invece un comando per dire ad access di inserire tutto il
recordset in tabella direttamente, senza ciclare.

Ad oggi l'unico escamotage che ho trovato è quello di far creare su un
altro DB oracle (su cui un collega ha l'utenza in scrittura) una vista
tramite DB link al DB di fatturazione,  io collego questa vista ad
access e faccio le query su questa tabella... guadagno già molto in
velocità, ma aziendalmente sono da evitare "giri" di questo genere fra
DB diversi.

Se potete indirizzarmi verso qualcosa, ve ne sarei grato.


title: Per esperti Oracle-Access performance

text:

Access nn si scarica la tabella in locale e poi esegue la query SE E
SOLO SE non usi funzioni di access per eseguirla...Dipende dal driver
(penso che userai ODBC) ma se può, Jet passa la palla al server per
l'esecuzione della query e si becca solo il recordset risultante. Per
essere sicuro che ciò succeda, sempre usando DAO, utilizza l'insieme
QueryDef per fare una query pass-through. Quella viene lanciata verso
il motore senza che jet ci metta becco. Se usi SQL standard, nessun
dlookup o nz o cose così la deve eseguire. Le performance di solito
sono appena inferiori alle query sul service


title: Per esperti Oracle-Access performance

text:

La query che faccio è abbastanza semplice, ho tolto le funzioni IIF,
CSTR, ad ora restano la funzione Now() e una data scritta con #mm/dd/
yyyy#.
Togliendo Now() e modificando la data in 'dd-mmm-yyyy' riesco
tranquillamente a far girare la query su SQL Developer, solo ad una
velocità di oltre 100 volte maggiore. :(
Sono piuttosto sicuro che si scarichi in locale la tabella, perché il
traffico lan passa da 0 al 20% e ci resta finché non ha completato la
query.

Io oggi compongo la query e la salvo in una variabile stringa, la
eseguo poi con il comando
strSQL=" INSERT INTO " & tblLocale & " SELECT Campo1,Campo2.. FROM " &
tblCOLLEGATA
DoCmd.RunSQL strSQL

Chiedo scusa per l'ignoranza, ma non so cosa sia l'insieme QueryDef
"per fare una query pass-through".
Se hai voglia/tempo puoi dirmi in due parole come procedere?
Su google mi sembra di capire che consista nel creare un recordset e
poi ciclare su questo per inserire i suoi dati in una tabella.

Grazie per la pazienza


title: Per esperti Oracle-Access performance

text:

non usare docmd.runsql ma il metodo execute dell'oggetto database. Il
primo viene eseguito da Access, il secondo da Jet (sembra una
sottigliezza ma è
MOOOLTO diverso!!!!).
Le query pass-through sono query alle quali si è detto di venire
eseguite PER FORZA sul server, senza nessun magheggio da parte del
client. Questro vuol dire che devono essere per forza scritte nel
'dialetto' del server e non del client (per esempio, su SQL server, se
facessi una query PT usando Nz mi darebbe errore. Dovrei usare la
funziono Coalesce, propria del transact SQL). Nn conosco il driver
access-oracle, ma sicuramente permette meno 'magie' di quello access-
SQL server, che si preoccupa di 'tradurre' i vari costrutti quasi in
automatico. Se traffico di rete aumenta, qualcosa succede. Se usi
Now() sicuramente jet esegue robe (nn credo che ci sia dentro Oracle).
Se usi DoCmd sicuramente Access lavora....Prova a step successivi. Fai
una select invece di una insert, conta i record (movelast ->
recordcount) con il tuo SQL. Poi riprova e togli OGNI funzione nativa
di Access (usa delle variabili per applicarle, poi usale nel costrutto
SQL, eventualmente). Vedi subito le eventuali differenze. Tieni conto
che, a seconda del driver, jet tende a delegare il server per le parti
che lui ritiene possa svolgere. Il resto lo fa in locale. Solo se
l'SQL è troppo 'dialettale' o per qualche ragione Jet ritiene che il
server non possa svolgere nulla richiede tutta la tabella. Ma se
lavori bene sono eventualità che non si verificano quasi mai.
Bisognerebbe eliminare in questi casi le funzioni native per quelle
standard (se non ho capito male, tu usi un Format(....). Ecco quella
Oracle non la conosce davvero, quindi non sa cosa farsene. Quindi
lavora Jet. Evitale come la peste!!!!! Butti la data in una variabile
TuaData e usi quella nell'SQL)


title: Per esperti Oracle-Access performance

text:

Per le date mi sono spiegato male, già creo una variabile su cui metto
il valore...
in aggiunta uso Now() come su Oracle userei SYSDATE per tracciare il
momento in cui è stata fatta l'elaborazione.

Ho trovato queste query di cui mi parlavi.

In pratica devo usare questo codice (magari serve ad altri)

        Dim qdfPassThrough As DAO.QueryDef
        Set qdfPassThrough = CreateQueryDef("qrySQLPass")
        qdfPassThrough.Connect =
"ODBC;DSN=ABCD;UID=UTENTE;PWD=PASSWORD"
        qdfPassThrough.SQL = strQuery
        qdfPassThrough.ReturnsRecords = True
        qdfPassThrough.Close

con questo creo la pass through, poi faccio una insert da questa alla
mia tabella locale con
        DoCmd.RunSQL strSQL_Insert

Se ho capito bene, è questo che mi consigliavi di fare.
Devo ancora verificare se funziona... lo sto scrivendo in diretta.

Quanto all'uso del metodo execute al posto di docmd.runsql, non
conosco la differenza, vedo di informarmi.

Per ora ti ringrazio, come vedi Access viene usato molto anche da chi
non ha tutte le conoscenze per fare un buon lavoro, ma è talmente
flessibile che conviene lo stesso fare così con prove ed errori!


title: Per esperti Oracle-Access performance

text:
Innanzitutto grazie!

ancora non ho guardato il DoCmd.RunSQL vs Execute, ma l'altra parte
del problema si è risolta più che bene con il pass through.
dai 30 minuti si è passati a pochi secondi, tempo del tutto
accettabile!

^___^


title: Per esperti Oracle-Access performance

text:

Quindi è evidente che il lavoro sporco lo faceva jet!!!
Togliti il dubbio: via ogni funzione di access/vba (anche Now()) e poi

Dim Dbs as database
Dim StrSql as string

set dbs=currentdb

StrSql="tuaStringaSQL"

dbs.execute StrSql, dbfailonerror+dbseechanges

e confronta i tempi!!!


title: Recupero foto da un foglio Excel

author: Daniele

text:
Un saluto a tutti i partecipanti al NG.
Con una routine vorrei recuperare una foto inserita in un file Excel
(inserita in una cornice) e salvarla in una cartella per una successiva
gestione.
Quali strumenti ho a disposizione ?
Grazie per i suggerimenti.
Ciao - Daniele
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Report Via E-Mail

author: Graziano Franchi (Dal Portatile)

text:
Per favore datemi una riga di codice per madare via e-mail un report.
Il report lo devo salvare in formato snapshot???
PROPRIO NON RIESCO.
GRAZIE MILLE


title: Report Via E-Mail

text:
"Graziano Franchi (Dal Portatile)" <
franchi...@centoservizi.it
> ha
scritto nel messaggio news:8gnle5$bsr$1...@news.IT.net...

DoCmd.SendObject acSendReport, "nomereport", "snapshot format",
"
pincop...@tin.it
", , , "oggetto mail", "testo mail"
ciao Bobbit


title: Accedere componenti nelle sottomaschere

author: Alan Solo

text:
Salve a tutti,
come si fa ad eccedere ad oggetti contenuti in sottomaschere?
se provo cosi'
Forms!Sottomaschera!Oggetto
mi dice che la maschera non esiste o non e' aperta...
qualche suggerimento?
ps: non ho ancora capito la differenza tra "!" e "."
Grazie,
Alan Solo


title: Accedere componenti nelle sottomaschere

author: Federico Luciani

text:

ad esempio
me.sottomaschera.form.oggettonellasottomaschera.setfocus
--
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


title: ot nuovo messaggio per org. ritrovo

author: desio

text:
va benissimo napoli ma se qualcuno un po' più a nord vuol venire magari gli
resta un po troppo lontano io farei centro italia anche la zona di assisi
cortona che si mangia da dio
C' hanno della carne chianina
la fine del mondo
desio


title: ot nuovo messaggio per org. ritrovo

author: Antonio Biso

text:
"desio" <
giscar...@dada.it
> ha scritto nel messaggio
news:3dd29...@news.dada.it...

E di nuovo ritorna in auge l'azienda di Roberto...
Antonio


title: ot nuovo messaggio per org. ritrovo

author: Roberto da casa

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:WQwA9.25778$8E3.7...@twister2.libero.it...

Azienda ????
Comunque è bene che per quest'anno faccia a meno del raduno. ;-)
> Antonio
Ciao
Roberto


title: ot nuovo messaggio per org. ritrovo

text:
Roberto da casa wrote:
[cut]
>
> Comunque è bene che per quest'anno faccia a meno del raduno. ;-)
Ma dai roberto, spero che Biso almeno un risottino in bianco
lo faccia decentemente
--
a.cara


title: ot nuovo messaggio per org. ritrovo

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3DD39235...@blunet.it...

:-)
> --
> a.cara
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: ot nuovo messaggio per org. ritrovo

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3DD39235...@blunet.it...

Un'altra mia specialità è il risottino al salmone, rigorosamente ottenuto
con aggiunta di brodo!!!
Antonio


title: Cerca File

author: LUIGI C.

text:
Buon Giorno ... A97
in una maschera ho la casella di testo associata
chimata [FILE]....bene
posso creare affianco alla casella un pulsante che mi permetta di sfogliare
le mie risorse del pc e selezionare un file (serve solo il nome del file non
l'apertura)....
Grazie
Buona Giornata
Luigi
BARI


title: Cerca File

text:
"LUIGI C." <
luigic...@hotmail.com
> ha scritto nel messaggio
news:M4l6h.6438$mZ5....@tornado.fastwebnet.it...
> Buon Giorno ... A97
Ciao.
> in una maschera ho la casella di testo associata
> chimata [FILE]....bene
>
> posso creare affianco alla casella un pulsante che mi permetta di
> sfogliare
> le mie risorse del pc e selezionare un file (serve solo il nome del file
> non
> l'apertura)....
Nel Sito comune (
www.sitocomune.com
 - Sezione Forms) trovi un paio di
esempi:
6.22 Richiamare la finestra di dialogo per la selezione di un file.
6.5 Richiamare la finestra di dialogo per la selezione di una directory.
> Grazie
Prego.
> Buona Giornata
Anche a te...
> Luigi
>
> BARI
Ciao.
--
Sergio MAZZA


title: Password su db A97

author: mcc

text:
Ho progettato un Db e devo autorizzare 10 utenti con relative password ad
accedere al Db.
Ho consultato su Sito Comune "Esempio Login" ma non mi è molto chiaro, sono
agli inizi.
Avevo pensato di creare una tabella con Utente e Password ma poi come devo
fare ?
Grazie della vostra pazienza.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Password su db A97

text:
"mcc" <
c.me...@libero.it
> ha scritto nel messaggio
news:83Z176Z97Z24Y1...@usenet.libero.it...
>
> Ho progettato un Db e devo autorizzare 10 utenti con relative password ad
> accedere al Db.
> Ho consultato su Sito Comune "Esempio Login" ma non mi è molto chiaro,
sono
> agli inizi.
> Avevo pensato di creare una tabella con Utente e Password ma poi come devo
> fare ?
> Grazie della vostra pazienza.
In alternativa prova ad usare la sicurezza di Access (vedi help): trovi
notizie in merito anche sul Sito Comune, nella Sezione General, nella FAQ di
Cristiano De Pasquale intitolata "Come utilizzare la sicurezza di Access?".
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Query di aggiornamento

author: Roberto Gennari

text:
Come posso fare ad aggiornare un campo di una tabella con valori calcolati
tramite una query di aggregazione visto appena faccio il link fra query e
tabella mi dice che il recordset non è aggiornabile?
Grazie
Roberto
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Query di aggiornamento

author: Emyr

text:
On Wed, 2 Jan 2002 17:10:27 +0000 (UTC), "Roberto Gennari"
<
robb...@inwind.it
> wrote:
>Come posso fare ad aggiornare un campo di una tabella con valori calcolati
>tramite una query di aggregazione visto appena faccio il link fra query e
>tabella mi dice che il recordset non è aggiornabile?
>
prova tramite codice aprendo prima la tabella e poi il recordset e
gestento tu gli spostamenti e l'aggiornamento!
Saluti.
Emanuele.


title: troncamento testo in importazione da excel

author: Ammammata

text:
uso un breve codice per accodare a una tabella i dati che mi arrivano in un
foglio excel

una delle colonne contiene testi di lunghezza superiore a 255 caratteri, a
oggi siamo a un massimo di 339

avevo notato che la procedura mi troncava questi testi a 255, oggi ho
"scoperto" che il campo della tabella temporanea che utilizzo è di tipo
testo, max 255 :)

lo ho cambiato in Memo e ho ripetuto l'operazione:

DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel9, TableName,
MyName, True

...e non cambia nulla, il testo è ancora troncato a 255 caratteri

sorge il dubbio ragionevole che sia DoCmd.TransferSpreadsheet a essere
'bacata', oppure che io abbia dimenticato qualche parametro :/

suggerimenti?

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........


text:
Il giorno Fri 28 May 2021 02:52:38p, *Ammammata* ha inviato su
it.comp.appl.access il messaggio
news:XnsAD38975A1A75Bam...@127.0.0.1
. Vediamo cosa ha
scritto:

> sorge il dubbio ragionevole che sia DoCmd.TransferSpreadsheet a essere
> 'bacata', oppure che io abbia dimenticato qualche parametro :/
>
> suggerimenti?
>

rif.
https://stackoverflow.com/questions/15249753/truncated-data-when-

importing-from-excel-to-an-access-memo-field

la colpa è dell'*intelligente* Access che dopo aver letto 8 righe tira a
indovinare sui tipi di campo da importare

nota bene: suggeriscono di passare attraverso una tabella temporanea
correttamente predisposta, cosa che io HO FATTO, ma senza esito positivo



title: OT: sondaggio europeo

author: Ettore Manara

text:
Magari a qualcuno interessa esprimere un'opinione.
http://evote.eu2003.gr/evote/(cu5dw345lea3mh30o55rvwvu)/start.aspx?poll=2
Saluti.


title: OT: sondaggio europeo

text:


carino....
Saluti.
Emanuele.


title: RE -RIBA

author: CLASSEX

text:
Grazie a chi ha risposto. Chiarisco che sono alquanto sicuro che il formato
sia standardizzato e
grazie ad un programma in mio possesso posso generare il file testo.
Purtroppo questo programma
è criptato e quindi non posso vederneil codice. Insomme quello di cui sono
in possesso è il file testo finale da cui ho dedotto quali sono i campi
necessari.
Il tracciato dovrebbe essere
1234567890123456789012345678901234567890123456789012345678901234567890123456
78901234567890123456789012345678901234567890123
(centotrentatrecaratteri)in cui vanno "incastrati" i campi della tabella.
Le mie domande sono:
1)Come faccio a dire che il campo 'campo1' inizia dalla posizione X,finisce
alla posizione Y e che per gli spazi eventualmente vuoti deve metterci un
determinato carattere o segno?
2)Tra le altre peculiarità c'è da convertire la data da formato qualsiasi a
formato GGMMAA senza barre e senza spazi, ma come si fa?
Penso che se qualche brava persona mi fornisce tali informazioni saprò
creare e postare lo script VB su questo Newsgroup.
Se qualcuno volesse scrivermi:
cla...@galactica.it
--
------------------------------
Timeo Danaos et dona ferentes (Virgilio)
------------------------------


title: RE -RIBA

author: bobbit

text:
CLASSEX <
CLA...@galactica.it
> wrote in message
8t3d7o$chk$1...@nslave3.tin.it...

Studiati un po' di funzioni su stringhe come left right mid trim le trovi
sull'help
Ciao Bobbit


title: RE -RIBA

author: Sib

text:
"CLASSEX"
> Grazie a chi ha risposto. Chiarisco che sono alquanto sicuro che il
formato
> sia standardizzato e
> grazie ad un programma in mio possesso posso generare il file testo.
> Purtroppo questo programma
> è criptato e quindi non posso vederneil codice.
Ma che c'entra il programma criptato.
Ma secondo te che ci vuole a esportare/importare da Access in formanto
testo?
Te lo fa perfino l'autocomposizione.
> Insomme quello di cui sono
> in possesso è il file testo finale da cui ho dedotto quali sono i campi
> necessari.
> Il tracciato dovrebbe essere
>
1234567890123456789012345678901234567890123456789012345678901234567890123456
> 78901234567890123456789012345678901234567890123
> (centotrentatrecaratteri)in cui vanno "incastrati" i campi della tabella.
Scusa anche questo appunto, ma questo non e' un tracciato record, un
tracciato record e', ad es., questo:
Inizio        Lunghezza        Tipo        Nome
1                10                    Testo        Cognome
11               6                     Testo        Conto Corrente
ecc ecc
> Le mie domande sono:
>
> 1)Come faccio a dire che il campo 'campo1' inizia dalla posizione
X,finisce
> alla posizione Y e che per gli spazi eventualmente vuoti deve metterci un
> determinato carattere o segno?
>
> 2)Tra le altre peculiarità c'è da convertire la data da formato qualsiasi
a
> formato GGMMAA senza barre e senza spazi, ma come si fa?
>
> Penso che se qualche brava persona mi fornisce tali informazioni saprò
> creare e postare lo script VB su questo Newsgroup.
Come ti dicevo, non hai alcun bisogno di "script".
L'autocomposizione importazione dati ti consente di fare tutto in modo
visuale e perfino di salvare le impostazioni per future importazioni.
Ciao, Sib


title: RE -RIBA

author: eliop

text:
On Tue, 24 Oct 2000 09:28:24 +0200, "CLASSEX" <
CLA...@galactica.it
>
wrote:
>Grazie a chi ha risposto. Chiarisco che sono alquanto sicuro che il formato
>sia standardizzato e
>grazie ad un programma in mio possesso posso generare il file testo.
>Purtroppo questo programma
>č criptato e quindi non posso vederneil codice. Insomme quello di cui sono
>in possesso č il file testo finale da cui ho dedotto quali sono i campi
>necessari.
>Il tracciato dovrebbe essere
>1234567890123456789012345678901234567890123456789012345678901234567890123456
>78901234567890123456789012345678901234567890123
>(centotrentatrecaratteri)in cui vanno "incastrati" i campi della tabella.
>
Il formato del file e' standardizzato:
Ogni RIBA e' formata da almeno 7 record di 120 caratteri ciascuno
nel seguente ordine:
record tipo 14
record tipo 20
record tipo 30
record tipo 40
record tipo 50
record tipo 51
record tipo 70
Ad esempio, il record tipo 14 e' fatto cosi':
posizione 2-3  TIPO RECORD
posizione 4-8  CODICE MITTENTE
posizione 9-13 CODICE DESTINATARIO
posizione 14-19 DATA CREAZIONE
posizione 20-39 NOME SUPPORTO (nome del file)
posizione 40-45 RIFERIMENTO (campo a disposizone del mittente)
posizione  114 CODICE DIVISA (lire o euro)
tutte le altre posizioni vanno riempite a blank
L'insieme delle RIBA viene fatto precedere da un record di "testata"
e seguire da un record di "coda" di 120 caratteri ciascuno.
Alla fine, il file risulta costituito cosi':
record di testa
riba 1
riba 2
riba 3
riba 4
riba N
record di coda
Per i dettagli dei tracciati record, qualsiasi banca
puo' fornirti la documentazione necessaria.
Tieni presente che le banche  tendono
a favorire l'utilizzo di procedure di comunicazione elettronica
e forniscono assistenza telefonica ai programmatori che sviluppano
queste procedure e sono disponibili anche ad una
fase di test della tua procedura.
(Nel mio caso i CED di CARIPLO e BPM si sono mostrati
disponibilissimi)
Ciao. ElioP.


title: RE -RIBA

text:
Grazie !
M'ero desmentegato di MID$
--
------------------------------
Timeo Danaos et dona ferentes (Virgilio)
------------------------------
"bobbit" <
bobbit...@wappi.com
> ha scritto nel messaggio
news:0JbJ5.7148$3K3.2...@news.infostrada.it...
>
>
> CLASSEX <
CLA...@galactica.it
> wrote in message
> 8t3d7o$chk$1...@nslave3.tin.it...
> > Grazie a chi ha risposto. Chiarisco che sono alquanto sicuro che il
> formato
> > sia standardizzato e
> > grazie ad un programma in mio possesso posso generare il file testo.
> > Purtroppo questo programma
> > è criptato e quindi non posso vederneil codice. Insomme quello di cui
sono
> > in possesso è il file testo finale da cui ho dedotto quali sono i campi
> > necessari.
> > Il tracciato dovrebbe essere
> >
>
1234567890123456789012345678901234567890123456789012345678901234567890123456
> > 78901234567890123456789012345678901234567890123
> > (centotrentatrecaratteri)in cui vanno "incastrati" i campi della
tabella.
> >
> > Le mie domande sono:
> >
> > 1)Come faccio a dire che il campo 'campo1' inizia dalla posizione
> X,finisce
> > alla posizione Y e che per gli spazi eventualmente vuoti deve metterci
un
> > determinato carattere o segno?
> >
> > 2)Tra le altre peculiarità c'è da convertire la data da formato
qualsiasi
> a
> > formato GGMMAA senza barre e senza spazi, ma come si fa?
> >
> > Penso che se qualche brava persona mi fornisce tali informazioni saprò
> > creare e postare lo script VB su questo Newsgroup.
> >



title: sendkeys e Vista

text:
Salve,
come monti (credo) ho riscontrato il problema dell'istruzione SendKeys
in ambiente Windows Vista. Ho provato anche a utilizzare la nota
funzione fsendkeys che si trova in giro ma nulla cambia, si ottiene
sempre Error 70 autorizzazione negata.
Qualcuno sa se esiste inl modo per eliminare il problema?
Grazie. Saluti
Roberto


title: sendkeys e Vista

author: Carlo Costarella

text:
<
rmo...@teaminf.com
> ha scritto nel messaggio
news:1175855281.0...@n76g2000hsh.googlegroups.com...

Sì. Torna a Xp!
Vista si stà rivelando un prodotto buono solo per acquista il suo primo
pc...
Credo comunque che il tuo problema possa risolversi con le giuste
autorizzazioni. Vista disabilita di default l'account administrator.
Ciao, Carlo


title: sendkeys e Vista

text:
On 6 Apr, 13:31, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> <
rmo...@teaminf.com
> ha scritto nel messaggionews:1175855281.0...@n76g2000hsh.googlegroups.com...

Si...il problema è ke ho in giro centinaia di licenze di questo
software......piccolo ma importante particolare e non sono io
(putroppo) a decidere is OS del cliente. Cmq concordo con quanto detto
su Vista....veramente pessimo.
Saluti


title: sendkeys e Vista

author: Bruno Campanini

text:
<
rmo...@teaminf.com
> wrote in message
news:1175870836.2...@p77g2000hsh.googlegroups.com...
On 6 Apr, 13:31, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
Si...il problema č ke ho in giro centinaia di licenze di questo
software......piccolo ma importante particolare e non sono io
(putroppo) a decidere is OS del cliente. Cmq concordo con quanto detto
su Vista....veramente pessimo.
Da me (Vista Ultimate, Office 2007) SendKeys funziona
regolarmente.
Login come utente amministratore ma non come Administrator.
Bruno


title: sendkeys e Vista

author: Sergio MAZZA

text:
<
rmo...@teaminf.com
> ha scritto nel messaggio news:1175855281.0...@n76g2000hsh.googlegroups.com...

Come mai utilizzi la sendkeys?
Magari c'è un'altra possibilità...
Ciao.
--
Sergio MAZZA


title: Formato Data.............

author: Gianni B

text:
Salve ragazzi ho bisogno in una casella di testo di visualizzare il Giorno
,mese anno in questo modo.....
"Giovedi',20 Marzo 2003",beh dite voi risolvi cosi:=Format(Date();"Data
estesa") bene funziona,ma se devo cambiare la data manualmente è un casino
non me lo accetta........
In sostanza vorrei poter cambiare la data ma non il formato.......non so se
mi sono spiegato.......
il controllo calendario per l'immissione data funziona su questo
formato..?!?
Qualsiasi consiglio è bene accetto....
Grazie 1000
--
Gianni B.
--
Gianni B.


title: Formato Data.............

text:
"Gianni B" <
gian...@bluewin.ch
> ha scritto nel messaggio
> Salve ragazzi ho bisogno in una casella di testo di visualizzare il Giorno
> ,mese anno in questo modo.....
> "Giovedi',20 Marzo 2003",beh dite voi risolvi cosi:=Format(Date();"Data
> estesa") bene funziona,ma se devo cambiare la data manualmente è un casino
> non me lo accetta........
non avrei affatto detto cosi'.
usa la proprieta' formato del controllo per formattare la data (ricorda
pero' di inserirla nel formato data in cifre quando la modifichi)
Sib


title: Formato Data.............

text:
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:dlsea.31856$7y3.1...@twister1.libero.it...

Scusa,prima di tutto grazie della tua rispota ma puoi essere + preciso
..magari con un esempio?!?
Scusa la mia ignoranza è grazie...
--
Gianni B.


title: Utilizzo delle Maiuscole all'apertura dell'applicazione

author: Liano Amato

text:
Salve a tutti gli amici del newsgroup,
domanda sicuramente banale (per non dire cret...na),  ma vorrei che la mia
applicazione in Access all'apertura utilizzasse sempre le lettere Maiuscole:
c'è un modo dove imporre tale configurazione, modificando il
file-applicazione e non i settaggi di Access.
In alcuni post trovati con google ho visto esempi di case-sensitive, di
prima lettera maiuscola, ecc., solo in un post si parlava della funzione
Sendkeys ("{Caplock}"), ho provato ad immetterla nell'evento "su apertura"
delle Proprietà della prima maschera , ma mi da errore: sarà forse un
problema di errore digitazione, visto che nemmeno l'help di Access mi aiuta;
inoltre se questo è il comando, devo immetterlo nella prima maschera di
apertura o dove?
Grazie ancora, scusatemi e saluti a tutto il gruppo.
--
Liano


author: ciroteo

text:
"Liano Amato" <
liano...@libero.it
> ha scritto nel messaggio
news:L76hc.12571$Qc.5...@twister1.libero.it...

Mi vengono in mente 2 o 3 ipotesi ma confesso di non aver bene capito cosa
tu voglia fare....
Potresti usare la funzione Ucase, che converte ( o normalizza?) i caratteri
inseriti in maiuscolo.
Oppure potresti usare la maschera di input controllo per controllo e settare
il valore a > (in tal modo vedrai solo i dati in maiuscolo ma non verranno
memorizzati in maiuscolo.)
Se poi la tua domanda si riferiva al fatto di voler creare maschere e
controlli in essa contenuti (etichette, caselle ti testo ecc.. ) tutte in
maiuscolo forse conviene creare un modello nuovo con i controlli in
maiuscolo e usarlo per ogni nuova maschera con  la formattazione automatica.


author: Roberto da casa

text:
"Liano Amato" <
liano...@libero.it
> ha scritto nel messaggio
news:L76hc.12571$Qc.5...@twister1.libero.it...

Devi solo scrivere correttamente l'istruzione SendKeys, ovvero:
SendKeys "{CAPSLOCK}"
A questo punto va bene inserire questa riga di codice VBA a fronte
dell'evento "Su apertura" di una maschera che farai aprire all'apertura del
database.
Non è poi giusto dire che nell'help di Access non cìè un aiuto per risolvere
il tuo problema; è sufficiente leggere cosa dice l'help circa la Istruzione
SendKeys: io per risponderti sono proprio andato a leggere cosa diceva
l'help in linea.
> --
>
> Liano
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:tD6hc.12633$Qc.5...@twister1.libero.it...

Salve,
per rispondere a Roberto (spero di quotare correttamente...):
> Devi solo scrivere correttamente l'istruzione SendKeys, ovvero:
>
> SendKeys "{CAPSLOCK}"
>
> A questo punto va bene inserire questa riga di codice VBA a fronte
> dell'evento "Su apertura" di una maschera che farai aprire all'apertura
del
> database.
>
purtroppo ho utilizzato il comando sia sull'apertura della prima maschera e
su tutte le maschere del database, variando anche l'evento oltre all'
"apertura", ma non succede nulla;
> Non è poi giusto dire che nell'help di Access non cìè un aiuto per
risolvere
> il tuo problema; è sufficiente leggere cosa dice l'help circa la
Istruzione
> SendKeys: io per risponderti sono proprio andato a leggere cosa diceva
> l'help in linea.
io ho utilizzato l'help di access, indicando come parametro SendKeys, ma mi
ha dato 8 risultati, tra cui "Azione InviaTasti",  "Funzione DoEvents",
"Assegnare a un tasto un'azione o un set di azioni", ecc... ma niente che
riguardi appunto SendKeys, utilizzo Access 2003... boh !!!!
Per rispondere a Ciroteo:
> Potresti usare la funzione Ucase, che converte ( o normalizza?) i
caratteri
> inseriti in maiuscolo.
> Oppure potresti usare la maschera di input controllo per controllo e
settare
> il valore a > (in tal modo vedrai solo i dati in maiuscolo ma non verranno
> memorizzati in maiuscolo.)
Ho letto un po di help sul comando UCase ed, associato alla funzione >,
potrebbe fare al mio caso ma non ho capito bene dove bisogna inserirlo; in
realtà volevo, più semplicemente, che all'apertura del database la tastiera
si predisponesse automaticamente nella modalità di scrittura in caratteri
Maiuscoli, senza dovere giocoforza utilizzare sempre il "CapsLock", tipo la
soluzione ipotizzata da Roberto.
Grazie e scusatemi ancora.
Saluti
Liano


text:
"Liano Amato" <
liano...@libero.it
> ha scritto nel messaggio
news:8Yahc.13169$Qc.5...@twister1.libero.it...

> Salve,
> per rispondere a Roberto (spero di quotare correttamente...):
>
> > Devi solo scrivere correttamente l'istruzione SendKeys, ovvero:
> >
> > SendKeys "{CAPSLOCK}"
> >
> > A questo punto va bene inserire questa riga di codice VBA a fronte
> > dell'evento "Su apertura" di una maschera che farai aprire all'apertura
> del
> > database.
> >
>
> purtroppo ho utilizzato il comando sia sull'apertura della prima maschera
e
> su tutte le maschere del database, variando anche l'evento oltre all'
> "apertura", ma non succede nulla;
A mio avviso non scrivi correttamente l'istruzione SendKeys; per scrupolo ho
provato la soluzione che ti ho proposto ed a me funziona egregiamente.
Non sono in grado di ipotizzare altro.
>
> > Non è poi giusto dire che nell'help di Access non cìè un aiuto per
> risolvere
> > il tuo problema; è sufficiente leggere cosa dice l'help circa la
> Istruzione
> > SendKeys: io per risponderti sono proprio andato a leggere cosa diceva
> > l'help in linea.
>
> io ho utilizzato l'help di access, indicando come parametro SendKeys, ma
mi
> ha dato 8 risultati, tra cui "Azione InviaTasti",  "Funzione DoEvents",
> "Assegnare a un tasto un'azione o un set di azioni", ecc... ma niente che
> riguardi appunto SendKeys, utilizzo Access 2003... boh !!!!
A me ricercando sull'help Istruzione SendKeys mi restituisce un solo
argomento in cui spiega cosa è tale istruzione e come usarla con tanto di
esempi.
Io uso Access 97.
[CUT]



text:
"Liano Amato" <
liano...@libero.it
> ha scritto nel messaggio
news:8Yahc.13169$Qc.5...@twister1.libero.it...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:tD6hc.12633$Qc.5...@twister1.libero.it...
> >
> > "Liano Amato" <
liano...@libero.it
> ha scritto nel messaggio
> > news:L76hc.12571$Qc.5...@twister1.libero.it...
> > > Salve a tutti gli amici del newsgroup,
> > > domanda sicuramente banale (per non dire cret...na),  ma vorrei che la
> mia
> > > applicazione in Access all'apertura utilizzasse sempre le lettere
> > Maiuscole:
> > > c'è un modo dove imporre tale configurazione, modificando il
>
> Per rispondere a Ciroteo:
>
> > Potresti usare la funzione Ucase, che converte ( o normalizza?) i
> caratteri
> > inseriti in maiuscolo.
> > Oppure potresti usare la maschera di input controllo per controllo e
> settare
> > il valore a > (in tal modo vedrai solo i dati in maiuscolo ma non
verranno
> > memorizzati in maiuscolo.)
>
> Ho letto un po di help sul comando UCase ed, associato alla funzione >,
> potrebbe fare al mio caso ma non ho capito bene dove bisogna inserirlo; in
> realtà volevo, più semplicemente, che all'apertura del database la
tastiera
> si predisponesse automaticamente nella modalità di scrittura in caratteri
> Maiuscoli, senza dovere giocoforza utilizzare sempre il "CapsLock", tipo
la
> soluzione ipotizzata da Roberto.
>
> Grazie e scusatemi ancora.
>
> Saluti
>
> Liano
Ucase suppongo operi dopo che tu hai compilato i campi . Per esempio io lo
utilizzo nei record o in maschere solo di consultazione, oppure converto
tramite la funzione opposta (LCASE) dati provenienti dal programma paghe che
ha di default
in maiuscolo tutti i caratteri.
Credo che tu possa convertire il dato inserito sull'evento lost focus (su
disattivazione) del controllo cioè al passaggio da un campo all'altro.
Il segno > va messo nella maschera di input di ciascun controllo, ma come ti
ho detto è solo una visualizzazione il dato non viene memorizzato nella
tabella in maiuscolo.


text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:svdhc.13490$Qc.5...@twister1.libero.it...

Ciao ragazzi,
> A me ricercando sull'help Istruzione SendKeys mi restituisce un solo
> argomento in cui spiega cosa è tale istruzione e come usarla con tanto di
> esempi.
> Io uso Access 97.
>
io utilizzo Access 2003, impostato con il database per il 2000 (prima avevo
quella versione) e non mostra nulla nell'help; comunque a me interessa che
l'applicativo apra con il CapsLock inserito, i dati già sono tutti immessi
in maiuscolo, quindi è superfluo utilizzare UCase.
Quindi ho immesso il comando SendKeys "{CAPSLOCK}" all'evento "su apertura"
delle proprietà della prima maschera in questo modo (copio ed incollo):
Private Sub Form_Open(Cancel As Integer)
SendKeys "{CAPSLOCK}"
End Sub
quando però eseguo l'apertura della sopraccitata maschera, noto solo che c'è
un leggero lampeggio della lucina della tastiera "Num Lock" (per una volta,
ripeto il Num Lock, non il Caps Lock), ma di fatto resta tutto uguale. Non è
che per caso nella versione 2003 di Access abbiano disabilitato questa
possibilità?
Grazie ancora e saluti.
Liano


text:
"ciroteo" <
cir...@libero.it
> ha scritto nel messaggio
news:c657s7$9a4$1...@hulme.interac.it...

Salve,
ho di nuovo cercato tra il web per trovare una soluzione e finalmente l'ho
trovata, ovvero nell'evento "su apertura" inserisco questo codice:
Set WshShell = CreateObject("WScript.Shell")
   WshShell.SendKeys "{CAPSLOCK}"
in effetti funziona egregiamente, ma con un problema, ovvero se già c'è il
CapsLock inserito, all'apertura del database lo disinserisce....
C'è un codice da aggiungere affinché il database ignori il comando se il
CapsLock è già inserito?
Grazie ancora
Liano


text:
"Liano Amato" <
liano...@libero.it
> ha scritto nel messaggio
news:sXvhc.138689$Kc3.4...@twister2.libero.it...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:svdhc.13490$Qc.5...@twister1.libero.it...
> >
> > "Liano Amato" <
liano...@libero.it
> ha scritto nel messaggio
> > news:8Yahc.13169$Qc.5...@twister1.libero.it...
> > >
> > > "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> > > news:tD6hc.12633$Qc.5...@twister1.libero.it...
> > > >
> > > > "Liano Amato" <
liano...@libero.it
> ha scritto nel messaggio
> > > > news:L76hc.12571$Qc.5...@twister1.libero.it...
> > > > > Salve a tutti gli amici del newsgroup,
> > > > > domanda sicuramente banale (per non dire cret...na),  ma vorrei
che
> la
> > > mia
> > > > > applicazione in Access all'apertura utilizzasse sempre le lettere
> > > > Maiuscole:
> > > > > c'č un modo dove imporre tale configurazione, modificando il
> > > > > file-applicazione e non i settaggi di Access.
> > > > > In alcuni post trovati con google ho visto esempi di
case-sensitive,
> > di
> > > > > prima lettera maiuscola, ecc., solo in un post si parlava della
> > funzione
> > > > > Sendkeys ("{Caplock}"), ho provato ad immetterla nell'evento "su
> > > apertura"
> > > > > delle Proprietą della prima maschera , ma mi da errore: sarą forse
> un
> > > > > problema di errore digitazione, visto che nemmeno l'help di Access
> mi
> > > > aiuta;
> > > > > inoltre se questo č il comando, devo immetterlo nella prima
maschera
> > di
> > > > > apertura o dove?
> > > > >
> > > > > Grazie ancora, scusatemi e saluti a tutto il gruppo.
> > > >
> > > > Devi solo scrivere correttamente l'istruzione SendKeys, ovvero:
> > > >
> > > > SendKeys "{CAPSLOCK}"
> > > >
> > > > A questo punto va bene inserire questa riga di codice VBA a fronte
> > > > dell'evento "Su apertura" di una maschera che farai aprire
> all'apertura
> > > del
> > > > database.
> > > >
> > > > Non č poi giusto dire che nell'help di Access non cģč un aiuto per
> > > risolvere
> > > > il tuo problema; č sufficiente leggere cosa dice l'help circa la

> > > > Non č poi giusto dire che nell'help di Access non cģč un aiuto per
> > > risolvere
> > > > il tuo problema; č sufficiente leggere cosa dice l'help circa la
> > > Istruzione
> > > > SendKeys: io per risponderti sono proprio andato a leggere cosa
diceva
> > > > l'help in linea.
> > >
> > > io ho utilizzato l'help di access, indicando come parametro SendKeys,
ma
> > mi
> > > ha dato 8 risultati, tra cui "Azione InviaTasti",  "Funzione
DoEvents",
> > > "Assegnare a un tasto un'azione o un set di azioni", ecc... ma niente
> che
> > > riguardi appunto SendKeys, utilizzo Access 2003... boh !!!!
> >
> > A me ricercando sull'help Istruzione SendKeys mi restituisce un solo
> > argomento in cui spiega cosa č tale istruzione e come usarla con tanto
di
> > esempi.
> > Io uso Access 97.
> >
> > [CUT]
> >
> > --
> > Roberto
> >
> > ---------------------------------------------
> > il Sito Comune di it.comp.appl.access:
> >
http://www.sitocomune.com
> > ---------------------------------------------
> >
> >
>
> Ciao ragazzi,
>
> > A me ricercando sull'help Istruzione SendKeys mi restituisce un solo
> > argomento in cui spiega cosa č tale istruzione e come usarla con tanto
di
> > esempi.
> > Io uso Access 97.
> >
>
> io utilizzo Access 2003, impostato con il database per il 2000 (prima
avevo
> quella versione) e non mostra nulla nell'help; comunque a me interessa che
> l'applicativo apra con il CapsLock inserito, i dati gią sono tutti immessi
> in maiuscolo, quindi č superfluo utilizzare UCase.
> Quindi ho immesso il comando SendKeys "{CAPSLOCK}" all'evento "su
apertura"
> delle proprietą della prima maschera in questo modo (copio ed incollo):
>
> Private Sub Form_Open(Cancel As Integer)
> SendKeys "{CAPSLOCK}"
> End Sub
>
> quando perņ eseguo l'apertura della sopraccitata maschera, noto solo che
c'č
> un leggero lampeggio della lucina della tastiera "Num Lock" (per una
volta,
> ripeto il Num Lock, non il Caps Lock), ma di fatto resta tutto uguale. Non
č
> che per caso nella versione 2003 di Access abbiano disabilitato questa
> possibilitą?
Per scrupolo ho provato la soluzione che ti ho consigliato ed a me funziona
egregiamente.
Quanto ad Access 2003 non lo conosco, quindi non conosco il suo help, perņ
mi sembra moooolto strano che non funzioni la istruzione SendKeys
"{CAPSLOCK}" , a meno che non si tratti di un bug, ma non ne sono comunque a
conoscenza.
Comunque mi sembra di capire che hai comunque trovato la soluzione.
>
> Grazie ancora e saluti.
>
> Liano
--



title: X roberto (formula inviatami)

author: GIGIGNO

text:
Circa 4 mesi fa mi hai gentilmente postato questa formula per
l'arrotondamento du disattivato dei listini
in lirev alla 500 lire....
come diventa ora questa formula per l'euro
...pensando  di arrotondare  in questa maniera...
euro 5,28 >>>>> 5,30
formula postata:
Me![LISTINO1] = ((Me![COSTO_EFFETTIVO] * Me![RICARICO]) / 100) +
Me![COSTO_EFFETTIVO]
If (Me!LISTINO1 - Int(Me!LISTINO1 / 1000) * 1000) <> 0 Then
    If (Me!LISTINO1 - Int(Me!LISTINO1 / 1000) * 1000) > 500 Then
        Me!LISTINO1 = (Int(Me!LISTINO1 / 1000) + 1) * 1000
    Else
        Me!LISTINO1 = Int(Me!LISTINO1 / 1000) * 1000 + 500
    End If
End If


title: Chiedo gentilmente un aiuto

text:
Ho attualmente questo problema:
ho creato una maschera dove, tra gli altri , c'è il campo data.
Vorrei che all'apertura della maschera una volta impostata la data (non di
sistema) la stessa rimanesse, senza bisogno di introdurla ad ogni
inserimento di record, fino alla chiusura della maschera stessa.
Come posso fare ?
Grazie
Franco


title: Chiedo gentilmente un aiuto

author: Fabio Montagner

text:
Impostala in un controllo e poi usa quel controllo come origine dei dati.
Immagino che tu usi una maschera e una sottomaschera
love.chopin wrote in message ...



title: Chiedo gentilmente un aiuto

author: Paolo

text:
> ho creato una maschera dove, tra gli altri , c'è il campo data.
> Vorrei che all'apertura della maschera una volta impostata la data (non di
> sistema) la stessa rimanesse, senza bisogno di introdurla ad ogni
> inserimento di record, fino alla chiusura della maschera stessa.
Se ho ben capito vuoi che tutti i nuovi record utilizzino la stessa data del
record precedente. In tal caso puoi provare questo codice:
Dim OldDate
    DoCmd.GoToRecord , , acLast
    If Not IsNull(Me![DATA]) Then
        OldDate = Me![DATA]
    Else
        OldDate  = Date
    End If
    DoCmd.GoToRecord , , acNewRec
    Me![DATA] = OldDate
Questo codice va inserito all'interno dell'evento click di un pulsante
'Nuovo Record'.


title: Chiedo gentilmente un aiuto

author: Roberto

text:
love.chopin <
love....@iol.it
> wrote in message
ZJ6%4.114075$VM3.8...@news.infostrada.it...
> Ho attualmente questo problema:
> ho creato una maschera dove, tra gli altri , c'è il campo data.
> Vorrei che all'apertura della maschera una volta impostata la data (non di
> sistema) la stessa rimanesse, senza bisogno di introdurla ad ogni
> inserimento di record, fino alla chiusura della maschera stessa.
> Come posso fare ?
> Grazie
> Franco
>
>
Ammettiamo che la maschera si chiama MASCHERA1, e che il campo data si
chiama DataIn.
Dichiarati in MASCHERA1 anche un casella di testo non associata alla quale
dai la proprietà di non visibile e il nome di DepData.
Per l'evento "Su corrente" di MASCHERA1 scrivi il seguente modulo VBA:
    If Not IsNull(Me![DepData]) Then
        Me![DataIn] = Me![DepData]
    End If
Per l'evento "Dopo aggiornamento" del controllo DataIn scrivi il seguente
modulo VBA:
    Me![DepData] = Me![DataIn]
Ciao Roberto


title: A2K - Parametri su query a campi incrociati.

author: Paolo Cereda

text:
Ho una tabella (MIATABELLA) che a parecchi record con date diverse.
Ho creato una query parametrica (QUERYMIATABELLA) basata sulla tabella
che filtra i dati secondo un periodo di tempo. I parametri li prende da
una maschera (MIAMASCHERA con i campi "Datainizio" e "DataFine".
Fin qui tutto bene.
A questo punto creo una query a campi incrociati basata sulla query
ma non funziona dicendo che
"Il modulo di gestione di Database Microsoft Jet non riconosce
'[Forms]![MIAMASCHERA]![DataInizio]'come nome di campo o espressione
valida. In pratica la QUERYMIATABELLA funziona ma se faccio una query
a campi incrociati basata su questa query mi dà questo errore.
C'è una soluzione?
Grazie Paolo
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
"Paolo Cereda" <
paol...@tiscalinet.it
> ha scritto nel messaggio
news:efa88f3607de2ab85a3...@mygate.mailgate.org...

Apri la struttura della query di selezione QUERYMIATABELLA ed esplicita (Con
il menu Query -> Parametri...) il tipo dati di tutti i parametri usati in
tale query; solo facendo questo riuscirai ad eseguire la query a campi
incrociati basata su QUERYMIATABELLA.
In una query  a campi incrociati parametrica o in una query di selezione
sulla quale è basata una query a campi incrociati e OBBLIGATORIO esplicitare
il tipo dati dei parametri.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
> In una query  a campi incrociati parametrica o in una query di selezione
> sulla quale è basata una query a campi incrociati e OBBLIGATORIO esplicitare
> il tipo dati dei parametri.
SEI UN GRANDE!!
GRAZIE. FUNZIONA PERFETTAMENTE



title: Connessione a DB

author: Enrico

text:
Ho fatto un DB con Access97 diviso in frontend e backend e all'interno di
quest'ultimo ho collegato manualmente una tabella di FoxPro di un'altro
programma.
Vorrei permettere all'utente di poter cambiare il percorso di collegamento
della tabella di FoxPro senza intervenire nel codice.
Quindi ho fatto una maschera con un campo che chiede il nuovo percorso del
DB in Fox (percorsofile1), ma non riesco da codice ad impostare la cosa.
Non sono molto esperto in questa operazione e quindi vi chiedo aiuto per
farlo, con la giuda ho capito poco.
Il codice che ho scritto è questo :
Dim db1 As Database
Dim percorsofile As String
Dim entrata As String
Dim percorsoserie As String
Dim serie As String
Dim myfile As String
Dim testo As String
Dim Set1 As Recordset
Dim Set2 As Recordset
Set db1 = DBEngine.Workspaces(0).Databases(0)
Dim strPath$
Dim nometabella As String
Dim db As Database
Dim tdf As TableDef
Set db = CurrentDb()
'
Set Set1 = db1.OpenRecordset("tblImpostaBackEnd", DB_OPEN_TABLE)
If Set1.BOF <> True Then
    Set1.MoveFirst
    Do Until Set1.EOF
        percorsofile = Me![percorsofile1]
        percorsofile = percorsofile + nomefile
        entrata = Set1!entrata
        serie = Set1!serie
        percorsoserie = Set1!percorsoserie
        Set1.MoveNext
    Loop
End If
Set Set2 = db.OpenRecordset("tblTabelleCollegate", DB_OPEN_TABLE)
If Set2.BOF <> True Then
    Set2.MoveFirst
    Do Until Set2.EOF
        nometabella = Set2!nometabella
        Set tdf = db(nometabella)
        strPath$ = percorsofile
        '''
        If nometabella = "MOV_VEND" Then tdf.Properties("Connect") =
";DATABASE=" & strPath$
        '''
        tdf.RefreshLink
        Set2.MoveNext
    Loop
End If
db.Close
MsgBox "File BackEnd impostato correttamente", vbInformation, "Imposta
gruppo"
------------------
ciao e grazie
Enrico


title: Connessione a DB

author: Silvio Berruti

text:
"Enrico" <
mo...@tin.it
> ha scritto nel messaggio
news:8pa1t4$5h0$1...@nslave1.tin.it...
> Ho fatto un DB con Access97 diviso in frontend e backend e all'interno di
> quest'ultimo ho collegato manualmente una tabella di FoxPro di un'altro
> programma.
... Omissis...
>         If nometabella = "MOV_VEND" Then tdf.Properties("Connect") =
> ";DATABASE=" & strPath$
mi pare che se il file da allegare è in formato DBF la Connect debba essere
= "dBASE IV;DATABASE=" &  strPath$
Ciao
Silvio


title: Non visualizzare access

author: Alessio Marconi

text:
come si può visualizzare la maschera e non access.
grazie


title: Non visualizzare access

author: A.Gianni alla Microel

text:
Alessio Marconi <
amar...@tin.it
> wrote in message
91sga8$7na$1...@fe1.cs.interbusiness.it...
> come si può visualizzare la maschera e non access.
> grazie
>
>
Ecco il problema di tanti programmatori... ank'io mi sono chiesto e ho
cercato e cercato ma sembra che la Microsoft non voglia permetterCi di
nascondere il loro bel programma!!!!!
Le maschere e tutto quello che gli va dietro non possono essere estrapolati
dall'ambiente di access... magari fosse possibile metterli nel desktop come
un normale programma !!!!!!!
by G.


title: Non visualizzare access

author: Tappo

text:
"Alessio Marconi" <
amar...@tin.it
> ha scritto nel messaggio
news:91sga8$7na$1...@fe1.cs.interbusiness.it...
> come si puň visualizzare la maschera e non access.
> grazie
Per ottenere questo risultato o uno simile devi andare nel menu Strumenti,
voce Avvio e deselezionare l'opzione Visualizza finestra database. All'avvio
dell'applicazione viene eseguita la macro Autoexec (se l'hai creata) per
aprire la maschera principale e non viene visualizzata la finestra database.
Inoltre se crei un'icona sul desktop e gli dai la riga di comando
'c:\diraccess\msaccess.exe miodb.mdb /nostartup' se avvia Microsoft Access
senza visualizzare la finestra di dialogo di avvio, vale a dire la seconda
finestra di dialogo visualizzata quando si avvia Microsoft Access. Cosě dai
l'impressione di un'applicazione a se stante. Tutto questo lo trovi anche
sulla Guida in Linea di MS Access.


title: Non visualizzare access

text:
"Tappo" <
mp...@invallee.it
> ha scritto nel messaggio
news:91sjp0$enc$1...@fe2.cs.interbusiness.it...
>
> "Alessio Marconi" <
amar...@tin.it
> ha scritto nel messaggio
> news:91sga8$7na$1...@fe1.cs.interbusiness.it...
> > come si può visualizzare la maschera e non access.
> > grazie
> Per ottenere questo risultato o uno simile devi andare nel menu Strumenti,
> voce Avvio e deselezionare l'opzione Visualizza finestra database.
All'avvio
> dell'applicazione viene eseguita la macro Autoexec (se l'hai creata) per
> aprire la maschera principale e non viene visualizzata la finestra
database.
> Inoltre se crei un'icona sul desktop e gli dai la riga di comando
> 'c:\diraccess\msaccess.exe miodb.mdb /nostartup' se avvia Microsoft Access
> senza visualizzare la finestra di dialogo di avvio, vale a dire la seconda
> finestra di dialogo visualizzata quando si avvia Microsoft Access. Così
dai
> l'impressione di un'applicazione a se stante. Tutto questo lo trovi anche
> sulla Guida in Linea di MS Access.
Inoltre:
- in Strumenti/Avvio... puoi impostare il nome dell'applicazione, così da
non far vedere nella barra in alto la scritta Access;
- in Strumenti/Avvio... puoi impostare il percorso di un file .ico che
sostituirà l'icona accanto al titolo;
- in Strumenti/Avvio... puoi impostare la maschera che verrà avviata
immediatamente e in modo indipendente da quanto fai eseguire alla macro
Autoexec;
- se crei un file grafico bitmapped e lo salvi nella stessa cartella ove
risiede il tuo mdb, salvandolo con lo stesso nome del tuo mdb (es. programma
pippo.mdb --> immagine pippo.bmp) questo verrà usato come splash screen al
posto di quello di Access;
- puoi crearti le barre strumenti personali ed eliminare quelle standard;
- puoi crearti dei menu personali ed eliminare quello standard.
e forse ce ne sono ancora...
Tutto ciò concorre a far sembrare la tua applicazione come un programma
<professionale>.
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: Non visualizzare access

author: Antonello

text:
"Alessio Marconi" <
amar...@tin.it
> ha scritto nel messaggio
news:91sga8$7na$1...@fe1.cs.interbusiness.it...
> come si può visualizzare la maschera e non access.
> grazie
Puoi inserire nella stessa directory dove risiede l'MDB un'immagine in
formato Bitmap avente lo stesso nome del tuo DB (se ad esempio il DB si
chiama «dischi.mdb» dovrai inserire l'immagine che vuoi sia visualizzata
all'avvio nella stessa cartella del DB e rinominarla in «dischi.bmp».
Infine, nell'evento «su apertura» della maschera di avvio devi inserire
«DoCmd.Maximize».
Ciao, Antonello


title: Non visualizzare access

author: Karl Donaubauer

text:
Alessio Marconi ha scritto:
> come si può visualizzare la maschera e non access.
una vecchia risposta:
>Trova un codice per far' invisibile Access sul mio sito
www.donkarl.com
>punto 1.11. Il codice è inglese ;-) ma il testo è tedesco. Se non capisci
>il modo di procedere puoi anche provare questo link al articolo e
>sopratutto l'esempio db che ho fatto per il Knowlegdebase tedesco.
>
http://www.microsoft.com/IntlKB/Germany/Support/kb/D41/D41749.HTM
>
>Ma scrivo anche sempre che queste cose si fa solo in caso eccezionale.
>Normalmente è meglio di usare le possibilità di Access per nascondere,
>demoninare ecc.
--
HTH
Karl
*********
Non meravigliarti del mio strano italiano. M'esercito qui.
Access-FAQ (tedesco):
http://www.donkarl.com


title: Non visualizzare access

author: Lbo

text:
>come si può visualizzare la maschera e non access.
riscrivi il programma in visual basic.
se no adattati a fare la brutta figura di aver usato access.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------



title: Non visualizzare access

text:
Non essere così drastico Lbo, non è assolutamente vero che fai brutta figura
ad utilizzare access al posto di vb, al massimo puoi trovare un altro
programmatore che ti snobba ma non farci caso (forse si crede il migliore)
l'importante, cioè quello che conta veramente, è che il tuo programma faccia
quello che il cliente ti ha chiesto, è che quando te ne vai vedi un bel
sorriso sulla faccia del cliente, per il resto si può sempre migliorare. E
poi access è un bellissimo e flessibile strumento che vale la pena conoscere
a fondo e spesso chi programma solo in vb non conosce a fondo.
Ciao


title: Non visualizzare access

author: Antonio Biso

text:
Tappo <
mp...@invallee.it
> wrote in message
91v2pp$hop$1...@fe1.cs.interbusiness.it...

Il mondo va proprio alla rovescia...
Antonio


title: Non visualizzare access

author: Paolo Raggi

text:
poi, quando hai tempo, mi fai vedere come si fanno
in VB le cose che sono normale amministrazione in Access e con quali
prestazioni

;-))


title: Non visualizzare access

author: Alessandro Cara

text:
Tappo ha scritto:

Bravo! Ti sara' molto difficile convincerlo,ma tanto Lbo e' uno
"zuccone" e penso che access non lo imparera' mai.
a.cara


title: Non visualizzare access

text:
>poi, quando hai tempo, mi fai vedere come si fanno in VB le cose che =
>sono normale amministrazione in Access e con quali prestazioni
>;-))
io?  io mica mi vergogno a dire che ho usato access.



title: Stampante predefinita

author: Ringhitt

text:
Salve a tutti.
Ho scaricato il file dal sito Comune denominato "gestire la stampante
predefinita"  e sulla nota descrittiva si legge:
 "Si consiglia di impostare la var globale "DefaultPrinter" all'apertura del
vostro mdb e di reimpostarla all'uscita con la sub "ResetDefaultPrinter" "
Domanda:
Così facendo all'uscita del db la stampante predefinita del sistema torna ad
essere quella originaria al momento dell'entrata nel db?
Se la risposta è affermativa (come penso sia), come faccio ad impostare
dette variabili?
Grazie per l'aiuto
Andrea


title: Come creare una form di ricerca in un db?

author: Sam Torpedo

text:
o meglio una form di ricerca l'ho già creata ma lo vorrei perfezionare.
Mi spiego meglio: nel db ho realizzato una maschera "frmRicerca" non
collegata in cui sono presenti 7 campi ed un tasto "esegui", premendolo si
apre una maschera singola finale in cui viene presentato ogni singolo
record che soddisfa i criteri con tutte le informazioni necessarie che ha
come origine dati una query parametrica impostata sui 7 campi della
"frmRicerca". Abbastanza semplice ma funziona.
Il problema è che con un sistema del genere non riesco a far apparire, nel
caso non esistano record corrispondenti di una ricerca, un msgbox che
avverta "nessun record trovato"; in questo caso, adesso, si apre la
maschera finale completamente vuota (un rettangolo solo con il colore di
fondo).
Avete qualche idea?
ciao
--
Sam Torpedo


author: Carlo Costarella

text:
"Sam Torpedo" <
samto...@yahoo.com
> ha scritto nel messaggio
news:1thoy4zjcq8wg.d...@40tude.net...

Crea una query con i sette criteri e leggila da codice, se non restituisce
nessun record, esci dalla funzione e fai apparire un messaggio: msgbox
"Nessun record per i criteri immessi"
Se la funzione che apre la maschera usa il cancel:
cancel = true
Ciao, Carlo


text:
Il Mon, 4 Dec 2006 08:37:18 +0100, Carlo Costarella ha scritto:
> Crea una query con i sette criteri e leggila da codice, se non restituisce
> nessun record, esci dalla funzione e fai apparire un messaggio: msgbox
> "Nessun record per i criteri immessi"
cioč dovrei utilizzare docmd.runsql?
Una volta eseguita la ricerca come faccio ad impostare l'origine record
della maschera finale sull'esito di questa query tramite codice?
> Se la funzione che apre la maschera usa il cancel:
> cancel = true
Scusa l'ignoranza, ma che vorrebbe dire? ;-)
č da poco che smanetto con vba
La maschera la faccio aprire con un comunissimo
DoCmd.OpenForm "frmEdifici"
all'interno del codice del evento click del tasto "esegui"
grazie
--
Sam Torpedo


text:
"Sam Torpedo" <
samto...@yahoo.com
> ha scritto nel messaggio
news:8k9tiu2ue4cw$.13otv84usrj2t.dlg@40tude.net...
> Il Mon, 4 Dec 2006 08:37:18 +0100, Carlo Costarella ha scritto:
>
>> Crea una query con i sette criteri e leggila da codice, se non
>> restituisce
>> nessun record, esci dalla funzione e fai apparire un messaggio: msgbox
>> "Nessun record per i criteri immessi"
>
> cioè dovrei utilizzare docmd.runsql?
No. In effetti quando parlavo di creare una qry mi riferivo ad una qry
salvata.
Il comando runsql si riferisce ad una query di comando e non di selezione
come nel nostro caso.
Hai mai creato una query di selezione con criteri?
In pratica si fa così: crea una nuova query e in struttura aggiungi la
tabella che ti interessa. Per ogni campo a cui vuoi imporre un criterio,
nella riga dei criteri, inserisci il tuo criterio (p.e.
Forms!TuaForm!TuoControllo) e così via per gli altri campi. Alla fine la
salvi, p.e. SQLeggiCriteri. Sarà questa query ad alimentare la maschera ma
prima di aprire la maschera, da codice, leggi la query anche con un semplice
dlookup, se il risultato è nullo vuol dire che non ci sono record; se al
contrario restituisce qualcosa...apri la maschera.
> Una volta eseguita la ricerca come faccio ad impostare l'origine record
> della maschera finale sull'esito di questa query tramite codice?
>
>> Se la funzione che apre la maschera usa il cancel:
>> cancel = true
>
> Scusa l'ignoranza, ma che vorrebbe dire? ;-)
> è da poco che smanetto con vba
Per esempio questo è come si presenta il codice sull'evento open (apertura)
di una maschera:
Private Sub Form_Open(Cancel As Integer)
Anche qui potresti mettere il controllo di cui abbiamo parlato. Se nessun
record imposti cancel = true e la maschera non si apre.
> La maschera la faccio aprire con un comunissimo
> DoCmd.OpenForm "frmEdifici"
> all'interno del codice del evento click del tasto "esegui"
Se usi solo questo evento e non ti interessa l'evento su form open della
maschera che andrai ad aprire, il cancel non ti serve.
> grazie
Prego
> --
> Sam Torpedo
>
Ciao, Carlo


text:
Il Mon, 4 Dec 2006 15:58:09 +0100, Carlo Costarella ha scritto:
> "Sam Torpedo" <
samto...@yahoo.com
> ha scritto nel messaggio
> news:8k9tiu2ue4cw$.13otv84usrj2t.dlg@40tude.net...
>> Il Mon, 4 Dec 2006 08:37:18 +0100, Carlo Costarella ha scritto:
>>
>>> Crea una query con i sette criteri e leggila da codice, se non
>>> restituisce
>>> nessun record, esci dalla funzione e fai apparire un messaggio: msgbox
>>> "Nessun record per i criteri immessi"
>>
>> cioè dovrei utilizzare docmd.runsql?
> No. In effetti quando parlavo di creare una qry mi riferivo ad una qry
> salvata.
> Il comando runsql si riferisce ad una query di comando e non di selezione
> come nel nostro caso.
> Hai mai creato una query di selezione con criteri?
> In pratica si fa così: crea una nuova query e in struttura aggiungi la
> tabella che ti interessa. Per ogni campo a cui vuoi imporre un criterio,
> nella riga dei criteri, inserisci il tuo criterio (p.e.
> Forms!TuaForm!TuoControllo) e così via per gli altri campi. Alla fine la
> salvi, p.e. SQLeggiCriteri. Sarà questa query ad alimentare la maschera ma
> prima di aprire la maschera, da codice, leggi la query anche con un semplice
> dlookup, se il risultato è nullo vuol dire che non ci sono record; se al
> contrario restituisce qualcosa...apri la maschera.
>
Chiarissimo Carlo.
In effetti io attualmente uso una query di selezione per alimentare la form
finale.
Non avevo mai preso in considerazione il Dlookup, sarebbe una svolta!!
>>> Se la funzione che apre la maschera usa il cancel:
>>> cancel = true
>>
>> Scusa l'ignoranza, ma che vorrebbe dire? ;-)
>> è da poco che smanetto con vba
>
> Per esempio questo è come si presenta il codice sull'evento open (apertura)
> di una maschera:
> Private Sub Form_Open(Cancel As Integer)
>
> Anche qui potresti mettere il controllo di cui abbiamo parlato. Se nessun
> record imposti cancel = true e la maschera non si apre.
>
>> La maschera la faccio aprire con un comunissimo
>> DoCmd.OpenForm "frmEdifici"
>> all'interno del codice del evento click del tasto "esegui"
>
> Se usi solo questo evento e non ti interessa l'evento su form open della
> maschera che andrai ad aprire, il cancel non ti serve.
>
Ottimi consigli, grazie infinite
Ci lavoro domani e ti saprò dire.
Ciao
--
Sam Torpedo


text:
Il Mon, 4 Dec 2006 19:19:58 +0100, Sam Torpedo ha scritto:
> Ottimi consigli, grazie infinite
> Ci lavoro domani e ti saprň dire.
Non ho saputo resistere, ci ho lavorato questa sera: FUNZIONA!!!
ecco il codice :
DoCmd.Hourglass True
If IsNull(DLookup("EdifID", "qryRaggrupDaRicerca")) = True Then
    MsgBox "nessun record corrispondente", vbExclamation, "ricerca"
    DoCmd.Hourglass False
    Else
    DoCmd.OpenForm "frmEdificiDaRicerca"
End If
mi sono permesso di mettere anche qualche fronzolo (clessidra)
Non ho avuto bisogno di inserire il cancel anche perchč ammetto che non ho
capito a cosa serve.
Ciao e ancora grazie
--
Sam Torpedo


text:
"Sam Torpedo" <
samto...@yahoo.com
> ha scritto nel messaggio
news:1to61ypmvjahi.qr94pvbnnaxq$.dlg@40tude.net...
> Il Mon, 4 Dec 2006 19:19:58 +0100, Sam Torpedo ha scritto:
>
>
>> Ottimi consigli, grazie infinite
>> Ci lavoro domani e ti saprň dire.
>
> Non ho saputo resistere, ci ho lavorato questa sera: FUNZIONA!!!
>
cut
Ottimo. Complimenti.
Ciao, Carlo


text:
"Sam Torpedo" <
samto...@yahoo.com
> ha scritto nel messaggio
news:1to61ypmvjahi.qr94pvbnnaxq$.dlg@40tude.net...
cut
> Non ho avuto bisogno di inserire il cancel anche perchè ammetto che non ho
> capito a cosa serve.
>
Ecco cosa dice la guida di Access:
Cancel: Questa impostazione determina se avviene l'apertura della maschera o
del report. Impostando l'argomento Cancel a True (-1) si annulla l'apertura
di una maschera o di un report.
Ciao, Carlo


title: Trasferire in Excel

author: Mik Mark

text:
Ciao a tutti,
    volevo chiedere, č possibile aprire 1 file che ho appena creato?
CODICE PER TRASFERIRE I DATI IN EXCEL
 DoCmd.TransferSpreadsheet acExport, 0, "Report allievi per corso e
preadesione",
"C:\Documenti\CalendarioConsulting\AllieviPerCorsoEPreadesione.xls", , ""
ORA VOGLIO APRIRE IL FILE
    Set oApp = CreateObject("Excel.Application")
    Set f =
oApp.OpenTextFile("C:\Documenti\CalendarioConsulting\AllieviPerCorsoEPreades
ione.xls", , "")
    oApp.Visible = True
Non riesco a trovare nulla che mi possa essere utile, ho cercato nell'help
perň....
Forse non so dove cercare..
    Grazie


title: Trasferire in Excel

author: Sergio de Pretis

text:
Mik Mark <
marcheso...@trentino.net
> wrote in message
9p1df3$gt$1...@news.flashnet.it...

Ti allego un esempio prelevato su un sito americano. Spero che possa
aiutarti.
 ---Posted by Dev Ashish---
 Modules: Transferring Records to Excel with Automation
    Excel's CopyFromRecordset method is probably the fastest way to copy
over the records via
Automation. It also provides a great deal of flexibility on where and how
the records are to be
copied. You can use a named range in an existing worksheet or specify
starting columns for the
records.
    Here are a couple of different ways to transfer a recordset over to
Excel. In order to use these
samples, set a reference to "Microsoft Excel 8.0 Object Library" under Tools
Menu/References
first.
     '************* Code Start *****************
     Sub sCopyFromRS()
     'Send records to the first
     'sheet in a new workbook
     '
     Dim rs As Recordset
     Dim intMaxCol As Integer
     Dim intMaxRow As Integer
     Dim objXL As Excel.Application
     Dim objWkb As Workbook
     Dim objSht As Worksheet
       Set rs = CurrentDb.OpenRecordset("Customers", _
                         dbOpenSnapshot)
       intMaxCol = rs.Fields.Count
       If rs.RecordCount > 0 Then
         rs.MoveLast:    rs.MoveFirst
         intMaxRow = rs.RecordCount
         Set objXL = New Excel.Application
         With objXL
           .Visible = True
           Set objWkb = .Workbooks.Add
           Set objSht = objWkb.Worksheets(1)
           With objSht
             .Range(.Cells(1, 1), .Cells(intMaxRow, _
                 intMaxCol)).CopyFromRecordset rs
           End With
         End With
       End If
     End Sub
     Sub sCopyRSExample()
     'Copy records to first 20000 rows
     'in an existing Excel Workbook and worksheet
     '
     Dim objXL As Excel.Application
     Dim objWkb As Excel.Workbook
     Dim objSht As Excel.Worksheet
     Dim db As Database
     Dim rs As Recordset
     Dim intLastCol As Integer
     Const conMAX_ROWS = 20000
     Const conSHT_NAME = "SomeSheet"
     Const conWKB_NAME = "J:\temp\book1.xls"
       Set db = CurrentDb
       Set objXL = New Excel.Application
       Set rs = db.OpenRecordset("Customers", dbOpenSnapshot)
       With objXL
         .Visible = True
         Set objWkb = .Workbooks.Open(conWKB_NAME)
         On Error Resume Next
         Set objSht = objWkb.Worksheets(conSHT_NAME)
         If Not Err.Number = 0 Then
           Set objSht = objWkb.Worksheets.Add
           objSht.Name = conSHT_NAME
         End If
         Err.Clear
         On Error GoTo 0
         intLastCol = objSht.UsedRange.Columns.Count
         With objSht
           .Range(.Cells(1, 1), .Cells(conMAX_ROWS, _
               intLastCol)).ClearContents
           .Range(.Cells(1, 1), _
             .Cells(1, rs.Fields.Count)).Font.Bold = True
           .Range("A2").CopyFromRecordset rs
         End With
       End With
       Set objSht = Nothing
       Set objWkb = Nothing
       Set objXL = Nothing
       Set rs = Nothing
       Set db = Nothing
     End Sub
     Sub sCopyRSToNamedRange()
     'Copy records to a named range
     'on an existing worksheet on a
     'workbook
     '
     Dim objXL As Excel.Application
     Dim objWkb As Excel.Workbook
     Dim objSht As Excel.Worksheet
     Dim db As Database
     Dim rs As Recordset
     Const conMAX_ROWS = 20000
     Const conSHT_NAME = "SomeSheet"
     Const conWKB_NAME = "c:\temp\book1.xls"
     Const conRANGE = "RangeForRS"
       Set db = CurrentDb
       Set objXL = New Excel.Application
       Set rs = db.OpenRecordset("Customers", dbOpenSnapshot)
       With objXL
         .Visible = True
         Set objWkb = .Workbooks.Open(conWKB_NAME)
         On Error Resume Next
         Set objSht = objWkb.Worksheets(conSHT_NAME)
         If Not Err.Number = 0 Then
           Set objSht = objWkb.Worksheets.Add
           objSht.Name = conSHT_NAME
         End If
         Err.Clear
         On Error GoTo 0
         objSht.Range(conRANGE).CopyFromRecordset rs
       End With
       Set objSht = Nothing
       Set objWkb = Nothing
       Set objXL = Nothing
       Set rs = Nothing
       Set db = Nothing
     End Sub
     '************* Code End *****************


title: Aggiunta di un valore ad un record copiato

author: ggac

text:
Salve a tutti e buone vacanze per chi le continua.
Problema: copio da una tabella ad un altra attraverso un pulsante il record
mostratomi da una maschera filtrata attraverso queste poche righe di codice:
    Dim rst As Recordset
    Dim rst2 As Recordset
    Dim fld As Field
        Set rst = Me.RecordsetClone
         rst.MoveFirst
         rst.Move Me.CurrentRecord - 1
     Set rst2 = CurrentDb.OpenRecordset("TabellaBersaglio")
 rst2.AddNew
  For Each fld In rst.Fields
    rst2(fld.Name) = fld
      Next fld
 rst2.Update
La TabellaBersaglio ha un campo in più dell'altra che si chiama "Num".
come posso assegnare a questo campo il valore arbitrario 2 ?
Ho provato, ma essendo un dilettante ho fallito. Grazie a chi mi presterà
attenzione. Cld


author: Fabio

text:
"ggac" <
gga...@libero.it
> ha scritto nel messaggio
news:Rw199.85691$n04.2...@twister2.libero.it...

Prima di rst2.update (ma fuori dal For...Next ci metti rst2("Num")=2
Ciao, FABIO


text:
Cut
>
> Prima di rst2.update (ma fuori dal For...Next ci metti rst2("Num")=2
>
> Ciao, FABIO
>
>
Ecco perchč, io lo mettevo dopo perchč convinto che dovesse far parte del
ciclo. Grazie e Ciao


author: Maurizio Borrelli

text:
> "ggac" [...]:
> Salve a tutti e buone vacanze per chi le continua.
    Salve!
    Ma auguro ai destinatari del tuo "buone vacanze" di non leggerlo.
    ;-)
> Problema: copio da una tabella ad un altra attraverso un pulsante il
> record
> mostratomi da una maschera filtrata attraverso queste poche righe di
> codice:
>     Dim rst As Recordset
>     Dim rst2 As Recordset
>     Dim fld As Field
>         Set rst = Me.RecordsetClone
    La riga seguente non dovrebbe essere necessaria:
>          rst.MoveFirst
>          rst.Move Me.CurrentRecord - 1
    Se CurrentRecord fosse il primo?
>      Set rst2 = CurrentDb.OpenRecordset("TabellaBersaglio")
>  rst2.AddNew
>   For Each fld In rst.Fields
>     rst2(fld.Name) = fld
>       Next fld
>  rst2.Update
> La TabellaBersaglio ha un campo in più dell'altra che si chiama "Num".
> come posso assegnare a questo campo il valore arbitrario 2 ?
[...]
    (Ti ha gia' risposto Fabio.)
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------


text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ak2ap0$1ek22i$2...@ID-52090.news.dfncis.de...
> > "ggac" [...]:
> > Salve a tutti e buone vacanze per chi le continua.
>
>     Salve!
>
>     Ma auguro ai destinatari del tuo "buone vacanze" di non leggerlo.
>     ;-)
>
> > Problema: copio da una tabella ad un altra attraverso un pulsante il
> > record
> > mostratomi da una maschera filtrata attraverso queste poche righe di
> > codice:
> >     Dim rst As Recordset
> >     Dim rst2 As Recordset
> >     Dim fld As Field
> >         Set rst = Me.RecordsetClone
>
>     La riga seguente non dovrebbe essere necessaria:
>
> >          rst.MoveFirst
> >          rst.Move Me.CurrentRecord - 1
>
>     Se CurrentRecord fosse il primo?
>
Cut
Scusa se ti rispondo tardi, ma sono tornato or ora. Quella riga è una
soluzione empirica, poichè mi sono accorto che copiava il record successivo
rispetto a quello "puntato", quindi in caso di primo record funziona lo
stesso. Ciao e grazie dell'attenzione. Cld


title: Format(date())

author: Pleiadi

text:
Avrei la necessità di visualizzare solo le ultime due cifre dell'anno in
corso; qual'è la sintassi del comando Format?
Grazie
Alfio


title: Format(date())

author: Paolo A.

text:
Pleiadi wrote:

Format(Date, "YY")


title: Format(date())

text:

Grazie per la rapidità, ma.....
l'ho inserito in controllo non associato, ma non funzia?!?
tu l'hai provato?
Alfio
Alfio


title: Format(date())

author: il mago galbusera

text:
Pleiadi <
za...@libero.nospam.it
> wrote in message
PpDG5.25757$Nz.7...@news.infostrada.it...
> > > Avrei la necessità di visualizzare solo le ultime due cifre dell'anno
in
> > > corso; qual'è la sintassi del comando Format?
> > > Grazie
> > > Alfio
> >
> > Format(Date, "YY")
=format(Date(),"YY")


title: Format(date())

author: Lbo da casa

text:
>> Format(Date, "YY")
>
>Grazie per la rapidità, ma.....
>l'ho inserito in controllo non associato, ma non funzia?!?
hai provato con =ecc.?  non l'ho provato ma dovrebbe essere così.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: Format(date())

text:
> >Grazie per la rapiditŕ, ma.....
> >l'ho inserito in controllo non associato, ma non funzia?!?
>
> hai provato con =ecc.?  non l'ho provato ma dovrebbe essere cosě.
> --
Le stň provando tutte, ma non ne vengo a capo.
E' incredibile come ci si possa piantare in stronzate del genere.......ma
cosě č....
Alfio


title: Format(date())

author: Federico Luciani

text:
Pleiadi wrote:
> > >Grazie per la rapidità, ma.....
> > >l'ho inserito in controllo non associato, ma non funzia?!?
> >
> > hai provato con =ecc.?  non l'ho provato ma dovrebbe essere così.
> > --
> Le stò provando tutte, ma non ne vengo a capo.
> E' incredibile come ci si possa piantare in stronzate del genere.......ma
> così è....
> Alfio
se devi visualizzarlo in un controllo testo non associato:
=Format(Date();"aa")
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: Format(date())

text:
> > > >Grazie per la rapiditŕ, ma.....
> > > >l'ho inserito in controllo non associato, ma non funzia?!?
> > >
> > > hai provato con =ecc.?  non l'ho provato ma dovrebbe essere cosě.
> > > --
> > Le stň provando tutte, ma non ne vengo a capo.
> > E' incredibile come ci si possa piantare in stronzate del
genere.......ma
> > cosě č....
> > Alfio
>
> se devi visualizzarlo in un controllo testo non associato:
> =Format(Date();"aa")
Finalmente......
Grazie č quella OK.
Alfio


title: Query per stampa con chr(10)

text:
Bon Dī a tutti
Nell'ambito di una query per la creazione di una stampa ho creato la
seguente espressione:
Societa:[ditta]&chr(10)&[socio]
con chr(10) pensavo che ci fosse un ritorno a capo.
Perņ non funziona.
chi mi puņ dare una dritta
ringrazio anticipatamente
saluti
giova


title: Query per stampa con chr(10)

author: Antonio

text:
"giovanni.matasci" <
giovanni...@freesurf.ch
> ha scritto nel messaggio
news:403765f6$0$706$5402...@news.sunrise.ch...

Prova con
Societa:[ditta]&chr(10)&chr(13)&[socio]
Ciao
Antonio


title: Query per stampa con chr(10)

author: Karl Donaubauer

text:
Antonio schrieb:
> "giovanni.matasci ha scritto:
>>
>> Nell'ambito di una query per la creazione di una stampa ho creato la
>> seguente espressione:
>>
>> Societa:[ditta]&chr(10)&[socio]
>>
>> con chr(10) pensavo che ci fosse un ritorno a capo.
>>
>> Però non funziona.
>>
> Prova con
> Societa:[ditta]&chr(10)&chr(13)&[socio]
No, l'ordine è
Societa:[ditta] & chr(13) & chr(10) & [socio]
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: Query per stampa con chr(10)

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:c184jo$1eed8r$1...@ID-46617.news.uni-berlin.de...
> Antonio schrieb:
> > "giovanni.matasci ha scritto:
> >>
> >> Nell'ambito di una query per la creazione di una stampa ho creato la
> >> seguente espressione:
> >>
> >> Societa:[ditta]&chr(10)&[socio]
> >>
> >> con chr(10) pensavo che ci fosse un ritorno a capo.
> >>
> >> Però non funziona.
> >>
> > Prova con
> > Societa:[ditta]&chr(10)&chr(13)&[socio]
>
> No, l'ordine è
> Societa:[ditta] & chr(13) & chr(10) & [socio]
>
Vi ringrazio moltissimo e a buon rendere
saluti giova


title: _AfterUpdate unificato

author: pfmarro

text:
ho una maschera con circa 20 campi per l'inserimento e relative 20 textbox con i relativi
valori di Massimo in modo da creare un semaforo che se il valore inseirto è maggiore o minore
cambio il colore del BackColor della textbox
ho creato una procedura parametrizzata unica che gli passo il nome del campo e faccio tutto
per il singolo campo.
questo la richiamo in _AfterUpdate() singola
e Form_Current() con il ciclo per tutti
è possibile creare un unico evento ed evitare _AfterUpdate() per ogni singola Textbox?

Come fare GRAZIE


title: _AfterUpdate unificato

text:

Puoi scrivere una funzione alla quale Passi il Controllo ed all'interno fai la gestione relativa allo stesso...

Private Function FormattaControllo(pControl As Access.TextBox)
     Quì controlli tutto di pControl, ma devi passarlo... quindi su AfterUpdate devi scrivere:
     Call FormattaControllo(Me!NomeControllo)
End Function

Oppure è possibile creare una classe che gestisca tutto ed assegnare alla Classe l'oggetto, quindi istanzi N classi quanti sono i controlli da associare.

Io sono per questa tecnica, peraltro standard per i normali linguaggi di programmazione ad oggetti... poco usata in Access(VBA) per motivi vari...

@Alex


title: _AfterUpdate unificato

text:
grazie

in effetti ho creato una procedura così ma devo creare tanti eventi _AfterUpdate()  quanti sono le TextBox
non c'e' un modo per creare un unico evento?



title: _AfterUpdate unificato

text:

Si con la classe... ;-)

Nella maschera, assegni alle TextBox da controllare un TAG specifico come "X", e crei una Collection

Private mC As Collection
Private Sub Form_Load()
   Dim ctl As Access.TextBox
   Dim mcls As NomeClasse
    Set mC=New Collection
    For each ctl in me.controls
       If ctl.TAG="X" Then
       Set mcls=new NomeClasse
       Set mcls.BoundControl=ctl
       mc.Add mcls,
ctl.name

       End if
    Next
End Sub

Finito.

La tua classe invece ha tutto il CORE del codice Oggetto, che vale per qualsiasi istanza(ora semplifico l'esempio)

Private WithEvents mTxt As Access.TextBox
Public Property Set BoundControl(pTxt As Access.TextBox)
    Set mTxt = pTxt
    With objControl
        .OnAfterUpdate="[Event Procedure]"
        ' altri...
    End With
End Property
Public Property Get BoundControl() As Access.TextBox
    Set BoundControl = mTxt
End Property

Private Sub mTxt_AfterUpdate()
   ' Codice specifico per il controllo BOUND
End Sub

Saluti
@Alex


title: assegnazione data al backup del BE

author: ]SiLVieTTa[

text:
per creare un backup di BE e FE ho usato il seguente codice:
        fileLDB = Left(CurrentDb.Name, Len(CurrentDb.Name) - 3)
            riga(1) = "Dim fso, file1"
            riga(2) = "Set fso = CreateObject(""Scripting.FileSystemObject"")"
            riga(3) = "Do While fso.FileExists(""" & fileLDB & "ldb"")"
            riga(4) = "Loop"
            Dim InizioNomeFE As Integer
            InizioNomeFE = InStrRev(nomeFrontEnd, "\")
            Dim nomeFrontEndSP As String 'nome file senza path
            nomeFrontEndSP = Mid(nomeFrontEnd, InizioNomeFE + 1)
            Dim nomeFrontEndSalv As String 'il nuovo percorso per il salvataggio
            nomeFrontEndSalv = Mid(nomeFrontEnd, 1, InizioNomeFE) &
"salvataggio\" & nomeFrontEndSP
         '   MsgBox "nomeFrontEndSalv=" & nomeFrontEndSalv
            riga(5) = "if fso.FileExists(""" & nomeFrontEndSalv & """) Then"
            riga(6) = "MSGBOX ""Salvataggio in corso..."""
            riga(7) = "fso.DeleteFile(""" & nomeFrontEndSalv & """)"
            riga(8) = "End if"
            riga(9) = "Set file1 = fso.GetFile(""" & CurrentDb.Name & """)"
            riga(10) = "file1.Copy(""" & nomeFrontEndSalv & """)"
            riga(11) = "MSGBOX ""Salvataggio eseguito correttamente."""
            riga(12) = "Set file1 = Nothing"
            riga(13) = "Set fso = Nothing"
tutto ok.
solo un piccolo problema, non vitale, ma...
se io lancio questo comando il 2/3/04 (ad esempio), mi trovo i seguenti file:
FE  con data 2/3/04
BE con data 2/3/04
quindi corretto
se rilancio il comando il 2/4/04 (ad esempio), ho:
FE con data 2/4/04
BE con data 2/3/04        <==   !!!
perchčč???
al back end  viene sempre assegnata dal sistema (non nel nome del file) la data
dell'ultima volta che si era lanciata la funzione!
č normale? succede anche a voi?
d'accordo, poi ho inserito la data nel nome del file, ma... mi chiedevo se fosse
giusto cosě..
Ciao
Silvia.
--
www.silvietta.it
...everyone's invited!
Non Esiste Una Razza Bianca, Benche' Se Ne Parli Tanto: Ogni Uomo Bianco E' Solamente Un Uomo Scolorito


title: Listbox trasferimento priorità

author: libero

text:
Ciao a tutti,
qualcuno potrebbe indicarmi la strada per trasferire dei valori presenti in
una listbox e trasferirli all'interno di un'altra listbox permettendomi di
dare una priorità ai valori trasferiti?
Premetto che ho esaminato l'esempio contenuto su sitocomune (listbox), ma in
quel caso c'è il trasferimento senza la possibilità di ordinare i valori
secondo un mio criterio.
Grazie


title: Listbox trasferimento priorità

author: Sergio MAZZA

text:
"libero" <
val...@libero.it
> ha scritto nel messaggio
news:wGgic.143256$Kc3.4...@twister2.libero.it...

Se è un elenco di valori l'ordine lo dai tu mettendoli in fila dal primo
all'ultimo; se l'elenco è dato da un istruzione SQL dovrai scegliere quale
campo ordinare o creartene uno che imposterai a tuo piacimento...
Ciao.
--
Sergio MAZZA


title: Punti e punti esclamtivi

author: Riviera

text:
Scusino loro la mia ignoranza animale ma a volte (in esempi) vedo usare
Me.NomediQualcosa e a volte Me!NomediQualcosa  , dove è proprio usare
l'esclamativo e dove il punto ??
Thanks molte
Marce (l'animalo .. poco però sempre un po' meno grazie al NG)


title: Punti e punti esclamtivi

author: Jonny

text:
con il punto esclamativo es. me!Numero, si fa
riferimento ad una control o oggetto cretao dall'utente; mentre con il punto si
fa riferimento a propietà o metodi di sistema.

Spero di essere stato
chiaro...


title: Punti e punti esclamtivi

text:
"Riviera" <
marce...@smartino.ge.it
> ha scritto nel messaggio
news:8urfqp$ab1$1...@ftp-news.csita.unige.it...

Non c'è una gran differenza se non per il fatto che microsoft consiglia
l'utilizzo del punto esclamativo invece del punto perché dice che è più
veloce l'esecuzione del codice...
Ciao.


title: Punti e punti esclamtivi

author: sib

text:
Riviera <
marce...@smartino.ge.it
> wrote in message
8urfqp$ab1$1...@ftp-news.csita.unige.it...
> Scusino loro la mia ignoranza animale ma a volte (in esempi) vedo usare
> Me.NomediQualcosa e a volte Me!NomediQualcosa  , dove è proprio usare
> l'esclamativo e dove il punto ??
Il punto si riferisce agli oggetti definiti dal programma (proprietà, campi
ecc), il punto esclamativo fa riferimento agli oggetti definiti dall'utente
(controlli, maschere ecc)
In una maschera con Me.Nome fai riferimento al campo mentre con Me!Nome fai
riferimento al controllo.
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: Punti e punti esclamtivi

author: Sib

text:
"Riviera" <
marce...@smartino.ge.it
> ha scritto nel messaggio
news:8urfqp$ab1$1...@ftp-news.csita.unige.it...
> Scusino loro la mia ignoranza animale ma a volte (in esempi) vedo usare
> Me.NomediQualcosa e a volte Me!NomediQualcosa  , dove è proprio usare
> l'esclamativo e dove il punto ??
La differenza e' sottile ma sostanziale, il punto fa riferimento alle
proprietà dell'oggetto o ad elementi definiti dal programma, mentre il punto
esclamativo fa riferimento ad oggetti definiti dall'utente.
Vediti l'help per capire meglio.
Sib


title: Punti e punti esclamtivi

text:
sib <
sibN...@iol.it
> ha scritto:
> Riviera <
marce...@smartino.ge.it
> wrote:
> > Scusino loro la mia ignoranza animale ma a volte (in esempi) vedo usare
> > Me.NomediQualcosa e a volte Me!NomediQualcosa  , dove è proprio usare
> > l'esclamativo e dove il punto ??
>
> Il punto si riferisce agli oggetti definiti dal programma (proprietà, campi
> ecc), il punto esclamativo fa riferimento agli oggetti definiti dall'utente
> (controlli, maschere ecc)
> In una maschera con Me.Nome fai riferimento al campo mentre con
> Me!Nome fai riferimento al controllo.
No. Anche con il punto è possibile di fare riferimento a un controllo.
È difficile per me in italiano, alora cito michka (dal mio archivo):
*****
Michael Kaplan (cdma 23.07.99)
The real and official distinction in the language is that the dot (.) is to
be used for explicit properties or methods off the object or collection in
question, while the bang (!) is used for members in the collection, or in
the default collection if its a parent object.
The reason for confusion is that in both Access and VB forms, controls are
BOTH properties and members of the default collection (controls), thus
Me!tbTextbox
Me.tbTextbox
Me("tbTextbox")
Me.Controls!tbTextbox
Me.Controls("tbTextbox")
all point to the same basic object in the end.
*****
Visto che è così complicato nelle lezioni ecc. raccomando sempre la
regola come circa ha scritto "Jonny" perché è semplice e funziona sempre.
Purtroppo con il punto esclamativo non vengono le liste del'Intellisense
quando scrive il codice. Per questo molta gente preferisce il punto
che fa problemi in qualche situazione. Per di più MS ha cambiato la
toleranza per l'uso falso del punto da A2-->A95/97. Adesso è più
rigoroso ma ancora un po confuso.
--
cu
Karl
*********
Scusate il mio malissimo Italiano. Faccio solo esercizi qui.
Access-FAQ (Tedesco):
http://www.donkarl.com


title: Punti e punti esclamtivi

text:
"Karl Donaubauer" <
ad...@donkarl.com
> ha scritto nel messaggio
news:zrzQ5.148877$Le2.8...@news.chello.at...
> sib <
sibN...@iol.it
> ha scritto:
> > Riviera <
marce...@smartino.ge.it
> wrote:
> > > Scusino loro la mia ignoranza animale ma a volte (in esempi) vedo
usare
> > > Me.NomediQualcosa e a volte Me!NomediQualcosa  , dove è proprio usare
> > > l'esclamativo e dove il punto ??
> >
> > Il punto si riferisce agli oggetti definiti dal programma (proprietà,
campi
> > ecc), il punto esclamativo fa riferimento agli oggetti definiti
dall'utente
> > (controlli, maschere ecc)
> > In una maschera con Me.Nome fai riferimento al campo mentre con
> > Me!Nome fai riferimento al controllo.
>
> No. Anche con il punto è possibile di fare riferimento a un controllo.
Verissimo, forse mi sono espresso male, non intendevo dire il contrario
> È difficile per me in italiano, alora cito michka (dal mio archivo):
cut
> The reason for confusion is that in both Access and VB forms, controls are
> BOTH properties and members of the default collection (controls), thus
>
> Me!tbTextbox
> Me.tbTextbox
> Me("tbTextbox")
> Me.Controls!tbTextbox
> Me.Controls("tbTextbox")
>
> all point to the same basic object in the end.
> *****
Vedi, il problema e' proprio questo.
> Visto che è così complicato nelle lezioni ecc. raccomando sempre la
> regola come circa ha scritto "Jonny" perché è semplice e funziona sempre.
> Purtroppo con il punto esclamativo non vengono le liste del'Intellisense
> quando scrive il codice. Per questo molta gente preferisce il punto
> che fa problemi in qualche situazione.
:-) io per esempio uso quasi sempre il punto per questo. In effetti se fosse
piu' chiara la distinsione (e soprattutto se l'intellisense funzionasse
anche coi punti esclamativi) se ne farebbe un uso migliore, ma vuoi mettere
quanti errori di digitazione risparmi su migliaia di righe di codice usando
il punto?
> Per di più MS ha cambiato la
> toleranza per l'uso falso del punto da A2-->A95/97. Adesso è più
> rigoroso ma ancora un po confuso.
;-) non me ne sono accorto.
Ciao, Sib


title: Punti e punti esclamtivi

text:
"Sib" <
cerriserv...@tiscalinet.it
> ha scritto nel messaggio
news:8v0e0i$db0$2...@lacerta.tiscalinet.it...
>
------ omissis ------------
> :-) io per esempio uso quasi sempre il punto per questo. In effetti se
fosse
> piu' chiara la distinsione (e soprattutto se l'intellisense funzionasse
> anche coi punti esclamativi) se ne farebbe un uso migliore, ma vuoi
mettere
> quanti errori di digitazione risparmi su migliaia di righe di codice
usando
> il punto?
>
> > Per di piů MS ha cambiato la
> > toleranza per l'uso falso del punto da A2-->A95/97. Adesso č piů
> > rigoroso ma ancora un po confuso.
>
> ;-) non me ne sono accorto.
>
> Ciao, Sib
>
>
Scusa l'intromissione, se č un problema di intellisense (sentito in
principio anche da me); con ctrl-barra spazio hai la stessa funzione come se
battessi il punto...
Ciao.


title: Punti e punti esclamtivi

text:
Sergio MAZZA wrote:
> "Sib" <
cerriserv...@tiscalinet.it
> ha scritto nel messaggio
> ------ omissis ------------
> > :-) io per esempio uso quasi sempre il punto per questo. In effetti se
> fosse
> > piu' chiara la distinsione (e soprattutto se l'intellisense funzionasse
> > anche coi punti esclamativi) se ne farebbe un uso migliore, ma vuoi
> mettere
> > quanti errori di digitazione risparmi su migliaia di righe di codice
> usando
> > il punto?
> >
> > > Per di piů MS ha cambiato la
> > > toleranza per l'uso falso del punto da A2-->A95/97. Adesso č piů
> > > rigoroso ma ancora un po confuso.
> > ;-) non me ne sono accorto.
> > Ciao, Sib
>
> Scusa l'intromissione, se č un problema di intellisense (sentito in
> principio anche da me); con ctrl-barra spazio hai la stessa funzione come se
> battessi il punto...
> Ciao.
non sapevo!
buono a sapersi
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: Punti e punti esclamtivi

text:
Sergio MAZZA ha scritto:
> "Sib" <
cerriserv...@tiscalinet.it
> ha scritto:
> ------ omissis ------------
> > :-) io per esempio uso quasi sempre il punto per questo. In effetti se
> fosse
> > piu' chiara la distinsione (e soprattutto se l'intellisense funzionasse
> > anche coi punti esclamativi) se ne farebbe un uso migliore, ma vuoi
> >mettere quanti errori di digitazione risparmi su migliaia di righe di
> >codice usando il punto?
>
> Scusa l'intromissione, se è un problema di intellisense (sentito in
> principio anche da me); con ctrl-barra spazio hai la stessa funzione
> come se battessi il punto...
L'uso qualche volta come workaraound ma non è la stessa cosa.
Ctrl+barra spazio si puo usare sempre nella finestra codice ma
non da lo stesso listo invece sempre un listo completto delle
keywords. Sono mille in contrario di quasi poco che vengono
con il punto perché sono in contesto.
Anche non è "intuitivo" (esiste in italiano?). Vuol dire che è
necessario di sapere. Con il punto invece il listo viene da sé.



title: Punti e punti esclamtivi

text:
"Karl Donaubauer" <
ad...@donkarl.com
> ha scritto nel messaggio
news:8v0k5b$33gct$1...@ID-46617.news.dfncis.de...
> L'uso qualche volta come workaraound ma non è la stessa cosa.
>
> Ctrl+barra spazio si puo usare sempre nella finestra codice ma
> non da lo stesso listo invece sempre un listo completto delle
> keywords. Sono mille in contrario di quasi poco che vengono
> con il punto perché sono in contesto.
>
> Anche non è "intuitivo" (esiste in italiano?). Vuol dire che è
> necessario di sapere. Con il punto invece il listo viene da sé.
>
> --
> cu
> Karl
> *********
> Scusate il mio malissimo Italiano. Faccio solo esercizi qui.
> Access-FAQ (Tedesco):
http://www.donkarl.com
>
>
Hai ragione Karl; si può ridurre la lista scrivendo i primi caratteri e poi
la sequenza ctrl-spazio, ma bisogna sapere prima cosa scrivere...
Ciao.