title: Db Sqlite, singolo file, che non si copia

author: RobertoA

text:
Procedura Access che usa dati da db1, tabelle collegate via odbc
Alcune informazioni da db1 vengono usate per alimentare db2 che e' il
classico file Sqlite (pippo.db) sempre con tabelle collegate via odbc
Quindi dal punto di vista logico il codice 'vede' db1.Articoli (Sql
Server) come 'articoli' e db2.Articoli (Sqlite) come 'sq_articoli'
Bon, fin qua tutto bene, alcune righe vengono copiate da 'articoli' a
'sq_articoli' e tutto fila liscio
La copia avviene con le istruzioni seguenti:

CurrentDb.Execute "delete from SQ_Articoli"
CurrentDb.Execute "INSERT INTO SQ_Articoli select * from Articoli"

Ora e' il momento di 'prendere' il file pippo.db e spedirlo nello spazio
Da codice vba, provo col Filecopy ma mi restituisce un bel errore 70,
autorizzazione negata
Provo da file manager di Windows e ci riesce, com'e' sta faccenda?
Per Access 'autorizzazione negata' e da file manager si puo' fare?

Provo a fare uno "shell copia_sqlite_db.bat" e la copia avviene
correttamente, dentro al bat un'unica istruzione di "copy..."
Quindi il Copy del vba non ce la fa, il Copy di Windows ce la fa

La domanda principale e': come 'liberare' il file pippo.db dal blocco
imposto dalle due CurrentDb.execute sopra (sono quelle perche' se non le
eseguo e faccio subito il Filecopy copia normalmente)?

La domanda secondaria:  da codice vba, senza uscire sui comandi shell
Windows, c'e' qualche comando che mi permetta di eseguire la copia del
file contenente il db Sqlite?


author: Simone Calligaris

text:
> La domanda principale e': come 'liberare' il file pippo.db dal blocco
> imposto dalle due CurrentDb.execute sopra (sono quelle perche' se non le
> eseguo e faccio subito il Filecopy copia normalmente)?
>
> La domanda secondaria: da codice vba, senza uscire sui comandi shell
> Windows, c'e' qualche comando che mi permetta di eseguire la copia del
> file contenente il db Sqlite?

Hai provato ad assegnare currentdb ad una variabile "Database" e poi resetterla (set XX=Nothing)?

Saluti


text:

Si, gia' provato
Una roba del tipo

dim db1 as dao.database
set db1=CurrentDb
db1.execute "....."
db1.close


text:
> > Saluti
> Si, gia' provato
> Una roba del tipo
>
> dim db1 as dao.database
> set db1=CurrentDb
> db1.execute "....."
> db1.close

Set db1=nothing ci sta?
Prova anche altra roba prima di mollare: uno sleep con un DoEvents subito dopo?

Saluti


text:

Pure col

Set db1=Nothing

alla fine, sempre err=70  (autorizzazione negata) sul FileCopy


text:
>
> alla fine, sempre err=70 (autorizzazione negata) sul FileCopy

Se prima del FileCopy inserisci un MsgBox, dopo aver dato OK cambia qualcosa?

Saluti


text:

Inserito DoEvents
Inserito Msgbox (pausa qualche sec prima di OK per chiuderlo)
E poi istruzione FileCopy sorg, dest
Solito errore 70

Eppure se lancio il FileCopy all'inizio della routine, prima della
sequenza di 'Delete...' e 'Insert Into...' la copia avviene
correttamente, quindi ipotizzo che siano proprio queste istruzioni a
bloccare il file

Quindi sul codice:
----------------------------------------------------
Filecopy file_sorgente, file_destinazione
CurrentDb.Execute "delete from SQ_Articoli"
CurrentDb.Execute "INSERT INTO SQ_Articoli select * from Articoli"
Msgbox("Ah bello, premi OK",,"SCHICCIA OK")
Filecopy file_sorgente, file_destinazione
----------------------------------------------------

Il primo FileCopy avviene correttamente
Mentre il secondo da' sempre errore 70


title: Gestire Aggiornamenti per i programmi creati con access

text:
Ciao,
volevo sapere se qualcuno conosce un metodo per aggiornare i programmi
creati con access:
Mi spiego meglio. Supponiamo che si crei un gestionele in access e lo
si dia ad un cliente, dopo due mesi aggionrni il programma con altre
funzionalità, per installarle dal cliente senza rimandare tutto il
programma, esiste un metodo? senza fare il solita esporta importa...
esistono programmi che ti "aiutano" in queste operazioni?
ciao a tutti e grazie


author: MA

text:

Sì esiste un programma che fa proprio questo.
Si chiama... apsetta che lo ricordo...
ehmm.. ah sì!!!
Access!!!
Dividi il programma in Front End e BackEnd e al cliente spedisci solo il Front End
Guarda l'articolo"condivider un programma in una LAN " che trovi su AccessGroup.it
spiega come fare
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


text:
On 23 Giu, 15:55, "MA" <
mas...@massimilianoamendola.it
> wrote:

Capisco, ma se ad esempio il cliente ha la possibilita di
personalizzarsi chessò qualche report/maschera,
se gli rimando il front end, perde le modifiche.... stavo pensando se
esiste qualche programmino che registrasse le modifiche fatte e
facesse in modo di aggiornare la versione del cliente.. mandargli una
specie di aggiornamento..
grazie comunque


text:

No non esiste
--
--
MAssimiliano Amendola
www.accessgroup.it



title: Query Parametrica mediante una funzione

author: Simone

text:
La query di selezione č stata applicata ad una tabella per es. Reparto nella
parte criteri ho specificato una funzione:
Funzione SelezionaReparto (Reparto)
SelezionaReparto= Reparto
End Function
Di volta in volta la variabilr Reparto assume valori diversi (es.
Marketing,Produzione, ...) per ottenere dalla query i reparti desiderati.
La domanda č: che valore deve assumere la variabile Reparto per vedere tutta
la tabella Reparto. Ho provato con * o con Like "*" ma non funziona.
Grazie a tutto al NG.
Simone


title: Query Parametrica mediante una funzione

author: Roberto da casa

text:
"Simone" <
simone...@libero.it
> ha scritto nel messaggio
news:jaFka.8667$DN.2...@tornado.fastwebnet.it...
> La query di selezione è stata applicata ad una tabella per es. Reparto
nella
> parte criteri ho specificato una funzione:
>
> Funzione SelezionaReparto (Reparto)
> SelezionaReparto= Reparto
> End Function
>
> Di volta in volta la variabilr Reparto assume valori diversi (es.
> Marketing,Produzione, ...) per ottenere dalla query i reparti desiderati.
> La domanda è: che valore deve assumere la variabile Reparto per vedere
tutta
> la tabella Reparto. Ho provato con * o con Like "*" ma non funziona.
> Grazie a tutto al NG.
> Simone
Io non scomoderei un funzione per una query di selezione parametrica.
Mi limiterei a scrivere nei criteri del campo Reparto:
Like Nz([Digita il reparto:]; "*")
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Query Parametrica mediante una funzione

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:u%Hka.19941$DT4.5...@twister1.libero.it...
>
> "Simone" <
simone...@libero.it
> ha scritto nel messaggio
> news:jaFka.8667$DN.2...@tornado.fastwebnet.it...
> > La query di selezione è stata applicata ad una tabella per es. Reparto
> nella
> > parte criteri ho specificato una funzione:
> >
> > Funzione SelezionaReparto (Reparto)
> > SelezionaReparto= Reparto
> > End Function
> >
> > Di volta in volta la variabilr Reparto assume valori diversi (es.
> > Marketing,Produzione, ...) per ottenere dalla query i reparti
desiderati.
> > La domanda è: che valore deve assumere la variabile Reparto per vedere
> tutta
> > la tabella Reparto. Ho provato con * o con Like "*" ma non funziona.
> > Grazie a tutto al NG.
> > Simone
>
> Io non scomoderei un funzione per una query di selezione parametrica.
>
> Mi limiterei a scrivere nei criteri del campo Reparto:
>
> Like Nz([Digita il reparto:]; "*")
>
> --
> Roberto
>
Non mi sono spiegato bene.
Quello che vorrei ottenere è di chiamare la Query ed ottenere i record
richiesti (es. Marketing piuttosto che Produzione)senza l'intervento
dell'operatore. Poi pero' mi serve chiamare la stessa Query ed avere tutti i
record della tabella. La tua soluzione funziona ma con l'intervento manuale
dell'operatore.
Il motivo della mia richiesta è legato al fatto che la stessa applicazione
deve essere usata da responsabili di diversi Reparti.  Ognuno deve "vedere"
la propria parte di competenza : mi riferisco a Maschere , Stampe e così
via. Ma vi è la necessità di "escludere" il criterio quando si vuole vedere
il tutto.
Grazie per l'attenzione.
Simone


title: Query Parametrica mediante una funzione

text:
"Simone" <
simone...@libero.it
> ha scritto nel messaggio
news:kiOka.8978$DN.2...@tornado.fastwebnet.it...

Beh, penso che l'intervento umano è necessario per decidere se vuoi vedere
solo il reparto di competenza o tutti i reparti.
Potresti in una maschera inserire un controllo non visibile in cui memorizzi
il reparto di competenza  (es. Marketing piuttosto che Produzione) o in
alternativa il valore asterisco ( "*" ) e nei criteri della query scrivere:
Like Forms!NomeMaschera!NomeControllo



title: Query Parametrica mediante una funzione

text:
[cut]
Grazie per l'aiuto
Simone


title: Query Parametrica mediante una funzione

text:
"Simone" <
simone...@libero.it
> ha scritto nel messaggio
news:fxZka.9988$DN.2...@tornado.fastwebnet.it...
>
> [cut]
>
> Grazie per l'aiuto
> Simone
>
Ho provato con la maschera e funziona volessi usare la tecnica della
funzione tipo
Function Cerca()
Cerca = "Like '*'"
End Function
Ho provato ma non va.
Non è per testardaggine è che ho impostato l'applicazione su questa tecnica.
Grazie per la tua pazienza
Ciao Simone


title: Query Parametrica mediante una funzione

text:
"Simone" <
simone...@libero.it
> ha scritto nel messaggio
news:WFZka.9996$DN.2...@tornado.fastwebnet.it...

Hai provato scrivendo nei criteri:
Like Cerca()
e nella funzione:
Fuction Cerca() As String
Cerca = "*"
End Function



title: Query Parametrica mediante una funzione

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:UV9la.24045$DT4.7...@twister1.libero.it...

Funziona grazie ....


title: assegnazione testo

author: alby

text:
Sto facendo una maschera in access che visualizza dei codici e la loro
transcodifica, attraverso un match già fatto via codice vb. adesso
devo permettere la modifica di questi codici solo dopo aver premuto un
interruttore ma succede che quando l'utente inserisce un codice nn
joinabile, quindi inesistente, al ritorno alla "modalità
visualizzazione" dei codici il suddetto codice deve essere cancellato
dallo stesso programma...
quindi in una funzione che nn sto qui a riportare scrivo
Me.Controls("c" & i).text = ""
ma è proprio su questa riga che avviene l'errore 2115 (
http://img140.imageshack.us/img140/8775/immagine2gl.png
 ) che non
riesco a capire perchè nn ho settato nulla nella proprietà valido se
di quella casella di testo e tantomeno ho catturato l'evento
primadiaggiornare su quell'oggetto...
potreste darmi una mano? uso access 2003 su un progetto in formato
access 2000


title: assegnazione testo

author: Alessandro Baraldi

text:
Togli Text, in Access l'uso della proprietà Text richiede il Focus
e non sempre è soddisfatto...!
@Alex


title: assegnazione testo

text:
benissimo ma allora come faccio a settare il testo all'interno di una
casella di testo utilizzando il vba???


title: assegnazione testo

text:
Sono stato poco chiaro...?
Ho detto togli TEXT...! , l'hai tolto ed hai provato...???
Ciao
@Alex


title: assegnazione testo

text: si ok è vero... GRAZIE... ma la prox + tranq plz...


title: assegnazione testo

text:
No, la prossima volta svegliati.
@Alex


title: backup database

author: *kInAsH*

text:
Ciao ragazzi,
ringraziandovi per l'aiuto che mi avete dato fin'ora vi pongo il mio
quesito:
devo consegnare parte di un lavoro che si occupa (per ora) solo di
archiviare dati (magazzino e archivio clienti), tramite delle maschere
di inserimento. Un'altra parte di programma tramite altre maschere si
occuperà della vendita, di fatture, etc...
Posso consegnare il file contenente le tabelle magazzino e clienti con
le relative maschere di inserimento dati e prevedere di portare dopo il
lavoro completo (con le maschere vendita e altre tabelle) potendo
integrare il database già creato? Cioè posso fargli creare al cliente un
database e poi trasportarlo nel lavoro ultimato dove esisteranno le
stesse tabelle ma vuote? Perché ha necessità intanto di fare inventario
prima che io finisca di completare il tutto...
Grazie in anticipo della risposta.
*kInAsH*


title: backup database

author: wlady

text:
*kInAsH* ha scritto:

certo che puoi, dovrai successivamente importare le tabelle già
compilate sul database completo. Access però non sostituisce le
tabelle nel caso siano già esistenti, ma si limita a importarle con un
nome diverso. Si potrebbe ovviare a questo problema utilizzando il
metodo CopyObject dell'oggeto DoCmd...
ciao


title: backup database

text:
wlady ha scritto:
> certo che puoi, dovrai successivamente importare le tabelle gią
> compilate sul database completo. Access perņ non sostituisce le
> tabelle nel caso siano gią esistenti, ma si limita a importarle con un
> nome diverso. Si potrebbe ovviare a questo problema utilizzando il
> metodo CopyObject dell'oggeto DoCmd...
>
> ciao
>
Ciao ^__^
Grazie della risposta..potresti spiegarmi in semplici passaggi (devo
essere molto veloce a finire questo lavoro) il metodo per importare le
tabelle e il metodo CopyObject? Le maschere di vendita nel progetto
finale lavoreranno sulle tabelle importate che sostituiscono quelle
nuove...ci sarą qualche problema di relazione?
*kInAsH*


title: backup database

text:
*kInAsH* ha scritto:
> wlady ha scritto:
>
> > certo che puoi, dovrai successivamente importare le tabelle già
> > compilate sul database completo. Access però non sostituisce le
> > tabelle nel caso siano già esistenti, ma si limita a importarle con un
> > nome diverso. Si potrebbe ovviare a questo problema utilizzando il
> > metodo CopyObject dell'oggeto DoCmd...
> >
> > ciao
> >
>
> Ciao ^__^
> Grazie della risposta..potresti spiegarmi in semplici passaggi (devo
> essere molto veloce a finire questo lavoro) il metodo per importare le
> tabelle e il metodo CopyObject? Le maschere di vendita nel progetto
> finale lavoreranno sulle tabelle importate che sostituiscono quelle
> nuove...ci sarà qualche problema di relazione?
>
> *kInAsH*
usalo così:
DoCmd.CopyObject "c:\...", "NomeTabella", acTable
"c:\..." è il percorso completo del database dove andranno inserite le
tabelle, quindi questo comando devi metterlo nel db con le tabelle già
compilate. Con questo metodo le relazioni non vengono alterate. Forse
esiste un'altra soluzione, ma con questa sono sempre riuscito..
ciao


title: backup database

author: Silver

text:
*kInAsH* ha scritto:
> Cioè posso fargli creare al cliente un
> database e poi trasportarlo nel lavoro ultimato dove esisteranno le
> stesse tabelle ma vuote?
si e se non hai utilizzato campi contatore puoi fare anche solo delle
query di accodamento


title: runtime access2002

author: ringo

text:
Salve a tutti,
esiste il runtime per access2002?
se io ho il runtime 2000 posso acquistare
l'upgrade?
grazie!
ringo


title: runtime access2002

text:
> Salve a tutti,
> esiste il runtime per access2002?
Ovviamente!
> se io ho il runtime 2000 posso acquistare
> l'upgrade?
Puoi, ma non č detto che il pacchetto 2002 sia ancora in commercio...
Saluti.


title: runtime access2002

text:
"Simone Calligaris" <
simo...@libero.it
> ha scritto nel messaggio
news:0q1ld.29867$Es2.6...@twister2.libero.it...

? why?
che versione esiste adesso?
grazie
ringo


title: runtime access2002

text:
"ringo"
> > Puoi, ma non č detto che il pacchetto 2002 sia ancora in commercio...
> ? why?
>
> che versione esiste adesso?
http://www.microsoft.com/italy/msdn/prodotti/vstudio/officetools/tool.mspx
http://www.microsoft.com/italy/msdn/prodotti/vstudio/officetools/sviluppo.ms
px


title: Tradurre il ? di access in SQL

author: Xymøx

text:
Ho bisogno in SQL di trovare tutti i codici di lunghezza 8 caratteri in cui
gli ultimi due finiscono con 93.
In access la sintassi è questa --> Like "*??????93"
Com'è in SQL?
grazie
--
bye marco
www.marcosanti.it


title: Tradurre il ? di access in SQL

author: AleC

text:

nell'sql di mssql i caratteri jolly * e ? sono % e _
non so se intendevi l'sql di Microsoft Sql


title: Tradurre il ? di access in SQL

text:
"AleC" <
alessandr...@novameta.it
> ha scritto
nell'sql di mssql i caratteri jolly * e ? sono % e _
non so se intendevi l'sql di Microsoft Sql
*********
Intendevo SQL Server di Microsoft, ho postato qui per errore.
Cmq la soluzione è LIKE "______93"
grazie cmq
--
bye marco
www.marcosanti.it


title: Disabilitare i pulsanti della tastiera " Pagsù" e "Pagiù"

author: Paola

text:
Salve a tutti, ho un problema con i tasti PagSů e PaGiů della tastiera.
Il problema č molto simile a quello relativo alla rotellina del Mouse,  i
record vengono scorsi dal primo all'ultimo anche quando si č in fase di
inserimento;
sapreste indicarmi come posso disabilitarli...??
Ringrazio anticipatamente
    saluti Paola


author: Claudio

text:
"Paola" <
p_d...@virgilio.it
> ha scritto nel messaggio
news:cYRr9.4305$aL4.1...@news1.tin.it...
> Salve a tutti, ho un problema con i tasti PagSù e PaGiù della tastiera.
> Il problema è molto simile a quello relativo alla rotellina del Mouse,  i
> record vengono scorsi dal primo all'ultimo anche quando si è in fase di
> inserimento;
> sapreste indicarmi come posso disabilitarli...??
Non dici dove vuoi disabilitare i tasti... se sei in una maschera, potresti
utilizzare l'evento "Su tasto giù". Ad esempio:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyPageDown Or KeyCode = vbKeyPageUp Then KeyCode = 0
End Sub
Ricorda di impostare la proprietà "Anteprima tasti" a "Sì" per la maschera.
Ciao. Claudio.


title: Stampare report con righe prestabilite

author: Dino

text:
Ciao sono Dino.Chirdevo se era possibile impostare un report in modo
tale che per ogni foglio mi stampi N° di righe.
Ciao e grazie in anticipo
Dino


title: Stampare report con righe prestabilite

text:

www.sitocomune.com
 sez. report
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: Stampare report con righe prestabilite

author: Roberto da Parma

text:
"Dino" <
verreng...@alice.it
> ha scritto nel messaggio
news:923d0158-5c1d-496e...@r66g2000hsg.googlegroups.com...

O Dino, ci stai un pò girando intorno a sto report eh! :-))
Non ci salti proprio fuori a quanto pare.
Non aprire però diversi post a riguardo...prova a seguire il problema
principale e a risolvere quello... se no sbarelli anche tu.
Il tuo è fondamentalmente solo un problema di margini e di formato del
foglio.
Attento perchè se poi cambi stampante sei di nuovo a capo!
Fondamentalmente devi strutturare il report in cinque sezioni
INTESTAZIONE PAGINA (fondamentalmente di altezza fissa)
INTESTAZIONE ID (che può essere ad es. fattura) (fondamentalmente di altezza
fissa)
CORPO (variabile a seconda dei record, ma ogni riga è di altezza fissa!)
PIE' DI PAGINA ID  (fondamentalmente di altezza fissa, ma che nella maggior
parte dei casi nascosta)
PIE' DI PAGINA PAGINA  (fondamentalmente di altezza fissa)
Ora tu sai che un A4 più o meno è alto 29 cm adesso non ricordo, togli le
altezze fisse e saprai quanto il corpo può essere alto.
Fai delle prove, regola i margini.
Se ad esempio dici che la seconda pagina ti viene vuota prova a
rimpicciolire il piè pagina pagina fino a quando la seconda pagina sparisce.
Ciao
--
Roberto da Parma


title: Stampare report con righe prestabilite

text:

Grazie Massi per la risposta


title: Stampare report con righe prestabilite

text:
On 22 Set, 19:00, "Roberto da Parma" <
arisi.robe...@tin.it
> wrote:
> "Dino" <
verrengia.d...@alice.it
> ha scritto nel messaggionews:923d0158-5c1d-496e...@r66g2000hsg.googlegroups.com...

OH! Roby "CIAIII" proprio ragione provo e al massimo ti riscrivo.
NB:Piccola cortesia tieni letto questo post perche' forse stasera o
domani mattina ne vado fuori
Graxie ancora Dino


title: Stampare report con righe prestabilite

text:

> Graxie ancora Dino- Nascondi testo citato
>
> - Mostra testo citato -
Sono sempre io.Ho fatto delle prove vediamose ci capiamo (o meglio se
capisco io).
Le sezioni del mio report sono come tu hai ben sottolineato 5.
Nell'intestazione pagina io ho inserito il logo - i campi inerenti al
cliente e i campi inerenti alla fattura (Es. Num fattura - data
fattura).
Questa sezione misura 12 cm.
ID FATTURA VUOTA
Il corpo invece ha una grandezza fissa.Nel corpo ho solo inserito i
campi  DESCRIZIONE - QRA' - PREZZO UNIT - PREZZO TOT).E questa sezione
e' fissa;ha cioe l'altezza solo dei campi in esame.
PIE DI PAG FATTURA HO INSERITO I CAMPI CALCOLATI (A CUI FACCIO
RIFERIMENTO NEL PIE DI PAGINA) ma e' nascosta
Ed infine IL PIE' DI PAGINA DOVE HO I CAMPI CALCOLATI che fanno rif al
pie pag fatt.
Circa 3 cm.
A qusto punto 29,5 - 15 = 14,5cm.Forse nonriesco a capire ma il corpo
e' la sezione piu' piccola.Si ingrandira' a seconda del num record che
vado a scrivere.
Per come ho impostato i margini 30 righe.Il problema e' che alla
30esima fa il salto pagina e nella 2° pag non c'e' scritto nulla.Io
non posso piu' ridurre i margini a livello di sezioni.Posso con
l'imposta pagina ma anche in quel caso posso aumentare o diminuire le
righe ma il concetto non cambia.Diminuisco i margini! benissimo per
ogni pagina invece di 30 righe me ne fa 20.Alla 20esima salto pagina
allo stesso modo.
Non riesco ad uscirne.
Aspetto tue notizie
Grazie Dino


title: Stampare report con righe prestabilite

author: CIDI

text:
"Dino" <
verreng...@alice.it
> ha scritto nel messaggio
news:2bec8b4c-af6e-473c...@k37g2000hsf.googlegroups.com...


hai provato a diminuire la larghezza, in struttura, del report?
Daniele


title: Stampare report con righe prestabilite

text:
On 22 Set, 21:34, "CIDI" <
dadonz...@spamtin.it
> wrote:
> "Dino" <
verrengia.d...@alice.it
> ha scritto nel messaggionews:2bec8b4c-af6e-473c...@k37g2000hsf.googlegroups.com...

Ciao Daniele sono Dino.Sì ho provato e non cambia nulla.
Il problema e' il salto pagina (non in fase di stampa) che fa Access
indipendentemente dalla larghezza/lunghezza del report.
Quando effettua il salto pagina miprepara gia' la seconda pagina pur
lasciando il fecord(o riga)che causa il salto ancora nella prima.
Grazie ancora.
Dino


title: Stampare report con righe prestabilite

text:
"Dino" <
verreng...@alice.it
> ha scritto nel messaggio
news:de72494d-f1fc-400a...@26g2000hsk.googlegroups.com...
>
> hai provato a diminuire la larghezza, in struttura, del report?
>
> Daniele
Ciao Daniele sono Dino.Sě ho provato e non cambia nulla.
Il problema e' il salto pagina (non in fase di stampa) che fa Access
indipendentemente dalla larghezza/lunghezza del report.
Quando effettua il salto pagina miprepara gia' la seconda pagina pur
lasciando il fecord(o riga)che causa il salto ancora nella prima.
Grazie ancora.
Dino
ciao  Dino
come detto anche da Roberto il tuo problema sono i margini del report.
salvo che non hai inserito un salto pagina da qualche parte.
se vuoi mandami un minimo zip del tuo report.
togli "no" @ "spam"
Daniele


title: Stampare report con righe prestabilite

text:
On 23 Set, 14:28, "CIDI" <
dadonz...@spamtin.it
> wrote:
> "Dino" <
verrengia.d...@alice.it
> ha scritto nel messaggionews:de72494d-f1fc-400a...@26g2000hsk.googlegroups.com...
>
>
>
> > hai provato a diminuire la larghezza, in struttura, del report?
>
> > Daniele
>
> Ciao Daniele sono Dino.Sì ho provato e non cambia nulla.
> Il problema e' il salto pagina (non in fase di stampa) che fa Access
> indipendentemente dalla larghezza/lunghezza del report.
> Quando effettua il salto pagina miprepara gia' la seconda pagina pur
> lasciando il fecord(o riga)che causa il salto ancora nella prima.
> Grazie ancora.
> Dino
>
> ciao  Dino
> come detto anche da Roberto il tuo problema sono i margini del report.
> salvo che non hai inserito un salto pagina da qualche parte.
> se vuoi mandami un minimo zip del tuo report.
> togli "no" @ "spam"
>
> Daniele
Grazie Dany ti preparo una sintetica del copia del DB in modo tale che
tu possa dargli un 'occhiata.
Dire che sei gentile e' poco .Se mi autorizzi io invio
Grazie Dino


title: Stampare report con righe prestabilite

text:
"Dino" <
verreng...@alice.it
> ha scritto nel messaggio
news:e511c585-9ee0-4ca3...@34g2000hsh.googlegroups.com...



ok. manda.
ti avevo già dato il consenso ;-)
Daniele


title: Stampare report con righe prestabilite

text:
On 23 Set, 19:18, "CIDI" <
dadonz...@spam.tin.it
> wrote:
> "Dino" <
verrengia.d...@alice.it
> ha scritto nel messaggionews:e511c585-9ee0-4ca3...@34g2000hsh.googlegroups.com...

Ciao io te l'ho spedito ancora ieri.
Dino


title: Stampare report con righe prestabilite

text:

> Dino- Nascondi testo citato
>
> - Mostra testo citato -
Dany fammi sapere se ti e' arrivato il tutto!!!
Grazie Dino


title: problema access 2000/access 2003

text:
Ciao a tutti,
Qualche tempo fa ho postato un messaggio in cui chiedevo aiuto per gestire
l'assegnazione di bmp ai controlli Immagine delle maschere, tramite function
pubblica. Il codice risultante è il seguente:
Option Compare Database
Public Function setGrafs(frm As Access.Form)
'**********************************************************
'* skinna tutte le form  e subform del db con bmp collegati
'**********************************************************
    Dim Ctl As Control
    For Each Ctl In frm.Controls
        Select Case Ctl.ControlType
            Case acSubform
                Call setGrafs(Ctl.Form)
            Case Else
                If Ctl.Tag = "barT" Then
                    Ctl.Picture = PathCorrente & "IMGs\barT.bmp"
                ElseIf Ctl.Tag = "barO" Then
                    Ctl.Picture = PathCorrente & "IMGs\barO.bmp"
                ElseIf Ctl.Tag = "barB" Then
                    Ctl.Picture = PathCorrente & "IMGs\barB.bmp"
                Else
                End If
        End Select
    Next
End Function
In ogni form che desidero venga "skinnata", dunque inserisco il codice che
segue, facente riferimento alla function pubblica setGrafs:
Call setGrafs(Me)
Il tutto funziona ergegiamente in access 2003, ma se eseguo il db con access
2000 le form contenenti il riferimento alla function setGrafs mi danno il
seguente errore:
Errore di run-time '13':
Tipo non corrispondente.
Come risolvere questo problema?
Grazie infinite!
em.an.


title: problema access 2000/access 2003

text:
[CUT]
Dimenticavo: il tutto sotto windows vista
(il cliente utilizza però windows xp).
em.an.


title: Problemi nel filtrare una query in access '00 che si appoggia ad una  tabella in SQL

text:
Ciao a tutti sono ancora Dino.Ho un altro problema.Ho una determinata
query (creata in base ad una tab in SQL) se vado nella riga criteri
del campo "visualizza"(proprieta' sì/no)e imposto "Falso"invece di
visualizzare solo i records con tale proprieta' non visualizzo nulla
pur essendoci dei recors impostati a "Falso" se invece inserisco
"Vero" vedo solo i records con tale criterio.
Premetto che il campo in esame in SQL ha proprieta' Bit(invece di Sì/
no) ed ho impostato nelle proprieta' di campo (perche' cosi' vuole
SQL) DBO:Zero_Default.
Nella query in esame ho fatto la stessa prova mettendo Zero(in
numero)al posto di "falso" e 1 al posto di "Vero",ma il risultato non
cambia.
NB:Questo problema lo riscontro solo in questa query,mentre in altre
query dove ho altri campi con la stessa proprieta' funziona tutto
regolarmente.
Da cosa puo' dipendere.
Dino


author: Gabriele Bertolucci

text:
> Nella query in esame ho fatto la stessa prova mettendo Zero(in
> numero)al posto di "falso" e 1 al posto di "Vero",ma il risultato non
> cambia.
Hai provato ad utilizzare il criterio "<>0" al posto del criterio "1" per
la condizione "Vero" ?
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


text:

Ciao Gabriele grazie per la risposta.
Il problema e' solo con la proprieta' falso cioe' (parlando in SQL)
"0".Non mi capacito perche' se vado ad impostarlo non mi fa vedere
nessun record.I parametri che ho impostato nel SQL sono giusti perche'
come ho scritto prima funzionano nelle altre query.
Posso al massimo provare <>1??Cosa dici??
Grazie Dino


text:
> Il problema e' solo con la proprieta' falso cioe' (parlando in SQL)
> "0".
La regola generale, che vale anche per SQL è: FALSO corrisponde a "=0" e
VERO corrisponde a "<>0".
> Non mi capacito perche' se vado ad impostarlo non mi fa vedere
> nessun record.I parametri che ho impostato nel SQL sono giusti perche'
> come ho scritto prima funzionano nelle altre query.
> Posso al massimo provare <>1??Cosa dici??
Dico che il tutto mi suona strano.
Fossi in te proverei con il SQL Profiler a vedere cosa arriva
effettivamente a SQL Server.



text:

Grazie Gabriele provo e poi ti faccio sapere
Auguri a te e al team della pbsoft di buona pasqua.
NB:Controlla ancora dopo pasqua questo post perche' scrivero la
verifica che mi hai sottolineato.
Saluti Dino


text:

> Saluti Dino- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Gabriele tutto OK risolto con l'inserimento nei criteri di <>1 al
posto di 0.
Saluti Dino


title: Risultato query eseguita da maschera

author: Grieco Francesco

text:
Cosa devo fare perchè il risultato dell'esecuzione di una query eseguita con
un pulsante di comando di una form venga messa in primo piano.
Tante Grazie
Francesco Grieco


title: Risultato query eseguita da maschera

author: Antonio Biso

text:
Grieco Francesco <
grieco.f...@inwind.it
> wrote in message
9u212p$qas$1...@nreadb.inwind.it...
> Cosa devo fare perchè il risultato dell'esecuzione di una query eseguita
con
> un pulsante di comando di una form venga messa in primo piano.
Cosa intendi per risultato di una query?
Cosa intendi per primo piano?
Antonio


title: Risultato query eseguita da maschera

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:5t2N7.192620$sq5.9...@news.infostrada.it...

La visualizzazione dei risultati
Adesso esce dietro la maschera
Ancora Grazie!!!


title: riproduzione avi interrotta

author: AEOM

text:
Ciao a tutti
In una form ho un filmato avi che viene avviato prima di scaricare un file
da un sito la seguenta funzione di sistema
Private Declare Function URLDownloadToFile Lib "urlmon" Alias
"URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal
szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As
Long
per tutto il periodo del download il filmato si blocca per poi ripartire.
C'è un modo per evitare l'interuzzione del filmato?
Ciao, AEOM


title: MAIL_SENDER(UPDATE)

author: Pasquale

text:
Salve, ho installato MAIL_SENDER(UPDATE) di Alex e anche VisualStudio, ma
dice che manca Micosoft Winsock control, come posso fare? Grazie
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: MAIL_SENDER(UPDATE)

author: Alessandro Baraldi

text:
Pasquale ha scritto:
> Salve, ho installato MAIL_SENDER(UPDATE) di Alex e anche VisualStudio, ma
> dice che manca Micosoft Winsock control, come posso fare? Grazie
Installare Winsock è l'unico modo...!
La cosa è un pò strana, ma dipende da che versione di VS hai
installato presumo.
Solitamente veniva distribuito con VB6 io avevo la versione Enterprise.
Il controllo è reperibile in rete, ma serve registrarlo con una chiave
codificata cosa che
senza licenza non credo sia possibile.
@Alex


title: Access News 1

author: Karl Donaubauer

text:
Salve,

Se parli un po' d'inglese e vuoi scoprire le novità di Access, ora puoi
guardare la prima edizione del mio programma di notizie video "Access
News":
https://youtu.be/wpPYu6G_xcY

Ciao
Karl
*********
http://AccessDevCon.com

Access FAQ:
https://www.donkarl.com/it


title: Access News 1

author: Ammammata

text:
Il giorno Thu 16 Dec 2021 11:45:26a, *Karl Donaubauer* ha inviato su
it.comp.appl.access il messaggio
news:j20jm5...@mid.individual.net
.
Vediamo cosa ha scritto:

> Se parli un po' d'inglese e vuoi scoprire le novitą di Access, ora puoi
> guardare la prima edizione del mio programma di notizie video "Access
> News":
https://youtu.be/wpPYu6G_xcY

>
>

voglio anche io QUEL microfono :)

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


title: utenti multipli

author: Michele Borsaro

text:
Salve a tutti,
ho un database pronto per l'utilizzo, come faccio a fare in modo che più
utenti lo possano aprire e/o lavorarci sopra?
Grazie
Michele


title: utenti multipli

author: MA

text:

          Dividi il database (c'è un utility in strumenti), poi metti il tuodb_be in
una cartella condivisa; vai sui client, connetti come unità di rete la tua
cartella condivisa (usa una lettera che vada bene per tutti i client),
ricolleghi le tabelle del vecchio db a quello nell'unità di rete appena
mappata e copi il vecchio db su tutti i client
MAssimiliano
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: utenti multipli

author: Pablitomf

text:
Michele Borsaro ha scritto:
> Salve a tutti,

> Grazie
> Michele
Già partendo con un icona di collegamento su vari PC ci riesci.
La cosa ideale sarebbe avere una base dati (Back end) con tutte le tabelle
e un Front end con maschere, query, report moduli, macro e tabelle
collegate al Back End
Questo ti permettererebbe di avere il Front End su ogni macchina e
lavorare sulla stessa base dati in contemporanea.
--
Pablitomf (Maurizio Facciuti)
Lentamente muore chi abbandona un progetto prima di iniziarlo, chi non fa
domande sugli argomenti che non conosce, chi non risponde quando gli
chiedono qualcosa che conosce. (P.Neruda)
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: report inpostazioni pagina

text:
Salve a tutti
Ho creato un report con le seguenti impostazioni:
margini 10 e orientamento orizzontale. Il problema � che quasi ad ogni
apertura queste impostazioni vengono perse e sostituite con quelle
predefinite. In che modo posso rendere stabili le impostazioni della pagina
?
Ringrazio findora per i suggerimenti


title: report inpostazioni pagina

text:
Tex_Willer wrote:
> Ho creato un report con le seguenti impostazioni:
> margini 10 e orientamento orizzontale. Il problema ï¿œ che quasi ad
> ogni apertura queste impostazioni vengono perse e sostituite con
> quelle predefinite. In che modo posso rendere stabili le
> impostazioni della pagina ?
Quale versione di Access con quale SP?
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it


title: report inpostazioni pagina

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:7d1eotF...@mid.individual.net...
> Tex_Willer wrote:
>> Ho creato un report con le seguenti impostazioni:
>> margini 10 e orientamento orizzontale. Il problema � che quasi ad
>> ogni apertura queste impostazioni vengono perse e sostituite con
>> quelle predefinite. In che modo posso rendere stabili le
>> impostazioni della pagina ?
>
> Quale versione di Access con quale SP?
>
> --
> cu
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
>
acces 2000 (9.0.2812)
la stringa per l'apertura del report � la seguente:
DoCmd.OpenReport stDocName, acViewPreview
la query da cui prende i dati il report viene rinnovata di volta in volta da
codice.
comunque in base alla mia esperienza i margini dei report di acces sono un
po instabili basta poco per perdere le impostazioni. Ho sentito parlare di
impostazione margini da codice. Su quale evento e in che modo si possono
impostare ?


title: report inpostazioni pagina

text:
Tex_Willer wrote:
> "Karl Donaubauer ha scritto:
>>> Ho creato un report con le seguenti impostazioni:
>>> margini 10 e orientamento orizzontale. Il problema ï¿œ che quasi ad
>>> ogni apertura queste impostazioni vengono perse e sostituite con
>>> quelle predefinite. In che modo posso rendere stabili le
>>> impostazioni della pagina ?
>>
>> Quale versione di Access con quale SP?
>>
> acces 2000 (9.0.2812)
2812 = nessun SR o SP installato.
In questo caso si tratta di un bug noto. Leggi:
 I report in A00 perdono le impostazioni di stampa

www.donkarl.com/it?FAQ7.15
> la stringa per l'apertura del report ï¿œ la seguente:
> DoCmd.OpenReport stDocName, acViewPreview
> la query da cui prende i dati il report viene rinnovata di volta in
> volta da codice.
> comunque in base alla mia esperienza i margini dei report di acces
> sono un po instabili basta poco per perdere le impostazioni. Ho
> sentito parlare di impostazione margini da codice. Su quale evento
> e in che modo si possono impostare ?
 Cambiare la stampante o le impostazioni stampante/pagina

www.donkarl.com/it?FAQ5.1
--
HTH



title: inserire immagini in report

author: Maurizio

text:
ciao a tutti
dovrei creare un report con due immagini per ogni pagina. Le immagini potrebbero essere anche parecchie e quindi posso avere anche 6-7 pagine
utilizzo il codice nel report "su attivazione"

Do While Not (rs1.EOF)
    PercorsoFoto = rs1.Fields("PercorsoFoto")
    Me.Foto01.Picture = PercorsoFoto
    rs1.MoveNext

    PercorsoFoto = rs1.Fields("PercorsoFoto")
    Me.Foto02.Picture = PercorsoFoto
    rs1.MoveNext
Loop

cosi nella prima pagina le foto sono corrette ma si ripetono anche nelle pagine successive
ma come faccio ad inserire le successive foto nelle successive pagine ?
grazie
Maurizio


title: inserire immagini in report

author: Akery

text:
Prova a far girare il codice su stampa nella sezione corpo.

Akery

"Maurizio"  ha scritto nel messaggio
news:b4b837a7-fb2e-441c...@googlegroups.com...



title: inserire immagini in report

text:

grazie ma avevo già provato e non funziona


title: inserire immagini in report

text:
Il giorno giovedì 9 giugno 2016 09:07:56 UTC+2, Maurizio ha scritto:

Il Recordset da dove viene...? Non si vede nè la dichiarazione nè l'assegnazione...
Se alla prima pagina sono corrette... è altrettanto vero che alla 1° pagina sei in EOF e se non lo riempi bene...
Hai controllato con il DEBUG che il RS non sia in EOF o VUOTO...?

Gestione errori o DEBUG...?

@Alex


title: [Rapporti famigliari] come implementarli???

author: Simone

text:
Innanzitutto un ciao a tutti,
visto che l'ultima volta che ho scritto, ho solo scroccato consigli, questa
volta voglio anche dare  un piccolissimo contributo con una funzioncina che
ho utilizzato per ricercare dei dati, al posto di utilizzare il classico
'trova' di Access (menoso perchè bisogna settare se parte del campo, se
cercare in su , in giù ecc. ecc.).
Sicuramente i più in gamba avranno modo di sorridere e migliorarla (sarà
meglio per tutti noi) ...ma le mie capacità non sono elevate.
Ora veniamo al mio problema...
sono alle prese con uno di quei problemi che mi fanno arrovellare il
cervello senza cavare un ragno dal buco.
Come da oggetto devo implementare i rapporti famigliari (padre, madre, ecc.
fino al 3° grado di parentela!!!!) di una serie di personaggi inseriti in
una
tabella.
Io pensavo di relazionare in modo ricorsivo, cioè duplicare nella finestra
delle relazioni, la tblPersone con una tabella tblRappFam composta dai
campi:
tblPersone.ID   tblRappFam.Tipo   tblPersone(1).ID
Poi tramite una function (mi viene male al solo pensiero) completare i
rapporti
famigliari della persona specificata con tutte le altre correlate ad essa.
Forse un esempietto spiega meglio eh?
Allora...
se in una maschera dichiaro che Pippo è figlio di Ciccio, cioè aggiungo un
record es:
tblPersone.ID   tblRappFam.Tipo   tblPersone(1).ID
     Pippo                figlio                        Ciccio
e nella tabella tblRappFam Ciccio è gia stato inserito come marito di Minni,
la funzione dovrebbe aggiungermi un record:
tblPersone.ID   tblRappFam.Tipo   tblPersone(1).ID
     Pippo                figlio                        Minni
NB: * ID in effetti è numerico
Sono sulla strada giusta o fuori completamente?
Voi come risolvereste?
Eventualmente un aiutino o una dritta sulla *funzioncina*?
Un grazie di cuore a chi perderà un po' di tempo su questo quesito.
Come promesso ecco la funzioncina 'cerca':
**********************
Public Function Cerca()
On Error GoTo ERRORE
Dim dbs As Database              '
Dim tdf As TableDef              '
Dim fld As Field                 '
Dim intTipodati As Integer       '
Dim strDaTrovare As String       '
Dim strDaTrovMod1 As String      '
Dim StringaCambiata As Boolean   ' dichiaro le variabili
Dim strMex As String             '
Dim strPerSQL As String          '
Dim rst As Recordset             '
Dim varSLib As Variant           '
Set dbs = CurrentDb
' imposto la variabile tabella *tdf* con l'origine record della maschera
corrente
Set tdf = dbs.TableDefs(Screen.ActiveForm.RecordSource)
' rendo lo stato attivo al controllo precedente alla pressione del pulsante
Screen.PreviousControl.SetFocus
' imposto la variabile campo *fld* con l'origine dati del controllo corrente
Set fld = tdf.Fields(Screen.ActiveControl.ControlSource)
StringaCambiata = False ' imposto a falso il flag
strMex = "Cosa devo cercare?" ' imposto il testo della InputBox
' imposto la variabile stringa con il testo immesso nell'Inputbox
strDaTrovare = InputBox(strMex, "Trova nel campo " & UCase(fld.Name), _
                         Nz(strDaTrovare, ""), 5000, 6000)
' se non è stato immesso testo o si è premuto il tasto Annulla esco dalla
funzione
If strDaTrovare = "" Then Exit Function
' imposto il recorset sull'origine dati della maschera
Set rst = Screen.ActiveForm.RecordsetClone
With rst
   Do Until strDaTrovare = "" ' ciclo fino a quando il testo immesso è nullo
   ' imposto la striga di filtro per il metodo Find in base al campo
selezionato
   ' e controllo che si effettui la ricerca in un campo in cui è consentito
      Select Case fld.Type
         Case 2 To 4   ' numerico
            strPerSQL = " = " & Trim(strDaTrovare)
         Case 8   ' data/ora
            strPerSQL = " = #" & Format(Trim(strDaTrovare), "yyyy" & "/" &
"mm" & "/" & "dd") & "#"
         Case 10   ' testo (in questo caso permetto la ricerca in parte del
campo)
            strPerSQL = " Like " & Chr(34) & "*" & Trim(strDaTrovare) & "*"
& Chr(34)
         Case Else ' altrimenti messaggio e esco dal 1° ciclo
            MsgBox "Impossibile effettuare una ricerca in questo campo!" _
                  , vbInformation, "Esecuzione terminata"
            Exit Do
      End Select
      .MoveLast ' muovo il puntatore all'ultimo record per riempire il
buffer della memoria
      .MoveFirst ' torno al primo record
      .FindFirst fld.Name & strPerSQL   ' cerco il primo record che soddisfa
le condizioni
      If .NoMatch Then ' se non ho trovato nulla mex e via dal 1° ciclo
         MsgBox "Nessuna corrispondenza trovata in questo campo!", _
                 vbInformation, "Testo non trovato"
         Exit Do
      End If
      varSLib = .Bookmark ' altrimenti marco la posizione
      Screen.PreviousControl.SetFocus ' rendo disponibile il controllo per
il segnalibro
      Screen.ActiveForm.Bookmark = varSLib ' visualizzo nella maschera il
recor trovato
      Do Until .EOF ' ciclo fino alla fine del recordset
' imposto questa variabile per verificare se nell'InputBox è cambiata la
stringa  di ricerca
         strDaTrovMod1 = InputBox(strMex, "Continua la ricerca nel campo " _
                        & UCase(fld.Name), strDaTrovare, 2000, 2000)
         If strDaTrovare = strDaTrovMod1 Then ' se è uguale
            .FindNext fld.Name & strPerSQL ' cerco il successivo record
            If .NoMatch Then ' se non ne trovo mex e via dal 2° ciclo
               StringaCambiata = False
               MsgBox "Nessun altra corrispondenza trovata in questo
campo!", _
                                    vbInformation, "Testo non trovato"
               Exit Do
            End If
            varSLib = .Bookmark ' se trovo... come prima
            Screen.PreviousControl.SetFocus
            Screen.ActiveForm.Bookmark = varSLib
         Else ' se la stringa di ricerca (strDaTrovMod1) è diversa
            StringaCambiata = True ' flag a vero
            strDaTrovare = strDaTrovMod1 ' e imposto la stringa da trovare
con quella nuova
            Exit Do ' esco dal 2° ciclo per rifare tutto il 1°
         End If
      Loop
' se ho raggiunto l'ultimo record oppure è stata impostata a zero la
lunghezza della stringa
      If StringaCambiata = False Or strDaTrovare = "" Then
         Exit Do ' esco anche dal 1° ciclo
      End If
   Loop ' altrimenti faccio un'altro giro
   .Close ' chiudo il recordset
End With
ESCI:
   Set rst = Nothing    '
   Set fld = Nothing    ' imposto i vari oggetti a nulla
   Set tdf = Nothing    '
   Set dbs = Nothing    '
   Screen.PreviousControl.SetFocus ' rendo attivo il controllo precedente al
clic del pusante
   Exit Function
ERRORE:
   If Err.Number = 0 Then
      Resume Next
   ElseIf Err.Number = 438 Then
      MsgBox "Prima di trovare dei dati bisogna che almeno" & vbCrLf & _
            "un campo sia selezionato.", vbCritical, "Errore: campo non
selezionato"
      Resume ESCI
   ElseIf Err.Number = 3070 Then
      MsgBox "Stringa di ricerca non valida per il campo selezionato!" _
            , vbCritical, "Errore: tipo di dati non corrispondenti"
      Resume ESCI
   ElseIf Err.Number = 3077 Then
      MsgBox "Stringa di ricerca non valida per il campo selezionato!" _
            , vbCritical, "Errore: tipo di dati non corrispondenti"
      Resume ESCI
   Else
      MsgBox Err.Number & vbCrLf & Err.Description, vbCritical, "Errore non
gestito"
      Resume ESCI
   End If
End Function
*******************************************
Ciao, Simone


author: The Resolver

text:
Io ho fatto cosí (premetto che quanto segue non gestisce i nuclei storici se
hai questa esigenza allora bisogna fare un'altro discorso):
Sono andato all'anagrafe e mi sono fatto dare tutti i codici che loro
utilizzano tipo
CF = capo famiglia
FGO Figlio/Figlia
FGA Fifglia (vediamo di leggerla bene questa sigla ... )
MG moglie
CV Convivente
MD Madre (nel senso di madre del CF)
PD padre (come sopra solo che é il nonno)
CU cugino
ecc ecc (tutti i rapporti di parentela dei componenti del nucleo familiare
con il CF)
Ora se strutturi la ricorsione in questo modo
Codice_persona PK
Nome
Cognome
Parentela
Ecc.
Ecc.
Codice_CF (che é la FK)
é imponi che:
   il CF nel campo codice_CF ha il codice_persona di se stesso
   quando insersci una qualsiasi persona devi assegnargli anche il codice
del suo CF
Risultato: tutti i componenti il nucleo familiare hanno il proprio
codice_persona e nel campo Codice_CF il codice del proprio CF (il CF di se
stesso).
ESEMPIO
Se inserisci i record
1000
Paolino
Paolone
FGO
ecc.
ecc.
123
1001
Bella
Bionda
MG
ecc.
ecc.
123
(deve esistere giá il record con codice_persona =123 ed essere un CF questo
lo controlli con un trigger - o una procedura se il tuo database non
supporta i trigger- e con un controllo referenziale) allora non devi
inserire un record per dire che Paolino Paolone é figlio anche di Bella
Bionda in quanto appartengono allo stesso nucleo familiare e sono
rispettivamente moglie e figlio del CF 123. Il rapporto di parentela tra i
due (nel caso semplice) lo deduci (lo  espliciti con una tabella a parte nel
caso che Bella Bionda sia la seconda moglie di 123 e che Paolino Paolone sia
figlio della prima moglie e figliastro di Bella Bionda).
Ovviamente a richiesta posso fornire svariati rompicapi per gli
azzeccagarbugli delle situazione dove ad esempio la moglie del cognato sposa
il cugino del nonno il quale a sua volta convive con la sorella del padre di
suo nipote e tutti vivono a casa del figlio di tua zia  ma la struttura nel
suo complesso regge bene (per i nuclei familiari non storicizzati).
Prooova!!!


text:
Proverò grazie (anche se sarà dura...)
cosa intendi per nuclei familiari non storicizzati ?


title: Access e tabelle Word: atteggiamento stranissimo

author: Pio Pio

text:
Ciao a tutto il NG,
Mi succede una cosa stranissima durante lo riempimento di una tabella in word da parte di access. Il
codice incriminato è il seguente:
    Dim oApp As Object
    Dim oDoc As Object
        Set oApp = CreateObject("Word.Application")
        Set oDoc = oApp.Documents.Open(CurrentProject.Path & "\word\Distintaavvocato.doc")
        oApp.Visible = True
        oDoc.Bookmarks("NomeAvvocato").Select
        oApp.Selection.TypeText Text:=CStr(Me.Descrizione.Column(0))
        oDoc.Tables(1).Select
        Me.Recordset.MoveFirst
        For a = 0 To Me.Recordset.RecordCount - 1 (*** PUNTO 1 ***)
            With oApp.Selection
                .MoveRight Unit:=wdCell
                .TypeText Text:=CStr(Me.Recordset.Fields("codice"))
                .MoveRight Unit:=wdCell
                .TypeText Text:=CStr(Me.Recordset.Fields("denominazione"))
            End With
            Me.Recordset.MoveNext
        Next
Se imposto un punto di interruzione fino alla riga contrassegnata da (*** PUNTO 1 ***) e se aspetto
qualche secondo prima di far proseguire la procedura allora tutto fila liscio, se invece lo
posiziono nel ciclo for.. next o se non lo inserisco proprio oppure faccio proseguire immediatamente
la procedura mi dà errore.
L'errore che mi si presenta è 'errore run-time 3021 nssun record corrente'. Ho fatto un  po' di
controlli e ho notato che se al computer non viene concessa la 'pausa di riflessione' che ho citato
sopra ripete il ciclo for... next una volta di troppo e all'ultimo passaggio, naturalmente, non
trova il dato che gli serve.
Perchè accade questo ? Cosa posso fare per risolvere la situazione ? Ho provato anche a fare
attendere il pc con l'istruzione sleep che ho trovato in questo NG per 5 secondi ma non succede
niente.
Grazie mille in anticipo.
Stay alive !
Pio Pio (utente newbe)
Win XP & Office 2000
www.ticom.it/tennisbuscate


author: Maurizio Borrelli

text:
> "Pio Pio" [...]:
> Mi succede una cosa stranissima durante lo riempimento di una tabella in
> word da parte di access. Il
> codice incriminato è il seguente:
>     Dim oApp As Object
>     Dim oDoc As Object
>         Set oApp = CreateObject("Word.Application")
>         Set oDoc = oApp.Documents.Open(CurrentProject.Path &
> "\word\Distintaavvocato.doc")
>         oApp.Visible = True
>         oDoc.Bookmarks("NomeAvvocato").Select
>         oApp.Selection.TypeText Text:=CStr(Me.Descrizione.Column(0))
>         oDoc.Tables(1).Select
>         Me.Recordset.MoveFirst
>         For a = 0 To Me.Recordset.RecordCount - 1 (*** PUNTO 1 ***)
    Mai, ripeto MAI, usare questo metodo! Anche perche' se proprio vuoi
definirlo un "metodo" e' un metodo per rovinarti la vita.
    Usa:
        Do Until rst.EOF
            .
            .
            rst.MoveNext
        Loop

--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


text:


Ok grazie mille per l'informazione, però perchè non usare mai questo metodo ? Perchè è così
catastrofico ?



text:
> "Pio Pio" [...]:
> Ok grazie mille per l'informazione, perň perchč non usare mai questo
> metodo ? Perchč č cosě catastrofico ?
    Facciamo che prima leggi la pagina della guida a proposito di
RecordCount (DAO e ADO) poi se hai dei dubbi domandi? ;-)



text:
On Wed, 18 Sep 2002 21:16:18 +0200, "Maurizio Borrelli" <
maurizio...@freepass.it
> wrote:
>> "Pio Pio" [...]:
>> Ok grazie mille per l'informazione, perň perchč non usare mai questo
>> metodo ? Perchč č cosě catastrofico ?
>
>    Facciamo che prima leggi la pagina della guida a proposito di
>RecordCount (DAO e ADO) poi se hai dei dubbi domandi? ;-)
Ciao Maurizio,
Ha a che fare con l'aggiornamento del record corrente del Recordset vero ?



title: Mail via mapi

author: Jason

text:
Ciao a tutti,
devo installare un mio applicativo in A2002 su O.S. Enbedded POS Ready
2009, dove non è presente O.E. e non è installabile.
Ho quindi installato Mozilla Thunderbird, e speravo di utilizzare
l'esempio di A. Baraldi per inviare delle mail in maniera completamente
trasparente, ma il risultato è che mi si apre thunderbird e mi compare una
messaggio che dice "Non è riuscito l'Invio del Messaggio", penso che sia
di Thunder.
Ho anche provato a passare con "shell" i comandi di linea ma sembra che
l'unico modo per inviare mail da "prompt" con thunder.. sia il metodo
-compose che comunque obbliga a clickare sul comandi "send" della finestra
che viene aperta.
Qualche dritta o link.
Grazie 10000000
Jason
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: somma riepilogativa a fine report

author: ciarletto

text:
Ciao, in un elenco verticale di valori, vorrei inserire una somma a fine
elenco, come faccio?
grazie
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: somma riepilogativa a fine report

author: Giovanni

text:
Il 01 Giu 2004, 14:05,
ciar...@yahoo.it
 (ciarletto) ha scritto:
> Ciao, in un elenco verticale di valori, vorrei inserire una somma a fine
> elenco, come faccio?
> grazie
>
visualizza il piè di pagina del report e mettici una casella di testo con
questa origine dati
  =Somma([Tabella]![campo])



title: MDE ingrassato

author: Andrea Bianchi

text:
Ciao a tutti.
Ho creato un Dbase,  l'ho convertito in MDE e l'ho installato in diverse
macchine. Tutte le tabelle sono sul server e la mi domanda è la seguente:
perchè ogni volta che un utente utilizza il DB sul suo PC, il file mde
incrementa di dimensione?
Quali dati vengono archiviati se tutte le info sul server?
Esiste un rimedio a questa "malattia"?
Ciao
--
Dr. Andrea Bianchi
e-mail -
bian...@inwind.it


title: MDE ingrassato

text:
Andrea Bianchi ha scritto:
> Ho creato un Dbase,  l'ho convertito in MDE e l'ho installato in diverse
> macchine. Tutte le tabelle sono sul server e la mi domanda è la seguente:
> perchè ogni volta che un utente utilizza il DB sul suo PC, il file mde
> incrementa di dimensione?
> Quali dati vengono archiviati se tutte le info sul server?
> Esiste un rimedio a questa "malattia"?
Di solito la causa sono le query. p.e.
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q165823
anche è vero nel runtime se ci sono modificazione delle statement
SQL (recordsources di una machera o report o query salvato) con codice.
Dipendente dalla versione di Access (>=A00) che non hai rivelato
puoi lasciare compattare la database alla fine.
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: MDE ingrassato

author: warp

text:
Andrea Bianchi ha scritto nel messaggio ...
>Ciao a tutti.
>Ho creato un Dbase,  l'ho convertito in MDE e l'ho installato in diverse
>macchine. Tutte le tabelle sono sul server e la mi domanda è la seguente:
>perchè ogni volta che un utente utilizza il DB sul suo PC, il file mde
>incrementa di dimensione?
>Quali dati vengono archiviati se tutte le info sul server?
Il progetto VBA compilato di un .MDE è a sola esecuzione, le connessioni alle tabelle su Server no.
La gestione di Tabelle Collegate comporta la creazione e distruzione di aree temporanee locali sul
tuo FE.
Se, a titolo di curiosità, tu provassi a interfacciarti al .mdb su Server senza tabelle collegate e
controlli associati (usando caselle di riepilogo non associate e controlli non legati e agg. Batch
su conferma dell'utente), il tuo .MDE rimarrebbe a sola lettura.
>Esiste un rimedio a questa "malattia"?
Sì, setta l'opzione di autocompattazione su chiusura (Access>97).
Ciao.


title: MDE ingrassato

author: gianfranco

text:
Purtroppo non posso aiutarti, ma forse puoi darmi un aiuto tu. Ho letto che
hai l'MDE su varie macchine più Server. Io ho fatto lo stesso, ma non riesce
amandare avanti più di due macchine. Se tu non hai questo problema puoi
dirmi come hai configurato le macchine: Sistema operativo Msaccess, Rete
ecc. ti ringrazio.
Andrea Bianchi <
bian...@inwind.it
> wrote in message
zUHi8.16031$tC3.4...@twister1.libero.it...



title: Informazioni progrmmi su computer

author: Tom

text:
Ciao a tutti,
ho creato un database per il controllo e la gestione di PC (ca.50) presenti
in un ufficio, in poche parole dovrei controllare in ogni singolo PC le
caratteristiche della macchina ed i programmi installati  tipo:
- Sistema operativo
- Eventuale Antivirus
- programma di posta elettronica
- se il Pc è collegato ad una rete
ecc....
 ho scaricato dal sito comune il file di esempio che mi rileva il
SerialNumber della macchina, e questo mi va bene, però mi servirebbe qualche
altro esempio che mi permetta di rilevare i programmi, compreso il SO,
citati sopra.
C'è qualcuno che può aiutarmi?
Grazie Tommy


title: Informazioni progrmmi su computer

text:
>  ho scaricato dal sito comune il file di esempio che mi rileva il
> SerialNumber della macchina, e questo mi va bene, però mi servirebbe
qualche
> altro esempio che mi permetta di rilevare i programmi, compreso il SO,
> citati sopra.
> C'è qualcuno che può aiutarmi?
> Grazie Tommy
>
se riesci a lanciare microsfot system information dal quel pc sapresti tutto
"C:\Programmi\File comuni\Microsoft Shared\MSInfo\msinfo32.exe"
lo buttata li non so come potresti fare a lanciarlo e nemmeno a farti
inviare i dati da tale programma.
ciao.


title: Stored Procedures - Parametri da maschera

author: Marco Antonioli

text:
Buonasera a tutti.
In un progetto adp, come impostereste l'origine riga di combo2 se
questa dipendesse dal valore assunto da combo1 sulla maschera stessa ?
Grazie+
MArco
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: AEOM

text:
"Marco Antonioli" <
in...@echovr.it
> ha scritto nel messaggio
news:339eabae3d0fb242500...@mygate.mailgate.org...

sull'evento afterupdate della prima metti un be
me.comb2.recordsource="select .... from ..... where mioparametro=" &
me.combo1
o meglio ancora lo stesso codice lo metti nell'evento "su attivato" della
seconda combo
ciao, AEOM


text:
"AEOM" <
nos...@loibero.it
> wrote in message
news:kVWue.20693$
yM4.3...@twister2.libero.it
> sull'evento afterupdate della prima metti un be
>
> me.comb2.recordsource="select .... from ..... where mioparametro=" &
> me.combo1
>
> o meglio ancora lo stesso codice lo metti nell'evento "su attivato" della
> seconda combo
>
>
> ciao, AEOM
Grazie, AEOM.
Speravo che mi dicessi che si poteva usare direttamente
Forms!MiaForm!MioCampo come si fa con A2K ma mi ribadisci quanto ho
letto
e sentito, me la metto via.
La tua soluzione è perfetta e illuminante nel senso che mi costringe a
pensare in maniera diversa.
Perchè è meglio mettere il codice "su attivato ?"
Grazie



text:
"Marco Antonioli" <
in...@echovr.it
> ha scritto nel messaggio
news:232d3219c1110df44ce...@mygate.mailgate.org...

----
perchè c'è la teoria che un'applicazione non deve "visualizzare/recuperare
dati dal database non richiesti"...quindi non ha senso popolare una combo se
non la apro...genero traffico di rete e di risorse per nulla.
Se la combo mi serve allora la popolo quando la attivo. Mi sono spiegato?
Ciao, AEOM


text:
"AEOM" <
nos...@loibero.it
> wrote in message
news:G57ve.21264$
yM4.3...@twister2.libero.it
> perchè c'è la teoria che un'applicazione non deve "visualizzare/recuperare
> dati dal database non richiesti"...quindi non ha senso popolare una combo se
> non la apro...genero traffico di rete e di risorse per nulla.
> Se la combo mi serve allora la popolo quando la attivo. Mi sono spiegato?
>
>
> Ciao, AEOM
Perfettamente.
Grazie.
Buona settimana.



title: Maschera scadenze

author: Fabio

text:
Salve, ho questo problema, ho una tabella chiamata gestione, dove
inserisco alcuni dati, tra i quali una data che sommata con 30 gg
oppure 1 mese oppure 3 mesi mi genera ovviamente un altra data
chiamata scadenza. Questa data scadenza è molto importante e vorrei
che all'apertura del db mi si visualizzassero, se ce ne sono,magari in
una maschera,  le pratiche in scadenza quel giorno altrimenti mi si
aprisse direttamente il db. Mi potete aiutare grazie....


title: Maschera scadenze

author: CIDI

text:
"Fabio" <
uom...@hotmail.it
> ha scritto nel messaggio
news:21c51e2c-ae1f-4d3e...@m37g2000yqf.googlegroups.com...
Salve, ho questo problema, ho una tabella chiamata gestione, dove
inserisco alcuni dati, tra i quali una data che sommata con 30 gg
oppure 1 mese oppure 3 mesi mi genera ovviamente un altra data
chiamata scadenza. Questa data scadenza č molto importante e vorrei
che all'apertura del db mi si visualizzassero, se ce ne sono,magari in
una maschera,  le pratiche in scadenza quel giorno altrimenti mi si
aprisse direttamente il db. Mi potete aiutare grazie....
crea una maschera con origine record da una query con la data scadenza.
nella riga dei criteri sotto il campo scadenza metti: Date()
oppure se vuoi vedere anche quelli del giorno dopo:
Between (Date()) And (Date()+1)
da menů strumenti - avvio- seleziona la maschera con scadenza.
in caso che vuoi anche aprire il db ad orario oppure all'avvio del pc
vedi: Operazioni pianificate, del tuo sistema operativo.
ciao
Daniele


title: Maschera scadenze

text:
On 13 Mar, 14:54, "CIDI" <
dadonz...@spamtin.it
> wrote:
> "Fabio" <
uomo...@hotmail.it
> ha scritto nel messaggionews:21c51e2c-ae1f-4d3e...@m37g2000yqf.googlegroups.com...
> Salve, ho questo problema, ho una tabella chiamata gestione, dove
> inserisco alcuni dati, tra i quali una data che sommata con 30 gg
> oppure 1 mese oppure 3 mesi mi genera ovviamente un altra data
> chiamata scadenza. Questa data scadenza è molto importante e vorrei
> che all'apertura del db mi si visualizzassero, se ce ne sono,magari in
> una maschera,  le pratiche in scadenza quel giorno altrimenti mi si
> aprisse direttamente il db. Mi potete aiutare grazie....
>
> crea una maschera con origine record da una query con la data scadenza.
> nella riga dei criteri sotto il campo scadenza metti: Date()
> oppure se vuoi vedere anche quelli del giorno dopo:
> Between (Date()) And (Date()+1)
> da menù strumenti - avvio- seleziona la maschera con scadenza.
> in caso che vuoi anche aprire il db ad orario oppure all'avvio del pc
> vedi: Operazioni pianificate, del tuo sistema operativo.
>
> ciao
> Daniele
Grazie, ho risolto cosi, ho creato una query e poi nell'apertura del
db su apertura ho scritto questo
Private Sub Form_Open(Cancel As Integer)
If Not IsNull(DLookup("datascadenza", "QueryScadenza")) Then
DoCmd.OpenForm "MScadenza"
End If
Però ho il problema che la MScadenza, mi rimane dietro alla maschera
di inserimento come risolvere? Non è un grosso problema perchè si vede
che c'è nella taskbar ma mi piacerebbe che si visualizzasse davanti...
Grazie
End Sub


title: Maschera scadenze

text:
"Fabio" <
uom...@hotmail.it
> ha scritto nel messaggio
news:2fb1d70a-3e77-4803...@q15g2000yqj.googlegroups.com...




ma la maschera scadenza non era la prima da aprire all'apertura del db?
boh..
cmq puoi mettere la proprietà popup = SI oppure
apri la maschera scadenza all'avvio come detto sopra e su Evento
caricamento:
If Me.RecordsetClone.RecordCount = 0 Then
MsgBox ("non ci sono Scadenze da visualizzare")
DoCmd.Close acForm, Me.Name
End If
e ti rimane la maschera di inserimento ...( ?)
ciao
Daniele


title: calcolo query in una form

author: ste

text:
Buongiorno a tutti e ringrazio per aiuti ed interessamenti
2 Tabelle TblAzienda - TblIscritti (Relazionate tra loro)
ogni iscritto e' per forza associato ad una azienda
Nella Form azienda visualizzando i dati dell'azienda , vorrei far apparire
in una casella di testo il numero degli iscritti
in carico all'azienda stessa
quindi SELECT Count TblIscritti ecc
Come riesco con sintassi SQL a calcolare solo gli iscritti dell'azienda che
sto visualizzando ?
Se non chiedo troppo se mi postate la stringa SQL completa
Molte grazie
Stefano


title: calcolo query in una form

author: 'Roccia' Max

text:
On 13 Feb, 14:19, "ste" <
stefanopome...@libero.it
> wrote:
> Come riesco con sintassi SQL a calcolare solo gli iscritti dell'azienda che
> sto visualizzando ?
SELECT Count(TblIscritti.IdIscritti)
FROM TblIscritti INNER JOIN TblAzienda ON
TblIscritti.idAzienda=TblAzienda.idAzienda
GROUP BY TblAzienda.IdAzienda
WHERE TblAzienda.idAzienda=forms!NomeForm!
NomeDelControlloCheContieneIdAzienda
> Se non chiedo troppo se mi postate la stringa SQL completa
Difficile, senza conoscere i nomi degli oggetti del tuo DB...
Hint: puoi usare anche
dcount("idIscritti","tblIscritti","IdAzienda"=forms!NomeForm!
NomeDelControlloCheContieneIdAzienda)
cia'
Max
cia'
Max


title: calcolo query in una form

text:
"'Roccia' Max" <
roccia...@email.it
> ha scritto nel messaggio
news:71690f6d-27f9-4622...@h11g2000prf.googlegroups.com...

Mille grazie per l'aiuto
Stefano


title: Termini tecnico-commerciali

author: juanoviedo

text:
Salve a tutti,
sto facendo una applicazione per fatture, fornimenti ecc. Si tratta di una
adatazione dal tedesco all'italiano. Mi mancano alcuni termini tecnico-
commerciali. Sapete dove posso trovare una db con alcuni esempi? La versione
Tedesca di Access ha una db di esempio che si chiama Nordwind.mdb. C'é
qualcosa di simile in italiano?
Vi ringrazio in anticipo. Saluti dalla Germania
Juan Oviedo


title: Termini tecnico-commerciali

author: Antonio Biso

text:
juanoviedo <
juano...@compuserve.de
> wrote in message
39ed6445$0$10217$7d5a...@news.compuserve.de...

Con access in italiano hai il northwind in italiano...
Antonio


title: Di nuovo GRAVISSIMO!!!

author: lucianab64 on libero

text:
Grazie a Silvio Berruti, Federico Luciani e lucio delle vostre risposte.
Mi permetto però di sottolineare che, oltre ad avere ritrovato le maschere
che avevo cancellato, non sono riuscita a trovare le modifiche alle routine
che avevo fatto nonostante i miei continui salvataggi.
Come mai??
Saluti
Luciana
p.s. Per comodità vi riporto di seguito il messaggio che avevo inviato.
Salve a tutto il NG!
Ho bisogno del vostro aiuto per una cosa che mi sembra molto grave.
Su un progetto adp di Access 2000 (con db SQL Server) ho riscontrato
un'anomalia PREOCCUPANTE!
Ho eseguito le seguenti operazioni:
- modificato moduli (salvando regolarmente con la funzione Salva)
- cancellato maschere
Ad un certo punto l'applicazione si è bloccata. L'ho terminata.
Risultato: alla riapertura del file HO PERSO TUTTE LE MODIFICHE!!!
... sono addirittura ricomparse le maschere che avevo cancellato!
AIUTO!!!
Luciana
P.S. Vi premetto che ho già effettuato io tutti i controlli di non aver
scambiato un file per un altro, o di aver combinato qualche porcheria, etc.


title: Di nuovo GRAVISSIMO!!!

author: Silvio Berruti

text:
"lucianab64 on libero" <
lucia...@libero.it
> ha scritto nel messaggio
news:xBcR5.77229$BF.27...@news.infostrada.it...
> Grazie a Silvio Berruti, Federico Luciani e lucio delle vostre risposte.
>
> Mi permetto però di sottolineare che, oltre ad avere ritrovato le maschere
> che avevo cancellato, non sono riuscita a trovare le modifiche alle
routine
> che avevo fatto nonostante i miei continui salvataggi.
Ti ho presente! Anche se non sei l'unica che nell'oggetto scrive
"GRAVISSIMO!!!"; evidentemente non ti sei presa cura di leggere le poche
righe di un post di Federico Luciani che comincia con [INFO].
Rimango della mia idea.
Access salva definitivamente ogni modifica al database solo alla chiusura
dello stesso.
Quindi, ogni cosa fatta prima è soggetta a sparizione nel caso di blocco
dell'applicazione o del sistema.
Ti consiglio di crearti un nuovo .MDB e di importare in questo tutte le
componenti di quello che si è bloccato: eviterai altre brutte sorprese in
futuro.
Ciao
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: Di nuovo GRAVISSIMO!!!

author: Federico Luciani

text:
Silvio Berruti wrote:
> "lucianab64 on libero" <
lucia...@libero.it
> ha scritto nel messaggio
> > Grazie a Silvio Berruti, Federico Luciani e lucio delle vostre risposte.
> >
> > Mi permetto però di sottolineare che, oltre ad avere ritrovato le maschere
> > che avevo cancellato, non sono riuscita a trovare le modifiche alle
> routine
> > che avevo fatto nonostante i miei continui salvataggi.
>
> Ti ho presente! Anche se non sei l'unica che nell'oggetto scrive
> "GRAVISSIMO!!!"; evidentemente non ti sei presa cura di leggere le poche
> righe di un post di Federico Luciani che comincia con [INFO].
>
> Rimango della mia idea.
> Access salva definitivamente ogni modifica al database solo alla chiusura
> dello stesso.
> Quindi, ogni cosa fatta prima è soggetta a sparizione nel caso di blocco
> dell'applicazione o del sistema.
Silvio, non e' proprio cosi', o almeno a me non e' mai
successo.

> Ti consiglio di crearti un nuovo .MDB e di importare in questo tutte le
> componenti di quello che si è bloccato: eviterai altre brutte sorprese in
> futuro.
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: Di nuovo GRAVISSIMO!!!

text:
"Federico Luciani" <
fluc...@paperino.libero.it
> ha scritto nel messaggio
news:3A15A3A5...@paperino.libero.it...
> Silvio Berruti wrote:
> > "lucianab64 on libero" <
lucia...@libero.it
> ha scritto nel messaggio
> > Rimango della mia idea.
> > Access salva definitivamente ogni modifica al database solo alla
chiusura
> > dello stesso.
> > Quindi, ogni cosa fatta prima è soggetta a sparizione nel caso di blocco
> > dell'applicazione o del sistema.
>
> Silvio, non e' proprio cosi', o almeno a me non e' mai
> successo.
Neanche a me è mai successo, diciamo che vado x intuizioni (!!) o x logica
delle conseguenze che lucianab64 ci ha descritto.
Se hai idee migliori o se ti vengono dei dubbi, esprimiti.



title: Di nuovo GRAVISSIMO!!!

text:
Silvio Berruti <
s...@gma.it
> wrote in message
8v3lg7$7g5$1...@fe1.cs.interbusiness.it...
>
> "lucianab64 on libero" <
lucia...@libero.it
> ha scritto nel messaggio
> news:xBcR5.77229$BF.27...@news.infostrada.it...
> > Grazie a Silvio Berruti, Federico Luciani e lucio delle vostre risposte.
> >
> > Mi permetto però di sottolineare che, oltre ad avere ritrovato le
maschere
> > che avevo cancellato, non sono riuscita a trovare le modifiche alle
> routine
> > che avevo fatto nonostante i miei continui salvataggi.
>
> Ti ho presente! Anche se non sei l'unica che nell'oggetto scrive
> "GRAVISSIMO!!!"; evidentemente non ti sei presa cura di leggere le poche
> righe di un post di Federico Luciani che comincia con [INFO].
Scusami, non volevo dare fastidio.
Il mio subject "Di nuovo GRAVISSIMO!!!" era solo per richiamare il messaggio
precedente. Non frequentando molto i NG pensavo che dopo pochi giorni i
messaggi cadessero nel dimenticatoio e non fossero piu' consultati. Per
questo ho messo il richiamo. Forse l'errore sta nel fatto di aver scritto in
maiuscolo? Se e' cosi' non lo faro' piu'.
In quanto al post [INFO ] di Federico Luciani devo ammettere che non lo
avevo letto. Dove lo posso trovare?
Grazie della comprensione.
Luciana
p.s. Mi sembra che rimanga aperta la questione. Avanti chi ha idee!!!
>
> Rimango della mia idea.
>
> Access salva definitivamente ogni modifica al database solo alla chiusura
> dello stesso.
> Quindi, ogni cosa fatta prima è soggetta a sparizione nel caso di blocco
> dell'applicazione o del sistema.
>
> Ti consiglio di crearti un nuovo .MDB e di importare in questo tutte le
> componenti di quello che si è bloccato: eviterai altre brutte sorprese in
> futuro.
>



title: sommare una tabella??

author: robby

text:
essendo alle prime armi,ho difficolta' anche nelle cose + elemetari:
questo e' il mio problema: ci sono tre persone che fanno spese comuni e
mensilmente faccio il resoconto per vedere chi ha da dare e chi ha da
ricevere.ho fatto una tabella con id,data,nome ,importo spesa
e due query relative al totale mensile di ogni persona e del totale mensile
complessivo, ma la cosa che non riesco a fare e' creare qualcosa che mi
calcoli automaticamente la media mensile la quale dovra' essere sottratta
dai singoli parziali mesili per vedere le differenze.
la guida in linea e' un vero dedalo complicato forse anche per gli addetti
ai lavori ed infatti se qualcosa esce dalle creazioni guidate io sono ko.
qualcuno mi potrebbe dare una dritta??
grazie mille


title: sommare una tabella??

author: Fabio Montagner

text:
ti crei una query nella quale attivi i raggruppamenti (clic sull'icona con
la "e" di sommatoria) e nella riga della formula attiverai la voce "media"
nel campo in cui ti interessa fare la media.


title: creare un eseguibile di un database di access

author: Roberto

text:
Salve a tutti...
Il mio penso sia un quesito semplice anche se forse sarà difficile
realizzarlo, comunque volevo sapere se ppotevo creare un eseguibile con un
database di access2000.
In modo tale che anche chi non avesse Access2000 possa installare il
database sul PC.
E' possibile?E se sì come posso fare?
Grazie
Robby


author: Alessandro

text:
"Roberto" <
aris...@libero.it
> wrote in message
news:7vSa8.19371$tv6.4...@twister1.libero.it...

Vai sul SITO COMUNE in Generale "IL FAQQONE" ultima FAQ in fondo.
E spiegato tutto.
www.sitocomune.com
Alessandro.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Esportare in file di testo.txt

author: Tin

text:
Salve a tutti,
    ho un problemino, che non so risolvere, a dire il vero non ho ancora
perso molto tempo su questo problema solo che lo devo risolvere velocemente,
anzi prima.
Il mio problema è il seguente, magari qualcuno lo ha già risolto.
    Di recente il ministero della sanità ha imposto che le aziende che
operano per conto pubblico, e che quindi riscuotono il ticket, devono
emettere ogni fine mese un file di testo formattato in modo semplice, anche
se per me complesso.
    il file deve essere di testo (modo dos), senza separatori di campi e
ogni campo deve avere un numero fissato di caratteri! come posso fare?
considerate che in mezzo ci sono anche date (del tipogg/mm/aaaa) e valute
(36,15 ?)
mi potete aiutare?
eventualmente inviatemi una e-mail all'indirizzo:
eri...@tin.it
sto andando anche a cercare un aiuto su
www.sitocomune.it
GRAZIE A TUTTI


title: Esportare in file di testo.txt

text:
"Tin" <
giann...@tiscali.it
> ha scritto nel messaggio
news:ds3ba.35592$pG1.8...@news1.tin.it...

Ho scoperto il metodo TransferText
ho selezionato come TipoTrasferimento AcExportFixed, ma mi chiede un
NomeSpecifica e non so come creare il file di specifiche
mi potete aiutare?
GRAZIE MILLE A TUTTI


title: Esportare in file di testo.txt

author: Maurizio Borrelli

text:
> "Tin" <
giann...@tiscali.it
> ha scritto nel messaggio
> news:DV3ba.35741$pG1.8...@news1.tin.it...
[...]
> Ho scoperto il metodo TransferText
> ho selezionato come TipoTrasferimento AcExportFixed, ma mi chiede un
> NomeSpecifica e non so come creare il file di specifiche
> mi potete aiutare?
[...]
    Allora, con santa pazienza, prima di automatizzare il tutto, fallo
"a manina". Cosi' crei la specifica di esportazione e magari scopri
qualcosa in piu' su questo strumento:
        <seleziona una query con i campi opportunamente formattati>
        File > Esporta...
        Tipo file: File di testo
        [Salva]
        (.) A larghezza fissa
        [Avanzate...]
        <dovresti trovare gia' tutto impostato,
        eventualmente cambia cio' che e' necessario>
        [Salva con nome...]
        Nome specifica: <il nome che vuoi>
        [ OK ]
        [ OK ]
        [Fine]
        [ OK ]
    Ispeziona il file per verificare se e' tutto a posto. Ora hai un
nome di specifica da usare nell'automazione dell'operazione.
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
--
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------


title: Esportare in file di testo.txt

author: MA

text:
> ho un problemino, che non so risolvere, a dire il vero non ho ancora
> perso molto tempo su questo problema solo che lo devo risolvere
velocemente,
> anzi prima.
E questo ci dispiace. La filosofia di questo Ng no è quella dell'help desk
per impiegati delle aziende ma quella di un mutuo aiuto tra sviluppatori
> Il mio problema è il seguente, magari qualcuno lo ha già risolto.
O anche lo sa risolvere senza averlo per forza affrontato.
[cut]
>
> il file deve essere di testo (modo dos), senza separatori di campi e
> ogni campo deve avere un numero fissato di caratteri! come posso fare?
>
> considerate che in mezzo ci sono anche date (del tipogg/mm/aaaa) e valute
> (36,15 ?)
smanetta di format (vedi help - @@@@ per testo, ggmmaaaa per data, dbl per
valori numerici.
>
> mi potete aiutare?
Usa outputto.
>
> eventualmente inviatemi una e-mail all'indirizzo:
>
eri...@tin.it
>
questo mai, sempre x la filosofia del NG.
> sto andando anche a cercare un aiuto su
www.sitocomune.it
ciao Massimiliano
--------------------------------
Inviato via
http://usenet.libero.it


title: Esportare in file di testo.txt

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:b4iinh$209i8h$1...@ID-52090.news.dfncis.de...

Non funziona, continua a dirmi che il file di specifiche non lo trova!
cosa ho sbagliato? l'ho messo nella stessa cartella del dB!
grazie mille


title: Campo RTF

author: Sandrobi

text:
Vorrei inserire un controllo RTF per creare un campo memo formattabile, però
non so dovre trovare esempi e documentazione. Avete qualche indicazione?
Vorrei che in stampa il controllo avesse anche la proprietà "Espandibile" e
"Riducibile" come le caselle di testo ma da quello che ho visto non lo
trovo.
Qualche dritta o qualche alternativa .... ?
Grazie,
Sandro


title: Esempio Microsoft non funzionante.

author: Giulio Severini

text:
Ho scaricato dal sito della Microsoft il database che mostra alcune
operazioni con le maschere. Il file è FrmSmp00.
Relativamente a come numerare le righe di una sottomaschera, il codice
di quel database mi da un errore di runtime non appena avvio l'esempio.
Ecco il codice in oggetto:
Option Compare Database
Option Explicit
'============================================================
' The following function is used by the subLineNumber form
'============================================================
Function GetLineNumber(F As Form, KeyName As String, KeyValue)
   Dim rs As Object
   Dim CountLines As Integer
   On Error GoTo Err_GetLineNumber
   Set rs = F.Recordset.Clone
   ' Find the current record.
   Select Case rs.Fields(KeyName).Type
      ' Find using numeric data type key value?
      Case adSmallInt, adTinyInt, adBigInt, adInteger, adDecimal,
adNumeric, adCurrency, adSingle, adDouble
         rs.FindFirst "[" & KeyName & "] = " & KeyValue
      ' Find using date data type key value?
      Case adDate
         rs.FindFirst "[" & KeyName & "] = #" & KeyValue & "#"
      ' Find using text data type key value?
      Case adChar, adVarChar
         rs.FindFirst "[" & KeyName & "] = '" & KeyValue & "'"
      Case Else
         MsgBox "ERROR: Invalid key field data type!"
         Exit Function
   End Select
   ' Loop backward, counting the lines.
   Do Until rs.BOF
      CountLines = CountLines + 1
      rs.MovePrevious
   Loop
Bye_GetLineNumber:
         ' Return the result.
         GetLineNumber = CountLines
         Exit Function
Err_GetLineNumber:
         CountLines = 0
         Resume Bye_GetLineNumber
End Function
Precisamente la riga è:
rs.FindFirst "[" & KeyName & "] = " & KeyValue
poichè KeyValue è NULL
richiamata dalla casella di testo con la seguente riga:
=GetLineNumber([Form];"pkeyOrdLineDetailID";[pkeyOrdLineDetailID])
ove i nomi tra parentesi sono i nomi dei campi della tabella
tblOrdLineDetails.
Che devo fare per evitare questo errore? Nel mio database, riadattando,
ottengo tutti 0...
Grazie :)


title: Esempio Microsoft non funzionante.

author: Carlo Costarella

text:
"Giulio Severini" <
fenic...@hotmail.com
> ha scritto nel messaggio
news:1119218077....@g49g2000cwa.googlegroups.com...






   On Error GoTo Err_GetLineNumber
   Set rs = F.Recordset.Clone



         Exit Function

End Function
Precisamente la riga è:

poichè KeyValue è NULL




Grazie :)
Premesso che l'esempio fornito da microsoft è perfettamente funzionante, ti
consiglio di vedere se in pkeyOrdLineDetailID hai inserito dei valori e
precisamente se hai utilizzato il campo con tipo contatore e chiave
primaria.
Ovviamente puoi cambiare il nome del campo (MioIndice) purchè lo cambi anche
nell'origine del controllo nella sottomaschera.
Ciao, Carlo


title: Esempio Microsoft non funzionante.

author: Sergio MAZZA

text:
"Giulio Severini" <
fenic...@hotmail.com
> ha scritto nel messaggio news:1119218077....@g49g2000cwa.googlegroups.com...






   On Error GoTo Err_GetLineNumber
   Set rs = F.Recordset.Clone



         Exit Function

End Function
Precisamente la riga è:

poichè KeyValue è NULL




Grazie :)
[risposta]
Prova con:
rs.FindFirst "[" & KeyName & "] = " & Nz(KeyValue,0)
Ciao.
--
Sergio MAZZA


title: Esempio Microsoft non funzionante.

text:
Grazie ragazzi. Oggi sono a Milano e non posso fare prove...domani vi
farò sapere.
Cmq gli esempi dovrebbero anche tenere conto di valori null....ma la M$
è la M$  :D


title: Esempio Microsoft non funzionante.

text:
"Giulio Severini" <
fenic...@hotmail.com
> ha scritto nel messaggio news:1119261393....@g44g2000cwa.googlegroups.com...
Grazie ragazzi. Oggi sono a Milano e non posso fare prove...domani vi
farņ sapere.
Cmq gli esempi dovrebbero anche tenere conto di valori null....ma la M$
č la M$  :D
[risposta]
Girando il problema; se la MS dovrebbe tenere conto di tutte gli "incidenti di percorso" che possono verificarsi sai quanto dovrebbe
essere lungo quell'esempio?
E' ovvio che chi utilizza gli esempi (qualsiasi essi siano e provenienti da qualsiasi fonte) devi studiarli e riadattarli per le tue
necessitą...
Ciao.
--
Sergio MAZZA


title: Esempio Microsoft non funzionante.

author: Roberto dalla campagna

text:
"Giulio Severini" <
fenic...@hotmail.com
> ha scritto nel messaggio
news:1119218077....@g49g2000cwa.googlegroups.com...

Scusami, ma KeyValue è il valore della chiave primaria e con Access una
chiave primaria NON può essere mai Null.
Tutto lascia pensare che il campo pkeyOrdLineDetailID NON sia la chiave
primaria dell'oggetto origine record della maschera/sottomaschera,
altrimenti non potrebbe avere, come ho scritto sopra, il valore Null.
La funzione di cui sopre presuppone invece che gli venga passato, oltre al
nome della maschera, il nome ed il valore della chiave primaria e funziona
solo a quella condizione.
Resta il fatto che con una versione italiana di Access in un computer che
abbia le Impostazioni internazionali di Windows in settate ad Italiano
standard, la funzione di cui sopra non funziona se la chiave primaria è di
tipo Data/ora; per farla funzionare occorre sostituire la riga:
rs.FindFirst "[" & KeyName & "] = #" & KeyValue & "#"
con la riga:
rs.FindFirst "[" & KeyName & "] = #" & Format(KeyValue, "mm/dd/yyyy") & "#"
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Esempio Microsoft non funzionante.

text:
Ciao Rob, dunque il campo pkeyOrdLineDetailID è chiave primaria della
tabella tblOrdLineDetail. La subLineNumber, ovvero la sottomaschera
inclusa in frmLineNumber, ha come origine record una query e
precisamente qryOrderLineNumbers. Forse per questo quel campo poteva
avere valore NULL.


title: Esempio Microsoft non funzionante.

text: Ciao....questa funzione mi restituisce sempre 0....


title: Esempio Microsoft non funzionante.

text:
"Giulio Severini" <
fenic...@hotmail.com
> ha scritto nel messaggio
news:1119346771.4...@g49g2000cwa.googlegroups.com...
>Ciao Rob, dunque il campo pkeyOrdLineDetailID č chiave primaria della
>tabella tblOrdLineDetail. La subLineNumber, ovvero la sottomaschera
>inclusa in frmLineNumber, ha come origine record una query e
>precisamente qryOrderLineNumbers. Forse per questo quel campo poteva
>avere valore NULL.
Se vuoi usare occorre che la query che č origine record della sottomaschera
abbia una chiava primaria univoca e che non possa contenere il valore Null;
puoi ottenere questo inserendo nella query un campo calcolato una
numerazione progressiva: a tale scopo vai sul Sito Comune e nella Sezione
Queries leggi queste due FAQ:
1) 2.1 Come posso inserire nella mia query un campo progressivo? di Stefano
Bettini
2) 2.16 Come si puņ ottenere il totale progressivo di un campo in una query
e come si puņ numerare progressivamente le righe di una query? mia



title: Esempio Microsoft non funzionante.

text:
Ovvero: devo basare le maschere su delle query? Forse è meglio che mi
riveda un attimino l'esempio M$ e legga le due FAQ.
Grazie :)


title: Esempio Microsoft non funzionante.

text:
"Giulio Severini" <
fenic...@hotmail.com
> ha scritto nel messaggio
news:1119367949.7...@g14g2000cwa.googlegroups.com...
>Ovvero: devo basare le maschere su delle query?
Non è affatto necessario: la cosa necessaria, se vuoi attuare la soluzione
proposta nell'esempio della Microsoft è quella che l'origine record della
sottomaschera abbia una chiave primaria univoca il cui valore sia dicerso da
Null, e se la chiave primaria univoca non c'è crearla.
> Forse è meglio che mi
>riveda un attimino l'esempio M$ e legga le due FAQ.
>Grazie :)
--



title: Aprire database.......

author: MarkRed

text:
Salve a tutti,
ho avuto un suggerimento per aprire un determinato database da un pulsante
di comando ma sembra che il codice sia incompleto:
Dim dbs As Database
Set dbs = OpenDatabase("path&nomefile.ext",opzioni)
e dopo cosa viene? cosě non succede nulla.
Grazie anticipatamente.
Marco.


title: Aprire database.......

author: Roberto - Syd

text:

E' chiaro che non succede nulla, dopo viene quello che vuoi fare sul
database che hai aperto es.: eseguire una query etc...
Se invece vuoi far partire una sessione di access e aprire un db
l'istruzione č la seguente:
dim x as long
x = shell(pathDoveSiTrovaMSAccess.exe\MSAccess.exe path&NomeDB.mdb)
cosě succede qualcosa.
Ciao Roberto - Syd


title: Eliminare sfondo di access all'avvio di un db

author: Ice

text:
Ciao,
vorrei sapere se fosse possibile eliminare, all'avvio di un db, lo
sfondo di access, cioč visualizzare la maschera con dietro il desktop.
Grazie 1000
Ice
--------------------------------
Inviato via
http://usenet.iol.it


author: Porello

text:
"Ice" <
ic...@inwind.it
> ha scritto nel messaggio
news:212Z141Z48Z2Y9...@usenet.iol.it...

Crea una Bmp con il nome del tuo Db e inseriscila nella stessa directory del
Db
CIao
>


author: Stefano LD

text:
Credo che quello scritto dal sig. Porello ti permetta solo di avere
un'immagine in apertura del tuo database ma la maschera di access ti
rimane...
Per la mia poca esperienza credo che non si possa eliminare...
completamente.
Stefano
Ice <
ic...@inwind.it
> wrote in message
212Z141Z48Z2Y9...@usenet.iol.it...



author: Silvio Berruti

text:
"Ice" <
ic...@inwind.it
> ha scritto nel messaggio
news:212Z141Z48Z2Y9...@usenet.iol.it...
> Ciao,
> vorrei sapere se fosse possibile eliminare, all'avvio di un db, lo
> sfondo di access, cioč visualizzare la maschera con dietro il desktop.
Apri la maschera con la proprietŕ Popup = Sě e ridimensiona la finestra del
DB al minimo indispensabile.
Inoltre, sarebbe utile ridimensionare tale finestra, affinché non sia
massimizzata, con il seguente codice da inserire su caricamento della
maschera:
  SendKeys "% r", True
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: join tra SQL SERVER e ACCESS 97

author: Valter Rossi

text:
          Ciao a tutti.
E' possibile eseguire una join da ACCES 97 che punti a una tabella in SQL
SERVER 2000?
Se si, che sintassi devo utilizzare?
Grazie per l'aiuto.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: join tra SQL SERVER e ACCESS 97

author: Cinzia

text:
"Valter Rossi" <
ti...@yahoo.it
> ha scritto nel messaggio
news:85Z18Z27Z2Y11...@usenet.libero.it...

Ciao Valter,
è possibile ma altamente sconsigliabile.
Dovresti collegare via ODBC la tabella di SQL Server  e poi fai una normale
join.
Considera però che per fare questa Join il JET deve trasferire tutti i dati
coinvolti nella Join sul computer locale  e le performance non saranno
eccezzionali...
Ciao
Cinzia


title: Richiesta file

author: Fabio P.

text:
Buona sera a tutti,
Scusate l'intrusione ma vorrei creare un database che mi aiuti nella
gestione della ricerca di immagini e la catalogazione di esse, che me ne
faccia vedere un'anteprima e che si possa effettuare una ricerca come su un
motore di ricerca.
So di chiedere molto, ma oltre a usare il programma il mio obiettivo è di
costruirlo.
Qualcuno mi da una mano per iniziare a scrivere qualcosa o magari ,se ce
l'ha già me ne manda una copia in modo che io possa incominciare a vedere
qualcosa?
Grazie
Fabio


title: Richiesta file

author: M 24 It [Home GPRS]

text:
" Fabio P." <
fap...@tin.it
> ha scritto nel messaggio
news:l_VJc.10142$5D1.3...@news4.tin.it...
> Buona sera a tutti,
> Scusate l'intrusione ma vorrei creare un database che mi aiuti nella
> gestione della ricerca di immagini e la catalogazione di esse, che me ne
> faccia vedere un'anteprima e che si possa effettuare una ricerca come su
un
> motore di ricerca.
www.sitocomune.com
 tutto bello che pronto...
Ciao


title: Formattare colonna listbox

text:
Salve a tutti
su una maschera ho una listbox la cui prima colonna sono dei numeri, che
vanno da 1 a 200
vorrei formattare tale colonna cosi:
0001
0002
0003
.....
0010
0011
0012
eccc
Avevo pensato in questa maniera
**********************************************************************
Dim sSql As String
sSql = "select * from [tb_fornitori] order by [Codice] asc"
Me.ElencoForn.RowSource = sSql
Me.ElencoForn.Column(0) = CInt(sSql)
Me.ElencoForn.Column(0) = Format(Me.ElencoForn.Column(0), "000000")
***********************************************************************
ma non funge sto sbagliando alla grande..isssimaaaaa :-((
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Formattare colonna listbox

author: sv

text:
Domy73 ha scritto:
> Salve a tutti
> su una maschera ho una listbox la cui prima colonna sono dei numeri, che
> vanno da 1 a 200
> vorrei formattare tale colonna cosi:
> 0001
> 0002
> 0003
> .....
> 0010
> 0011
> 0012
> eccc
> Avevo pensato in questa maniera
> **********************************************************************
> Dim sSql As String
> sSql = "select * from [tb_fornitori] order by [Codice] asc"
> Me.ElencoForn.RowSource = sSql
> Me.ElencoForn.Column(0) = CInt(sSql)
> Me.ElencoForn.Column(0) = Format(Me.ElencoForn.Column(0), "000000")
> ***********************************************************************
> ma non funge sto sbagliando alla grande..isssimaaaaa :-((
Dim sSql As String
sSql = "SELECT * FROM [tb_fornitori] Order By Right(" & """000000 &""" & "
& [Codice],6);"
Me.ElencoForn.RowSource = sSql
--
sv



title: Formattare colonna listbox

text:
sv ha scritto:
> Domy73 ha scritto:


> > eccc


> --
> sv
Mi da un errore di sintassi sulla stringa sql :((
sSql = "SELECT * FROM [tb_fornitori] Order By Right(" & """000000 &""" & "
& [Codice],6);"
--



title: Formattare colonna listbox

text:
Domy73 ha scritto:
> sv ha scritto:
> > Domy73 ha scritto:


> > > eccc


> > --
> > sv


Comunque ho risolto ora con questa stringa:
sSql = "SELECT Format([Codice],'000') from [tb_fornitori] order by
[Codice] asc"
Grazie ugualmente spero sia di aiuto
Ciau



title: Formattare colonna listbox

author: francescoMF

text:
"Domy73" <
domy...@gmail.com
> ha scritto nel messaggio
news:ic6g1d$kmc$1...@news.newsland.it...

Soluzione semplice e quindi la più comoda!
Ho provato a fare anche delle operazioni con numeri così formattati e non ci
sono problemi. Es. 003+ 025 = 28 Perde il formato ma non è detto che serva.
ciao!
Francesco


title: problema con recordset

text:
eseguo questa istruzione
    Set rs3 = db.OpenRecordset("Select * from contacomp")
e in debug mi dice "parametri insufficeinte
effettivamente contacomp è una query con criterio ------->
forms![pippo]![pluto]
però tale form è aperta, quindi non capisco perchè non deve crearmi il
recordset
mi sapte aiutare?
grazie.


title: problema con recordset

author: Karl Donaubauer

text:
@----- Pinco --@-- Pallino -----@ <
tos...@libero.it
> ha scritto:

Perché DAO non capisce il riferimento a un oggetto di Access
nel SQL. Per un solo parametro basta di scrivere nella query:
eval("Forms!pippo!pluto")
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: problema con recordset

text:
@----- Pinco --@-- Pallino -----@ <
tos...@libero.it
> ha scritto:

DAO non capisce il riferimento a un oggetto di Access in una
query salvata. Per un solo parametro basta di scrivere nella query:



title: problema con recordset

author: Antonio Biso

text:
"@----- Pinco --@-- Pallino -----@" <
tos...@libero.it
> ha scritto nel
messaggio news:6xA09.8852$n04.2...@twister2.libero.it...

A parte quello che dice karl, quando ci sono questi casi, preferisco crearmi
la stringa SQL via codice
Antonio


title: formattazione automatica editor vba

text:
Nel codice ho la seguente istruzione:
EtichettaCorniceProtocolla.Visible = False
Vorrei pero' scrivere cosi':
etichettaCorniceProtocolla.Visible = False
mettendo la e in minuscolo. Ho provato ma dopo che lo modifico ritorna
maiuscolo.


title: formattazione automatica editor vba

author: yQy

text:


per access (windows in generale) maiuscole e minuscole e' la stessa
cosa
cmq vedi il noem della casella di testo...magari e'ì in maiuscolo
li...rinomina la casella di testo (o etichetta) con la minuscola
iniziale.
:)


title: formattazione automatica editor vba

author: Alessandro Cara

text:

il nome lo devi cambiare direttamente sulla proprieta' del controllo (in
maschera) e li che viene definito e sta scritto con la "E", l'editor
VBA, che e' intelligente, si accorge che hai sbagliato e ti corregge
--
a.cara
Togli qualcosa dall'email


title: Strana "fissazione" della maschera con la proprietà bookmark

author: Davide (Sib)

text:
Come si può immaginare (almeno per chi mi conosce) faccio largo uso del mio
controllo di ricerca (vedi sitocomune).
Su ADO in un db Access/SQL Server si adatta con poche modifiche.
Tutto funziona in modo regolare finchè, per qualche motivo che mi sfugge, la
maschera si "fissa" con un record.
Mi spiego, in base al codice (che riporto in calce) alla pressione del tasto
enter nel controllo di ricerca viene cercata l'occorrenza successiva del
testo digitato in un determinato campo.
Finchè la maschera è "fresca di apertura" tutto gira bene, se non chè,
improvvisamente, non appena assegno il bookmark della maschera al recordset
di ricerca la maschera cambia il record corrente con un altro record che
resta sempre lo stesso finchè non chiudo e riapro la maschera.
In pratica quando succede questo la ricerca inizia SEMPRE da quel record
invece che dal record corrente.
Vediamo se posso rendere più chiara la cosa:
questo è un insieme di debug print che eseguo durante il codice:
---108---
Prima:         41            1             108
Dopo:          41            41            108
Intermedio:    41            299           108
Finale:        105           299           9090
Il primo numero è l'IDCliente del record corrente, la struttura dei numeri
che seguono è composta da bookmark della mascera, bookmark del recordset,
IDCliente.
Prima è la situazione iniziale
Dopo è la situazione dopo l'assegnazione rs.bookmark=me.bookmark
Intermedio è la situazione dopo la ricerca in rs (infatti rs.bookmark cambia
mentre me.bookmark no, è giusto)
Finale è la situazione dopo l'assegnazione me.bookmark=rs.bookmark (i valori
sono diversi ma è corretto così, si osservi che IDCliente finalmente è
cambiato e corrisponde al record che si stava cercando.
Quando il codice non funziona si ottiene questo output:
---108---
Prima:         41            1             105773
Dopo:          73            300           105773
Intermedio:    73            41            105773
Finale:        41            41            108
Si osservi che la ricerca inizia sempre dal cliente con IDCliente=108, ma
già un attimo prima dell'assegnazione rs.bookmark=me.bookmark la maschera
sta cambiano il record corrente infatti l'IDCliente stampato alla voce Prima
è diverso da quello iniziale, alla voce Dopo si osserv a che anche
Me.bookmark è cambiato come anche rs.bookmark è diverso da prima, la ricerca
in sostanza inizia da un record diverso dal 41, infatti alla fine il record
trovato è proprio il 108 (quello da cui si era partiti)
Il codice segue:
Private Sub Ricerca_KeyPress(KeyAscii As Integer)
On Error GoTo Riprova
Dim str As String, rs As ADODB.Recordset
    If KeyAscii = 13 Then
        Set rs = Me.RecordsetClone
        If Nz(Me!Ricerca.Text, "") <> "" Then
            With rs
                Debug.Print "---" & Me.IDCliente & "---"
                Debug.Print "Prima:", Asc(Me.Bookmark), .Bookmark,
Me.IDCliente
                .Bookmark = Me.Bookmark 'Predispone il recordset sul record
corrente della maschera
                Debug.Print "Dopo:", Asc(Me.Bookmark), .Bookmark,
Me.IDCliente
                .MoveNext 'Si sposta avanti di un posto per cercare tra i
record successivi a quello corrente
                .Find Me.RicercaIn & " like '" & ChiaveRicerca &
Apici(Me!Ricerca.Text) & "%'"
                If .EOF Then 'Se non trova il record
                    PlaySound SuonoPredefinito, 1
'"c:\windows\media\chord.wav", 1
                    .MoveFirst 'Ricomincia la ricerca dal primo record
                    .Find Me.RicercaIn & " like '" & ChiaveRicerca &
Apici(Me!Ricerca.Text) & "*'"
                End If
                Debug.Print "Intermedio:", Asc(Me.Bookmark), .Bookmark,
Me.IDCliente
                If Not .EOF Then 'Se il record è stato trovato predispone la
maschera sul record trovato
                    Me.Bookmark = .Bookmark
                End If
                Debug.Print "Finale:", Asc(Me.Bookmark), .Bookmark,
Me.IDCliente
            End With
            Set rs = Nothing
        End If
        Me!Ricerca.SetFocus
        Me!Ricerca.SelStart = 255
        KeyAscii = 0
    End If
Esci:
    Exit Sub
Riprova:
    If Err.Number = -
2147217881
 Then Resume Esci
    If MsgBox(Err.Number & " - " & Err.Description & vbCrLf & "Riprovare?",
vbExclamation + vbYesNo, "Errore di ricerca") = vbYes Then
        Resume
    Else
        Resume Esci
    End If
End Sub
Grazie a chi sia arrivato a leggere fin qui.
Davide (Sib)
--
www.gestionedati,com


author: Alessandro Baraldi

text:
Ciao Davide.
Il Post è un pò complesso anche da capire, almeno per me, e la cosa
migliore
sarebbe stata simularlo realmente con un Demo, ma non essendo
Access...!
Non mi è chiaro se stai usando un ADP oppure un MDB+ADO(ma immagino
sia
il 1° caso).
Se fosse il 2° caso, hai provato invece di usare ADO ad usare DAO...?
Solo per discriminare se può derivare da un baco nella gestione dei
Dataset
di differente estrazione, cosa non nuova...!
Se è il 1° non dico nulla in quanto non sono esperto di ADP.
@Alex