mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Creare un file TXT

Cari amici, scusate sono abbastanza nuovo
vorrei sapere come posso creare e aggiungere dati (un record di un database)
ad un file txt create e nominato da me (sempre in access)
grazie
Stefano

 wrote in message
news:MCOv8.3151$8D3....@news1.tin.it...

Utilizza le Istruzioni
OPEN NomefileCompleto For Append #1
Vedi l'help sull'istruzione OPEN.
Se il File non esiste ovviamente lo crea, se esiste già
inserisce il dato con le apposite istruzioni che trovi nell'HELP.
Alessandro.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:MCOv8.3151$8D3....@news1.tin.it...


Newsgroup: it.comp.appl.access
Titolo: rotellina no grazie

ciao,
ho una subform in vis. foglio dati per la quale vorrei disabilitare la
rotellina del mouse perchè manda in confusione le persone che consultano il
database, come posso fare?
grazie in anticipo

 ha scritto nel messaggio
news:putFc.408464$hc5.17...@news3.tin.it...

Nei vecchi post trovi numerosi post al riguardo!
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&group=it.comp.appl.access
SunRex

Newsgroup: it.comp.appl.access
Titolo: ricerca campo numerico con decimali

salve a tutti,
ho bisogno di verificare l'esistneza in un recordset di un record che 
contiene un valore numerico e decimale (es. 12,29)
L'istruzione sql termina con la condizione  ".....where prezzo=12,29"
In esecuzione mi viene restituito l'errore 3075 Errore di sintassi (virgola) 
nell'espressione della query ... causato dalla virgola nel campo prezzo.
Se forzo il campo a 12.29 la query funziona.
Come posso trasformare il prezzo contenete il decimale (dalla virgola al 
punto?)
Grazie
MS


where replace(prezzo, ",",".") =
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

Newsgroup: it.comp.appl.access
Titolo: Campi numerici illeggibili

Ho un mdb contenete dei listini prezzi dove i campi numerici risultano illeggibili (caratteri diversi da lettere e nuneri). 
Quale può essere il motivo? 
Preciso che l'mdb non è protetto e si apre senza problemi.
-- 
Ciao, Sandrobi

[CUT]
Ciao,
fammi capire -> i campi erano "leggibili" e all'improvviso sono diventati 
illeggibili?

 ha scritto nel messaggio news:vCvze.133685$75.57...@news4.tin.it...

No, è un listino prezzi in cui i dati numerici sembrano criptati.
No, ho guardato la struttura della tabella: si tratta di 10 campi Listino in formato testo, quindi credo sia una modo originale per nascondere i prezzi e quindi dovrò chiedere al fornitore direttamente.
Scusate se non avevo verificato bene.
Ciao
Sandrobi
Newsgroup: it.comp.appl.access
Titolo: caricare excel in campi access

Ciao a tutti.
Ho una maschera che contiene tutti i campi che contiene lo stesso file
in versione excel.Vorrei caricare alcune celle specifiche di excel nei
rispettivi campi della maschera.Ho visto sul sito comune il codice che
sfruttando  dde legge il file excel.Ma il problema inverso?scrivere nei
campi access?Grazie a tutti

 ha scritto nel messaggio
news:1163001260.7...@m73g2000cwd.googlegroups.com...

io mi collegherei il file excel tramite menu carica dati esterni collega
tabelle e poi con una query di aggiornamento / accodamento aggiornerei una
mia tabella access.

ciroteo (nospam) ha scritto:

ciao.Grazie ma ho già provato così.Per intenderci vorrei che il
contenuto della cella A2,per esempio, di excel venisse copiato nella
casella di testo presente in una mia maschera.sarà possibile?

Newsgroup: it.comp.appl.access
Titolo: Azzerare un campo contatore

Ho una tabella temporanea sulla quale vengono fatti più accodamenti di
record ogni sessione di lavoro e che viene vuotata prima della successiva
sessione.
E' possibbile azzerare il campo contatore prima di ogni sessione senza dover
compattare il database????????
Grazie da un superpivello
Elia
eli...@libero.it

 wrote in message
zatA4.9328$C24....@news.infostrada.it...


Newsgroup: it.comp.appl.access
Titolo: strano errore:tipo non corrispondente

scrivendo il seguente codice
Dim rst As Recordset
Set rst = CurrentDb.OpenRecordset("query1")
ottengo
errore runtime 13
tipo non corrispondente
non capisco come possa essere possibile visto che mi sembra che sia giusta
la sintassi. Indagando ancora ho scoperto che anche se faccio una
dichiarazione del tipo
dim db as Database
ottengo
errore di compilazione:
tipo definito dall'utente non definito
E' come se Access non trovasse delle librerie.E' cosě?
Confido nel vostro aiuto.
Buon Anno a tutti!
Wildsurfer

 ha scritto nel messaggio
news:ZrLX7.8040$s04.3...@news.infostrada.it...

Mi pare il tipico errore di quando si usano le librerie DAO con ACCESS2000.
Usi A2000 .....????
Imposta i riferimenti alle Librerie DAO ed elimina le Librerie ADO(se non ti
servono)
--
@Alex
*--------------------------------------------------------------------------*
Alessandro B.
Sito Comune      :   
http://www.sitocomune.com
Sito Personale   :   
http://digilander.iol.it/ik2zok/
*--------------------------------------------------------------------------*
Newsgroup: it.comp.appl.access
Titolo: numerare una select

Devo eseguire una select tipo: SELECT ID, NOME, COGNOME FROM ANAGRAFICA
e vorrei che il risultato di tale interrogazione mi apparisse oltre che
con i campi interrogati ed i relativi valori, anche il numero di riga...
Non so se sono stato chiaro.... se la select mi restituisce:
 ID | NOME    | COGNOME 
 45 | pippo   | pippi
 60 | aldo    | aldi
 85 | fabio   | fabrizi
io vorrei avere questa visualizzazione:
NUM | ID | NOME    | COGNOME 
 1  | 45 | pippo   | pippi
 2  | 60 | aldo    | aldi
 3  | 85 | fabio   | fabrizi
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

  3  | 85 | fabio   | fabrizi
Guarda il msg di Daniele Novelli "Campo contatore su report" del 09/04/02
che chiedeva la tua stessa cosa.Controlla nei giorni precedenti prima di
postare qualche quesito :-)
Ciao Alessandro

  3  | 85 | fabio   | fabrizi
Scusa la mia insistenza... ho guardato nei giorni precedenti, ma non ho
trovato quello che cercavo. Saresti cosě gentile da darmi qulche dritta
in piů?
Grazie 
Beppe


 Beppe
Cut&Paste
Aggiungi una casella di testo nel report nella proprietà Origine Controllo
scrivi =1 nella proprietà Somma parziale selezioni Su Tutto, così otterrai
il contatore delle righe.
Ciao Roberto - Syd
Ciao Alessandro

 Ciao Alessandro
No, forse non mi sono spiegato bene... il mio problema è un altro. 
So che in Oracle è possibile scrivere una SQL così: 
    'SELECT RowNum as Conta, ID, Nome, Cognome FROM Anagrafica;'
dove RowNum restituirà il numero corrente della riga in cui si trova il
record (vista tabellare):
--------------------------------------
| Conta | ID  | Nome       | Cognome |
--------------------------------------
|   1   | 121 | beppe      | beppe   |
|   2   | 445 | Alessandro | ale     |
|  ...  | ... | ...        | ...     |
|n° riga| 778 | pippo      | pippo   |
--------------------------------------
Volevo sapere... esiste una istruzione in Access che mi permetta di
riprodurre le stesse caratteristiche di "RowNum" per Oracle?
Grazie ancora


 record (vista tabellare):...
Prova con questo link (una righa):
http://groups.google.com/groups?as_q=Query%20numero%20record&as_uauthors=Donau
bauer
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 
http://groups.google.com/groups?as_q=Query%20numero%20record&as_uauthors=Donau
Grazie per l'aiuto. Finalmente !!!!
Grazie Karl alla prossima.

Newsgroup: it.comp.appl.access
Titolo: Recordset : C'è differenza?

Ciao a tutti!!
FE=progetto access .adp
BE=MSDE
c'è differenza impostare un'origine dati per una maschera scrivendo
l'istruzione SQL nella proprietà origine record nella visualizzazinoe
struttura ed invece associarle un recordset ADO al momento del caricamento?
Seconda domanda.
Supponiamo che la mia maschera abbia origine dati su una tabella con 1000000
di record, se imposto la maschera con valore "immissione dati", i record mi
vengono trasferiti dal server quando la apro?
Supponiamo poi che dalla maschera  con valore "immissione dati", voglia
richiamare un record, qual'è secondo voi il metodo ottimale per far si che
il server mi restituisca solo il record che mi serve? (ovviamente non
intendo l'istruzione sql, ma la sequenza più eficente di operazioni da fare)
Ciao
AEOM

 wrote in message
news:UPIA9.7113$744.2...@news1.tin.it...



Non ho ancora provato....apettavo risposte alla mia domanda per cimentarmi.
ciao,
AEOM

 intendo l'istruzione sql, ma la sequenza più eficente di operazioni da
fare)
Secondo me fai confusione: la form in modalità Immissione serve solo per
Data Entry veloce, non per il recupero dati.
Nel secondo caso, ti consiglio di crearti delle viste tabellari sui dati e
sfruttare i filtri su Server.
Ciao.


Si ma se volessi usare la stessa maschera non solo per caricare i dati ma
anche per ricercarli?
Qual'è la sequenza di operazioni ottimale?
Es digito il numero di un ordine che mi serve sulla maschera ordini
impostata a "immissione dati", dopo aver digitato il numero da codice
imposto come record source della maschera la stringa sql "select
......from......where [idordine]=caselladiricerca"
poi setto form_ordini.dataentry=false
in teoria il server mi manda solamente il record che mi serve o sbaglio?
Grazie, AEOM

 in teoria il server mi manda solamente il record che mi serve o sbaglio?
Se funziona, parrebbe di sě.

 in teoria il server mi manda solamente il record che mi serve o sbaglio?
Corretto.
Ciao, Sandro.
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:BHLA9.28868$Zn2.8...@twister1.libero.it...

Funziona.
Ciao e grazie
AEOM
Newsgroup: it.comp.appl.access
Titolo: come compilare automaticamente caselle...

ciao!
magari il subject nn spiega molto ma nn sapevo come descrivere il
probl...
in una maschera di inserimento dati ho tra gli altri dati anche la
data di nascita.
c'è anche un campo "classe" (lista a discesa) che bisogna compilare a
seconda della data di nascita dei ragazzi (ad es. 1989 -> terza media,
1990 -> seconda media ecc...)
ora come ora devo farlo a mano... non c'è un modo per far si che
access valuti automaticamente il contenuto del campo "data di nascita"
e compili il campo "classe" di conseguenza??
grazie fin d'ora per l'aiuto...
A.



Potresti provare a creare una tabella con tre campi:
IDClasse
Anno
Classe
Collegare poi la lista a discesa come origine dati a questa
tabella,scegliere 3 colonne,impostare la larghezza delle colonne come
di seguito:	0;1,5;0
Infine sull'evento "Dopo aggiornamento" puoi inserire il seguente
codice:
	me!Classe=me!anno.column(2)
Con "Classe" nome del campo dove memorizzare la classe e "Anno" nome
del controllo lista a discesa.
Funzionerà egregiamente.
Ciao e fammi sapere

 ha scritto nel messaggio
news:23b36687.03041...@posting.google.com...

Prova con:
- nell'evento "su uscita" della casella di testo "data di nascita"
inserisci:
'--------
Select case year(me!dataDiNascita)
    case 1989
        me!classe = "terza media"
    case 1990
        me!classe = "seconda media"
    case else
end select
'---------
Ciao.
--
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Stampare Report

Salve ho un problema con la stampa dei report, devo stampare su un formato
busta 12x18
imposto la mia stampate e le dimensioni del report va tutto bene, ma quando
lo provo su altre stampati mi dice che è il report e formattato con la mia
stampate, e non stampa come impostato.
Grazie.

 Grazie.
Vai su File - Imposta pagina, scheda Pagina, e controlla se il report č
impostato per la stampante predefinita o per una specifica.
Namor
Newsgroup: it.comp.appl.access
Titolo: QUERY RIEPILOGATIVA

Ciao a tutti..ecco un problema che ultimamente mi stà facendo impazzire e
per il quale sono qui ancora una volta a chiedervi aiuto.
Devo creare un database che archivi dei contratti finanziari diversi  tra di
loro;questi contratti hanno dei campi  uguali tra di loro ad es: campo
importo ( di segno positivo o negativo a seconda che si venda o si acquisti)
campo data di stipula.ecc.
Ora l'utente per il quale devo creare il database mi ha chiesto una cosa
particolare.che per me è abbastanza difficile (non sò per voi). Il database
gli servirebbe per ottenere una vista dettagliata tramite query a griglia di
tutti gli importi registrati in una particolare data, raggruppati per data.
Il problema è che per ottenere tale query devo effettuare una join tra  le
tabelle dei contratti ma non sò sulla base di quale chiave effettuare la
relazione tra le tabelle. Una soluzione poteva essere quella di riunire i
contratti  in
un 'unica tabella ma ciò non è possibile dato che hanno delle
caratteristiche diverse tra di loro.
Inoltre alcuni contratti registrano un importo( importo a pronti ed importo
a termine) x una data a pronti ed un altro per una data a termine .ma queste
due date dovrebbero essere raggruppate  insieme.
Ricapitolando la questione , scusandomi per l' eventuale  mancanza di
chiarezza ciò che dovrei ottenere è questo :
Una query che come risultato dia per una serie di date progressive (il
numero potrebbe sceglierlo l 'utente in fase di lancio della query) la
situazione degli importi che lui ha registrato per queste date ma relativi a
contratti di tipo diverso.
Premetto ancora una cosa: io gli avevo creato un db che comprendeva due/tre
query e relativi report tramite i quali lui aveva l'opportunità di vedere
date ed importi a seconda dei contratti ma lui vuole assolutamente una sola
query riepilogativa di tutto!!!E inoltre vorrebbe anche alla fine della
griglia una sommatoria per vedere la posizione a debito o a credito del
giorno.
Chiedo ancora una volta scusa per la mia intrusione e per il dilungarsi del
mio post  e vi ringrazio anticipatamente per il sostegno offertomi.grazie e
ciao
P.S.  ciao Alberto e grazie di tutto!!!  ciaooooooo

 ha scritto nel messaggio
news:P5xH8.3108$8x3....@twister1.libero.it...

Puoi usale una Query di unione Es.
SELECT  Data1 as Data , Importo1 as Importo  FROM Tabella_1
UNION
SELECT  Data2 as Data , Importo2 as Importo  FROM Tabella_2
UNION
SELECT  Data3 as Data , Importo3 as Importo  FROM Tabella_3
Ciao Giorgio

 ha scritto nel messaggio
news:P5xH8.3108$8x3....@twister1.libero.it...

Se non ho capito male il tuo problema, è sufficiente che ti crei una query
unione (vedi help) e poi lavori su quella come se fosse un'unica tabella.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


Di niente (mi pare di capire che ti sta funzionando)
Ciao
--
Alberto
Newsgroup: it.comp.appl.access
Titolo: Access Developer Edition e run time

Vorrei sfruttare le conoscenze degli esperti per capire qualcosa si più 
sulle possibilità e sulle versioni di Access che permettono di sviluppare 
applicativi da distribuire anche a chi non possiede Access.
Chi si occupa da parecchi anni di database, ricorderà il DB della Ashton 
Tate, poi acquisita dalla Borland, che permetteva di costruire data base 
relazionali in ambiente DOS. Io lo usavo alla fine degli anni 80.
Poi è nato Access e si è rapidamente diffuso.
Access 97 veniva venduto anche nella versione Developer Edition che 
permetteva di sviluppare applicazioni da distribuire a chi non aveva Access.
Da quanto ho letto, anche le versioni successive, fino alla 2003, offrivano 
una release che permetteva la stessa cosa.
Adesso la versione 2007 fa scaricare gratuitamente sia le Developer 
Extensions che il Runtime.
Scusate la premessa un pò lunga.
Adesso vorrei sapere:
1) Che cosa permettono realmente queste due cose ?
 (Develper Extensions e Runtime)
2) Perchè sono diventate gratis ?
3) E' realmente possibile sviluppare un applicativo con menù, ecc. ecc. che 
somigli a un programma scritto ad esempio con Visual Basic, e distribuirlo 
come prodotto finito a chicchessia ?
4) Chi si metterà più a scrivere programmi di carattere gestionale con altri 
linguaggi, considerando la potenza, la velocità e la praticità di Access ?
Spero di non avervi annoiato con cose che a voi sembreranno banali e 
ringrazio anticipatamente chi vorrà dare un cenno di risposta. 

 ringrazio anticipatamente chi vorrà dare un cenno di risposta.
Vista l'ora e il giorno (e il mese) hai trovato solo me di turno ma credo 
che altri in seguito ti diano pareri più esaurienti
Ungi 

 ringrazio anticipatamente chi vorrà dare un cenno di risposta.
ciao
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007

Newsgroup: it.comp.appl.access
Titolo: etichette

Uso dei fogli A4 divisi in 8 parti, ma ho il problema ( non so come fare ) a
far si che la prima etichetta non parti dalla predefinita che in questo
momento è la prima in alto a sinistra, ma parti ad es dalla 2a fila , per
capirci un modulo a metà.
Spero di essermi spiegato.
1000 Grtazie Max

 capirci un modulo a metà.
Non ci dai abbastanza notizie su quale sia l'origine record del report, ma
se questa è una tabella, potresti inserire nella stessa un n° opportuno di
record vuoti: in questo modo simuli il posizionamento sull'etichetta
desiderata.
Se la tabella non deve essere modificata, perché serve anche x altre cose,
creati con una query una tabella di appoggio e aggiungi i record vuoti su
questa.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

 ha scritto nel messaggio
news:DGCu7.13111$0Y2.2...@news.infostrada.it...

OK Grazie dell'imput, posso provare a studiarci.
Ma
Newsgroup: it.comp.appl.access
Titolo: [?] Query di selezione con campi jolly

Ciao a tutti!
Ho un problema con una query di selezione.
In particolare la query agisce su un'anagrafica libri i cui campi sono:
Materia, Titolo, Autore, Casa Editrice, Anno
Vorrei poter effettuare (tramite una maschera) delle ricerche sul database
su uno o + campi (o parti di essi):
Ad esempio:
Materia: Fisica
Titolo: * (prende tutti i titoli)
Autore: Hawking* (prende tutti gli autori con cognome Hawking e qualunque
cosa segua)
Casa Editrice: *
Anno:*
Ho provato usando "*" o "%" come carattere jolly ma senza risultati.
Qualcuno puo' aiutarmi?
Grazie in anticipo.
Ciao, Alfonso.

Prova cosě:
Se la maschera si chiama FrmScelta
Se il controllo per il campo Autore si chiama aut
Nei criteri della query, in corrispondenza del campo Autore, scrivi:
Like [Forms]![FrmScelta]![aut]
Nella maschera, batti un asterisco nel controllo aut
Lancia la query
Dovresti avere tutti gli autori
Se batti ba*, avrai tutti gli autori che cominciano con ba
Lo stesso per tutti gli altri controlli della maschera.
Ciao
Davide



hai messo anche like "*"
Saluti.
Emanuele.

Newsgroup: it.comp.appl.access
Titolo: Era:Primi passi: report da query parametriche

Questo e' il codice della query:
SELECT Attività.Progetto,
Sum(Attività.Tot_Ore) AS SommaDiTot_Ore
FROM Attività
WHERE
(((Attività.Data_da) Between [Forms]![Maschera3]![first_start] And
[Forms]![Maschera3]![last_start]) AND ((Attività.Data_a) Between
[Forms]![Maschera3]![first_end] And [Forms]![Maschera3]![last_end]))
GROUP
BY Attività.Progetto
HAVING (((Sum(Attività.Tot_Ore))=Sum([Tot_ore])));
Questo e' il contenuto del report:
 casella di testodella intestazione:
="Per lavoro effettuato tra le settimane: " &
[Forms]![Maschera3]![first_start] & " e " &
[Forms]![Maschera3]![last_start]
corpo:
Progetto		SommaDiTot_Ore
La
query funziona ottimamente e' il report che mi fa comparire due richieste
di parametri: Attività.Nominativo e Attività.Data_da
Per il resto non ci
sono cose strane
--------------------------------
Inviato via 
http://usenet.iol.it


Newsgroup: it.comp.appl.access
Titolo: Aggiunta riga in Excel da Access

E' possibile che al termine di un inserimento di un record in Access vengano
aggiunti i valori nuovi nell'ultima riga di un foglio Excel?
Saluti, Arrigo


Si.

"Antonio Ganci" <a.ganci@NO_SPAMMING_megattera.it> ha scritto nel messaggio
news:am7gtn$cjs$1...@newsreader.mailgate.org...

In che modo?
Arrigo

 wrote in message
news:am7h6m$dpk$1...@monty.lombardiacom.it...

se vai sul sitocomune trovi qualche riga di codice che spiega come
richiamare excel tramite visual basic.
dopodichč vai di F1 (anche detto Help In Linea) e cerchi tutti i comandi
che t servono
io ho fatto cosě e riesco perfino a compilare delle tabelle, formattarle
e cambiare i colori al tesot!1
:-)

 vengano aggiunti i valori nuovi nell'ultima riga di un foglio Excel?
    Si'. Coma ti manca?
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

> "Maurizio Borrelli" [...]:
    Oops!... Scusate. Non avevo notato le altre risposte.


Newsgroup: it.comp.appl.access
Titolo: collegamento sheet di access ad un foglio di excel

Ho una tabella di access che si collega ad un foglio di Excel, però capita
che sostituendo il foglio di Excel con uno nuovo con valori diversi, restano
i valori vecchi, mi sareste suggeritre un comando per aggiornare i
collegamenti e quindi vedere i valori nuovi?
grazie.

 ha scritto nel
messaggio news:eA__8.17171$s74.4...@twister1.libero.it...

A naso; hai provato con RefreshLink?
Ciao.
--
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Debug in VBA

Sto debuggando una routine di VBA e non so come fare per
vedere il valore completo di una stringa un po' lunga, me la
sega a 64 caratteri
qu sa come si fa?
il barbi

 ha scritto nel messaggio
news:2gXkb.22654$e5.8...@news1.tin.it...

MsgBox Stringa....!
@Alex.

 ha scritto nel messaggio
news:2gXkb.22654$e5.8...@news1.tin.it...

Chi te la sega scusa?
Comunque se vai nella finestra immediata e scrivi
?nomevar INVIO
la vedi
Ovviamente se stai facendo un trace
Antonio


ma LUI, no?! :-))
cioe' sono in passo passo, ci metto sopra il mouse e vedo
solo i primi 64 crt e lo stesso se ci batto sopra shift F9
il barbi

 ha scritto nel messaggio
news:Ythlb.326868$R32.10...@news2.tin.it...

Per il DEBUG si usa la finestra di Debug con Debug Print.....!!!!
Se sei come me pigro usa il MsgBox.
Il Messaggio lo Taglia perchè il ToolTipText funziona così.
@Alex.

 ha scritto nel messaggio
news:Ythlb.326868$R32.10...@news2.tin.it...

Il debug non si fa col mouse.
Si fa con la finestra immediata se fai un trace o con msgbox se esegui tutto
il codice senza blocchi
Antonio
Newsgroup: it.comp.appl.access
Titolo: Api del broswer di windows

In che maniera posso da una maschera di Access richiamare la finestra
"Apri" che usano tutti i programmi per cercare ed aprire un file? e che
ovviamente mi ritorni con il nome del file da aprire?
Immagino che la cosa si possa fare o richiamando le Api di Windows oppure
riempendo un TreeList con il contenuto di una directory, pero' sono a
digiuno di entrambi gli argomenti.
Mi indichereste un doc da consultare.
-- 
   \  /_ _ : _ _           
    \/(_|/_|| | |          
  mail me  :  
vazim_at_virgilio.it
 
  view me  :  
http://www.vazim.net
 

 ha scritto nel messaggio
news:345u16iylfib.1p...@40tude.net...

vai sul sitocomune e trovi un esempio su come usare le api di windows che fa a l caso tuo


Vai sul Sito Comune (link qui sotto) e nella Sezione General leggi la FAQ di
Stefano Bettini intitolata "Richiamare la finestra di dialogo per la
selezione di un file.".
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Mi indichereste un doc da consultare.
Se usi Access_XP hai a disposizione l'oggetto FileDialog
accessibile dalle librerie di OFFICE 10.0, sempre che però 
tu non debba realizzare un EXE con il RUNTIME, poichè non
funzionerebbe.....!
Nell'Help trovi un'esempio completissimo e molto dettagliato.
Se invece usi versioni precedenti allora devi usare API
e valgono i consigli già dati....!
@Alex.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Perfetto! Avevo trovato il Broswer ma mi ero saltato questo articolo,
grazie.

Newsgroup: it.comp.appl.access
Titolo: Required o not null

Ciao a tutti,
 
scusate ma come posso dire in visual basic dopo aggiornamento in una
maschera che se Il campo TipoArea è Dichiarazioni, TipoPratica non
deve essere null?
 
Io ho provato con qualcosa del genere ma ovviamente non riesco a farlo
funzionare:
 
 
If Me.TipoArea = "DICHIARAZIONI" Then
 
Me.TipoPratica = Me.Required = True
 
End If
 
Qualcuno ha un suggerimento?
 
Grazie a tutti


OOOk  ce l'ho fatta... grazie lo stesso!

Come hai risolto?
Ciao 
Tommaso


If Me.TipoArea = "DICHIARAZIONI" And IsNull(TipoPratica.Value) Then
 
MsgBox ("Inserire tipo pratica prima di continuare")
 
Me.TipoPratica.SetFocus
 
End If
 
solo che mi salva il record... ed io vorrei non permettere il
salvataggio se non si compila il campo TipoPratica...
Ho risolto solo in parte

 Ho risolto solo in parte
 
usa l'evento Prima di Aggiornare
 
ciao
Daniele
Newsgroup: it.comp.appl.access
Titolo: [OT] aruba giù

vi risultano che i server mail di aruba siano in panne?
ore 11.40
ciao
bfs


S�! Confermo.
Ho eliminato tutta la posta in uscita incagliata, chiuso le applicazioni di 
posta eliminato altri eventuali in coda e riavviato il servizio.
Ora funziona
Ciao
Daniele

Newsgroup: it.comp.appl.access
Titolo: form docked in ACCESS

C'è qualcuno che sa come faccio a fare un form docked in ACCESS??


Cos'è un form docked?


Non penso che si possa fare, ma non ne sono sicuro


Quelli che puoi trascinare verso i bordi della finestra madre, dove si
"appiccicano" come le finestre di progetto di VB

Stefano Radice <ste...@NOSPAMstefano.com> wrote in message
8a0r2d$4k1$1...@nslave1.tin.it...

Ok! Grazie...

Non penso che si possa fare, ma non ne sono sicuro
Strano...
Antonio

>



cioé?

...

Che tu non sia sicuro di qualcosa... :-P
Antonio
Newsgroup: it.comp.appl.access
Titolo: Problemi con data!

Non ne posso più di battere la testa su un problema così apparentemente
semplice da risolvere. Dunque ho un campo di testo con un data del tipo
23/10/2002
 prendo questo campo per aggiornare un campo su una tabella (tipo data/ora -
Data in cifre) con una istruzione del tipo:
DoCmd.RunSQL "INSERT INTO DISPON ( ID_SALA, ID_FASCIA, DATA ) SELECT " &
Me!Sala & " AS ID_SALA, " & Me!Fascia & " AS ID_FASCIA, #" & Me!datatxt & "#
AS Data"
ho provato anche a sostituire Me!datatxt con format(Me!datatxt,
"dd/mm/yyyy") ma il risultato è sempre il seguente:
se il giorno della data è inferiore a 13 (es. 5/10/2002) mi salva la data in
formato 10/05/2002
se il giorno della data è maggiore/uguale a 13 (es. 20/10/2002) mi salva la
data in formato corretto!
Come posso risolvere questo problema?
Se serve, la data del campo la prendo dal Controllo Calendar della MS.
Grazie a tutti
Stefano

 ha scritto nel messaggio
news:tkjp9.13570$%M1.3...@twister2.libero.it...

Una delle tante soluzioni  per Db di Access ...
DoCmd.RunSQL "INSERT INTO DISPON ( ID_SALA, ID_FASCIA, DATA ) SELECT " &
Me!Sala & " AS ID_SALA, " & Me!Fascia & " AS ID_FASCIA, " &
Clng(Datevalue(Me!datatxt)) & " AS Data"
Se in vece usi  MSDE guarda su BOL la funzione CONVERT  e CAST.
Ciao Giorgio.

 Ciao Giorgio.
GRAZIE!

Newsgroup: it.comp.appl.access
Titolo: Seleziona tutto

salve, ho una maschera continua con vari nominativi, affianco ad ogni
nominativo c'è una casella di controllo. Come posso attraverso un pulsante
di comando fleggare contemporaneamente tutte le caselle di controllo (porle
tutte su "true")??
Grazie Alfonso

 ha scritto nel messaggio
news:46272072$0$37200$4faf...@reader3.news.tin.it...

fai un pulsante e ad esso associ lo scatenarsi di una query di aggiornamento
che aggiorna a true il valore di tutti i record e poi fai un requery della
maschera.
e tutti i record saranno selezionati.

 ha scritto nel messaggio 
news:46272072$0$37200$4faf...@reader3.news.tin.it...

Cosi':
Private sub CommandButton_click()
Dim ctrl as control
on error resume next
For Each ctrl in controls
ctrl.value = true
next
end sub
Ciao 

 ha scritto nel messaggio
news:462733cb$0$37205$4faf...@reader3.news.tin.it...

infatti alfonso devi agire sul recordset non sui controlli!
o fai come ti dicevo una query di aggiornamento.
update campo_si_no from ... tabell set  campo true where ... ecc ...

 ha scritto nel messaggio 
news:462733cb$0$37205$4faf...@reader3.news.tin.it...

Scusami Alfonso mi sono sbagliato quella che ti ho segnalato non è la giusta 
soluzione.
Fai come ti ha detto Ciroteo, crea una query di aggiornamento utilizzando la 
creazione guidata, poi in visualizzazione struttura seleziona il campo da 
aggiornare e scrivi in aggiorna a: TRUE.
Ciao 

 grazie ciao

 si infatti ho già provato e funziona.....grazie
Newsgroup: it.comp.appl.access
Titolo: Hyperlink a file in sola lettura

Ciao a tutto il ng,
  Secondo voi è possibile impostare un collegamento ipertestuale in
modo tale che il file aperto sia in sola lettura??
Mi spiego meglio: dato un hyperlink (che per esempio punta al file
c:\miodoc.doc), è secondo voi possibile impostare il collegamento in
modo tale che quando il file "miodoc" venga aperto sia in sola
lettura??
Avete suggerimenti o idee??
Vi ringrazio tanto
Ricky

 ha scritto nel messaggio
news:df3d87ef.04071...@posting.google.com...

Prova ad usare la funzione Shell in VBA (vedi la guida in linea) invece
dell'hiperlink.
SunRex

Newsgroup: it.comp.appl.access
Titolo: Acc/97 Rotellina mouse

come faccio a disabilitare rotellina mouse.
Grazie a tutto il NG.

 Grazie a tutto il NG.
Prova a cercare la soluzione in questo link:
http://www.mvps.org/access/api/api0036.htm
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
--------------------------------------------- 

 ha scritto nel messaggio
news:yfrBa.44205$lK4.1...@twister1.libero.it...


 non riesco ad usare x' e' scritto in inglese.
[CUT]
Quando rispondi scrivi DOPO e non prima del testo dei messaggi precedenti .
Prova a cercare nei messaggi degli ultimi mesi del NG; mi sembra di
ricordare che ci fu una gentile frequentatrice che fece la traduzione in
italiano di quanto scritto su quel link.

Newsgroup: it.comp.appl.access
Titolo: Pulsanti di scorrimento record e ultimo record

Oi!
Ricapitolo il mio prob, ringraziando Roberto per l'aiuto, ma non ho
ancora risolto.
Allora, ho una maschera, Frm_Paziente e in un riquadro di questa è
visualizzata una sottomaschera, Frm_Intervento.
In ognuna delle due maschere ci sono due bottoni per scorrere i
record, e vorrei che non permettessero di andare oltre l'ultimo record
e il primo, su entrambe le maaschere.
Attualmente quelli della frm_paziente funzionano, quelli della
frm_intervento sono sempre disabilitati.... Il codice è questo:
Per la frm_paziente all'eventu form_current c'è
  If Me.CurrentRecord = 1 Then
   Btn_Paz_Back.Enabled = False
     Else
      Btn_Paz_Back.Enabled = True
  End If ''
 If Me.CurrentRecord = Recordset.RecordCount Then
   Btn_Paz_Avanti.Enabled = False
   Else
   Btn_Paz_Avanti.Enabled = True
   End If
  E questo è quello nella sottomaschera, Frm_Intervento, all'evento
Form_Current:
  If Me.CurrentRecord = 1 Then
   Btn_Int_Back.Enabled = False
     Else
      Btn_Int_Back.Enabled = True
  End If ''
 If Me.CurrentRecord = Recordset.RecordCount Then
   Btn_Int_Avanti.Enabled = False
   Else
   Btn_Int_Avanti.Enabled = True
   End If
Plz aiutatemi perchè non ho idea del perchè non funzionino :(
Grazie mille e
Axè!
 

 ha scritto nel messaggio
news:1j4hevs2vug1ltusb...@4ax.com...

Una istruzione del genere sul pulsante per andare avanti:
On Error Resume Next
DoCmd.GoToRecord , , acNext
non permetterà di andare avanti se non ci sono più record.
Così:
On Error Resume Next
 DoCmd.GoToRecord , , acPrevious
non permetterà di andare indietro se si è raggiunto il primo record.
Può andare bene?
Ciao, Carlo

non permetterà di andare avanti se non ci sono più record.
Beh, a me comunque visualizza il record vuoto alla fine... :(
Axè!

Newsgroup: it.comp.appl.access
Titolo: Selezionare un report

Buon giono, come posso fare per ottenere che su una maschera continua 
cliccando su un qualsiasi campo di un record, tutti i campi di quel record 
cambi colore?
Grazie Anticipatamente 

 Grazie Anticipatamente
Prego
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Chiudere tutte le tabelle per poi compattare?

Ho una routine che compatta il db dove si trovano le tabelle(db_dati) . La
routine viene chiamata dal db front-end nel quale ci sono i collegamenti
alle tabelle del db_dati. Quando compatto il db_dati va tutto bene, salvo
nel caso in cui abbia aperto una delle tabelle collegate. In questo caso
access si accorge che il db_dati è già aperto in modo esclusivo e mi da
errore impedendo la compattazione.
Siccome non posso essere certo al 100% che l'utente abbia chiuso tutte le
finestre dell'applicazione quando lancia la mia routine, come posso forzarlo
io a chiudere tutto, per poi lanciare la compattazione?
L'applicazione è monoutente, quindi non ci sono problemi di altri utenti
collegati.
Grazie a chi mi risponde
Marco

 Marco
mah ad occhio:
dovresti credo iterare sulla collezione FORMS dove ci sono le form aperte e
chiuderle con una docmd.close "nome".
--
Alessandro Cara

io a chiudere tutto, per poi lanciare la compattazione?
vuoi chiudere le form o le tabelle?
se anche ci fossero delle tabelle aperte in visualizzazione non
dovrebbero esserci problemi, quindi vorrai chiudere le form, credo.
prova cosi':
dim frm as form
for each frm in forms
	docmd.close 
frm.name
next frm
mo' nun me ricordo la sintassi esatta del close, quello che conta e'
il ciclo.  forms e' la collezione di tutte le form aperte.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/

 dovrebbero esserci problemi, quindi vorrai chiudere le form, credo.
Il problema delle form è solo nel fatto che aprono delle tabelle. Le tabelle
sono infatti collegate al database che voglio compattare, impedendomi di
fatto la compattazione. Però la strada corretta è quella del ciclo che mi
suggerisci, oggi ci provo.
Grazie
Marco

 chiuderle con una docmd.close "nome".
Hai ragione, č la strada giusta.
Grazie per il consiglio.
M.

 errore impedendo la compattazione.
 Dim NumForms As Integer, i As Integer
 NumForms = Forms.Count
 For i = NumForms - 1 To 0 Step -1
  'se si chiude una form durante il ciclo for, cambiano gli indici e possono
rimanere maschere aperte,
  'quindi bisogna cominciare dall'indice superiore fino a 0, per evitare
buchi nel ciclo
  DoCmd.Close acForm, Forms(i).Name
 Next i
P.S. controlla anche i report aperti...
--
Ciao, AntoGal
*************************************************
Gestione punti vendita (casse e pos NCR)
 
www.powerretail.it
-------------------------------------------------------------
per scaricare un gioco di DAMA ITALIANA
http://volftp.mondadori.com/italiani/galletta/
*************************************************
Newsgroup: it.comp.appl.access
Titolo: semiOT. Riunione di oggi.

Stamattina abbiamo fatto una riunione in cui io dovevo presentare
un'applicazione nuova per l'uso di diversi colleghi.
Sono stati contenti del risultato e si sono complimentati per il
risultato, le mie aggiunte a quanto richiesto, i tempi di realizzazione;
hanno commentato la presenza di "risorse interne" invece di "pagare quelli
l� fuori", eccetera.
 
Inutile dire quanto sono soddisfatto e ancor pi� motivato a svolgere
"l'unico hobby per cui mi pagano", in cui Access riveste un ruolo
predominante.
 
Il tutto sarebbe stato impossibile per me senza l'enorme quantit� di
risorse in rete, prima fra tutti questo NG.
 
I complimenti ricevuti li giro a tutti coloro che dedicano le loro risorse
all'utilit� altrui, sperando di trasmetter loro anche una quota della mia
soddisfazione.
 
RB
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 

 RB
 
Quand'ï¿œ che ci inviti a pranzo?
 
Bruno
 
 

 Bruno
 
Eh eh, quando per premio mi pagheranno i pranzi :)
Qualcuno � in zona Milano, oggi?


 RB
 
No, ma da Napoli non ci vuole tanto! :D
 
 
-- 
------------
Pablitomf
Napoli sempre nel "Q"uore!
"mammasantissima" si nasce, non si diventa.
 

 No, ma da Napoli non ci vuole tanto! :D
 
Se ci vai passami a prendere.
Con l'elicottero puoi atterrare nel mio giardino.
 
Bruno
Newsgroup: it.comp.appl.access
Titolo: urgente errore -3034

Salve,
sono nel panico, apro il mio file access e parte l'errore -3034 senza
messaggio.
Qualcuno mi aiuti, grazie Manuela

Manuela Campus wrote:

prova a creare un db vuoto e a importare tutti gli oggetti che ci sono in
quello che ti dà errore


Ora funziona e mentre il file di prima occupava 1.300 Kb questo solamente
200 Kb.
E' sicuro un database del genere? Non e' neanche una settimana che lo stiamo
utilizzando, e gia' abbiamo rischiato di perdere tutto.
Comunque grazie mille, Manuela.

 ha scritto nel messaggio
news:39E45010...@sodalia.it...


utilizzando, e gia' abbiamo rischiato di perdere tutto.
nooo, meglio che usate oracle.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access

nooo, meglio che usate oracle.
Fresca fresca c'e' una notizia che il comune di Caorle (Ve)
ha perso un'anno di lavoro dell'ufficio anagrafe perche' il programma
non salvava i dati e naturalmente tutti i backup che venivano eseguiti
risultanvano andati a buon fine
Il programma "funziona" su database Oracle
Carlo Ve


Newsgroup: it.comp.appl.access
Titolo: maualone in rete

ciao,
qualcuno mi aveva detto che sul sito ms access c'era un manualone da
scaricare ma io non l'ho visto sapete se è vera una cosa del genere o dove
posso trovare della documentazione scaricabile abbastanza completa?
grazie ciao
--
Lobax
Webm...@toolsantipro.it

 ha scritto nel messaggio
news:7LLi8.53699$Ns4.2...@news2.tin.it...

L'help in linea di Access; se te lo stampi penso che produci un manualone
abbastanza completo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Office web component e access runtime

Salve a tutti,
purtroppo troppo tardi mi sono accorto che le tabelle pivot , o per meglio
dire, la gestione delle tabelle pivot di Access XP e' un office web
component.
E' possibile includere queste librerie nel runtime oppure ho perso in
partenza e devo trovare soluzioni alternative ( quali ? ) alla magnifica
funzionalita' interna di access XP?
Non ditemi che i grafici di access fino al 2000 sono come quelli di XP
.........
Saluti.
Giuliano

 funzionalita' interna di access XP?
Purtroppo pare di sì: probabilmente M$ teme che con la scusa del Royaltee
Free vengano vendute meno licenze d'Excel _molto usato proprio per il
pivoting_
In verità le Office web components vengono incluse nel Runtime, ma con
licenza "statica": quindi puoi visualizzare viste Pivot preconfezionate, ma
non manipolare a Runtime con l'armamentario disponibile in Full Access.
Dovresti sentire Microsoft se sia possibile attivare (dietro versamento di
qualche verdone!) tutte le funzionalità in un'installazione Runtime.
Ciao.

 ha scritto nel messaggio
news:mHkaa.187595$YG2.5...@twister1.libero.it...

OK. Appresa e non digerita questa notizia, quali prodotti si possono
comprare per far le stesse cose anche esternamente al database ?
Saluti.
Giuliano

 comprare per far le stesse cose anche esternamente al database ?
Excel?  ;-)
Scherzi a parte non saprei se esista qualcosa di economico atto allo scopo
... in effetti la cosa interesserebbe pure me.
Ciao.
Newsgroup: it.comp.appl.access
Titolo: acces/excel

Ciao ragazzi mi serve urgentemente un aiutone importo da excel in access una
colonna listino con dei prezzi
tipo 29.110  12.113 e cosi via acces quando li importo fa un casino mi
estato detto che posso sistemare tutto inserendo nelle celle di excel una
formula che arrotondi per difetto alle 100 lire superiori e la cosa dovrebbe
sistemarsi
io o provato tramite l help ma non ci sono riuscito ce qualche anima buona
che sappia indicarmi la formula da digitare per arrotondare alle 100 lire
superiori se si vi prego inviatemela al seg. indirizzo e urgentissima sabato
mattina dovrei consegnare il listino a dei clienti grazie a chiunque si
rendera disponibile :-)
email 
pcsco...@fastnet.it

 wrote in message
94962379...@regulus.fastnet.it...


sistemarsi
Controlla i formati in cui importi. Probabilmente devi dirgli che usi il
punto anziche' la virgola all'americana per le migliaia.
Comunque, per arrotondare alle 100 superiori:
Int((numero + 100) / 100) * 100
Saluti.
Luciano


Puoi anche provare:
=ARROTONDA.ECCESSO(numero;100)
Buon lavoro, Giorgio

tipo 29.110  12.113 e cosi via acces quando li importo fa un casino mi
Non ho provato, ma forse dipende dall'uso del "." come separatore 
delle migliaia...
-- 
Filippo "Kirone" Zamengo 
Quanto scritto deve ritenersi IMHO e indipendente dal datore di lavoro
e-mail modificata: togliere DESPAM.

Newsgroup: it.comp.appl.access
Titolo: Passaggio automatico di valuta

Un saluto a tutti
vorrei chiedere se qualcuno ha implementato una procedura per  il passaggio
automatico di valuta.
In particolare mi interessa che tutti i campi del db, di tipo valuta, si
modifichino dalla valuta Lira a quella Euro in modo automatico, cioè senza
la modifica manuale di ogni campo.
Confido in un Vs. aiuto e grazie.
Ciao
Carloo

 wrote in message
news:dLrD7.6743$7A4.4...@news.infostrada.it...

-- 
Posted from  [193.76.225.3] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.appl.access
Titolo: Esportazione Maschera

Se esporto una maschera da un database ad un altro mi esporta anche tutto
il codice visual basic associato?
Ciao Fra
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Ciao Fra
Certo.
Ma cosa ti ha trattenuto dal verificarlo prima di
chiederlo?
MAssimiliano

MA ha scritto:


Hai ragione ma avevo paura di fare una cavolata.Grazie

Newsgroup: it.comp.appl.access
Titolo: Access 97- report di stampa con esclusione record di dati.

Ciao a tutti,
chiedo aiuto agli esperti e meno esperti. Ho necessità di escludere da un 
report di stampa
tutti i record  o comunque solo quelli che contengono un particolare valore 
in un campo, per default il campo in questione contiene una "N". Tale valore 
viene aggiornato periodicamente e manualmente al verificarsi di una 
situazione reale.
Esempio: ho ricevuto una risposta affermativa da un particolare ente o 
azienda ecc, e il campo che contiene la lettera N manualmente lo cambio in 
"S".
Volendo ottenere il risultato che desidero con una procedura evento in VBA, 
qual'è la routine più corretta per questa situazione ? Cosa devo scrivere 
per escludere dal report di stampa i record che contengono il valore "S" e 
lasciare solo quelli con il valore "N" ?  Questo per evitare di ristampare 
una seconda volta un record di cui ho già  rappresentato i dati. Inoltre, il 
campo contenente il valore "S" deve essere presente nel report  per far si 
che la procedura evento escluda dal report solo i record con la lettera "S". 
? Qualcuno mi potrebbe suggerire il codice da utilizzare all'interno del 
report. Spero di aver spiegato bene il mio problema. Grazie a tutti in 
anticipo. 


Ciao,
Hai diverse strade, l apiù semplice è quella di mettere come origine del
report una query che esclusa
i valori N del Tuo campo (metti come criterio <>"N")
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 ha scritto nel messaggio 
news:dth6nn$686$1...@area.cu.mi.it...

Ciao, grazie per il tuo suggerimento. Volevo comunque precisare che  i 
record da escludere dal resport sono quelli aggiornati manualmente con la 
"S" e non quelli con la "N"; questi ultimi rimarranno con  la lettera N fino 
a quando non si verificherà un evento reale di cui ho già parlato nella 
prima domanda. Però io vorrei non dover fare la modifica suggerita, cioè 
sostituire la tabella sottostante il report con una query, questo perchè il 
database viene usato tutti i giorni da più persone attraverso la 
condivisione in rete. So che volendo potrei duplicare il report e lavorare 
sulla copia e rimpiazzare poi l'originale solo dopo aver fatto le opportune 
verifiche di funzionamento. Ma io preferirei utilizzare una routine in VBA 
per ottenere il risultato sperato, o forse questa soluzione è troppo 
complicata per poter essere risolta con una routine evento.
Mi auguro ci sia qualcuno di buona volontà che mi possa dare una dritta su 
questo problema. Scusate se approfitto della vostra pazienza. Grazie come 
sempre per i preziosi suggerimenti. 


Docmd.openreport "tuoReport",,"Tuocontrollo = 'N'

Newsgroup: it.comp.appl.access
Titolo: pagine pari e dispari su report

Buongiorno a tutti.
Volevo chiedere se è possibile con Access 97
stampare solo le pagine pari  o dispari di un report.
Ho provato ad analizzarlo con word  e quindi stamparloma mi perde alcune
formattazioni.
Anticipatamente ringrazio
Paolino

 ha scritto nel messaggio
news:a2jn71$6oes$1...@stargate1.inet.it...

io ho risolto il problema facendo due versioni ( per pagine dispari e per
pagine pari ) dello stesso report con il margine sinistro settato
reciprocamente a circa 25 mm ed a 15 mm.
poi ho creato una maschera con quattro pulsanti che eseguono le quattro
opzioni:
1 - stampa solo le pagine pari
2- stampa solo le pagine dispari
3- stampa tutte le pagine
4 -stampa solo le pagine pari ma in ordine inverso
ed ho inserito le seguenti righe di codice:
Option Compare Database
Rem inserisci nome report prescelto
Const sta_di As String = "Nome_report_pagine_dispari"
Const sta_pa As String = "Nome_report_pagine_pari"
Option Explicit
Rem (1) pagine pari
Private Sub Comando1_Click()
Dim totPage As Integer, xPage As Integer
DoCmd.OpenReport sta_pa, acViewPreview
totPage = Reports(sta_pa).Pages
For xPage = 1 To totPage
 If (xPage Mod 2) = 0 Then
  DoCmd.SelectObject acReport, sta_pa
  DoCmd.PrintOut acPages, xPage, xPage
 Else
 End If
Next
End Sub
Rem (2) pagine dispari
Private Sub Comando2_Click()
Dim totPage As Integer, xPage As Integer
DoCmd.OpenReport sta_di, acViewPreview
totPage = Reports(sta_di).Pages
For xPage = 1 To totPage
 If (xPage Mod 2) > 0 Then
  DoCmd.SelectObject acReport, sta_di
  DoCmd.PrintOut acPages, xPage, xPage
 Else
 End If
Next
End Sub
Rem (3) pagine tutte
Private Sub Comando3_Click()
 DoCmd.OpenReport sta_di, acViewPreview
 DoCmd.PrintOut acPages
End Sub
Rem (4) pagine pari inverse
Private Sub Comando4_Click()
Dim totPage As Integer, xPage As Integer
DoCmd.OpenReport sta_pa, acViewPreview
totPage = Reports(sta_pa).Pages
For xPage = totPage To 1 Step -1
If (xPage Mod 2) = 0 Then
  DoCmd.SelectObject acReport, sta_pa
  DoCmd.PrintOut acPages, xPage, xPage
 Else
 End If
Next
End Sub
ho dovuto usare questo sistema perchè non sono riuscito a impostare i
margini direttamente da codice, evitando di duplicare i report ( che dopo un
pò diventano troppi)
anzi colgo l'occasione per invitare qualcuno sull'argomento
ciao
sergio

 wrote in message
a2jnjl$740$1...@fe2.cs.interbusiness.it...
