mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: numero pagine stampa

Un saluto a tutti 
Ho un problema apparentemente semplice; la numerazione delle pagine in
un report, mi spiego:
 Dovendo stampare un elenco di 44 pagine su un tabulato vidimato ,il
report successivo deve partire dal numero di pagina 45.
Come faccio ad impostare la stampa con il primo numero di pag 45.
Grazie comunque per l'aiuto                               Aldo
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Un metodo può essere creare nel report un controllo che abbia nella propria
origine dati
    =[Page]+44
Ovviamente, siccome il numero da cui partire varierà, invece di '44' dovrai
mettere qualcos'altro (tipo il riferimento ad una casella di testo della
maschera da cui lanci la stampa o meglio ancora il DLookUp su una tabella in
cui memorizzi l'ultimo numero di pagina stampata, oppure ... oppure ... -
vedi tu ...)
Ciao
--
Alberto

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

Ciao,
chi mi aiuta a risolvere questo problema:
da una tabella contenente i seguenti campi:
Data
Articolo
Prezzo
dovrei estrapolare il prezzo più aggiornato di ogni articolo da inserire in
una maschera per effettuare il calcolo dei costi di un certo prodotto...
In attesa e ringraziando ... saluto
Ciao
Mauro

 ha scritto nel messaggio
news:ah61ts$q8a$1...@serv1.albacom.net...

Fai una query di raggruppamento mettendo la funzione max sul campo data.

 ha scritto nel messaggio
news:i4xZ8.451$s74....@twister1.libero.it...


 qualche altra idea?????
Scrivere correttamente DOPO il quoting!!!
Antonio

 ha scritto nel messaggio
news:ah61ts$q8a$1...@serv1.albacom.net...

Per prima cosa non chiamare un tuo campo Data; è una parola riservata di
Access e potresti avere casuali strani errori.
Se la tabella che contiene i dati si chiama Tabella1 ed ha una struttura
simile a questa:
ID                Contatore e chiave primaria
Data1           Data/ora
Articolo        Testo
Prezzo          Valuta
Prova con una query che abbia il seguente codice SQL:
SELECT Tabella1.Articolo, Max(Tabella1.Data1) AS MaxDiData1,
CCur(DLookUp("Prezzo","Tabella1","Articolo=" & Chr$(34) & [Articolo] &
Chr$(34) & " And Data1=#" & Format([MaxDiData1],"mm/dd/yyyy") & "#")) AS
Prezzo
FROM Tabella1
GROUP BY Tabella1.Articolo;
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Il filtro con DMax non mi pare corretto, perché il prezzo aggiornato non
necessariamente sarà rialzato; potrebbe essere stato ribassato, infatti.
Forse sarebbe meglio aggiungere un campo [DataAggiornamento] in tabella e
fare il DMax sul quella data di quel prodotto.
Agostino

 ha scritto nel messaggio
news:EBv_8.93334$Jj7.2...@news1.tin.it...

Guarda che il campo data già c'è, secondo lui...
Antonio
Newsgroup: it.comp.appl.access
Titolo: developer 2000 da inglese all'italiano

salve a tutti, finalmente posso  dedicarmi al mio bel developerkit. 
solo
che parla in inglese... :..( 
so che bastrebbe cambiare delle dll: è vero?
se sì dove stanno? i mattozzi cartacci che ho comparto non ne parlano.
mi potreste aiutare?
Grazie MAssimiliano
--------------------------------
Inviato via 
http://usenet.iol.it

 mi potreste aiutare?
Non mi risulta affatto che sia sufficiente cambiare delle dll, non per nulla
la versione italiana del daveloper non funzionava mentre quella inglese si'.
Sib
--
qualita.assicurazione su 
www.cerrinet.it
Il newsgroup sulla Qualita'

Sib
salve Sib...bartah,
ho questa versione di
developer 2000. ho solo i dischetti ma non so dove reperire materiale info.
puoi indicarmi? 
I miei librozzi 2xJackson  e 1 Programmare Access 2002
sono cosě avari di notizie in merito...
grazie 


 Marco
Vai dentro alla cartella 1033 del runtime e sostituisci le dll seguenti
che le trovi dentro alla cartella 1040 di access 2000:
mso9intl.dll
grintl32.dll
msain900.dll
daa9int.dll
comunque prima controlla le proprietà del file che sia in italiano standard.
Ciao Max
--
altrimenti scusatemi...
Saluti Daniele

denghiou appena posso ci provo :-£
ciao MAssimiliano


 sono cosě avari di notizie in merito...
Che tipo di informazioni cerchi?
Come si usa il dev? se si' prova e vedrai che e' un procedimento
praticamente automatico e fin troppo guidato.
Sib

Newsgroup: it.comp.appl.access
Titolo: salvare subrica di OE da FE

Buon giorno a tutti,
ho cercato nello storico ma non ho trovato nulla che mi possa aiutare.
Esiste la possibilità via codice di salvare la rubrica di Outlook
Express all'interno del BE (o al limite in una cartella designata
dall'utente attraverso il FE) ?
Grazie a chi mi potrà aiutare
Andrea

 dall'utente attraverso il FE) ?
[CUT]
Se a qualcuno può servire...
Ho risolto facendo una copia di Administrator.wab usando Scripting.FileSystemObject
Un saluto a tutto il NG
Andrea
Newsgroup: it.comp.appl.access
Titolo: OT....ma importante !

Chiedo una cosa che non c'entra un quiz con Access...
Vediamo se mi potete aiutare...
Ricevo da circa una settimana telefonate di disturbo  (a tutte le ore anche
di notte) sul telefono di casa...
Avendo la linea ISDN ho attivato un servizio della Telecom (? 93 per 5
giorni !!! non so se rendo...) che permette di identificare tutti i numeri
chiamanti, anche se riservati (quindi nascosti) o di posti pubblici...
Ora ho identificato il numero sospetto...
E sentite qua:
Se lo chiamo mi viene detto :" numero inesitente o al momento non
disponibile"
Ho fatto una ricerca su 
paginebianche.it
 e il numero che cerco non
corrisponde a nessuno...
Ho chiamato il 187 della Telecom e loro mi dicono che molto probabilmente il
numero è di una cabina telefonica..ma che loro non sono in grado di sapere
quale..che non hanno nessun metodo per sapere di chi si tratta !!!!! mah...
Allora chiedo:
Nessuno di Voi sa se in rete esiste un elenco di numeri di cabine
telefoniche ?
Oppure qualche altro metodo...
Grazie mille

 ha scritto nel messaggio
news:alfsb3$9k2$1...@lacerta.tiscalinet.it...

Quello che dirò forse non ti servirà a nulla, ma mi pare strano che la
Telecom possa rilasciarti una informazione del genere.
Non so bene se la legge sulla violazione della privacy in qualche modo ti
venga contro in questo caso, se invece ti rivolgi alle forze dell'ordine,
sporgendo una normale denuncia, forse ne verrai a capo.
Ti dico subito che a me è capitata una cosa analoga.
Ogni 2 o 3 mesi mi arriva sempre una strana telefonata, pur avendo una linea
analogica, con un apparecchietto riesco a vedere lo stesso i numeri in
arrivo, ho provato a richiamare, ma risulta sempre occupato.
Ho chiamato la Telecom  cercando di sapere a chi apprtenesse quel numero e
mi è stato risposto che è riservato.
Sono andata avanti cercando di capire come fosse possibile una cosa del
genere cioè  vedo il numero, ma se richiamo è sempre occupato 24 ore su 24.
Mi hanno spiegato che chi ha un numero riservato può benissimo fare
telefonate camuffando il proprio numero con un altro 'inventato'.
Morale: chi possiede un numero riservato può divertirsi a seccare la gente
senza essere identificato !!!
Assurdo ma vero, in pratica si diventa vittime di questi soggetti senza
poter far nulla.
L'unica cosa da fare è rivolgersi ai carabinieri.
Ciao Rita

 quale..che non hanno nessun metodo per sapere di chi si tratta !!!!!
mah...
In realtà la Telecom ha tutti i numeri dei telefoni pubblici, evidentemente
è un'informazione che non possono darti, d'altra parte se ti rivolgi alle
forze dell' ordine potresti incorrere in lungaggini che non portano a
niente.
L'unica cosa sarebbe di rivolgerti ma solo tramite conoscenze... alle ditte
che si occupano della manutenzione dei telefoni pubblici.
Se abiti in una piccola città , prova a tenere gli occhi aperti quando passi
davanti alle cabine del telefono, ci sono gli addetti alla pulizia e alla
manutenzione che magari possono aiutarti....
Saluti.
Newsgroup: it.comp.appl.access
Titolo: potenza di access

un mio collega è stato lavorare in una piccola multinazionale,
nel senso di una piccola società facente parte di una multinazionale.
pretendevano che in 10 giorni gli mettesse a posto un'applicazione che
per quello che io sono riuscito a vedere erano + di 50 tabelle,
+ di 40 query e 12 report su un db e l'altro non l'ho
neanche visto, al che risolto il problema puntuale su un report 
gli prospetto i costi di una sistemazione all'applicazione,
il sig di sana pianta mi fà :
e che ci vuole è fatto in access !
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Un bel virus?
Ciao.
--
Sergio MAZZA

e che ci
vuole è fatto in access !
Ho notato una certa discriminazione nei
confronti d?Access. I clienti si ricredono una volta che gli fai vedere una
buon?applicazione e che hai soddisfatto le loro richieste. In ogni caso
farsi pagare e? sempre una battaglia.
Chi si ostina a non valutare appieno
le funzionalita? di Access sono i colleghi programmatori che guardano
Access con aria di sufficienza. Provare a realizzare un?applicazione seria
(report, grafici, query, maschere, vba ecc.) ad esempio con visual Basic
e?, in termini di tempo, una pazzia in confronto a quanto ci metti con
Access. I tempi si abbassano e i costi (per il cliente) pure (licenze
comprese).
Io vengo dal Cobol, Rpg per AS/400 se non avessi scoperto
Access avrei gia? chiuso con la programmazione perche? non riuscirei a fare
offerte concorrenziali. Certo, una cosa e? sicura, per il clinte il prezzo
e? sempre ?Troppo?.  
Ciao. Marco.
--
mab...@yahoo.it
--------------------------------
Inviato via 
http://usenet.iol.it
 


L'Ultima che hai detto...
Ciao.
--
Sergio MAZZA



beh! se lo possono sempre fare loro.... oppure continuare come
prima...
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: Invio Email con formattazione stile Outlook

Salve,
cerco di spiegarmi. Ho un programma Access 2007 e VBA che mi gestisce le 
mailing list.
Nell'interfaccia seleziono tutto, scrivo il corpo del messaggio , allego i 
vari documenti etc ed invio alla lista degli indirizzi email presi da un 
database.
 
Fin qui tutto OK.
 
Adesso č venuta l'esigenza che il corpo del messaggio non sia solo in nero e 
con il carattere standard, mi chiedevo se non ci fosse la possibilitą di 
formattare gią il corpo del messaggio come avviene in Outlook, forse con un 
activeX ?
 
Grazie mille. 
 

 Grazie mille.
 
 
quando scrivi il corpo della mail usa i tag html
esempio al posto di "ciao" scrivi "<b>ciao</b>"
 
 
ciao
BFS


devi formattarla in html

devi formattarla in html
 
E' quello che già faccio, pensavo ci fosse una specie di editor che poi lo 
trasforma in html in auomatico...
Volevo evitare di usare i vari tag html a manino...
 
Grazie a tutti

Newsgroup: it.comp.appl.access
Titolo: Riesegui Query di una casella combinata...

Come faccio con le macro a fare un riesegui query di una casella combinata?
Mi creo la macro gli dico rieseguiquery e nell'oggetto cosa devo mettere?
Il nome della casella combinata non me lo accetta mi dice che non esiste 
nessun record con quel nome... come faccio?
Devo specificare anche il nome della maschera che contiene tale oggetto?
Grazie a tutti
Saluti SimoneB 


Se l amacro la lanci con un pulsante aggiungi
me.tuacombo.requery
dove tuacombo è il nome della combo
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 dove tuacombo è il nome della combo
No... la lancio da evento "Su Chiusura"
Saluti SimoneB 


E' lo stesso


Newsgroup: it.comp.appl.access
Titolo: Spazio in coda ai campi varchar in un progetto ADP

Quando provo ad editare un campo varchar(20) di una tabella sql da un
progetto ADP, anche se è presente un solo byte nel campo, il cursore
si posiziona al 21° byte del campo. Per editarlo devo cancellare lo
spazio, altrimenti mi dice che ho superato la dimensione massima del
campo. Come posso fare per evitare questo ? o in sql è tutto normale ?
Grazie e Buone Feste a tutti.




Newsgroup: it.comp.appl.access
Titolo: Ancora!...Problemi con i filtri

Molto probabilmente sono più pesante di una suocera.
Buona sera a tutto il NG.
Ho la famosa Maschera _Anagrafica, con chiave primaria Id Dipendente;
A questa con una query "Anagrafica dipendente", mi apre tramite un pulsante
un'altra maschera "Ordini" dove ho nell'intestazione i dati della query
"Anagrafica dipendente" e nel corpo una sottomaschera che attinge i dati
nella tabella ordini, collegata alla tabella Anagrafica con Id dipendente.
Utilizzo ora la ricerca del dipendente attraverso la maschera anagrafica,
arrivato sul record che mi interessa apro la maschera "Ordini" che
automaticamente mi chiede di inserire l'Id Dipendente per limitare
l'apertura al record presente nella maschera Anagrafica.
Quelle che vorrei che il mio Db facesse è:
su apertura della maschera "Ordini" vorrei che mi settasse già il filtro
sull'Id Dipendente della maschera Anagrafica.
Grazie a chi mi possa aiutare e buona sera a tutto il NG.
Lucio


docmd.openform "nomeform",,,"campodafiltrare = " & me!iddipendente
guardati la specifica di openform sull'help
--
a.cara

Newsgroup: it.comp.appl.access
Titolo: query?

ho una foglio excel con dei numeri in un campo; questi campi perň non
sono necessariamente tutti pieni. ho l'esigenza di importare la tabella in
access (fin qui ok), perň il campo numerico vorrei trasformarlo in un campo
sě/no, ovviamente sě in presenza del valore numerico, altrimenti no.
si puň fare ? come ? con una particolare query?
se per caso serve del codice, ditemi anche come usarlo, senň non ci faccio
niente......
grazie in anticipo.
ciao
m

... una soluzione potrebbe essere questa:
- una volta importati i dati in Access da Excel, aggiungi alla tabella
creata un campo Si/No;
- con una Query di aggiornamento aggiorni a True il campo Si/No ogni volta
che il campo numerico non e vuoto (IsNotNull);
- se non ti serve piů, elimini il campo numerico dalla tabella .
Ciao,
Fl@vio



Io farei cosi':
1) inserisco una colonna vuota in excel
2) nella prima riga della colonna vuota inserisco nella cella una funzione
'se', se la cella che contiene il numero contiene un numero inserisci 1 se
vuota inserisci 0
3) copia la cella su tutte le celle della colonna
4) inserisco un'altra colonna vuota
5) copio la prima colonna che ho creato ed incollo speciale solo valori
sulla seconda colonna che ho creato
6) a questo punto vado in access importo il file
7) probabilmente nell'importazione la colonna incriminata viene importata
come numerico ma basta cambiare la struttura in si/no
ciao
Newsgroup: it.comp.appl.access
Titolo: query: selezione di periodi temporali

la seguente query dovrebbe evidenziarmi alcuni periodi temporali che 
ricadono in altri
 
SELECT DPop.DPinFROM, DPop.DPinTO, Imbarchi.from, Imbarchi.to
FROM DPop, Anagrafica INNER JOIN Imbarchi ON Anagrafica.ID = 
Imbarchi.Surname
WHERE (((DPop.DPinFROM) Between #8/7/2013# And #11/4/2013#) AND 
((DPop.DPinTO) Between #8/7/2013# And #11/4/2013#) AND 
((Imbarchi.from)=#8/7/2013#) AND ((Imbarchi.to)=#11/4/2013#) AND 
((Anagrafica.ID)=918))
ORDER BY DPop.DPinFROM, Imbarchi.to;
 
la query dovrebbe restituirmi un terzo record in DPop che inizia il 
16/08/2013 e termina il 04/11/2013, ma non mi riesce di farlo uscire.
Dove sbaglio?
 
-- 
ciao
Stefano
 
 

Dunque... il codice funziona sul caso base ma andando a complicare i 
casi mi serve ancora una mano, fodamentalmente dal punto di vista 
concettuale.
Posto che [EEE] e [AAA] siano periodi temporali espressi da record con 
campo-inizio e campo-fine appartenenti a due tabelle diverse, mi 
interessa selezionare i record in cui i periodi si sovrappongono.
Nel caso semplice
 
 [EEEEEEEEEE]
[AAA] [A] [AAA]
 
funziona tutto,
ma se inserisco un secondo intervallo [I]
 
 [EEEEEEEEEE]        [EEEEEEEEE]
[AAA] [A] [AAA][AA][AAA] [A] [AAA]
 
mi restituisce una quantitï¿œ di dati non pertinenti che non credo sia 
possibile filtrare perchï¿œ il limite minimo per l'uno annulla quello del 
secondo ed il limite massimo per il secondo caso annulla quello del 
primo.
 
Domanda 1: c'ï¿œ un modo?
 
Sto incominciando a pensare che forse dovrei aiutarmi con una maschera 
che, basata su una query impostata sul caso base, chiama i dati dalle 
tabelle E ed A (piï¿œ quella dell'anagrafica) e li inserisce in una nuova 
tabella. A questa si riferirï¿œ una nuova query che eseguirï¿œ i calcoli 
necessari.
 
Domanda 2: ï¿œ forse questa la strada piï¿œ corretta?
 
-- 
ciao
Stefano
 
 


Questo argomento è già stato trattato più volte, cerca "sovrapposizione periodi" o qualcosa di simile.
Ciao.
-Marco-
 

 periodi" o qualcosa di simile. Ciao.
oops... grazie!
 
-- 
ciao
Stefano
Newsgroup: it.comp.appl.access
Titolo: Access->Excel un po OT ma forse no

Ciao a tutti.
A un cliente A2003 non basta il report normale,
non gli basta neanche esportare una tabella in formato Excel liscia,
perche' desidera anche una formattazione particolare.
Allora, compilo un nuovo foglio Excel cosi':
Dim appExcel As New Excel.Application
Dim wbookExcel As Excel.Workbook
Dim foglioExc As Excel.Worksheet
appExcel.Visible = True
Set cartExcel = Excel.Workbooks.Add
Set foglioExcel = Excel.Worksheets.Item(1)
...faccio tutte le cosine sulle celle...e alla fine:
appExcel.Visible = False
foglioExcel.SaveAs ("risultati.xls")
Workbooks.Close
appExcel.Quit
Benissimo, crea il file Excel come atteso.
Pero' rimane attivo un Excel.exe nel task manager
(senza pero' che ci sia l'icona relativa nella barra di stato)
che devo killare a mano, altriementi non riesco piu' ad aprire Excel.
Qualcuno ne sa qualcosa ?
Grazie a tutti.
Ilaria


www.donkarl.com/it
 sez. Cisa 
trovi un articolo di Sergio Mazza
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access

trovi un articolo di Sergio Mazza
Perfetto.
Denghiu1000
Ilaria.

Newsgroup: it.comp.appl.access
Titolo: Cancellare record da un recordset con criteri dinamici

Ciao a tutti
Ho un piccolo problema che non so come risolvere.
Ho la mia TabellaA che contiene i record
IDRecord (Intero, Formato0000) (N.B.: Non č chiave primaria)
Nome (Stringa, 50)
Cognome (Stringa, 50)
Importo (Valuta)
Note (Memo)
Stato (Stringa, 1) (Puņ essere A o B)
Voglio eliminare i record duplicati di TabellaA lasciando solo i record che
riportano Stato = B
Ecco come ho fatto:
Ho creato una query qryCercaDuplicati per trovare i duplicati della TabellaA
(sulla base dell'IDRecord che per motivi che non sto a spiegarvi non puņ
essere impostato come Primary Key)
A questo punto lavoro da codice:
Creo il recordset
Dim rsRecordDoppi As Recordset
Set rsRecordDoppi = CurrentDb.OpenRecordset("TabellaA")
Le mie domande sono qui:
1) TabellaA č una tabella collegata. Ci sono problemi ad effettuare query di
ricerca duplicati su tabelle collegate
2) Ci sono problemi nella creazione di recordset di tabelle collegate?
3) Come posso usare il comando delete in modo che dal recordset
rsRecordDoppi vengano cancellati i record (doppi, ovviamente :)))) con Stato
= A?
Grazie per l'aiuto e buona giornata a tutti
P.S.
Arriva la primaveraaaa! :)

 = A?
Aggiungo...
Intendo dire
CurrentDb.Execute "delete * from ........

 Set rsRecordDoppi = CurrentDb.OpenRecordset("TabellaA")
Che rimbambito...
Intendevo dire
Dim rsRecordDoppi As Recordset
Set rsRecordDoppi = CurrentDb.OpenRecordset("qryCercaDuplicati ")

 = A?
Quando dici che vuoi eliminare i duplicati devi anche precisare
con riferimento a quale campo parli di duplicati.
Non credo con riferimento all'intero record. O sģ?
Inoltre con eliminare duplicati intendi dire lasciarne uno o
proprio eliminarli tutti?
.C.
Newsgroup: it.comp.appl.access
Titolo: problema con somma di campo calcolato in una maschera

So bene che nel piè di pagina di una maschera se voglio fare la somma di un 
campo calcolato devo fare riferimento non al nome del campo calcolato ma 
alle formule in esso contenuto.!!
il mio problema è che nel mio piè di maschera, devo fare una somma di un 
campo calcolato che contiene dei riferimenti a degli altri campi somma del 
piè di maschera e in questo modo mi viene restituito sempre "errore".
faccio un esempio:
la query su cui si basa la maschera contiene i campi numerici
campo1,campo2,campo3,campo4,campo5
nel piè di maschera ho:
somma1=somma(campo1)/somma(campo2)
somma2=somma(campo3)
campo5 è un campo calcolato:
campo5=campo4*somma1/somma2
ora il mio problema è creare un campo:
somma3=somma(campo5) cioè:
somma3=somma(campo4*somma1/somma2) ma così non funziona!!
come posso fare?
grazie a tutti.
 

 ha scritto nel messaggio 
news:44ad1e9b$1...@x-privat.org...



Ok, così funziona.
Ora proviamo a fare un ultimo passo.
avendo un campo6 che mi fornisce un valore per l'arrotondamento del campo5 
(ad un multiplo definito)
creo un:
campo7=round(campo5/campo6)*campo6
e il campo7 funziona regolarmente arrotondato come mi serve.
il punto ora è riuscire a fare la somma di campo7.
se in piè di maschera scrivo:
somma4=somma(campo7) o meglio:
somma4=somma(round(campo5/campo6)*campo6) mi ritorna il famigerato errore 
(anche sostituendo a campo5  il suo contenuto:campo4*somma1/somma2)
è la funzione round che mi "rompe" il giochino?
come posso fare, sto impazzendo!!!
grazie.

Newsgroup: it.comp.appl.access
Titolo: Lo so che non è il posto giusto... ma non so dove andare!

Esiste qualche filtro specifico per importare in word (97/2000) un file
fatto in framework?
Grazie e ciao!

fatto in framework?
provato come dbf?
--
make it idiot proof and someone will make a better idiot.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


Framework quale I, II o III? E poi, una lettera, foglio elettronico o
database?
Visto che non hai specificato ti becchi tutt'e tre le risposte:
- per la lettera puoi salvarla in formato rtf;
- per il foglio elettronico, se non ricordo male, puoi salvarlo nel formato
lotus (di cui non ricordo l'estensione);
- per il database segui il consiglio di Lbo (rigorosamente dal portatile,
diffida delle imitazioni!)...
Ciao.

 fatto in framework?
Esiste un programma di conversione preparato da una ditta tedesca, che si
installa nel menu di Word e permette la conversione. La versione demo
inserisce in ogni pagina un footer con la ragione sociale della ditta che
vende il programma, ma puó essere tranquillamente usata eliminandolo a mano.
La registrazione sta sui 150$ (caruccia...).
Non sto in sede quindi non ho le coordinate del loro web-site col programma,
se me lo richiedi verso il 10 settembre per e-mail te le posso mandare.
Paolo
Newsgroup: it.comp.appl.access
Titolo: copiare front end nella cartella documenti di ogni utente del server

Salve.
Probabilmente il post è OT e chiedo scusa anticipatamente.
E' possibile, entrando come amministratore del server, sovrascrivere il front end  di tutti gli utenti? Ogni utente ce l'ha nella propria cartella Documenti.
Oppure mi segnalate altre soluzioni? Preferisco aggiornare io piuttosto che mandare il file e dirgli di sovrascriverlo a quello esistente.
Grazie.


Distribuisci un file ZIP autoestraente, ma io preferisco generare un INSTALLER con InnoSetup che fa tutte le azioni di UPGRADE incluso la sostituzione del Client.
 
@Alex


Alex Grazie.
Io però vorrei entrare come amministratore del server e poter sovrascrivere nella cartella Documenti di ognuno il nuovo file, senza dover entrare nel profilo di ognuno.
Le tue due soluzioni, credo, prevedono comunque che ogni utente sappia che è disponibile una nuova versione e che deve lanciare o  il file autoestraente o l'Installer.
Giusto?
Saluti.

 Saluti.
 
No, ti pare che chi sviluppa possa DELEGARE all'utilizzatore queste cose...?
Dopende da chi sviliuppa farlo in modo da rendere tutto automatico.
 
Nel tuo caso io tempo tu non abbia in realtà fatto una cosa tecnicamente ben fatta e che tu voglia fare manualmente una cosa che NON E' DA FARE.
Nel tuo BE devi predisporre una Tabella in cui mantieni il Numero della Versione ULTIMA, il Client(FE) quando si apre va a controllare che la VERSIONE INSTALLATA sia UGUALE a quella del BE, e se non lo è prima di fare il RELINK delle tabelle, avvisa l'utente che è presente un aggiornamento e chiede se vuole farlo al momento, in caso affermativo lo scarica, lo esegue, e questo, chiude il Client, lo sostituisce e lo riapre...
Questo è il modo corretto.
 
Saluti
@Alex

 Questo è il modo corretto.
 
Ovvero usare un tool come Application Starter 
(
http://www.donkarl.com/it?FAQ1.35
) cha fa il lavoro di controllare per 
un update e gestire la distribuzione. Una volta impostato presso il 
cliente, basta inserire la nuova versione in una cartella sorgente 
predefinita.
 
-- 
Ciao
Karl
*********
http://AccessDevCon.com
 
Access FAQ: 
http://donkarl.com/it
 

 Karl 
 
Ovviamente dal punto di vista di applicazioni professionali concordo.
Ognuno deve poi valutare quanto si può spingere in risorse economiche esterne e decidere.
L'importante è avere i concetti tecnici in testa del COME, proprio per rendersi conto come sia meglio operare.
 
Ciao
@Alex 


Grazie Alex e grazie Karl.
Mi metto a studiare e faccio delle prove.
Saluti.
Newsgroup: it.comp.appl.access
Titolo: aprire un documento word da access ?!?

Sto cercando da un pulsante di una maschera access di aprire un documento di
word; benissimo...sotto WIN NT WKS il codice associato al pulsante
sottostante funziona perfettamente....sotto WIN 98 invece mi apre il
documento di word e contemporaneamente anche un'altra volta la mia
apllicazione MS ACCESS (me la trovo aperta 2 volte !!).
Come mai ?
Grazie
sci...@libero.it
Private Sub cmd_rpt_Click()
    Dim wordApp As Object
    Dim wordDoc As Object
    Dim blOpen As Boolean
    On Error Resume Next
    blOpen = True
    Set wordApp = GetObject(, "Word.Application")
    If Err.Number = 429 Then
        Set wordApp = CreateObject("Word.Application")
    End If
    Set wordDoc =
wordApp.Documents.Open("d:\utenti_forall\alessandra\studiovecchiato&zago\pro
moter\doc1.doc")
    With wordApp
        .Visible = True
        .Activate
    End With
End Sub

 ha scritto nel messaggio
news:8shb1o$c5v$1...@fe1.cs.interbusiness.it...

E' un documento che utilizzi per il mailmerge?
Ciao.

 wrote in message

Newsgroup: it.comp.appl.access
Titolo: Controllo codice IBAN

Salve a tutti ho cercato di implementare nella mia maschera
FrmAnagrafica la funzione di controllo codice IBAN che ho trovato
nella sezione moduli del sitocomune - 5.63 Funzione per verificare
l'esattezza di un codice IBAN.
Nella casella di testo dove digito il codice IBAN su evento
dopoaggiornamento ho inserito il codice
If fcBank_IBANChek(Testo0) = False Then
   MsgBox "Codice Iban errato"
  Cancel = True
End If
e mi dice errore di compilazione, argomento non facoltativo.
Se invece metto:
If fcBank_IBANChek_TEST(Testo0) = False Then
   MsgBox "Codice Iban errrato"
  Cancel = True
End If
dopo aver confermato i dati inseriti, prima mi esce un'avviso che il
codice Iban è giusto (anche se inserisco uno sbagliato), poi cliccando
su "ok", esce un'altro messaggio Il codice Iban non è corretto.
Motivazione: sono ammesse solo cifre e lettere maiuscole, e ancora
cliccando su OK continuano i messaggi.
Forse non ho ben capito come applicare la funzione. C'è qualcuno che
mi può spiegare?
Grazie.
Giuseppe.

 Giuseppe.
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


Grazie per la risposta.
Devo fare così?
If fcBank_IBANChek_TEST(Testo0) = False Then
   MsgBox "Codice Iban errrato"
  Cancel = True
End If
If fcBank_IBANChek(Testo0) = False Then
   MsgBox "Codice Iban errato"
  Cancel = True
End If
End Sub
Scusa, ma non ho mai passato due argomenti. Potresti essere più
specifico?
Grazie. Ciao.
Giuseppe.

> > Nella casella di testo dove digito il codice IBAN su evento
Guardando la funzione tu devi passare 2 argomenti, 
fcBank_IBANChek(pstrIBan As String, pstrMsg As String) As Boolean
anche se non capisco il perchè di pstrMsg, visto che la function
ritorna un boolean.
Probabilmente la function originale in java (citataz
http://it.geocities.com/arodichevski/comp-iban-it.html
)
prevedeva qualcos'altro.
Comunque l'uso è semplice
dim rc as boolean
rc = IBANChek( "564654646","")
nella funzione presente nel sito comune manca il controllo se la
stringa passata come Iban è maggiore dei 17 caratteri.
ciao
sam--

 rc = IBANChek( "564654646","")
dove lo metto?
Ho duplicato il file IBAN che ho scaricato dal sito comune. Ho creato
una maschera con una casella di testo non associata in cui digito il
codice IBAN da controllare.
Come faccio a far eseguire il controllo? Cosa devo mettere su evento
dopo aggiornamento?
Scusate, ma la doppia funzione non l'ho mai passata. Grazie ancora.
Giuseppe.

 wrote:

ipotizzando che la casella di testo si chiami Testo0
nell'evento scrivi:
Private Sub Testo0_BeforeUpdate(Cancel As Integer)
    Dim rc As Boolean
    Dim mgs As String
    rc = fcBank_IBANChek(Me.Testo0.Text, "")
    If rc = False Then
        msg = "Il codice " & Testo0.Text & " non è valido"
        MsgBox msg, vbCritical, "title"
        Exit Sub
    End If
End Sub
chiaramente la function fcBank_IBANChek è messa da qualche parte.
o nella form, o definita pubblica in un modulo.
ciao sam--

 ha scritto nel messaggio 
news:utgp54h9l2lceorh1...@4ax.com...




Tutto a posto. Funziona.
Grazie. Ciao.
Newsgroup: it.comp.appl.access
Titolo: etichette reports

Ho seguito i consigli di Roberto per stampare l'etichetta dove mi 
necessitava su di un foglio con più etichette, ma se comando una seconda 
stampa, questa avviene sulla prima posizione senza tenere conto delle 
impostazioni che io indico.
Come faccio a resettare richiamando la funzione LabelInitialize, magari 
premendo il pulsante di stampa ?
Grazie 

 Grazie
--
Roberto
--------------------------------------
il Sito Comune di it.comp.appl.access
www.sitocomune.com
-------------------------------------

Grazie, adesso è perfetto.

Newsgroup: it.comp.appl.access
Titolo: report ???

ciao a tutti,
ho tre report diversi da stampare con un piccolo particolare:
devono essere stampati uno dopo l'altro con una numerazione di pagina
progressiva .
come devo fare ?
grazie a tutti
Filippo

 come devo fare ?
La prima cosa che mi viene in mente è questa:
usa una variabile globale X opportunamente inizializzata e azzerata, e sul
piè di pagina di ogni report metti =[Page]+X, dove imposti X = X + [pages]
ogni volta che stampi un report, e setti X = 0 dopo la stampa dell'ultimo
report.
Dovresti ottenere una cosa del genere:
Stampa primo report (X=0)
Pagine: 1+0, 2+0, 3+0, 4+0
Fine stampa primo report: X=4
Stampa secondo report (X=4)
Pagine: 1+4, 2+4, 3+4
ecc...
Il concetto è semplice, basta sommare un offset al numero di pagina.
--
Ciao, AntoGal
*************************************************
Home Page (area programmatori di VolFtp)
http://volftp.mondadori.com/italiani/galletta/
per scaricare un gioco di DAMA ITALIANA
*************************************************

Newsgroup: it.comp.appl.access
Titolo: modifica stringa: aggiungere uno spazio

ho bisogno di una stringa di lunghezza 5
alcune volte ho però dei campi più corti.
come faccio ad aggiungere ad esempio degli spazi al campo per farlo
diventare da 5 ?
grazie.
Lenny

"Lenny" <luca...@QUESTOLOTOGLItiscali.it> ha scritto nel messaggio
news:1_T9b.39689$w8.3...@news.edisontel.com...

Esiste proprio la funzione space
tu ti calcoli con len la lunghezza del tuo controllo e per differenza lo
infarcisci con gli spazi
MAssimiliano


un po' complicato....
forse ho trovato la funzione format che mi puņ aiutare.
dovrebbe essere:
format (stringa, "@@@@@")
ora provo.
ciao


funziona.
la formula corretta è questa:
format (stringa, string(lunghezzachemiserve,"@"))
l'unica cosa è che il testo è allineato a sinistra.
ciao

"Lenny" <luca...@QUESTOLOTOGLItiscali.it> ha scritto nel messaggio
news:OEU9b.39705$w8.3...@news.edisontel.com...

Con la mia soluzione l'allinei a destra
MAssimiliano

 Con la mia soluzione l'allinei a destra
si si.
l'ho provata e... l'ho tenuta :-)
denghiu
ciao
Newsgroup: it.comp.appl.access
Titolo: importazione di un file .dbf

avrei bisogno di importare un file dbf in modo automatico senza l'uso
di FILE IMPORTA, magari tramite un tasto posto su una maschera popup.
tra i omandi di vb e le macro nn ho trovato nulla di utile, sapete
consigliarmi?
grazie a tutti
Nicola


proprio certo di non aver trovato nulla. Prova a cercare TransferText sull'help
dall'help:
DoCmd.TransferText [tipotrasferimento][, nomefilespecifiche], nometabella,
nomefile[, nomicampo][, nometabellaHTML][, tabellacodici]
--
a.cara 
Togli qualcosa dall'email

 ha scritto nel messaggio
news:3F6C305B...@blunet.it...

ho seguito il tuo consiglio, mi son visto per bene il comando in questione,
solo che la tabella non viene importata in quanto mi dice DI SOLA LETTURA.
ci sono metodi alternativi?
grazie per la risposta
Nicola

 ci sono metodi alternativi?
Se il dbf è è sempre lo stesso e si tratta di importalo periodicamente, puoi
collegarlo all'mdb e quando hai bisogno lo tratti come una normale tabella.
Il fatto che ti dica di sola lettura potrebbe essere perchè il dbf è su un
cd o è stato copiato da un cd con gestione risorse (e quindi mantiene
l'attributo di sola lettura), anche se penso che dovrebbe essere importabile
comunque.

 ha scritto nel messaggio
news:3p1cb.150696$R32.4...@news2.tin.it...

no lo creo da HD quindi non è di sola lettura, forse dipende dal fatto ke
non ho installato il programma DB che gestisce questo tipo di file.
Nicola

Newsgroup: it.comp.appl.access
Titolo: Db Access sul web e password

La domanda sarą sicuramente..stupida..:-)
Quanto agggiunge in termini di sicurezza proteggere un Db access sul Web
con una password?Considerando che il db č presente in una cartella non
accesibile direttamente dal browser.
Ciao Fra
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 -- 
Scusa ma non capisco; i dati saranno consultabili esclusivamente via web 
tramite le pagine che gli costruisci tu, quindi l'utente non deve mettere 
mano nella struttura del sito... O mi sono perso qualche cosa?
Ciao.
-- 
Sergio MAZZA 

 Ciao.
-- 


 -- 
Se hai comprato spazio web da un provider hai gią la coppia: utente/password 
necessaria per l'accesso alle cartelle...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Risultati di una query con collegamento a informazioni di dettaglio.

Salve a tutti,
ho creato una query che mi resistuisce in una tabella le informazioni
essenziali riguardanti i record cercati. Vorrei avere la possibilità
tramite un link per ogni singolo record di visualizzare in una
maschera i campi di dettaglio. Presentare tutti i dati nella tabella
di risultato sarebbe dispersivo; vorrei che l'utente avesse la
possibilità di mostrare i dettagli solo quando lo desidera e solo sul
singolo record.
Qualche indicazione su come procedere...
Grazie
Bye
Johnny

 ha scritto nel messaggio
news:3435a6f3.03042...@posting.google.com...

Se, come ritengo, tra "le informazioni essenziali riguardanti i record
cercati" c'è anche la chiave primaria, sarà proprio la chiave primaria il
link che ti serve.
Visualizza in una maschera con visualizzazione a Maschere continue i dati
della tabella che hai creato; nel corpo di tale maschera inserisci anche un
pulsante di comando; a fronte dell'evento "Su clic" del pulsante di comando
apri la tua maschera dettagli filtrandola tramite la chiave primaria del
record corrente (vedi sull'help l'argomento condizioneWHERE del metodo
OpenForm).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 OpenForm).
Grazie
Bye
Johnny

Newsgroup: it.comp.appl.access
Titolo: problemi con funzione left

ciao a tutti
ho un problema con queste tre funzioni Left, String e Chr che non mi
funzionano, quando esegui il codice mi da l'errore "impossibile troare il
progetto o la libreria", come posso fare per farle funzionare????
io ho Miscrosoft visual Basic 6 utilizzato da access 2000 e nei riferimenti
ho le segenti librerie
Visual Basic for Aplication
Mircosoft Access 9.0 Object library
Mircosoft DAO 3.6 object library
Microsoft Form 2.0 object library
MANCA: bookmaker OLE Control module
MANCA: wiaview 1.0 type library
OLE Automation
Microsoft Visual Basic for Aplication Extensibility 5.3
grazie
matty
--

 Microsoft Visual Basic for Aplication Extensibility 5.3
1. Potevi continuare sul 3d di ieri sera.
2. Vedi che ci sono 2 riferimenti mancanti? Prima prova a toglierli e a
compilare, può essere che non vengano neanche utilizzati nel codice, e
casomai sistemali.
Fabio


1. scusami
2. grazie ora funziona
matty
Newsgroup: it.comp.appl.access
Titolo: Scrivere da maschera a tabella non associata

Come da Oggetto.
Come posso scrivere su di una tabella non associata usando un pulsante da
una maschera associata ad un'altra tabella.
Il valore che devo salvare non mi è possibile calcolarlo in altri momenti e
sono costretto a salvarlo in quel momento in una tabella[TabNonAssociata]
sul campo [Pippo].
Non riesco a trovare da nessuna parte la sintassi giusta, ho fatto anche una
ricerca su google ma niente risposte(o non sapendo cosa cercare non le
vedo).
Grazie
--
----
         \ | /
       (@ @)
---o00-(_)-00o-----
Marcello Guarnacci
Contro la guerra del petrolio
Contro la guerra USA & UK
Contro la guerra per liberare gli Iracheni bombardandoli
(per favore non liberatemi mai)

 (per favore non liberatemi mai)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


Tramite l'help non mi sblocco da dove sono.
Uso abbastanza bene Dlookup e mi servirebbe una funzione che faccia la cosa
contraria.
Sai indicarmi sul sitcomune un esempio o un metodo che scriva su una tab non
associata tramite il recordset(dall'help non ci ho capito molto e nenche dai
vecchi messaggi visto che viene dato per scontato quando viene nominato)
--
----
         \ | /
       (@ @)
---o00-(_)-00o-----
Marcello Guarnacci
http://digilander.iol.it/mister79/index.htm

 > > Il valore che devo salvare non mi č possibile calcolarlo in altri

Allora, vieni fuori da dietro quel muro e non aver paura! ;-P
quello che ti suggeriva Roberto č piů semplice di quanto credi. Creati una
query di aggiornamento e inserisci nei criteri
forms!lamascherainquestione!tuocontrollo.
Provaci č semplice
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

 ciao MAssimiliano
In tempo di guerra essere dietro un muro da più sicurezza ;-)
Comunque, provato, inc.....to, capito, digerito.
Grazie MAssimiliano per avermi indirizzato nel modo giusto e ti dico anche
che
Quando il saggio con il dito indica la luna lo stolto guarda il dito.
Io guardavo il dito
Ciao


Newsgroup: it.comp.appl.access
Titolo: #nome?

In una maschera ho una casella combinata con dei numeri. Si chiama
casellacombinata4.
Ho creato una casella di testo ed inserito nell'origine di controllo
=casellacombinata4
Fino a oggi tutto ok.... nella casella di testo veniva inserito il valore
presente nella casella combinata4 ma oggi ho fatto delle modifiche nella
maschera (non chiedetemi cosa...) e non ottengo più alcun valore ma la
dicitura #nome
Se provo a ricreare le due caselle (CC+CT) continuo ad avere lo stesso
problema...
Ringrazio chi mi da una mano!
Ciao


Ciao
Daniele 

 ha scritto nel messaggio 
news:4941367f$0$40308$4faf...@reader5.news.tin.it...

X me siamo alla follia...
Ho risolto il problema e sapete qual era?
Avevo un codice in cui per errore c'erano 2 riferimenti allo stesso
pulsante... (Comando44_Click()) x 2
beh... nessun avvertimento.... l'unica anomalia era il non funzionamento di
un TB....
vi sembra normale????????????'
Ciao
Newsgroup: it.comp.appl.access
Titolo: Creazione report etichette

Devo preparare due report di stampa etichette.
Uno da 16 etichette su 2 colonne e 8 in lunghezza su A4
Uno da 40 etichette su 4 colonne e 10 in lunghezza su A4
Una cosa che non riesco a capire è come si fa a fissare i margini.
Io imposto i margini (tutti) a 0,6 mm dopodichè salvo il report, ma ogni
tanto quando vado a vederli li trovo modificati.
Come devo fare per fissarli 'for ever' ??
--
Grazie, Alberto (alias ALCAU)

 wrote in message
CTx57.3692$sE4.1...@news6.giganews.com...

vedi post precedenti
Newsgroup: it.comp.appl.access
Titolo: nuovo ordine con stesso cliente precedentemente inserito nella combo

buon anno a tutti!
 
nella maschera "M_Ordine" ho una combo dove posso selezionare i nomi dei 
vari clienti.
Ora vorrei che da pulsante una volta selezionato un cliente (nella 
combo"CboCliente")si aprisse
la maschera "M_Aggiungi_Ordine" (strutturata in questo modo:
IdOrdine, DataOrdine, Cliente.) in un nuovo ordine con il cliente 
(precedentemente inserito nella combo)già inserito.
 
questo è l'sql della query nella maschera "M_Aggiungi_Ordine"
SELECT TbOrdine.IDOrdine, TbOrdine.DataOrdine, TbClienti.Ragione_Sociale, 
TbClienti.Indirizzo, TbClienti.CAP, TbClienti.Citta, TbClienti.IdCliente
FROM TbClienti LEFT JOIN TbOrdine ON TbClienti.IdCliente = 
TbOrdine.IDCliente
WHERE (((TbClienti.IdCliente)=[Forms]![M_Ordine]![CboCliente]))
ORDER BY TbOrdine.DataOrdine;
 
grazie 
 
 


ho trovato la soluzione
    DoCmd.OpenForm "M_Aggiungi_Ordine", acNormal, "", 
"[Forms]![M_Aggiungi_Ordine]![IdCliente]", acAdd, acNormal
    Forms!M_Aggiungi_Ordine!IDCLIENTE = Me!CboCliente_1.Column(0) 
 
 

    Forms!M_Aggiungi_Ordine!IDCLIENTE = Me!CboCliente_1.Column(0)
 
Se capisco bene fai alcune cose superflue qui e basta:
 
DoCmd.OpenForm "M_Aggiungi_Ordine", , , , acFormAdd
Forms!M_Aggiungi_Ordine!IDCLIENTE = Me!CboCliente
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 ha scritto nel messaggio 
news:9m9358...@mid.individual.net...

grazie
cosi' va meglio! 
 
 

 ha scritto nel messaggio 
news:4f007769$0$1390$4faf...@reader1.news.tin.it...

e se volessi fare in modo che aprendo la maschera "M_Aggiungi_Ordine"
il nuovo record si crei solo nel momento in cui inserisco la data?
 
 
 
 


nella prima fase, su clic di un pulsante nella maschera "M_Ordine" ho
    DoCmd.OpenForm "M_Aggiungi_Ordine", , , , acFormAdd
 
poi su doppio clic del controllo "Dataordine" della Maschera 
"M_Aggiungi_Ordine" ho inserito
 
 If Me!DataOrdine = Date Then
     DoCmd.GoToRecord , , acNewRec, acFormAdd
     Forms!M_Aggiungi_Ordine!IDCLIENTE = Forms!M_Ordine!CboCliente
 End If
 
ma non ottengo cio'che vorrei
cio� lo stesso idCliente che ho nella CboCliente della maschera "M_Ordine"
nell'IdCliente della Maschera "M_Aggiungi_Ordine" 
 
 

 nell'IdCliente della Maschera "M_Aggiungi_Ordine"
 
risolto semplicemente cosi'
nella Maschera "M_Aggiungi_Ordine"
 
Private Sub DataOrdine_DblClick(Cancel As Integer)
    Me!DataOrdine = Date
 
    If IsNull(Me!NumeroOrdineVendita) Then
        Me!NumeroOrdineVendita = Nz(DMax("[NumeroOrdineVendita]", 
"[TbOrdine]"), 0) + 1
    End If
 
    Me!IDCLIENTE = Forms!M_Ordine!CboCliente
End Sub

Newsgroup: it.comp.appl.access
Titolo: Formattazione testo nei report

Ciao a tutti sono Chrys
Il mio problema è questo:
Ho una stringa di 15 caratteri e devo formattarla in questo modo:
LLL/LLLLLLLLLLLL
ho provato specificando su formato questa formattazione ma niente da fare,
qualcuno sa indicarmi il modo giusto?

hai provato
format([campo],"!@@@/@@@@@@@@@@@")

 wrote in message
j6Sw4.41$i%1....@news.infostrada.it...

Newsgroup: it.comp.appl.access
Titolo: Si possono cambiare le relazioni da codice ?

come da oggetto.
Grazie a tutti.
Marco.


Grazie mille, farň tesoro di questi consigli.
A buon rendere.
Ciao Marco.

come da oggetto.
Se ne parlo' tempo fa, mi sembra di ricordare che la maniera per farlo
sia di cancellare la vecchia relazione e ricrearla, il che e'
possibile da codice.
-- 
Ciao,
Giovanni

"Giovanni Albertone" <g_albertone@NOSPAM_MA_SENZA_NOSPAMhotmail.com> ha
scritto nel messaggio news:c795hs4kr2rnotba3...@4ax.com...

dovrebbe essere:



Ti  mando questo esempio.
Dovrebbe funzionare.
Ciao
Piero
Dim dbs As Database, tbl As TableDef
Dim fld As Field, rel As Relation
Set dbs = CurrentDb
For Each rel In dbs.Relations
       If rel.Name = "TestateAnagrafico" Then
            dbs.Relations.Delete rel.Name
       End If
Next rel
For Each tbl In dbs.TableDefs
       If tbl.Name = "Anagrafico" Then
          dbs.TableDefs.Delete tbl.Name
       End If
Next tbl
Set rel = dbs.CreateRelation("TestateAnagrafico", "Anagrafico",
"Testate")
Set fld = rel.CreateField("codice")
fld.ForeignName = "codice"
rel.Fields.Append fld
rel.Attributes = dbRelationDontEnforce + dbRelationRight
dbs.Relations.Append rel
dbs.Relations.Refresh
Set dbs = Nothing


Ti ritrasmetto l'esempio perchč c'era del codice che non c'entrava.
Ciao
Dim dbs As Database
Dim fld As Field, rel As Relation
Set dbs = CurrentDb
For Each rel In dbs.Relations
       If rel.Name = "TestateAnagrafico" Then
            dbs.Relations.Delete rel.Name
       End If
Next rel
Set rel = dbs.CreateRelation("TestateAnagrafico", "Anagrafico",


come da oggetto.
Si, si fa come ti hano suggerito gli altri....ma mi togli la curiosita':
perche' mai dovresti farlo?
Saluti.
Luciano


Purtroppo la mia società ha un vecchio DB che necessita alcune modifiche.
L'ideale sarebbe riprogettarlo da zero e poi importare i dati, ma il tempo è
tiranno e qui mi sommergono di altre cose da fare. Inoltre il seguente DB è
distribuito in giro per una ventina di filiali così sto cercando una maniera
per poter fare le modifice più urgenti tramite codice, distribuendo una
piccola applicazione in VB.
Spero di aver soddisfatto la tua curiosità.
Ogni suggerimento è sempre ben accetto.
Ciao Marco.
Newsgroup: it.comp.appl.access
Titolo: per esperti. problema formattazione floppy

sto utilizzando questa funzione ma ho dei problemi a formattare il floppy
perchè la funzione in dos mi restituisce "Imposiibile bloccare l'unità
disco. Ilvolume è ancora in uso"
da quello che ho capito la dir("a:") mi apre una sorta di canale su a: e mi
blocca ogni possibilità di formattare il floppy. la mia domanda è questa: è
possibile formattare il floppy in altro modo o comunque trovare il sistema
di "mollare" il canale su a:?
Public Function EsportaDati()
On Error GoTo Err_EsportaDati
Dim NomeDatabaseBE, NomeDatabaseFE, CartellaCorrente As Variant
Dim dbs As database
Dim tdfCiclo As TableDef
NomeDatabaseBE = Left(CurrentDb.name, Len(CurrentDb.name) -
Len(Dir(CurrentDb.name))) & Left$(Dir(CurrentDb.name),
Len(Dir(CurrentDb.name)) - 6) & "BE.mdb"
'1============== formatta il floppy in caso di floppy non vuoto
================
Dim RetVal As Variant, strCmd As String, conferma As Integer
CartellaCorrente = Left(CurrentDb.name, Len(CurrentDb.name) -
Len(Dir(CurrentDb.name)))
If Dir("a:") <> "" Then
Beep
conferma = MsgBox("Il floppy inserito contiene dati. Per poter proseguire è
necessario eliminarli. Confermi l'eliminazione?", 292)
End If
    If conferma = 6 Then
    Open CartellaCorrente & "\Formatta.bat" For Output As #100
    Print #100, "echo s| format a: /q"
    Close #100
    strCmd = CartellaCorrente & "\Formatta.bat"
    RetVal = Shell(strCmd, vbHide)
    'Kill CartellaCorrente & "\Formatta.bat"
        Else
        Exit Function
    End If
MsgBox 100
'1FINE=====================================================================
Exit_EsportaDati:
    Exit Function
Err_EsportaDati:
    MsgBox Err.Description
    Resume Exit_EsportaDati
End Function
--------------------------------
Inviato via 
http://usenet.libero.it

di "mollare" il canale su a:?
premesso che *non* sono esperto di queste cose, la butto li'
a caso:
e provare a fare un dir("c:") prima di formattare?
un po' come succede con l'esplora risorse, prima devi
spostarti su un altro disco...
--
lorenzo coronati
---

 ---
non funziona purtroppo. Ho però trovato una soluzione:
mi sono fatto una routine che mi memorizza in una maschera se sono
presenti file su a: poi dalla stessa maschera lancio la procedura di
formattazione. Un pò spartana ma funziona.
Ciao e grazie comunque.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it