mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Pesare singoli oggetti di MDB

Salve a tutti,
volevo sapere se è possibile
avere una lista di tutti gli oggetti (tabelle,query,maschere,report...)
di un MDB e avere il peso in KB...
grazie
ringo



per avere l'elenco degli oggetti c'e' un esempio molto ben fatto nel
sito comune
www.sitocomune.com
per il peso in kb vedi la proprieta' (credo) size
Ciao :)

 e avere il peso in KB...
No
-- 
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

Newsgroup: it.comp.appl.access
Titolo: A97 --> 2000 query non funzionante

E' la prima cvolta che scrivo e spero di non ripetere una domanda già fatta.
Ho convertito un mdb da access97 a access2000 e apparentemente funziona
tutto bene a parte una banalissima query di ricerca sul campo cognome: come
criterio metto un semplicissimo like "prova*" e quando eseguo la query non
mi trova nulla di nulla. Il bello è che se sposto lo stesso criterio sul
campo nome la query magicamente funziona. In pratica se sul campo cognome
uso il carattere jolly * la query non funziona. Premetto che in access97
tutto andava bene.
Potete darmi qualche delucidazione?
Grazie
Alessandro

 ha scritto nel messaggio
news:ceq07.36298$u%1.25...@news1.tin.it...

Premetto che non ho mai dovuto effettuare la conversione di DB da A97 a
A2000.
Potresti provare a creare un nuovo MDB con A2000 e, da questo, importare
tutti gli oggetti del MDB convertito.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

Newsgroup: it.comp.appl.access
Titolo: controllare se esiste una macro

è possibile controllare l'esistenza di una macro?
mi serve per controllare che non venga cancellata o rinominata.
grazie.
Lenny

 è possibile controllare l'esistenza di una macro?
Public Function EsisteMsg() As Boolean
On Error GoTo NonEsiste
    DoCmd.RunMacro "TuaMacro", 0
    EsisteMsg = True
    Exit Function
NonEsiste:
    EsisteMsg = False
End Function
Sib
--
qualita.assicurazione su 
www.cerrinet.it
Il newsgroup sulla Qualita'

grazie mille!!
Lenny

Newsgroup: it.comp.appl.access
Titolo: info urgente....

spero di nbon disturbare e che qualcuno mi risponda: che formato è .wpd?
word perfect? dove trovo il word perfect 8? o come posso leggere i file se
non ho office? grazie


Se non hai modo di trasformare il file wpd in (minimo) rtf (rich text
format), la vedo dura; molto dura se non hai neanche Word che magari poteva
riconoscere il tipo di file e salvarlo in altro formato. Prova a cercare su
internet qualche utility che legga il file e lo trasformi in un'altro
formato...
Ciao.
Newsgroup: it.comp.appl.access
Titolo: Report con condizione

Devo aprire un report con una condizione basata su un controllo di una 
sottomaschera. Ho mskPippo con la sottomaschera smkPluto che contiene un 
controllo combinato cboPaperino con origine IdPaperino, ora devo mettere 
insieme l'istruzione con cui, posizionato su cboPaperino, a fronte di F2 
apro un report che normalmente visualizza un blocco di dati per ogni valore 
di IdPaperino, ma ora mi deve visualizzare solo il blocco di dati 
corrispondente a cboPaperino (anche nel report c'e' cboPaperino con origine 
IdPaperino).
Ora sono andato sulla maschera mskPluto origine di smkPluto e sto cercando 
di scrivere la routine cboPaperino_KeyUp con l'istruzione
Docmd.OpenReport MioReport,,,CondizioneWhere
ma non trovo la sintassi esatta per la CondizioneWhere
qu mi aiuta?
il barbi 

 wrote in message 
news:gn3qnp$7mc$1...@nnrp.ngi.it...

,,, "[IdPaperino]=" & [IdPaperino]
se non ho capito male e se IdPaperino è numerico.
Bruno 


ok grazzzzie!!!!!
il barbi

Newsgroup: it.comp.appl.access
Titolo: Trovare modelli o creazioni guidate per front page

Dove posso trovare modelli o creazioni guidate per front page?


Newsgroup: it.comp.appl.access
Titolo: Verificare se due valori sono presenti contemporaneamente in tabella

Buona sera,
sono un po' (tanto!) in crisi e mi serve un vostro consiglio per ben 2 cose:
Ho una tabella Customers (Tbl_Customers) 
CustomerID. (text) 
Nome
Società
etc. 
Poi ho la tabella ordini (Tbl_Orders) 
CustomerID (Text) 
OrderID (Text) 
Promozione (text) 
Il campo "promozione" è dato dall'unione di due controlli che io compilo sulla
maschera Frm_Ordini (sono due caselle combinate) e cioe'
Me!Promozione = Me!Promo & Chr(47) & Me!Sconto
In questo modo ottengo il campo Promozione.
PROBLEMA: ogni cliente può avere la stessa promozione SOLO 1 volta, ma tanti
clienti possono avere la stessa promozione.
Quello che io devo ricercare è quindi la combinazione di CustomerID e Promozione
e segnalare l'errore se cerco di assegnarla una seconda volta
Pensavo di usare una cosa così:
If DLookup("[CustomerID]", _
                "Tbl_Orders", _
                "[CustomerID]='" & Me.CustomerID & "'") And _
                DLookup("[Promozione]", _
                "Tbl_Orders", _
                "[Promozione]='" & Me.Promozione& "'") > 0 Then
Msgbox "Ahi ahi ahi che dolor...."
reset del controllo e ricomincia da capo.
Ma mi dà errore di tipo non corrispondente.
Cosa sbaglio?
Infine un altro dubbio: nella Frm_Ordini ho un rettangolo rosso che mi serve per
fare operazioni diverse in base al fatto che il rettangolo sia visibile o meno.
Aprendo la Frm_Ordini da un'altra maschera, è possibile fare in modo che la
proprietà .Visible del rettangolo sulla maschera Frm_Ordini sia settata su
"False"?
Non riesco proprio a farlo funzionare!
Vi ringrazio in anticipo per l'aiuto!
Erika

 Erika
Forms!Tuaform!tuocontrollo.visible = false
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

"Customerid = " & me.customerid
No, č testuale perché č una cosa tipo ABC-1234
Erika

 ha
scritto nel messaggio news:9fv9c2h1ejcqvop9v...@4ax.com...

Ciao Erika,
sbagli nel fare due Dlookup e nel mettere il loto risultato in bitwise AND.
fai così
----
If Not IsNull(DLookup("[CustomerID]", _
            "Tbl_Orders", _
            "[CustomerID]='" & Me.CustomerID & "' AND " & _
            "[Promozione]='" & Me.Promozione & "'")) Then
    MsgBox "Ahi ahi ahi che dolor...."
   '.............
End If
----
poi, per non eseguire il controllo sull'ordine già inserito correttamente
con promozione fai così
----
If Not IsNull(DLookup("[CustomerID]", _
            "Tbl_Orders", _
            "[CustomerID]='" & Me.CustomerID & "' AND " & _
            "[Promozione]='" & Me.Promozione & "' AND " & _
            "[OrderId]<>'" & Me.OrderID & "'")) Then
    MsgBox "Ahi ahi ahi che dolor...."
    Cancel = True
End If
----
Ciao
-- 
Giorgio Rancati
[Office Access MVP]

Forms!Tuaform!tuocontrollo.visible = false
Wow! Perfetto! 
Grazie tante!
Erika



Semplicemente perfetto!
Grazie di tutto!
Newsgroup: it.comp.appl.access
Titolo: Printers

Buona sera a tutti.
Dovrei stampare lo stesso report su 6 stampanti diverse.
Per adesso mi arrangio con 6 report ognuno con stampante specifica.
Per maggiore "eleganza" ho dato un'occhiata a printers.
Ma gli esempi non funzionano perchè ciclando tra le stampanti installate
riesco a gestireil nome corretto ma porta e driver sono sempre quelli
della predefinita.
Access 2002 e WinXP.
Consigli ?
Grazie
MArco
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 MArco
Hai provato il Demo pubblicato sul mio sito:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=198
In realtà è una versione Valutativa non opensource, ma rende
disponibile la definizione
della stampante e di diversi attributi utili per la stampa.
Poichè quel demo utilizza l'oggetto Printer e le impostazioni che
rende disponibili
e dai test fatti funziona regolarmente, potrebbe essere un errore
d'impostazioni...!
Con quel demo eviteresti di usare MultiReport...! 
;-)
Ciao
@Alex

 Consigli ?
La proprietà Port dell'oggetto Printer ha il veccio bug di sempre
dare la porta del stampante predefinita. Ma di solito per cambiare
la stampante non hai bisogno della porta. Vedi 
www.donkarl.com/it
FAQ 5.1 Cambiare la stampante o le impostazioni stampante/pagina
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 + iscriviti alla CISA2, la seconda
Conferenza Italiana per Sviluppatori di Access, Paola, 17+18/6/2006 

 Consigli ?
forse funziona questo aggiramento non molto elegante...
un solo report
sull'evento click del pulsante
private Sub stampa_Click()
On Error GoTo err
For i = 1 To 6
DoCmd.OpenReport "nomerep", acViewPreview
DoCmd.RunCommand acCmdPrint
DoCmd.Close acReport, "nomerep"
Next
Exit Sub
err:
'per evitare l'errore se si annulla la stampa
If err.Number = 2501 Then Resume Next
End Sub
ad ogni dialogo di stampa selezioni una stampante diversa

 @Alex
Grazie Alessandro
Sto Provando .......


 FAQ 5.1 Cambiare la stampante o le impostazioni stampante/pagina
Accidenti ai vecchi bugs ....


 ad ogni dialogo di stampa selezioni una stampante diversa
E' possibile selezionare la stampante da codice ?


 Sto Provando .......
E' inutile provare: quel Demo risolverebbe i tuoi problemi ... se non fosse
un MDE!    ;-)
Ciao, Simone

 E' possibile selezionare la stampante da codice ?
forse, ma per interagire con il s.o. le mie conoscenze non sono abbastanze.

 abbastanze.
ROTFL!!!!
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 ROTFL!!!!
non volevo sprecare un post per correggermi.....
che pignolo :-P
Newsgroup: it.comp.appl.access
Titolo: come ottenere il formato .xls senza troppi passaggi

ciao a tutti
su click di un pulsante ho questo codice
 
    Dim stDocName As String
     stDocName = "mioReport"
     DoCmd.OpenReport stDocName, acPreview, , "IdOrdine =" & 
Forms![MiaMaschera]![MiaSottomaschera].Form!IDOrdine
 
Aperto il report con esporta seleziono il tipo di file
che puo' essere:
Microsoft Excel 5-7 (*.xls) oppure Microsoft Excel 97-2003 (*.xls)
 
� possibile aliminare il primo passaggio ed avere direttamente
il file in formato *.xls?
 
Grazie 
 
 


Esporti la query che alimenta il report

 Grazie
 
Esporti la query che alimenta il report
 
ciao Fair87
 
non so come
 
 
 
 

 non so come
 
ok
ora come devo fare per avere i record  dell'IdOrdine nel foglio excel?
 
 
 
 


 
    Dim stDocName As String
     stDocName = "mioReport"
     DoCmd.OpenReport stDocName, acPreview, , "IdOrdine =" & 
Forms![MiaMaschera]![MiaSottomaschera].Form!IDOrdine
    DoCmd.OutputTo acOutputReport, "mioReport", acFormatXLS, "CCDC.xls", 
True
 
con questo codice ottengo il formato voluto, ma vorrei che il report
una volta aperto il file .xls si chiudesse
 
Grazie
 
 
 

docmd.close acreport,"nome"

 docmd.close acreport,"nome"
 
grazie
Newsgroup: it.comp.appl.access
Titolo: Query a campi incrociati

Salve a tutti,
ho un problema con una query fra due tabelle, vediamo se riesco a spiegarmi
con un esempio:
Tabella auto: idauto, + vari altri campi,
Tabella lavori: idauto, annolavoro, descrizionelavoro+ vari altri campi.
Io volevo scrivere una query che mi restituisse:
Idauto, descrizionelavoro
per tutte le auto nel db dove descrizionelavoro deve comparire solo se
l'auto ha avuto un lavoro nell'anno scelto, cioč:
Tabella Auto: idauto = 1, 2 ,3  e 4
tabella lavori: idauto = 2, annolavoro = 1999, descrizionelavoro = 'lavoro
a'
tabella lavori: idauto = 3, annolavoro = 2000, descrizionelavoro = 'lavoro
b'
tabella lavori: idauto = 4, annolavoro = 2000, descrizionelavoro = 'lavoro
c'
tabella lavori: idauto = 4, annolavoro = 2000, descrizionelavoro = 'lavoro
d'
Allora dalla query vorrei ottenere (per l'anno 2000):
idauto=1,descrizionelavoro =
idauto=2,descrizionelavoro =
idauto=3,descrizionelavoro = lavoro b
idauto=4,descrizionelavoro = lavoro c
idauto=4,descrizionelavoro = lavoro d.
Grazie a chiunque abbia qualche suggerimento.

 ha scritto nel messaggio
news:908252$i8d$1...@fe1.cs.interbusiness.it...

Innanzitutto una doverosa precisazione: non devi crearti una query a campi
incrociati.
Ti consiglio di crearti una query di selezione (Query1) basata sulla tabella
Lavori e che ne contenga tutti i campi; nei criteri del campo Anno scrivi
2000.
Creati ora una seconda query nella quale metti in join la tabella Auto con
Query1 in base ai campi idauto; come tipo join scegli quello che ti fa
vedere comunque tutti i record della tabella Auto.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


Io avevo provato con
SELECT [Auto].[id], [lavori].[descrizone]
FROM Auto LEFT JOIN lavori ON [Auto].[id]=[lavori].[idauto]
WHERE [lavori].[anno]=2000 Or [lavori].[anno] is null;
ma questa query non mi ritorna l'auto 2 (dell'esempio che ho tagliato) dato
che questa ha un lavoro nel 1999. Non sono ancora riuscito ad ottenere
quello che voglio, forse sbaglio il modo di pormi il problema ma non ho
grande esperienza di sql. Grazie comunque per la risposta.

 wrote in message
90fkea$8f5$1...@fe1.cs.interbusiness.it...

Allora, va bene il left join per avere comunque tutte le auto, ma non
mettere i criteri.
Poi invece di restituire il campo descrizione, prepara un campo calcolato di
questo tipo
iif(isnull([descrizione]);"Nessun
lavoro";iif([anno]=2000;[descrizione];"Nessun lavoro nel 2000"))
Se descrizione è null, significa che il join non ha agganciato l'ID della
macchina, quindi non è mai stata lavorata. Se non è null significa che è
stata lavorata. A quel punto ogni record di questo tipo avrà l'anno di
lavorazione. Se l'anno è il 2000 è quello che cercavi e quindi ti prendi la
descrizione del lavoro, altrimenti è di un altro anno!!!
Antonio
Newsgroup: it.comp.appl.access
Titolo: Consulenza su proprietà campo

Salve a tutti. Sto costruendo un grosso database per un gestionale, ho un
problema che non so risolvere.
Praticamente il problema è questo: devo costruire un campo array
direttamente da access...E' possibile?
Grazie per l'attenzione.

 wrote in message 87p5q5$ek8$1...@nslave2.tin.it...

Direi di no.
Ma, secondo me, ci sono vie piu' semplici e funzionali.
Cosa devi fare?
Ciao, Sib


poichè un array è una particolare tabella, se non è dinamnico, magari
potesti arrangiarti collegado ad ogni record dei sottorecord in maniera
automatica con due indici per poterli scorrere velocemente
Cioè se ad ogni record devi associare un array 6x6 creati una sottotabella
relazionata lato molti ed ad ogni inserzione/eliminazione dei un record
dalla tabella lato 1 aggiungi e togli via vba 36 record e relativi campi
indice con due cicli for next nidificati
spero di non aver detto castronate!
ciao

Ringrazio tutti per l'attenzione ed i consigli, ho risolto il tutto
raggruppando i 40 campi in 5, in un altro caso ho trovato una soluzione
ottimale con il mio collega programmatore VisualBasic. Tutto Ok per adesso.
Alla prossima, spero anche da consulente (lo spero anche per me!!!)

Newsgroup: it.comp.appl.access
Titolo: aggiornamento maschera dati  con valori su  tabella collegata

Salve Ragazzi,
ho un problema...
Ho una Maschera Disposizioni collegata con una sottomaschera folgio
dati Tabella.DettagliDisposizioni:
con i seguenti campi:
Tabella Disposizione
ID_Disposizioni
NDisposizione
Pagatore
Importo
Data
Tabella.DettagliDisposizioni
ID_NUMERO
ID_DISPOSIZIONI
NUMERO
IMPORTO
ETC ETC
Legati da una relazione 1 a molti. Id_disposizioni(chiave) a
id_disposizioni
Nella  tabella Disposizioni, ho creato per il campo pagatore, una
casella combianata
per questo campo, che va a pescare i dati da una tabella
Pagatore.Anche per il campo Numero della tabella.Dettagli
Disposizioni, ho creato  una casella combinata che va a pescare i dati
da una tabella fatture, sulla quale ho scritto questa condizione:
SELECT Fatture.Numero, Fatture.Ufficiale, Fatture.Data,
Fatture.Pagatore FROM Fatture WHERE (((Fatture.Pagatore) Like ("*" &
[Forms]![Disposizione]![Pagatore] & "*")));  tutto funziona
egregiamente, ma quando dalla maschera Disposizione nella casella
combinata Pagatore passo dalla selezioni di  un pagatore all'altro i
valori della casella combinata della tabella.dettaglidisposizioni
"Numero" rimangono invariati alla prima selezione, per farli cambiare
devo uscire e rietrare dalla maschera.
Ho provato ad inserire sulla casella combinata pagatore su evento
after insert o afterupdate  pagatore un me.refresh o un me.requery ma
nulla.... mi aiutate ???
Grazie


Ciao,
hai provato a fare un requery sul GotFocus della combo ?
Alberto

 - Mostra testo citato -
si ho provato, ma quando vado a selezionare dalla combo  mi porta in
automatico al primo record della mashera e non mi permettere di fare
la selezione.


Il Requery devi fare sulla casella combinata, non sulla maschera.
Cio� nel codice dell'evento "Dopo aggiornamento" della casella
combinata "Pagatore":
Me!NomeDellaSottomaschera!Numero.Requery
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: E-Mail by Acces

Ciao a tutti..
é possibile, tramite un pulsante (uso A97) deviare uno specifico file del
mio HD ad Outlook e quindi inviarlo in posta elettronica ?
approfitto(se è possibile) per chiedere un altra cosa.
Ho un database tipo Nortwind dove, nella maschera Ordini+sottomaschera
ordini, alla fine dell'ordine l'applicazione chiede se si desidera inserire
note all'ordine .
Se l'utente inserisce un testo nel campo Note e dopo va in stampa, la nota
...non c'è.
Ho provato ad inserire docmd.requery sul l'evento exit del campo nota, ma
invano.
Come si deve fare?
e devo far fare il requery alla query d'origine della maschera o cosa?
grazie ..
Luisa

 Luisa
Prova a salvare il record
docmd.(non mi ricordo) devi salvare il record
Ciao
Fammi sapere


Usi un pulsante su una maschera per fare l'anteprima di stampa del report?
Se non ricordo male inserisci nel codice associato al click del pulsante,
prima di DoCmd.OpenReport,ecc. , il seguente:
Forms![NomeMaschera]![NomeSottomaschera].SetFocus
Sposta il controllo dalla maschera alla sottomaschera, quindi aggiorna il
record.
Ciao, Davide

...non c'è.
non è un campo, è un controllooooo...  è legato a qualche campo?
comunque in campana perché è assodato sperimentalmente che la parola
Note è una delle parole riservate di access.  chiamare un campo o un
controllo Note è fonte di problemi.  prova a rinominarlo.
--
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/

Newsgroup: it.comp.appl.access
Titolo: forse OT ma + che voi :-)

Caio a tutti, ho un file di testo composto da migliaia di righe. A volte,
con frequenza di circa 5 righe, il testo è interrotto da una andata a capo.
Problema:
Vorrei togliere in automatico l'andata a capo che avviene ogni tanto.
Manualmente vado sulla riga dove è presente l'andata a capo e digito il
tasto CANC. Purtroppo dovrei far questo per migliaia di volte. :-(
P.S. aiutatemi sono nei guai, grazie
Michele b.


Butto giů al volo una piccola routine:
dim caratterein as string
dim carattereout as string
dim puntatore as long
dim k as integer
k=freefile
open "nomedelfile" for binary as #k len=1
open "nomenuovofile" as #k+1 len=1
do until eof(k)
    caratterein=" "
    carattereout=" "
    get #k,puntatore,caratterein
    if asc(caratterein)=chr(13) then
        carattereout =""
    else
        carattereout=caratterein
    endif
    put #k+1,puntatore,carattereout
    puntatore=puntatore+1
loop
close #k,#k+1
Piů o meno dovrebbe fare al caso tuo, ovviamente scrivendo quanto sopra
direttamente nella finestra di outlook non ho verificato che sia tutto
perfetto "alla virgola" ma lo spunto dovrebbe essere sufficiente.
saluti
--
Claudio(BS)
per l'indirizzo di posta visita:
http://web.tiscali.it/claudio0

 Ave
In word puoi sostituire, in tutto il documento, quello che ti pare, solo con
un paio di clic.
Saluti Daniele
---
Newsgroup: it.comp.appl.access
Titolo: gif animate

si possono inserire gif animate ?
come?
grazie


Vedi le risposte del messaggio 
01C0F41F.D0727...@tno.it
di Pasquale Antonacci.
Ciao.
Carmel

 wrote in message
glamitc555snt7fkq...@4ax.com...

grazie

grazie
Prego
Ciao.
Carmel

Newsgroup: it.comp.appl.access
Titolo: Copiare record da una casella di riepilogo

Ciao a tutti, sono un novellino e per tale motivo ho un problema da
novellino.
Ho una serie di dati visualizzati tramite una casella di riepilogo, vorrei
copiare e memorizzare i dati che seleziono, tramite doppio click, in una
casella relativa ad un campo memo, se fosse possibile vorrei inserire ogni
record selezionato in una riga diversa, come posso fare??
Grazie a tutti.
Ciao Ricky

 ha scritto nel messaggio
news:IkJD9.12051$2B1.3...@twister2.libero.it...

Se la casella di riepilogo si chiama Elenco ed ha tre colonne.
Se il controllo associato ad un campo di tipo memo si chiama Pippo.
Se nel controllo Pippo i dati delle tre colonne della casella di riepilogo
li vuoi separati da una virgola.
A fronte dell'evento "Su doppio clic" della casella di riepilogo genera il
seguente codice VBA:
Private Sub Elenco_DblClick(Cancel As Integer)
Me!Pippo = Me!Pippo & Me!Elenco.Column(0) & _
", " & Me!Elenco.Column(1) & ", " & _
Me!Elenco.Column(2) & Chr$(13) & Chr$(10)
End Sub
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Database per d.d.t

Salve devo fare un piccolo database per un elettricista che deve tenere
traccia delle ddt (documenti di trasporto) che emette giornalmente.
Per chi non sapesse cos'e' una ddt, è un modulo tipo una fattura numerata
che l'artigiano compila prima di andare ad eseguire un lavoro dove dovrebbe
registrare il materiale che porta con se.
Volevo chiedere dei consigli su come impostare il mio database.
Di una ddt mi interessno sapere i seguenti dati:
numero,luogo,cedente(l'artigiano), cessionario(la persona presso la quale si
svolge il lavoro), causale trasporto,quantità, breve descrizione,
importo,totale.
Il mio problema verte su come progettare le tabelle: è meglio farne una
unica con tutti i dati o separarle?
Faccio notare che sotto le colonne qunatità, breve descrizione e importo io
posso mettere più di un articolo.
Grazie per le eventuali risposte, sono disponibile ad ulteriori chiarimenti.
Grazie ancora

 ha scritto nel messaggio
news:ggnYb.13289$Kc3.4...@twister2.libero.it...

Io consiglio sempre di isolare le basi dati che "vivono da sole", cioè tutte
quelle tabelle che contengono dati che se isolate sono significative.
Esempio una possibile tabella "Clienti" non è dipendente da nessuna altra
tabella (e non è detto che sia per forza così), la tabella Articoli idem;
mentre la tabella DDT dipende dalle informazioni prese da Clienti e Articoli
e altre tabelle che servono per compilare il DDT.
Quindi, sì, ti sconsiglio una mega tabella che non farebbe altro che
procurarti problemi...
Ciao.
--
Sergio MAZZA

 tabella (e non è detto che sia per forza così),
Infatti consiglierei di creare anche una tabella RecapitiTelefonici da
relazionare alla tabella Clienti in quanto molto spesso allo stesso cliente
corrispondono svariati numeri di telefono: vari cellulari, vari numeri di
telefonia fissa, vari interni.......
Pleiadi

grazie dei consigli prendero' atto...
ma se ho una tabella tableDDT e una maschera formDDT (tramite questa
maschera inserisco i dati per ciascuna ddt), e nella mia forma devo inserire
i campi per le quanrità, descrizione e importo , considerando che i campi
possono essere più di uno ma non hanno un numero fisso, come posso fare, con
una sottomaschera che mi inserisca rispettivamente solo questi campi?

 ha scritto nel messaggio
news:3VtYb.14335$FJ6.5...@twister1.libero.it...

Ci sarà una maschera principale che avrà come origine la tableDDT e una
sottomaschera con origine una tableDettagliDDT legate entrambe da un campo
Id:
Es.
tableDDT
Id - contatore - univoco;
...
tableDettagliDDT
Id - contatore - univoco;
IdDDT - numerico lungo - indicizzato;
...
Ciao.
--
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: pressione tasti...

Ho un pulsante di comando con sull' evento click una bella routine....
tale pulsante puň venir attivato anche tramite la pressione di Alt+S (č una
scelta quasi obbligata...)
Ho notato che se tengo premuto per circa piů di 1 secondo tale sequenza
succede un pň un casino....(č come se si attivase la ripetzione
automatica...)
Chiedo:
č possibile ovviare a tale incoveniente scrivendo magari del codice VBA ?
Grazie mille

 ha scritto nel messaggio
news:alb45m$7o5$1...@lacerta.tiscalinet.it...

Il comportamento di Access č perfetto in questo caso.
Per disabilitare momentaneamente l'effetto di ALT+S potrsti fare cosě:
Crei una variabile globale a livello di dichiarazioni del modulo della
maschera:
Dim Premuto as Boolean
Sull'evento click del pulsante interessato:
If Premuto = False Then
'...tuo codice
Premuto = True
me.TimerInterval = 2000
Else
Exit Sub
End If
Sull'evento apertura o caricamento della maschera:
Premuto = False
Sull'evento Timer della maschera con intervallo timer impostato a 0:
Premuto = false
Me.TimerInterval = 0
Si tratta di un artificio ma funziona.
In pratica dopo 2 secondi riattiva il pulsante.
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: file MDE

Ho scritto un piccolo programma in access 2000 e tutto funziona 
regolarmente.
Quando cerco di fare il file MDE mi viene comunicato con un messaggio che 
non č possibile creare il file MDE,
nulla di piů!
Ho controllato piů volte il tutto, tutto sembra andar bene, e non trovo 
spiegazioni.
Se qualcuno mi piů aiutare?
Grazie
Leo

 wrote in message
news:H37ce.89017$
zZ1.2...@twister1.libero.it

Ipotizzo:
1)Non hai provato ad eseguire un Compila nel Codice
  quindi quando lo farai troverai l'errore.
2)Nel codice non hai messo l'Option Explicit e non ti vengono
  segnalati gli errori di omissione dichiarazioni, che vengono
  trovati al momento del tentativo di creare un MDE.
3)1+2
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

[cut]
hai gia compilato il codice?
magari ci sono delle anomalie post sviluppo da correggere ... a me è
successo proprio oggi!
Compilando correttamente il codice ho risolto il problema.
Saluti.
--
strano...mavero

 nulla di più!
www.donkarl.com/it
 FAQ 7.17 La creazione di un MDE non riesce
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 + iscriviti alla prima Conferenza
Italiana per Sviluppatori di Access (CISA 1), Arezzo, 4+5/6/2005 

 ha scritto nel messaggio 
news:H37ce.89017$zZ1.2...@twister1.libero.it...

Newsgroup: it.comp.appl.access
Titolo: raggruppamento query e stampe...

cia a tutti di NG...
ho un  Db anagrafico composto da 2 tabelle in relazione 1>molti
con l'uso di una sottomaschera ...
il mio intento è creare le varie query di ricerca su tutto il DB
e chiaramente fare poi dei report di stampa...
e fin qui tutto Ok...
ma mi chiedevo quale fosse una maniera pratica per
raggrupparle...
pensavo di fare un pannello di comando in cui inserire
1 bottone  per aprire un'altra mask nella quale vi sarebbero
stati i vari bottoni di ricerca e stampa.
è corretto usare questo procedimento ??
il mio dubbio è come far eseguire le ricerche ..alle
varie query.............. è possibile
sulla stessa maschera principale ???
ringrazio per l'aiuto...

"SuperPippo®_at Home" <ik0qddT...@TOGLISPAMlibero.it> wrote in
message news:GLcbb.333797$
lK4.10...@twister1.libero.it

Ti espongo il mio metodo +/- giusto che sia, sicuramente
si può fare di meglio....!
Creo una Form non associata in cui inserisco tutti i controlli
che servono per costruire la condizione WHERE del predicato
SQL da ottenere.
Sfrutto la proprietà TAG dei controlli che devono servire
poiche una TxtBox con la sua Label farebbero confusione...!
Quindi attribuisco alla proprietà TAG=NomeCampo(relativo alla Tabella)
Nella Form in questione inserisco un CommandButton(EseguiRicerca)
e sull'Evento Click genero la stringa SQL da passare alla
QRY che sarà l'origine dati sia della Form che del Report sfruttando 
DAO e l'oggetto QueryDefs("NomeQRY").SQL
Ti allego un sunto del codice che ho estrapolato.
Non è completo poichè sicuramente va personalizzato, ma ti da l'idea
di come gestire la cosa.
Private Sub cmdExecute_Click()
   Dim strFilter As String
   Dim strSQL As String
   Dim qdf As QueryDef
   strFilter = SQLCode
   If Len(strFilter) = 0 Then Exit Sub
   strSQL = "SELECT * FROM TuaTabella " & _
            "WHERE " & strFilter & " ORDER BY CampoChePreferisci;"
   Set qdf = CurrentDb.QueryDefs("NomeTuaQRY")
   qdf.SQL = strSQL
   qdf.close
   Set qdf = Nothing
   rs.close
 End Sub
Private Function SQLCode() As String
   Dim s As String
   Dim sn As Variant
   Dim ctl As Control
   On Error GoTo SQLCode_Error
   s = vbNullString
   For Each ctl In Me.Controls
      If Len(ctl.Tag) > 0 Then
         sn = Nz(ctl.value, vbNullString)
         If sn = vbNullString Then GoTo Skeep
         End If
         If VarType(sn) = vbString Then
            s = s & ctl.Tag & " = " & chr(34) & sn & chr(34) & " AND "
         Else
            s = s & ctl.Tag & " = " & sn & " AND "
         End If
         GoTo Skeep
      End If
Skeep:
   Next
   If Right(s, 4) = "AND " Then
      s = Left(s, Len(s) - 5)
   End If
   SQLCode = Nz(s, vbNullString)
Exit_Here:
   Exit Function
SQLCode_Error:
   MsgBox ctl.Tag
End Function
Ciao.
@Alex.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 DAO e l'oggetto QueryDefs("NomeQRY").SQL
riguardo al codice non ho problema ad inserirlo nell'evento Click...
ma non ho capito se devo costruire prima tutte le query di cui ho bisogno...
certo dirai tu ci vuole meno a farlo che a spiegarlo... :-))

Newsgroup: it.comp.appl.access
Titolo: aprire dbmed

premetto che sono inesperto in programmi di access ma
ho un problema ad aprire il programma di lavoro sritto dal mio ex
socio quando tento di aprirlo mi esce errore di run time 3044
c:\dbmed\euromed nono e un percorso valido assicurarsi che il nome del
percorso sia corretto e di essere collegati al server in cui si trova
il file
poi sotto mi dice se chiudere o fare un debug
seapro il debug mi esce tutta una serie di diciture con una riga
evidenziata in giallo con la dicirura
doc med.open form st docname,,,stlink critera

 ha scritto nel messaggio 
news:1193991483.4...@50g2000hsm.googlegroups.com...

Hai cambiato nome alla cartella?
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: problema con "IS NULL"

Ciao a tutti, ho un problema con il criterio di una query:
Like IIf([forms]![scheda_cliente]![pol_lib_riduz]=Vero;"33";is null)
La query dovrebbe restituirmi i record "nulli" nel case [pol-lib-riduz] sia
selezionata.
Sembra proprio che con il "like" l'operatore "is null" non funzioni.
GRAZIE

 Sembra proprio che con il "like" l'operatore "is null" non funzioni.
Aggira il problema:
nella query crea un campo
Alisadelcampo:nz([campo];"pippo") e usa il criterio su quello
Like IIf([forms]![scheda_cliente]![pol_lib_riduz]=Vero;"33";"pippo")
 Daniele "Antares" Fasoli
fas...@easy1.easynet.it

, 
sd...@tiscalinet.it
 
says...

Non devi mettere "Is Null" (che e' una funzione che ti ritorna "Vero" se 
il valore e' Null), ma "Null" (Ovvero il valore):
Like IIf([forms]![scheda_cliente]![pol_lib_riduz]=Vero;"33";Null)
Ciao
-- 
JBad

Newsgroup: it.comp.appl.access
Titolo: "Eliminare" l'eliminazione record

Buongiorno a tutti, qualcuno sa come si fa a disattivare la richiesta
AUTOMATICA di Access di conferma quando eliminiamo un record?
Vorrei sostituirla con un MsgBox personalizzato!!!
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
b6c030bc52908b310a0...@mygate.mailgate.org...

DoCmd.Setwornings True o False (per attivare o meno i msg di sistema)
Newsgroup: it.comp.appl.access
Titolo: Accodamento record selezionati

Salve a tutti, approfitto della gentilezza e della competenza di questo NG
per risolvere un mio piccolo dubbio:
Vorrei visualizzare una maschera, relativa ad una tabella, ed in questa
maschera vorrei inserire un controllo (pulsante) che esegua come evento l'
accodamento di uno dei record visualizzati (precedentemente selezionato con
il mouse ) in una seconda tabella.
Spero in un aiuto, ciao a tutti

 ha scritto nel messaggio
news:9aajt9$a2k$1...@pegasus.tiscalinet.it...

Ti crei una query di accodamento alla seconda tabella che selezioni il
record della prima tabella che stai visualizzando sulla maschera; poi
nell'evento "su clic" del tuo pulsante inserisci:
'--------------
docmd.openquery "nomeQueryDiAccodamento"
'--------------
Ciao.

 ha scritto nel messaggio
news:9abphk$jbg$1...@suite03.caspur.it...


 Grazie di nuovo e ciao
Per favore scrivi dopo il messaggio precedente (come faccio io);
Se non ci illustri:
- il nome della maschera;
- il nome che hai dato al controllo (casella di testo o altro) da utilizzare
come riferimento per filtrare i dati;
- il nome della prima tabella;
- in nome della seconda tabella;
- la versione di access;
e tutte le altre informazioni che possono renderci la vita facile per
aiutarti, sarà molto difficile indovinarle tutte.
E comunque non devi scrivere proprio nessun codice sql (in questo caso);
perché ci pensa il generatore di query e quello di espressioni a fare tutto
il lavoro; in access'97 puoi crearti una query di accodamento: bottone
"nuovo" dalla finestra del database; scegli la "visualizzazione struttura";
scegli la tabella di partenza; poi scegli la voce menù: Query - Query di
accodamento; scegli la tabella dove accodare il/i record/s; nella riga
chiamata "Campo:" scegli l'asterisco; poi nella colonna accanto, sempre
nella riga "Campo:" scegli il nome del campo che vuoi utilizzare per
filtrare i dati; nella riga "Criteri:" dello stesso campo inserisci:
forms!nomeMaschera!nomeControlloCheVuoiUtilizzarePerFiltrareiDati; chiudi
tutto salvando; poi sulla maschera ti crei un bottone con il wizard
scegliendo come azione l'esecuzione di una query e gli indichi la query che
hai appena creato...
Comprendido hombre?
Ciao.

 ha scritto nel messaggio
news:9acdk3$3l$1...@suite03.caspur.it...

Tutto chiaro, grazie!
Ciao
Newsgroup: it.comp.appl.access
Titolo: Campo Calcolato

Salve
 Come posso inserire in una maschera il valore di un campo calcolato di una 
sottomaschera quando questa (la sottomaschera ) é chiusa?
Grazie
 Danilo 

 ha scritto nel messaggio 
news:4577ade6$0$7736$5fc...@news.tiscali.it...

Semplicemente leggendo il risultato che fornisce la query (leggi filtro) che 
alimenta la sottomaschera se fosse aperta.
Ciao, Carlo 

 ha scritto nel messaggio 
news:el8dn5$mue$1...@tdi.cu.mi.it...

Ciao Carlo
perdona la mia ignoranza, ma cosa intendi per "leggere il risultato"?
Io ho bisogno di riutilizzare per un'altro campo di un'altra maschera il 
risultato di quel campo calcolato, ma non riesco a visualizzarlo se non con 
la sottomaschera aperta.
Danilo 

 ha scritto nel messaggio 
news:Q%Xdh.70819$uv5.6...@twister1.libero.it...

La sottomaschera sarà alimentata da una query, giusto? Il campo calcolato 
potrebbe essere la somma dei record "quantità". Dunque leggendo la query che 
alimenta la sottomaschera dovresti riuscire ad ottenere la stessa cosa:
Dsum("Quantità","NomeQuery")
Altra strada è quella di assegnare il valore del campo calcolato ad una 
variabile globale:
In un modulo pubblico
Global MiaVariabile as double
Quando la sottomaschera è aperta, nel momento che tu vuoi, imposti la 
variabile:
MiaVariabile = Me.CampoCalcolato.
Da questo momento potrai leggere la variabile anche a sottomaschera chiusa.
Ancora un'altra strada è quella di scrivere il valore calcolato in una 
tabella temporanea.
Ciao, Carlo 

 Ciao, Carlo
Scusa ma sono veramente una schiappa
Ciao Danilo

 Ciao Danilo
Ciao, Carlo 

 Ciao, Carlo
 Ancora grazie Danilo

Newsgroup: it.comp.appl.access
Titolo: Disabilitare un tasto

Qualcuno mi spiegherebbe come posso fare per disabilitare il tasto BLOCNUM
del tastierino numerico? Sono riuscito ad abilitarlo automaticamente
all'avvio del DB, ma ora vorrei che non potesse essere disabilitato
dall'utente. E' possibile?
Grazie a tutti.

Devi impostare  nella maschera la proprietą ANTEPRIMA TASTI su SI
Poi abilita il codice per l'evento SU TASTO GIU nel seguente modo
Private Sub Form_KeyDown (KeyCode As Integer,  Shift As Integer)
   Select Case KeyCode
       Case vbKeyNumlock
           KeyCode = 0
   End Select
End Sub
Newsgroup: it.comp.appl.access
Titolo: Origine controllo mancante

In una tabella ho inserito (successivamente alla creazione) due campi
in più.
Nella creazione della maschera ho creato due campi compilabili per
inserire dati in quei campi, ma non li trovo nel classico elenco a
discesa che mi mostra i vari campi della tabella.
Per ovviare a questo problema le ho richiamate con questa formula
=[Anagrafica]![Ragione sociale]
(dove "anagrafica" è il nome della tabella e "ragione sociale" quella
del campo).
Il problema mi si presenta poichè nei campi della maschera, come
valore predefinito, vedo
#NOME?
Come posso risolvere?
Grazie mille!!
Ivy

 ha scritto nel messaggio 
news:0c6c1a64-de7c-42a5...@f14g2000vbn.googlegroups.com...
In una tabella ho inserito (successivamente alla creazione) due campi
in pi�.
Nella creazione della maschera ho creato due campi compilabili per
inserire dati in quei campi, ma non li trovo nel classico elenco a
discesa che mi mostra i vari campi della tabella.
Per ovviare a questo problema le ho richiamate con questa formula
=[Anagrafica]![Ragione sociale]
(dove "anagrafica" � il nome della tabella e "ragione sociale" quella
del campo).
Il problema mi si presenta poich� nei campi della maschera, come
valore predefinito, vedo
#NOME?
Come posso risolvere?
fai una query della tab Anagrafica e la usi  come origine dati della 
maschera
ciao
Daniele 

 Daniele
Grazie per la risposta Daniele, però ho provato, vedo ancora #NOME?
Forse sbaglio a fare la query ?
[è cosi
SELECT Anagrafica.*
FROM Anagrafica; ]
Nelle proprietà del campo dopo aver recuperato l'origine dalla query
mi risulta questa origine:
=[Query Tab Anagrafica]![Ragione Sociale]
=[Query Tab Anagrafica]![Altra tipologia specifica]

 Daniele
Grazie per la risposta Daniele, per� ho provato, vedo ancora #NOME?
Forse sbaglio a fare la query ?
[� cosi
SELECT Anagrafica.*
FROM Anagrafica; ]
Nelle propriet� del campo dopo aver recuperato l'origine dalla query
mi risulta questa origine:
=[Query Tab Anagrafica]![Ragione Sociale]
=[Query Tab Anagrafica]![Altra tipologia specifica]
devi assegnare la query come origine record della maschera
rifai i due controlli...
vai in struttura maschera ..barramen�....visualizza elenco campi....
trascina i due campi nella maschera..
ciao
Daniele

Newsgroup: it.comp.appl.access
Titolo: Urgente(Grant e Revoke)


Il linguaggio SQL di Microsoft Jet non supporta l'istruzione di protezione
GRANT.
Quanto a Revoke non ho la più pallida idea di cosa sia.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------



 ha scritto nel messaggio
news:UYrs6.33290$6W.26...@news.infostrada.it...

Rimuove le autorizzazioni di accesso al Db, toglie i privilegi (scrittura,
lettura, insert, dba, etc.) all'utente, toglie la possibilità di eseguire
STORED PROCEDURE.
Un po' il contrario di grant
Nicky


Grazie!!

Newsgroup: it.comp.appl.access
Titolo: Lettura messaggi da file

Ciao a tutti
Ho la necessità di leggere un file (non so se txt o binario,gli es per tutti
e due andrà benissimo ;-) )
e di metterci il contenuto (1 riga sola, la prima ) in uno statusbar.
La prima riga del file cambia ogni X tempo (sconosciuto).
Io ogni  secondo devo leggere la riga e visualizzare ciò che c'è scritto.
Nel caso ci sia scritto "Errore" chiiudo FormStatus e apro FormPippo
Grazie
TT

 ha scritto nel messaggio
news:qgI8c.89857$Kc3.2...@twister2.libero.it...

A00/WXP
Ciao
credo di aver combinato, funziona ma se qualcuno ha suggerimenti da fare
........
Nel caso serva ad altri io ho fatto così.
Manca da gestire il messaggio errore ma farò.
Private Sub Form_Timer()
status.SetText 0, ReadFile
end sub
Function ReadFile() As String
Dim path As String
path = CurrentProject.path & Chr(92) & "Message.bin"
Dim InputData
Open path For Input As #msg
Do While Not EOF(msg)
Line Input #msg, InputData
ReadFile = InputData
Loop
Close #msg
End Function

Newsgroup: it.comp.appl.access
Titolo: Grosso Problema di Stabilità di Access sotto NT

Scusate se approfitto di questo NG ma sono disperato,
su una macchina NT (PIII 550 con 256 MB Ram) , ho una stupidissima query che
legge i dati da una fonte ODBC e li scrive in una locale (tipo "INSERT INTO
tabellalocal SELECT * FROM tabellaodbc)
Il problema è che la tabella ODBC contiene circa 150.000 record , e l'ACCESS
97 mentre fa questa operazione occupa circa 180Mb di ram,
provocando un evidente instabilità di NT che a questo punto deve essere
riavviato.
Credo che il problema derivi dalla transazioni, cioè access 97 cerca di
mettere in cache tutto il malloppo,
nel caso che uno decida di annullare, ma secondo voi, come faccio a dirgli
di scrivere direttamente sul disco?
Ho provato con alcune variabili di sistema MaxBufferSize, ma non è cambiato
nulla.
Sono alla disperazione, anche perchè quando usavo Access 2 con origine
BTrieve, ci metteva parecchio ma a parte quello... , ora impiega di meno ma
mi si capotta il server.
HELP

 wrote in message 8h10g6$f3q$1...@nslave1.tin.it...



Scusa se cambio nome, ma quando ho inviato quel messaggio ero dal cliente.
Comunque non credo che si tratti di un problema di INFORMIX, io sto usando
Pervasive 2000
ma ho provato anche con DB-Maker e Unify 2000 ottenendo più o meno lo stesso
risultato.
Ho trovato una variabile nel regedit (ForceOSFlush)  che forza la scrittura
sul disco ad ogni
record; funziona, nel senso che non si destabilizza più la macchina, ma ci
mette 10 volte di più in
tutto. Il nocciole del problema credo dipenda dal fatto che access tenta di
mettere in cache tutti
i record per permetterti di annullare alla fine, ma quello che non capisco è
che facendo la stessa
cosa da access ad access a un certo punto di fa la domanda "Sarà impossibile
anullare, Continuo?"
e da qui in poi funziona. (circa 20mila record ma dipendende da tanti
fattori).
MA!!!!
Newsgroup: it.comp.appl.access
Titolo: Utilizzo Casella combinata

E' possibile scegliere cio' che mi interessa nella casella combinata
premendo una  lettera?
Mi spego meglio, se scrivo una lettera nella mia casella combinata mi porta
al primo vocabolo che inizia con quella lettera, ma se la schiaccio un'altra
non ottengo ciň che vorrei infatti vorrei che mi facesse vedere la parola
seguente che inizi con la stessa lettera.
Grazie Grazie
Ciao
Lo


E' proprio questo che deve fare
ciao MAssimiliano

 > non ottengo ciò che vorrei infatti vorrei che mi facesse vedere la


 Questo è il mio problema!
Secondo me il tuo problema è il quoting!!!
Antonio

 wrote:

Se non sai la risposta, non ti sentire obbligato a rispondere...

> Se non sai la risposta, non ti sentire obbligato a rispondere...
L'hai fatta grossa Jojo... ;-)

"Jojo" <sup...@pirotti.ct> ha scritto nel messaggio
news:llvqju8fmh20tm854...@4ax.com...

E chi ha detto che non la so?
Magari tu non la sai...
E se non la sai.... salla!!!
Antonio

L'hai fatta grossa Jojo... ;-)
Non ti preoccupare, il Biso in realtà è un tenerone... dovresti vedere
con che velocità mi manda i database di esempio quando gli dico che
non ho voglia di cucinare... ma forse lo fa con me perché mi vuol bene
:-*

"Jojo" <sup...@pirotti.ct> ha scritto nel messaggio
news:qm1rju81qs2eccdah...@4ax.com...

E' che poi mi mandi le tue "protette" migliori a gratisse...
Antonio
Newsgroup: it.comp.appl.access
Titolo: OT Traduzione FAQ 6.13 e 6.14

****************
6.13 Comment out multiple lines
Problem
You want to set the command sign (apostrophe ' ) for a section
of code or you want to delete the command sign for a section.
But you don't find a way to do this in the code editor.
Solution
In A97 there's no such built in functionality. Instead you can
use the tool by Dev Ashish and Terry Kreft:
http://www.mvps.org/access/modules/mdl0031.htm
In >=A00 there are 2 buttons in the "Edit" toolbar of the VBE
(Visual Basic Editor). With a right mouse click on any toolbar
and choosing "Customize" you can copy this buttons to the
standard toolbar of the VBE where it's easier accessible.
***************
6.14 Wait until a Shell process has been finished
Problem
You start another app by using the Shell function and want
to stop execution of the rest of your code until this shell process
has been finished.
Solution
You can use the API functions CreateProcess and
WaitForSingleObject to achieve this. The following KB article
shows their use: 
http://support.microsoft.com/?kbid=209876
See also the example by Terry Kreft:
http://www.mvps.org/access/api/api0004.htm
***************
-- 
cu
Karl
*********
Access-FAQ 
http://www.donkarl.com/it

 ha scritto nel messaggio
news:2r2iunF...@uni-berlin.de...

****************
 6.13 Segnalare un testo che non venga preso in considerazione in un codice
VBA e che occupa più linee di programma.
Problema
Volete commentare con il carattere apice (') tutta una sezione di codice o
volete cancellare tale carattere di comando per tutta una sezione.
Ma voi non trovate nell'editor di codice VBA il modo per farlo.
Soluzione
In Access 97 non esiste alcuna funzionalità nativa per fare questo. In
alternativa potete usare quanto ideato da Dev Ashish e Terry Kreft:
http://www.mvps.org/access/modules/mdl0031.htm
Nelle versioni di Access successive ad Access 97 ci sono due pulsanti nella
barra dei comandi Modifica di VBE (Visual Basic Editor). Con un clic del
tasto destro del mouse su qualsiasi barra dei caomandi e scegliendo
Personalizza... potete copiare questi pulsanti nella barra standad dei
comandi di VBA così che risulteranno accessibili più facilmente.
***************
6.14 Attendere sino a quando il processo avviato con la funzione Shell non
sia terminato
Problema
Avviate un'altra applicazione usando la funzione Shell e volete sospendere
l'esecuzione del restante codice VBA sino a quando non sia stato terminato
il processo avviato con la Shell.
Soluzione
Per realizzare questo dovete usare le funzioni API CreateProcess e
WaitForSingleObject. Nel seguente articolo KB è mostrato come usarle:
http://support.microsoft.com/?kbid=209876
Dare un'occhiata anche all'esempio realizzato da Terry Kreft:
http://www.mvps.org/access/api/api0004.htm
***************
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Filtrare i valori in una combo box

Salve a tutti
Ho usato un esempio presente nel sito comune per filtrare i dati di una 
listbox tramite una casella di testo, e fin qui tutto ok.
Così ho pensato di usare la stessa procedura per una combobox, usando questo 
codice:
Private Sub IDProdotto_Change()
Dim CaratteriDigitati As String
CaratteriDigitati = Me!IDProdotto.Text
Me!IDProdotto.RowSource = "SELECT NomeProdotto FROM Prodotti " & "WHERE 
NomeProdotto LIKE '*" & CaratteriDigitati & "*'"
End Sub
In questo caso però non uso nessuna casella di testo ovvero IDProdotto è il 
nome della mia combobox; quello che succede però è molto strano perchè 
all'apparenza funziona tutto ma quando apro la mia combo non vedo i valori 
ma soltanto righe vuote dove il numero delle righe vuote corrisponde 
esattamente al numero delle righe filtrate......
Spero di essere stato abbastanza chiaro......
Grazie per l'aiuto
Massimo Pallavicini 

 Massimo Pallavicini
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: PDF su Report

Ciao a tutti,
avrei la necessità di inserire un file PDF all'interno di un report di
access2000.
Provando con PDF.OCX (fornito insieme al reader di acrobat) si riesce
a lavorare solo sulle maschere mentre sul report non viene stampato nulla.
Grazie e ciao.
Giacomo.

[Cut] 
E' una cosa che interessa anche a me. Potressti dirmi dove hai trovato 
informazioni sull'ocx???
grazie
-- 
Pennywise
----------------------------------------------
Questo  messaggio è composto al 100% da 
elettroni riciclati. Nessun  atomo  è  stato
ionizzato  per  trasmettere  questo messaggio.