text:
Alessandro Baraldi ha scritto:
> Prova a postare il codice pulito del condizionamento(inteso come Select
> Case o If...End if) mi suona strano quello che dici...!
>
> Il controllo di un Controllo Testo si deve eseguire in 2 modi:
>
> If IsNull(Me!nomeControllo) Or Len(Me!NomeControllo)=0 Then
>
> Se ti limiti al Null rischi di avere brutte sorprese...!
>
> @Alex
Posto il codice con le relativa funzione di inserimento dati e la
routine da svolgere sull'evento click del command:
On Error GoTo Err_CmdSalva_Click
DoCmd.SetWarnings False
Dim RISPOSTA
    RISPOSTA = MsgBox("CONFERMARE L'INSERIMENTO DEL NUOVO UTENTE ? ",
vbYesNo, titoloApp)
    If RISPOSTA = vbYes Then
'        Cancel = True
inserisci_id (inserisce l'id delle tabelle attraverso la funzione
progressivo SELECT 1+Max(Ecc.Ecc)
increIntes (incrementa di 1 il numero dell'intestatario qualora
l'utente ha più vetture non intestate. Esempio: Int. N° 1 Brambilla
Luigi  ecc ecc )
incremenNota ( lo stesso dell'incremento intestatario se l'utente ha
piu' note si specifica come notaN°1 ecc ecc)
AssegnProtocollo (assegna il numero di protocollo per ogni pass
rilasciato)
INSERISCIDATI (Inserisci i dai della form nelle relative tabelleconle
condizionidel caso)
MsgBox "Inserimento Nuovo Utente Effettuato", , titoloApp
Forms!FrmUtente.Requery
Forms!FrmUtente.Refresh
Forms!FrmUtente.Recordset.MoveLast
Forms!FrmUtente!ListPass.Requery
Forms!FrmUtente!ListPass = Forms!FrmUtente!ListPass.ItemData(0)
Forms!FrmUtente!TxTIdIndirizzo = Me.TxIndirizzo.Column(0)
DoCmd.Close acForm, "FrmNuovo"
Else
MsgBox "INSERIMENTO DATI ANNULLATO", , titoloApp
DoCmd.Close acForm, "FrmNuovo"
End If
---------------------------------------------------------------------------------------------------------------------------------------------------------------
Function INSERISCIDATI()
'inserisce nelle relative tabellei dati caricati nella form a
determinte condizioni: se è nullo l'intestatario veicolo, se è nulla
_
' _la casella Note, se non sono nulle entrambi o se sono nulle entrambi
If Not IsNull(Me.TxNominIntes.Value) = True And
IsNull(Me.Testo28.Value) = True Then
DoCmd.RunSQL ("INSERT INTO
TblUtente(IdUtente,Pratica,CodFam,Cognome,Nome,DataNascita,NatoA,CodFisc,Indirizzo,Civico)VALUES("
& TxIdUtente & "," & TxPratica & ",'" & TxCodFam & "'," & Chr(34) &
TxCognome & Chr(34) & "," & Chr(34) & TxNome & Chr(34) & ",'" &
TxDataNascita & "'," & Chr(34) & TxNatoA.Column(1) & Chr(34) & ",'" &
TxCodFisc & "'," & Chr(34) & TxIndirizzo.Column(1) & Chr(34) & ",'" &
TxCivico & "')")
DoCmd.RunSQL ("INSERT INTO TblTarga(IdTarga,IdUtente,Targa) VALUES(" &
TxIdTarga & "," & TxIdUtente & ",'" & TxTarga & "')")
DoCmd.RunSQL ("INSERT INTO TblProtocollo(Protocollo,Anno) VALUES(" &
TxN_Prot & ",'" & TxAnnoProtocollo & "')")
DoCmd.RunSQL ("INSERT INTO
TblPass(IdPass,IdTarga,Protocollo,Del,Targa,Zona,Gestore,Autorizzazione,PassN,Rilascio,validita,Scadenza,Banca)
VALUES(" & TxIdPass & "," & TxIdTarga & ",'" & TxProtocollo & "','" &
TxDel & "','" & TxTarga & "'," & TxZona & ",'" & TxGestore & "','" &
Txautorizzazione & "'," & TxPassN & ",'" & TxRilascio & "','" &
Txvalidita & "','" & TxScadenza & "'," & Chr(34) & TxBanca & Chr(34) &
")")
DoCmd.RunSQL ("INSERT INTO
TblIntestatario(IdIntestatario,IdUtente,N_Intest,Nominativo,TargaInt)VALUES(
" & Me.TxIdIntest.Value & "," & Me.TxIdUtente.Value & " ," &
Me.TxN_Intest.Value & " ," & Chr(34) & Me.TxNominIntes.Value & Chr(34)
& ",'" & Me.TxTarga.Value & "')")
ElseIf IsNull(Me.TxNominIntes.Value) = True And Not
IsNull(Me.Testo28.Value) = True Then
DoCmd.RunSQL ("INSERT INTO
TblUtente(IdUtente,Pratica,CodFam,Cognome,Nome,DataNascita,NatoA,CodFisc,Indirizzo,Civico)VALUES("
& TxIdUtente & "," & TxPratica & ",'" & TxCodFam & "'," & Chr(34) &
TxCognome & Chr(34) & "," & Chr(34) & TxNome & Chr(34) & ",'" &
TxDataNascita & "'," & Chr(34) & TxNatoA.Column(1) & Chr(34) & ",'" &
TxCodFisc & "'," & Chr(34) & TxIndirizzo.Column(1) & Chr(34) & ",'" &
TxCivico & "')")
DoCmd.RunSQL ("INSERT INTO TblTarga(IdTarga,IdUtente,Targa) VALUES(" &
TxIdTarga & "," & TxIdUtente & ",'" & TxTarga & "')")
DoCmd.RunSQL ("INSERT INTO TblProtocollo(Protocollo,Anno) VALUES(" &
TxN_Prot & ",'" & TxAnnoProtocollo & "')")
DoCmd.RunSQL ("INSERT INTO
TblPass(IdPass,IdTarga,Protocollo,Del,Targa,Zona,Gestore,Autorizzazione,PassN,Rilascio,validita,Scadenza,Banca)
VALUES(" & TxIdPass & "," & TxIdTarga & ",'" & TxProtocollo & "','" &
TxDel & "','" & TxTarga & "'," & TxZona & ",'" & TxGestore & "','" &
Txautorizzazione & "'," & TxPassN & ",'" & TxRilascio & "','" &
Txvalidita & "','" & TxScadenza & "'," & Chr(34) & TxBanca & Chr(34) &
")")
DoCmd.RunSQL ("INSERT INTO
TblNote(IdNota,IdUtente,N_Nota,[Note])VALUES( " & Me.TxIdNota.Value &
"," & Me.TxIdUtente.Value & " ," & Me.TxN_Nota.Value & " ," & Chr(34) &
Me.Testo28.Value & Chr(34) & ")")
ElseIf Not IsNull(Me.TxNominIntes.Value) = True And Not
IsNull(Me.Testo28.Value) = True Then
DoCmd.RunSQL ("INSERT INTO
TblUtente(IdUtente,Pratica,CodFam,Cognome,Nome,DataNascita,NatoA,CodFisc,Indirizzo,Civico)VALUES("
& TxIdUtente & "," & TxPratica & ",'" & TxCodFam & "'," & Chr(34) &
TxCognome & Chr(34) & "," & Chr(34) & TxNome & Chr(34) & ",'" &
TxDataNascita & "'," & Chr(34) & TxNatoA.Column(1) & Chr(34) & ",'" &
TxCodFisc & "'," & Chr(34) & TxIndirizzo.Column(1) & Chr(34) & ",'" &
TxCivico & "')")
DoCmd.RunSQL ("INSERT INTO TblTarga(IdTarga,IdUtente,Targa) VALUES(" &
TxIdTarga & "," & TxIdUtente & ",'" & TxTarga & "')")
DoCmd.RunSQL ("INSERT INTO TblProtocollo(Protocollo,Anno) VALUES(" &
TxN_Prot & ",'" & TxAnnoProtocollo & "')")
DoCmd.RunSQL ("INSERT INTO
TblPass(IdPass,IdTarga,Protocollo,Del,Targa,Zona,Gestore,Autorizzazione,PassN,Rilascio,validita,Scadenza,Banca)
VALUES(" & TxIdPass & "," & TxIdTarga & ",'" & TxProtocollo & "','" &
TxDel & "','" & TxTarga & "'," & TxZona & ",'" & TxGestore & "','" &
Txautorizzazione & "'," & TxPassN & ",'" & TxRilascio & "','" &
Txvalidita & "','" & TxScadenza & "'," & Chr(34) & TxBanca & Chr(34) &
")")
DoCmd.RunSQL ("INSERT INTO
TblIntestatario(IdIntestatario,IdUtente,N_Intest,Nominativo,TargaInt)VALUES(
" & Me.TxIdIntest.Value & "," & Me.TxIdUtente.Value & " ," &
Me.TxN_Intest.Value & " ," & Chr(34) & Me.TxNominIntes.Value & Chr(34)
& ",'" & Me.TxTarga.Value & "')")
DoCmd.RunSQL ("INSERT INTO
TblNote(IdNota,IdUtente,N_Nota,[Note])VALUES( " & Me.TxIdNota.Value &
"," & Me.TxIdUtente.Value & " ," & Me.TxN_Nota.Value & " ," & Chr(34) &
Me.Testo28.Value & Chr(34) & ")")
Else
DoCmd.RunSQL ("INSERT INTO
TblUtente(IdUtente,Pratica,CodFam,Cognome,Nome,DataNascita,NatoA,CodFisc,Indirizzo,Civico)VALUES("
& TxIdUtente & "," & TxPratica & ",'" & TxCodFam & "'," & Chr(34) &
TxCognome & Chr(34) & "," & Chr(34) & TxNome & Chr(34) & ",'" &
TxDataNascita & "'," & Chr(34) & TxNatoA.Column(1) & Chr(34) & ",'" &
TxCodFisc & "'," & Chr(34) & TxIndirizzo.Column(1) & Chr(34) & ",'" &
TxCivico & "')")
DoCmd.RunSQL ("INSERT INTO TblTarga(IdTarga,IdUtente,Targa) VALUES(" &
TxIdTarga & "," & TxIdUtente & ",'" & TxTarga & "')")
DoCmd.RunSQL ("INSERT INTO TblProtocollo(Protocollo,Anno) VALUES(" &
TxN_Prot & ",'" & TxAnnoProtocollo & "')")
DoCmd.RunSQL ("INSERT INTO
TblPass(IdPass,IdTarga,Protocollo,Del,Targa,Zona,Gestore,Autorizzazione,PassN,Rilascio,validita,Scadenza,Banca)
VALUES(" & TxIdPass & "," & TxIdTarga & ",'" & TxProtocollo & "','" &
TxDel & "','" & TxTarga & "'," & TxZona & ",'" & TxGestore & "','" &
Txautorizzazione & "'," & TxPassN & ",'" & TxRilascio & "','" &
Txvalidita & "','" & TxScadenza & "'," & Chr(34) & TxBanca & Chr(34) &
")")
End If
End Function
Grazie Alex
Saluti
Diego


title: RINGRAZIAMENTI

author: pol

text:
Vorrei tanto ringraziare CarloCol , CarloVe
per i loro suggerimenti.
Sopratutto Ringrazio tantissimo  Pabel  che
mi ha rimandato perfettamente funzionante
un database che non riuscivo a fare
E' un genio !
UN SALUTO AL GRUPPO


title: Report esterni di Access o di Crystal Report?

author: AntoGal

text:
Dovrei dare la possibilità ad un cliente di modificare i controlli di un
report a piacere (spostare, nascondere...). Dato che il FE è in MDE, a parte
che non glielo farei toccare (!), anche volendo le modifiche non verrebbero
salvate.
Così sul momento mi sono venute in mente un paio di soluzioni:
1) salvare in una tabella apposita la posizione corrente di tutti i
controlli all'uscita del report, e riposizionarli in apertura, ma non mi
piace tantissimo come soluzione.
2) tenere i report in un mdb esterno. L'ideale sarebbe collegarli come si fa
per le tabelle, ma visto che quest'opzione non esiste, credo che dovrò
smanettare un po' con OpenCurrentDatabase ecc.
3) Creare il report con il classico generatore di report di VB (Crystal) e
visualizzarli/stamparli con l'OCX apposito. Questa soluzione inoltre non
richiederebbe Access installato.
Qualcuno ha avuto esperienze con report esterni? Giusto per sapere con che
problemi mi andrei a scontrare...
--
Ciao, AntoGal
*************************************************
Gestione punti vendita (casse e pos NCR)

www.powerretail.it
-------------------------------------------------------------
per scaricare un gioco di DAMA ITALIANA
http://volftp.mondadori.com/italiani/galletta/
*************************************************


author: warp

text:
AntoGal ha scritto nel messaggio
>Dovrei dare la possibilità ad un cliente di modificare i controlli di un
>report a piacere (spostare, nascondere...). Dato che il FE è in MDE, a parte
>che non glielo farei toccare (!), anche volendo le modifiche non verrebbero
>salvate.
>Così sul momento mi sono venute in mente un paio di soluzioni:
>1) salvare in una tabella apposita la posizione corrente di tutti i
>controlli all'uscita del report, e riposizionarli in apertura, ma non mi
>piace tantissimo come soluzione.
>2) tenere i report in un mdb esterno. L'ideale sarebbe collegarli come si fa
>per le tabelle, ma visto che quest'opzione non esiste, credo che dovrò
>smanettare un po' con OpenCurrentDatabase ecc.
>3) Creare il report con il classico generatore di report di VB (Crystal) e
>visualizzarli/stamparli con l'OCX apposito. Questa soluzione inoltre non
>richiederebbe Access installato.
>
>Qualcuno ha avuto esperienze con report esterni? Giusto per sapere con che
>problemi mi andrei a scontrare...
Il principale problema che s'incontra lasciando smacchinare il cliente con i Reports in Design sono
i casini che ti combina (scaricando poi a te le colpe) :-)
La prima soluzione che proponi è molto onerosa con report sofisticati (vedi fatturazione).
La terza apparentemente la più semplice (tra l'altro è possibile pilotare Crystal sfruttando
direttamente alcune sue .dll senza l'Activex) anche se CR non è adatto alla creazione di reports
avanzati.
Non ho mai praticato la seconda, che richiede un uso massiccio di automazione OLE ... però
tantissimi lo fanno.
Qual è la complessità del report in questione?
Ciao, warp


text:
"warp" <
war...@libero.it
> scrisse...
> Il principale problema che s'incontra lasciando smacchinare il cliente con
i Reports in Design sono
> i casini che ti combina (scaricando poi a te le colpe) :-)
si, lo so :-)
Io però in fase di anteprima/stampa proporrei due opzioni: utilizzare il
report interno all'MDE, (quindi non modificabile, se al cliente sta bene)
oppure il report esterno, in un altro mdb o sotto forma di file di CR.
Inizialmente il report esterno glielo passerei "pulito", se poi combina
casini, o si riapre la copia "originale" salvata, o glielo invio nuovamente
e riparte da zero con le modifiche. (dopo un leggero "cazziatone" mio :-)).
> La prima soluzione che proponi è molto onerosa con report sofisticati
(vedi fatturazione).
Infatti, la vorrei evitare. In ogni caso il problema sarebbe anche quello di
farlo aprire al cliente (o a chi glielo personalizza) in modalità struttura.
Non mi piace...
> La terza apparentemente la più semplice (tra l'altro è possibile pilotare
Crystal sfruttando
> direttamente alcune sue .dll senza l'Activex) anche se CR non è adatto
alla creazione di reports
> avanzati.
Buono. Il report non sarà molto complesso.
> Non ho mai praticato la seconda, che richiede un uso massiccio di
automazione OLE ... però
> tantissimi lo fanno.
immagino...
> Qual è la complessità del report in questione?
A me serve sostanzialmente per le fatture. Chi non ha moduli prestampati non
mi crea problemi, ma chi utilizzava altri programmi ed ha la scorta di carta
per 5 anni, vuole la personalizzazione. Siccome non posso mettermi a
modificare il programma per ogni copia che vendo, almeno vorrei rispondere
"se lo vuoi modificare, hai gli strumenti per farlo o fartelo fare..."



text:
AntoGal ha scritto nel messaggio
> Qual è la complessità del report in questione?
>A me serve sostanzialmente per le fatture. Chi non ha moduli prestampati non
>mi crea problemi, ma chi utilizzava altri programmi ed ha la scorta di carta
>per 5 anni, vuole la personalizzazione. Siccome non posso mettermi a
>modificare il programma per ogni copia che vendo, almeno vorrei rispondere
>"se lo vuoi modificare, hai gli strumenti per farlo o fartelo fare..."
Brutta faccenda per tutti penso :-(
Consoliamoci con un dato di fatto: scomparse le maledette printer ad aghi (e ci vorrà poco) verrà
 meno l'ossessione italica per i moduli prefincati in tipografia.
Fortunatamente dalle mie parti il problema è già in buona parte superato :-)
Cmq, in questo caso la soluzione migliore (anche se molto laboriosa) a parer mio è ricorrere alla
strategia n° 1: parametrizzare i controlli sul Report e creare un programma di personalizzazione
Layout.
La fattibilità dipende dalla complessità del tuo report di fatturazione.
Se gestisce una molteplicità di problematiche dipendentemente da opzioni (imballaggi, stampe solo
totali, quantità multiple nel corpo, note attivabili a opzione, stampe in valuta, etc.) francamente
è impraticabile, diversamente ci si può fare un pensiero.
In ogni caso con CR certe parametrizzazioni pilotabili solo con eventi di formattazione e VB non
sono possibili.
Se la cosa t'interessa ti consiglio di contattare uno dei migliori fornitori di materiale del Sito
Comune: il bravissimo Carlo Costarella.
Distribuisce una gestione per Frantoi oleari (veramente buona), in cui ha risolto il problema
seguendo il metodo n° 1.
Certo, la fattura dei Frantoiani è molto semplice, ma è sempre una gran cosa tecnicamente.
Ciao, warp


author: Laura Cerponi

text:
La mia esperienza con CR è solo con la versione offerta con VB5 (la 4.5 se
non vado errato). Sono già uscite un sacco di nuove versioni. Sono solo che
il supporto di Seagate fa ridere e se hai dei problemi sono fatti tuoi. La
mia azienda utilizza CR 7  e tutti i calcoli, le selezioni ecc. li facciamo
con il gestore DB (SQL Server) con stored procedures che passiamo a CR.
L'ambiente di disegno fa schifo (non c'è ad esempio la selezione multipla
dei controlli) e ogni volta che modifichi la struttura di un report devi
rifare il collegamento al DB.
Ciao.
Antonello
warp <
war...@libero.it
> wrote in message
94ealj$svv$1...@fe1.cs.interbusiness.it...



author: Federico Luciani

text:
AntoGal wrote:
> Dovrei dare la possibilità ad un cliente di modificare i controlli di un
> report a piacere (spostare, nascondere...). Dato che il FE è in MDE, a parte
> che non glielo farei toccare (!), anche volendo le modifiche non verrebbero
> salvate.
> Così sul momento mi sono venute in mente un paio di soluzioni:
> 1) salvare in una tabella apposita la posizione corrente di tutti i
> controlli all'uscita del report, e riposizionarli in apertura, ma non mi
> piace tantissimo come soluzione.
> 2) tenere i report in un mdb esterno. L'ideale sarebbe collegarli come si fa
> per le tabelle, ma visto che quest'opzione non esiste, credo che dovrò
> smanettare un po' con OpenCurrentDatabase ecc.
> 3) Creare il report con il classico generatore di report di VB (Crystal) e
> visualizzarli/stamparli con l'OCX apposito. Questa soluzione inoltre non
> richiederebbe Access installato.
>
> Qualcuno ha avuto esperienze con report esterni? Giusto per sapere con che
> problemi mi andrei a scontrare...
io opterei per la seconda.
sul sito comune dovrebbe esserci un esempio di RoDAgo e Sib ('Report dinamici
per rappresentazioni a campi incrociati') che contiene anche un esempio di
questo tipo.
unico difetto di usare un mdb esterno per i report, puo' essere la lentezza
nell'apertura di una nuova sessione di access (che puoi' anche nascondere).
--
Federico
fluc...@paperino.sitocomune.com
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
mailto:
webm...@sitocomune.com
--------------------------------------


text:
"Federico Luciani" <
fluc...@paperino.sitocomune.com
> scrisse...
> io opterei per la seconda.
> sul sito comune dovrebbe esserci un esempio di RoDAgo e Sib ('Report
dinamici
> per rappresentazioni a campi incrociati') che contiene anche un esempio di
> questo tipo.
Ah già, lo sapevo, grazie per avermelo ricordato. Appena posso ci dò
un'occhiata un po' più a fondo e vediamo cosa ne esce fuori.



text:
Federico Luciani ha scritto nel messaggio
>io opterei per la seconda.
>sul sito comune dovrebbe esserci un esempio di RoDAgo e Sib ('Report dinamici
>per rappresentazioni a campi incrociati') che contiene anche un esempio di
>questo tipo.
>
>unico difetto di usare un mdb esterno per i report, puo' essere la lentezza
>nell'apertura di una nuova sessione di access (che puoi' anche nascondere).
Mhmmm ... in questo caso a parer mio non risolve il problema, e ti spiego i motivi:
1)  L'utente medio non ha la capacità (e la voglia) di smacchinare con un generatore di Report, CR o
Access che sia, per personalizzarsi le cose.
2) AntoGal distribuisce un aggiornamento dell'applicazione ai clienti, il report di Fatturazione è
stato evoluto, modificato, integrato, etc.
A questo punto il cliente cosa fa? Dovrebbe rifarsi le personalizzazioni!
Ci sono grosse società che usano CR proprio per consentire all'utente finale (o al relativo
rivenditore) la personalizzazione delle stampe.
Ma facendo così altro non fanno che aumentare l'entropia dell'universo :-)
Questa brutta gatta da pelare si risolve in maniera tranquilla solo in due modi: convinci il cliente
a buttare i prefincati oppure parametrizzi il layout della tua fattura.
E' chiaro che la seconda soluzione dev'essere attentamente ponderata...
Ciao, warp


text:
warp wrote:
> Federico Luciani ha scritto nel messaggio
> >io opterei per la seconda.
> >sul sito comune dovrebbe esserci un esempio di RoDAgo e Sib ('Report dinamici
> >per rappresentazioni a campi incrociati') che contiene anche un esempio di
> >questo tipo.
> >
> >unico difetto di usare un mdb esterno per i report, puo' essere la lentezza
> >nell'apertura di una nuova sessione di access (che puoi' anche nascondere).
>
> Mhmmm ... in questo caso a parer mio non risolve il problema, e ti spiego i motivi:
> 1)  L'utente medio non ha la capacità (e la voglia) di smacchinare con un generatore di Report, CR o
> Access che sia, per personalizzarsi le cose.
e' vero, ma questo, imho, non e' un problema, ma un vantaggio.
se l'utente vuole personalizzarli il report, ha lo strumento per farlo;
se gli sembra troppo complesso io gli faccio il report personalizzato, mi paga
la personalizzazione, e glielo metto nell'mdb dei report senza modificare il
FE.
> 2) AntoGal distribuisce un aggiornamento dell'applicazione ai clienti, il report di Fatturazione è
> stato evoluto, modificato, integrato, etc.
> A questo punto il cliente cosa fa? Dovrebbe rifarsi le personalizzazioni!
no, Antogal fornisce solo il FE, l'mdb con il report resta quello del cliente.
se l'aggiornamento comporta nuovi campi per il report (cosa improbabile), basta
fornire le specifiche al cliente.
> Ci sono grosse società che usano CR proprio per consentire all'utente finale (o al relativo
> rivenditore) la personalizzazione delle stampe.
> Ma facendo così altro non fanno che aumentare l'entropia dell'universo :-)
:-)
> Questa brutta gatta da pelare si risolve in maniera tranquilla solo in due modi: convinci il cliente
> a buttare i prefincati oppure parametrizzi il layout della tua fattura.
> E' chiaro che la seconda soluzione dev'essere attentamente ponderata...
> Ciao, warp
naturalmente approvo la prima ;-))



text:
Federico Luciani ha scritto nel messaggio
>e' vero, ma questo, imho, non e' un problema, ma un vantaggio.
>se l'utente vuole personalizzarli il report, ha lo strumento per farlo;
>se gli sembra troppo complesso io gli faccio il report personalizzato, mi paga
>la personalizzazione, e glielo metto nell'mdb dei report senza modificare il
>FE.
Sì, ma il problema è trovare il tempo per fare la personalizzazione.
Se i clienti sono pochi, ok ... ma se il prodotto ha la prospettiva di essere diffuso alla grande,
diventa impossibile.
>> 2) AntoGal distribuisce un aggiornamento dell'applicazione ai clienti, il report di Fatturazione
è
>> stato evoluto, modificato, integrato, etc.
>> A questo punto il cliente cosa fa? Dovrebbe rifarsi le personalizzazioni!
>
>no, Antogal fornisce solo il FE, l'mdb con il report resta quello del cliente.
>se l'aggiornamento comporta nuovi campi per il report (cosa improbabile), basta
>fornire le specifiche al cliente.
Purtroppo non è improbabile, almeno se il programma è concepito per un target aziendale
diversificato.
Sono tantissime le possibili variazioni a un programma di fatturazione, dipendentemente dalle
caratteristiche dell'azienda.
Spesso per accontentare tutti è necessario creare delle opzioni globali e gestirle nel report
attraverso VB.
Certo, a meno di sbinare il reports ... soluzione terribile!
Per questo sono molto scettico sulla possibilità di spingere l'utente finale a smacchinare
autarchicamente :-)
Ciao, warp


text:

dalla discussione sembrerebbe che siamo in disaccordo, in realta' siamo
perfettamente in linea ;-)
Dono daccordissimo con te che all'utente meno smacchinamenti si fanno fare e
meglio e'.
Tendenzialmente non permetto mai all'utente di personalizzare i report, se li
vuole sono cosi e basta, ma noi non siamo la MS e quindi in molti casi ci
conviene accontentare il cliente pur di vendere; allora cerco la soluzione meno
complicata per me e nello specifico ritengo che mettere i reports su mdb
esterno sia la soluzione piu' semplice.
Per quanto mi riguarda, faccio proprio cosi', anche perche' i report
personalizzati che produco me li faccio pagare caro ;-)



title: Confronto tra campi con risposta nel terzo campo

author: vf

text:
Avrei un problema che non riesco a risolvere pertanto chiedo aiuto
Io ho due campi che possono avere 5 o 6 risposte per campo
Tali risposte sono confrontate tra un campo e l'altro e dovrebbero dare una
risposta, in una terzo campo, questo  nella maschera e/o nel report.
Con due sole risposte e mettendo le altre a una risposta generica ci sono
risuscito,  pero vorrei implementare il tutto con ulteriori risposte.
C'è qualcuno che possa darmi indicazioni o per un modulo o per dei passaggi
da inserire nei report o maschere.
Sotto metto degli esempi indicativi
       Campo 1      Campo 2             Risposta
          Alto               Basso                  Non valido
          Basso            Alto                      Ok
          Basso            Basso                   Ok
          Basso            Da definire           Inserisci un nome valido
nel campo
Sperando di aver posto il quesito in modo valido ringrazio chi mi risponde
Valter


author: Roberto da casa

text:
"vf" <
vfa...@tin.it
> ha scritto nel messaggio
news:GzCi6.10234$LM4.1...@twister1.tin.it...

Io mi creerei una tabella (tabRisposte) composta appunto da quattro campi:
ID                    Contatore e chiave primaria
Campo1           Testo
Campo2           Testo
Risposta           Testo
nella quale registrerei tutte le combinazioni possibili con le relative
risposte.
Nella maschera o nel report inserirei tre controlli: Controllo1, Controllo2
ed un controllo non associato chiamato ControlloRisposta; nell'origine
controllo di ControlloRisposta scriverei:
=DLookup("[Risposta]"; "tblRisposte"; "Campo1=" & Chr$(34) & Controllo1 &
Chr$(34) & " And Campo2=" & Chr$(34) & Controllo2 & Chr$(34))
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Da localita al comune. come fare?

text:
Ho ricevuto dei moduli di garanzia da inserire in un programma,che invece
di avere il comune {che è obbligatorio per le statistiche...ha la
località.] Questi moduli sono tantissimi e sono stati compilati nel
passato.
Devo organizzare l'inserimento.
In sostanza io leggo ROTEGLIA (RE) e dovrei capire che ROTEGLIA in realtà
è in comune di CASTELLARANO.
Esiste un programma scaricabile o comprabile con pochi soldi che mi fa
questo passaggio?
Oppure esiste una tabella ..stile excel, access che contiene sia le
località che i comuni
Grazie in anticipo.
Saluti
Claudio
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Da localita al comune. come fare?

author: Antonio Biso

text:
"2:332/407.490" <
w4kne...@sneakemail.com
> ha scritto nel messaggio
news:atkb3k$lto$1...@news.newsland.it...
> Ho ricevuto dei moduli di garanzia da inserire in un programma,che invece
> di avere il comune {che è obbligatorio per le statistiche...ha la
> località.] Questi moduli sono tantissimi e sono stati compilati nel
> passato.
> Devo organizzare l'inserimento.
>
> In sostanza io leggo ROTEGLIA (RE) e dovrei capire che ROTEGLIA in realtà
> è in comune di CASTELLARANO.
>
> Esiste un programma scaricabile o comprabile con pochi soldi che mi fa
> questo passaggio?
>
> Oppure esiste una tabella ..stile excel, access che contiene sia le
> località che i comuni
Non lo so se esiste.
Posso solo dirti che se esiste, o te la prepari tu, poi puoi aggiornare
tutto in blocco facendo una query di aggiornamento della tabella principale.
Metti in join le due tabelle sul campo località e poi aggiorni il campo
località della prima con il campo comune della seconda.
Antonio


title: Da localita al comune. come fare?

author: Emyr

text:
On Mon, 16 Dec 2002 11:48:46 +0100,
w4kne...@sneakemail.com
(2:332/407.490) wrote:
>Ho ricevuto dei moduli di garanzia da inserire in un programma,che invece
>di avere il comune {che è obbligatorio per le statistiche...ha la
>località.] Questi moduli sono tantissimi e sono stati compilati nel
>passato.
>Devo organizzare l'inserimento.
>
>In sostanza io leggo ROTEGLIA (RE) e dovrei capire che ROTEGLIA in realtà
>è in comune di CASTELLARANO.
>
>Esiste un programma scaricabile o comprabile con pochi soldi che mi fa
>questo passaggio?
>
>Oppure esiste una tabella ..stile excel, access che contiene sia le
>località che i comuni
>
>Grazie in anticipo.
>
>Saluti
>Claudio
vedi gli elenchi delle località sul sito delle poste (cerca per i
codici postali...)
lò limite se hai i CAP puoi fare la ricerca tramite questi....
Saluti.
Emanuele.


title: Riparare un DB

author: rynko

text:
Ho un db su di un server, e da ieri misteriosamente non funziona più.
Scaricando il db in locale Access non lo apre in quando non in formato
valido.
Qualcuno può aiutarmi ?
Grazie
Mauro


title: Riparare un DB

text:
"rynko" <
ry...@libero.it
> ha scritto nel messaggio
news:XGB3b.7494$aG6.2...@news1.tin.it...

Fai una copia del db (a volte un tentativo di riparazione danneggia
definitivamente il db stesso, mentre con un altro tipo di intervento
riuscivi al recupero)
Poi prova con la funzione strumenti-ripristina a ripristinare il database.
Oppure crea un db vuoto e prova ad importare tutto del tuo db.
Oppure prova ad aprirlo con la funzione decompile.
Oppure usa la più recente copia di backup
Antonio
P.S.
Verifica se stai aprendo il db con la versione di access corretta


title: Riparare un DB

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:fHD3b.273736$Ny5.8...@twister2.libero.it...

il problema è che essendo sul server e in continuo aggiornamento non ho un
backup : (
e tutto il resto è stato già collaudato ma nulla ... file non riconosciuto..
Mauro


title: Riparare un DB

text:
"rynko" <
ry...@libero.it
> ha scritto nel messaggio
news:GaP3b.19101$d66.4...@news2.tin.it...
>
> il problema è che essendo sul server e in continuo aggiornamento non ho un
> backup : (
> e tutto il resto è stato già collaudato ma nulla ... file non
riconosciuto..
Una prece...
Antonio
P.S.
proprio perchè è su un server ogni tot, la notte, la mattina presto ecc.
andava fatto un backup!!!


title: Riparare un DB

author: pino

text:
"rynko" <
ry...@libero.it
> wrote in message news:<XGB3b.7494$
aG6.2...@news1.tin.it
>...

Ho avuto lo stesso problema, un paio di anni fa, periodicamente si
corrompeva il BE per instabilità della rete... senza il backup
purtroppo non c'è nulla da fare.
Ciao


title: Grassetto in MsgBox

author: Fabio Arenella

text:
Salve ho un problemino!!!
Vorrei visualizzare in grassetto del testo nella MsgBox.....ho visto nel
Sito Comune, ma la soluzione proposta per Access2000
non funziona correttamente.......qualcuno saprebbe indicarmi la via
giusta?????
Ringrazio anticipatamente


title: Grassetto in MsgBox

author: Maurizio Borrelli

text:
> "Fabio Arenella" news:7KVs9.15933$
aL4.4...@news1.tin.it
:
> Vorrei visualizzare in grassetto del testo nella MsgBox.....ho visto nel
> Sito Comune, ma la soluzione proposta per Access2000
> non funziona correttamente.......
    In che senso?
> qualcuno saprebbe indicarmi la via
> giusta?????
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: Grassetto in MsgBox

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ap19eq$qig9m$1...@ID-52090.news.dfncis.de...
> > "Fabio Arenella" news:7KVs9.15933$
aL4.4...@news1.tin.it
:
> > Vorrei visualizzare in grassetto del testo nella MsgBox.....ho visto nel
> > Sito Comune, ma la soluzione proposta per Access2000
> > non funziona correttamente.......
>
>     In che senso?
Quella soluzione con i @, che con access 97 andava a meraviglia, con quella
mezza sega di access 2000 non funziona, purtroppo!!!
Antonio


title: Grassetto in MsgBox

text:
> "Antonio Biso" news:0VVs9.59269$
RO.15...@twister1.libero.it
:
> > "Maurizio Borrelli" news:ap19eq$qig9m$
1...@ID-52090.news.dfncis.de
:
> >     In che senso?
> Quella soluzione con i @, che con access 97 andava a meraviglia, con
quella
> mezza sega di access 2000 non funziona, purtroppo!!!
    Ah!...
    Grazie.



title: Grassetto in MsgBox

text:
La soluzione proposta nel Sitocomune è la seguente:
eval("msgbox(' " & strMSG& " ',vbOKOnly + vbExclamation,' " & strTitolo & "
')")
il messaggio di errore mi dice che è impossibile trovare il nome VbOkonly
specificato nell'espressione....
....ci sarà qualche problema con gli apici forse.....ho verificato, mi
sembra tutto a posto...


title: Grassetto in MsgBox

author: Karl Donaubauer

text:
Fabio Arenella ha scritto:

Prendi il codice di michka:
http://www.trigeminal.com/usenet/usenet015.asp
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: Grassetto in MsgBox

text:
.....questo maledetto link non funziona!!!!!....l'ho trovato anche sul sito
comune..ma nulla...sarà forse vecchio?????


title: Grassetto in MsgBox

author: Massimiliano Amendola  kksrl

text:
"Fabio Arenella" <
fabio.a...@tin.it
> ha scritto nel messaggio
news:ehWs9.16093$aL4.4...@news1.tin.it...
> .....questo maledetto link non funziona!!!!!....l'ho trovato anche sul
sito
> comune..ma nulla...sarà forse vecchio?????
Mi sa che c'è qualcosa che non va sul tuo pc.
Cmq te l'ho copiato
>
>
>
Subject: INFO: The formatted MsgBox in Access 2000
(Originally posted 9/30/99)
  In Access 97, the MsgBox function had a documented syntax for creating
formatted message boxes by use of the @ sign, and it would use the Office
Assistant if the Assistant was turned on. For example, you could use the
following (from Access 97 help):
MsgBox "Wrong button!@This button doesn't work.@Try another.", _
   vbOKOnly + vbExclamation
In Access 2000 (which integrates VBE, the Visual Basic Editor), the VBA
MsgBox function does not call back into Access to do this work, so you lose
formatted message boxes and you also lose the ability to have the Office
Assistant "front" for your messages. But there is a workaround!
  By using the Eval function, your call will go through the Expression
Service that interfaces with Access and Jet to run the MsgBox function, and
it will call into the Access version instead of the VBA version. So you can
add the following to your Access database and call it instead of the VBA
MsgBox to get back the 97 functionality:
Function FormattedMsgBox( _
 Prompt As String, _
 Optional Buttons As VbMsgBoxStyle = vbOKOnly, _
 Optional Title As String = vbNullString, _
 Optional HelpFile As Variant, _
 Optional Context As Variant) _
 As VbMsgBoxResult
    If IsMissing(HelpFile) Or IsMissing(Context) Then
        FormattedMsgBox = Eval("MsgBox(""" & Prompt & _
         """, " & Buttons & ", """ & Title & """)")
    Else
        FormattedMsgBox = Eval("MsgBox(""" & Prompt & _
         """, " & Buttons & ", """ & Title & """, """ & _
         HelpFile & """, " & Context & ")")
    End If
End Function
ciao MAssimiliano


title: Grassetto in MsgBox

author: Milella

text:
"Massimiliano Amendola kksrl" <
massimilia...@kksrl.com
> ha scritto
nel messaggio news:ap1cu2$j09$1...@fe1.cs.interbusiness.it...

Provato  ma non funziona!!!
Milella


title: dcount su report

author: Giuseppe

text:
Salve.
Ho letto un post su questa funzione ma il mio filtro non è nè testo,
nè numero.
In pratica in un report di elenco soci, ho due caselle di controllo Sì/
No (una se il socio è dipendente, l'altra se il socio è volontario).
Inoltre il report scarta tutti i soci in cui la data di recesso non è
nulla.
In fondo al report quindi vorrei:
1) n. totale dei soci
2) n. totale soci volontari
3) n. totale soci dipendenti
Ho messo una casella di controllo e ho scritto:
=DCount("[Volontario]";"[Tblsoci]";"[Volontario]=No") e mi restituisce
il totale dei soci senza tener conto di quelli con data recesso non
Nulla.
Ho provato a sostituire a =NO i valori =Sì, =1 e =0 e mi dà sempre
#errore.
In ogni caso il conteggio deve tener conto dei soli soci attivi.
Grazie.
Giuseppe.


title: dcount su report

text:

Non sono sicuro di capirti bene, ma prova con
=Count(Volontario)
=-Sum(Volontario=True)
=-Sum(Volontario=False)
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: dcount su report

author: Roberto da Parma

text:
"Giuseppe" <
gcard...@tin.it
> ha scritto nel messaggio
news:b1ba5504-f917-4177...@56g2000hsm.googlegroups.com...

Non so qual'è l'origine dei dati ma [volontario] se è un campo si/no potrà
quindi avere valore si=-1 no=0.
Se il filtro primario è quello di restituire record con data di recesso non
nulla allora metti come origine dei dati questa query
SELECT .... WHERE [recesso] is not null
Poi all'interno del report fai tutte le operazioni che vuoi con un DCount.
Ciao
--
Roberto da Parma


title: dcount su report

text:
On 26 Ago, 10:54, "Roberto da Parma" <
arisi.robe...@tin.it
> wrote:
> "Giuseppe" <
gcardas...@tin.it
> ha scritto nel messaggionews:b1ba5504-f917-4177...@56g2000hsm.googlegroups.com...

Grazie ad entrambi per la risposta.
La soluzione è stata_
=-Sum(Volontario=True)
Ciao.


title: A2007_imposta stampante specifica

author: Maurizio M

text:
Buonasera a tutti sto migrando da Access 2000 a Access 2007.
Finora non ho trovato grosse difficoltà ma non riesco ad assegnare la
stampante specifica sui rispettivi report.
Io la imposto,la salvo e all'apertura successiva del report mi ritrovo come
stampante impostata quella predefinita
Ho provato e riprovato ma il risultato è sempre lo stesso,mi stampa sempre
sulla stampante predefinita di windows.
Dove sbaglio ?
Grazie per le eventuali risposte


title: Grafici che non accettano modifiche.,......come posso fare?!?

author: Fabio

text:
Scusate se approfitto ancora della vostra pazienza, avendo io "postato" 3/4
giorni fà, ma non trovando una risposta mi vedo costretto data la mia
incapacità a rivolgermi nuovamente a voi!
Il mio problema riguarda l'uso dei grafici in Access 97 ed in particolare
l'uso di Microsoft Graph.
Quando inserisco un grafico nel report e pongo come origine del grafico una
query...........vedo che nella griglia che Graph mi origina (griglia che
posso ottenere facendo doppio clic sul grafico nel report)i dati non si
aggiornano. Devo manualmente fare tutte le volte un copia ed incolla dalla
query alla griglia di Graph per far si che il grafico si aggiorni.
Inoltre molti cambiamenti che faccio in graph non me li ritrovo nel grafico.
Ad esempio modifico la legenda ma tali modifiche non le ritrovo nel
report,modifico le intestazioni delle colonne ma al successivo lancio della
query trovo le intestazioni vecchie e molti altri problemi.
Come posso attuare un collegamento in tutto e x tutto con la query di
origine?
Spero di essere stato chiaro e grazie a tutti voi x l'ascolto
Buone Feste a tutti voi!!!!


title: login e password

author: cuen

text:
Ciao a tutti ho questo problema....
ho creato una tabella LAVORATORI con i campi login e password.
all'apertura del database si apre una maschera dal nome ENTRATA dove
bisogna inserire il login e la password e premere su un pulsante per
aprire una maschera dal nome INSERIMENTO DATI che vorrei fosse
personale.
Vorrei sapere se c'è un controllo che posso mettere alla maschera
ENTRATA che blocchi l'apertura della maschera INSERIMENTO DATI  se si
digita la password sbagliata
spero di essere stato chiaro
grazie


title: login e password

author: Lolince

text:

Io di solito faccio un terzo campo in tabella (ma non e che sia
obbligato) quando inserisco user e password in tabella , in automatico
nel terzo campo "verifica" mi unisce user&password .
Poi nella mia maschera dopo aver digitato entrambi faccio il
controllo ,un campo testo chiamato controllo e dico user&password:
if (DLookup("[verifica]", "entrata", "[verifica]='" & Me.Controllo &
"'")) then
docmd.open...........
else
msgbox"Password errata"......
end if


title: login e password

text:
On 18 Feb, 08:33, Lolince <
loli...@hotmail.com
> wrote:
> On 18 Feb, 00:59, cuen <
biagio.ros...@gmail.com
> wrote:
>
> > Ciao a tutti ho questo problema....
> > ho creato una tabella LAVORATORI con i campiloginepassword.
> > all'apertura del database si apre una maschera dal nome ENTRATA dove
> > bisogna inserire illogine lapassworde premere su un pulsante per
> > aprire una maschera dal nome INSERIMENTO DATI che vorrei fosse
> > personale.
> > Vorrei sapere se c'è un controllo che posso mettere alla maschera
> > ENTRATA che blocchi l'apertura della maschera INSERIMENTO DATI  se si
> > digita lapasswordsbagliata
> > spero di essere stato chiaro
> > grazie
>
> Io di solito faccio un terzo campo in tabella (ma non e che sia
> obbligato) quando inserisco user epasswordin tabella , in automatico
> nel terzo campo "verifica" mi unisce user&password .
> Poi nella mia maschera dopo aver digitato entrambi faccio il
> controllo ,un campo testo chiamato controllo e dico user&password:
> if (DLookup("[verifica]", "entrata", "[verifica]='" & Me.Controllo &
> "'")) then
> docmd.open...........
> else
> msgbox"Passworderrata"......
> end if
ciao grazie di aver risposto....
ho provato ma non sono riuscito
al posto di creare un'altra tabella lo fatto solo con il campo
password
quindi ho scritto
Private Sub Comando44_Click()
On Error GoTo Err_Comando44_Click
If (DLookup("[password]", "ENTRATA", "[password]='" & Me.Comando44 &
"'")) Then
    stDocName = "INSERIMENTO DATI"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    Else
MsgBox "Password errata"
End If
Exit_Comando44_Click:
    Exit Sub
Err_Comando44_Click:
    MsgBox Err.Description
    Resume Exit_Comando44_Click
End Sub
è sicuramente sbagliato però vorrei che una volta scritto nella
maschera ENTRATA la password clicco su un pulsante che fa il controllo
se è vero mi apre la maschera INSERIMENTO DATI  se è falso compare la
scritta "Password Errata"
grazie


title: login e password

text:


scusami ma che ci azzecca il comando44?
> If (DLookup("[password]", "ENTRATA", "[password]='" & Me.Comando44 &
> "'")) Then
invece del comando44, devi inserire il campo che l'utente digita la
password


title: Creare e personalizzare caselle di testo automatico...

author: Newslucchi

text:
In un report devo creare di volta in volta una serie di caselle di
testo perchè il Report è basato su una query a campi incrociati quindi
dinamica.
Creando però queste caselle di testo (nel codice ctlTesto) vengono
create con un formato di default. Come posso io o Crearle con un
formato personalizzato o almeno poterle modificare in automatico? Il
nome dell Oggetto viene creato sempre diverso (ES Testo12..
Testo13...) Come faccio a risalire al nome dell'elemento per
cambiargli le impostazioni (FontSize, FontName...)
qui sotto parte del codice che uso per crearli:
------------
Dim ctlTesto As Control
Dim Field_Name as string
...
Field_Name= rs(Colonna)
 Set ctlTesto = CreateReportControl("Report_Name", acTextBox, , "",
Field_Name, Nleft, NTop, Nwidth, Nheight)
---------------
Grazie


title: aprire editor di immagini da access

author: Maryter

text:
Premetto che non sono esperta di Access (access 2002), sto procedendo
per tentativi... Ho archiviato in una tabella del database il percorso
delle immagini in un campo "percorso", e vorrei aggiungere
un'istruzione ad un bottone della maschera, per poter aprire
l'immagine (che già viene visualizzata in una finestrella) in un
editor.
Ho provato col codice suggerito in un vecchio post
Me!Comando63.HyperlinkAddress = Me!Percorso
ma in questo modo l'immagine si apre in Internet Explorer, mentre io
vorrei che si aprisse con un editor (tipo PSP) per fare eventuali
modifiche. Mi suggerite un sistema per realizzare questa cosa? Grazie


title: aprire editor di immagini da access

author: Alessandro Baraldi

text:

L'uso del Metodo HyperLink o FollowHyperlink apre il File di Default
Associato al FileType in questione...
questo significa che anche facendo DOPPIOCLICK sul File stesso si
aprirà Explorer, in quanto non
hai associato l'estensione ad un Programma definnito.
Quindi o assegni PSP all'estensione oppure apri PSP e cerchi il modo
per passargli come Parametro il NomeFile....
@Alex


title: aprire editor di immagini da access

author: Roberto dal portatile

text:
"Maryter" <
mary...@hotmail.it
> ha scritto nel messaggio
news:1176462115.4...@b75g2000hsg.googlegroups.com...

L'immagine si dovrebbe aprire con l'editor di default per quel tipo di file
immagine; prova a cambiare l'editor di default aprendo il file immagine
tramite l'Apri con => Programma...
Comunque se vai sul Sito Comune (link qui sotto), nella Sezione General,
nella mia FAQ intitolata "6.183 Aprire un qualsiasi file (di formato txt,
pdf, tif ecc.) direttamente da un db access (2)" ci troverai altri due modi
per aprire un qualsiasi file da VBA.
Resta il fatto che puoi aprire il file immagine con l'editor da tr scelto
usando la funzione Shell (vedi help).
>Grazie
Prego
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: inviare un testo alla linea di stato. ...

text:
... mentre vanno in esecuzione, in cascata, delle query "di un certo impegno
per il sistema".
giusto per far vedere che qualcosa accade e soprattutto cosa accade.
come si fa?


author: Roberto da casa

text:
"Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
news:c27b4e$1q545d$1...@ID-213020.news.uni-berlin.de...

Usa la Funzione SysCmd (vedi help).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
> Usa la Funzione SysCmd (vedi help).
>
> --
> Roberto
Mi sarei aspettato di dover impostare una *proprietà* dell'*ogetto* barra di
stato!


title: Distanze e MapPoint

author: Giovanni

text:
Scusate se l'argomento e' stato gia' discusso ma purtroppo non sono riuscito
a trovare la soluzione al mio problema.
Devo creare una tabella con le distanze di tutti i comuni dal relativo
capoluogo di provincia, dispongo di MapPoint ma non sono riuscito a trovare
un esempio di codice che faccia al caso mio ... qualcuno mi puo' aiutare ??
Grazie


title: Associazione Tasti

author: Alberto

text:
Access 2003/XP. E' possibile associare a dei bottoni di una maschera i
tasti F1 .. F2 .. F3 ecc... in modo tale che l'utente può sia usare il
mouse sia la tastiera ?
Grazie


title: Associazione Tasti

author: EmMeCi - Style

text:
"Alberto" <
baby...@gmail.com
> ha scritto nel messaggio
news:1145435232....@u72g2000cwu.googlegroups.com...

Grazie
Ciao Alberto,
cerca su google info sulle macro Autokeys (o su help Access) risolverai il
tuo problema.
Attento però, alcuni tasti sono riservati.
Ciao
--
**********
EmMeCi
**********
Blog:
http://www.setfocus.it


title: Associazione Tasti

author: MA

text:

Ahhh dal subject pensavo che volessi presentare l'ente molestatori
italiani...
per quello che hai richiesto, invece, guarda la macro autokeys
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Casella di controllo che si spunta in base a...

author: PWD

text:
... somma di valori in caselle di testo.
Ho 10 caselle di testo (txt1... txt10), una di controllo(ck1) e due
controlli calcolati (calc1 e calc2) che sommano i valori delle 10 di
testo secondo un ordine particolare. Il risultato delle somme finisce un
pï¿œ in calc1 e un pï¿œ in calc2.
Quando calc1 e calc2 diventano zero, vorrei che si spuntasse (su on) la ck1.
Saprei come fare se i campi calc1 e calc2 fossero non calcolati, ma non
so come fare in questo caso poichï¿œ non vengono generati eventi!!!!
Withevents escluso, esiste un sistema?
Grazie mille!
Marco


author: sv

text:
PWD ha scritto:
> .... somma di valori in caselle di testo.
> Ho 10 caselle di testo (txt1... txt10), una di controllo(ck1) e due
> controlli calcolati (calc1 e calc2) che sommano i valori delle 10 di
> testo secondo un ordine particolare. Il risultato delle somme finisce un
> p� in calc1 e un p� in calc2.
> Quando calc1 e calc2 diventano zero, vorrei che si spuntasse (su on) la ck1.
> Saprei come fare se i campi calc1 e calc2 fossero non calcolati, ma non
> so come fare in questo caso poich� non vengono generati eventi!!!!
> Withevents escluso, esiste un sistema?
> Grazie mille!
> Marco
Sull'evento "Current" facendo riferimento all'espressione contenuta nei
controlli.
If txt1+tx2=0 Then ck1=-1
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
sv ha scritto:
> Sull'evento "Current" facendo riferimento all'espressione contenuta nei
> controlli.
>
> If txt1+tx2=0 Then ck1=-1
Ciao,
cos� facendo, il valore di ck1 cambia a -1 solo al cambio di record.
Comunque va bene... tanto prima o poi dovr� cambiare sto record.
Grazie!
Ciao


text:
PWD ha scritto:
> sv ha scritto:

> Ciao,

> Grazie!
> Ciao
Se ck1 � associato ti rimane. Comunque puoi anche gestire l'evento
Afterupdate dei vari txtbox.



text:
sv ha scritto:
>> cos� facendo, il valore di ck1 cambia a -1 solo al cambio di record.
>> Comunque va bene... tanto prima o poi dovr� cambiare sto record.
> Se ck1 � associato ti rimane.
Infatti � cos�! L'unico cruccio (ma � una stupidata) � che la spunta non
avviene subito ma al cambio di record!
> Comunque puoi anche gestire l'evento
> Afterupdate dei vari txtbox.
Era quel che volevo evitare!
Ma � OK cos�!
Grazie mille!


title: Licenze Access

author: Pietro

text:
Avendo fatto un programma in Access e dovendolo installare su 6 pc, mi
conviene prendere le licenze Access per ogni stazione o comprare office
developer?
Grazie.
Pietro


title: Licenze Access

author: Lbo da casa

text:
>Avendo fatto un programma in Access e dovendolo installare su 6 pc, mi
>conviene prendere le licenze Access per ogni stazione o comprare office
>developer?
dal punto di vista economico ti conviene senz'altro comprare un
developer: lo paghi una volta e via.
senonché il developer fu ritirato dal mercato per problemi di bug.
recentemente si dice sia ricicciato fuori, riveduto e corretto...  si
è visto anche qualche messaggio in prioposito sul ng.  chiedi ad un
rivenditore microsoft (che tanto ne sapranno meno di te...).
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: Licenze Access

author: Carlo Ve

text:
Pietro ha scritto nel messaggio ...
>Avendo fatto un programma in Access e dovendolo installare su 6 pc, mi
>conviene prendere le licenze Access per ogni stazione o comprare office
>developer?
Bel problema
dal punto di vista economico di converrebbe il run time
tieni pero' presente che
quello per l'A97 sembra sia introvabile
quello per l'A2000 sembra sia inaffidabile
Carlo Ve
>Grazie.
>Pietro
>
>


title: [parzialmente ot] Microsoft SQL Server Management Studio, ODBC, query & view

author: Ammammata

text:
prima domanda
vedo circa 150 ng per questo argomento (SQL), praticamente tutti
deserti: mi son perso qualche cosa? si deve obbligatoriamente andare
sul supporto del prodotto?

seconda domanda (con premessa)
mi collego con access alle tabelle (view) di SAP B1, tramite ODBC, e
tutto funziona egregiamente
i dati arrivano da due server distinti
usando MSSMS sul primo server posso comunque collegarmi al secondo,
accedere ai dati e preparare le query per generare le view (solo ed
esclusivamente coi dati del secondo)
però se provo a salvare una nuova view sul secondo (sempre lavorando
dal primo) me lo nega
e se provo (sempre dal primo) a modificare una view sul secondo, MSSMS
si pianta e buonanotte
se lavoro dal secondo funziona tutto perfettamente (ed è lì che ho
preparato le view)

devo quindi dedurre che lavorando dal primo server, connesso al
secondo, posso fare e salvare query ma non posso fare lo stesso per le
view?

se avete un'idea è bene accetta, altrimenti mi devo rassegnare a
chiedere al supporto ufficiale di MS :(

MSSMS del primo è 17.9.1
MSSMS del secondo è 18.11.1

grazie e buon appetito (a chi mangia verso la una)

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


author: BFS

text:
Il 29/03/2023 12:47, Ammammata ha scritto:
> prima domanda
> vedo circa 150 ng per questo argomento (SQL), praticamente tutti
> deserti: mi son perso qualche cosa? si deve obbligatoriamente andare sul
> supporto del prodotto?

ormai si trova tutto online, i ng in molti casi vengono visti come
helpdesk gratuito

>
> seconda domanda (con premessa)
> mi collego con access alle tabelle (view) di SAP B1, tramite ODBC, e
> tutto funziona egregiamente
> i dati arrivano da due server distinti
> usando MSSMS sul primo server posso comunque collegarmi al secondo,
> accedere ai dati e preparare le query per generare le view (solo ed
> esclusivamente coi dati del secondo)
> però se provo a salvare una nuova view sul secondo (sempre lavorando dal
> primo) me lo nega
> e se provo (sempre dal primo) a modificare una view sul secondo, MSSMS
> si pianta e buonanotte
> se lavoro dal secondo funziona tutto perfettamente (ed è lì che ho
> preparato le view)
>
> devo quindi dedurre che lavorando dal primo server, connesso al secondo,
> posso fare e salvare query ma non posso fare lo stesso per le view?
>
> se avete un'idea è bene accetta, altrimenti mi devo rassegnare a
> chiedere al supporto ufficiale di MS :(
>
> MSSMS del primo è 17.9.1
> MSSMS del secondo è 18.11.1
>
> grazie e buon appetito (a chi mangia verso la una)

sicuro che non sia una questione di autorizzazioni?
io dal mio MSSMS installato in loco mi collego ai sql dei clienti e
faccio qualsiasi cosa senza problemi

BFS


text:
It happens that BFS formulated :
> sicuro che non sia una questione di autorizzazioni?
> io dal mio MSSMS installato in loco mi collego ai sql dei clienti e faccio
> qualsiasi cosa senza problemi

l'utente e la password sono uguali per le due macchine (che sono due VM
in esecuzione sulla stessa macchina fisica), preparate dalla stessa
società usando lo stesso foglio di specifiche e parametri

proverò a chiedere a loro, prima di rivolgermi al supporto MS



text:
Il 29/03/2023 14:01, Ammammata ha scritto:
> It happens that BFS formulated :
>> sicuro che non sia una questione di autorizzazioni?
>> io dal mio MSSMS installato in loco mi collego ai sql dei clienti e
>> faccio qualsiasi cosa senza problemi
>
> l'utente e la password sono uguali per le due macchine (che sono due VM
> in esecuzione sulla stessa macchina fisica), preparate dalla stessa
> società usando lo stesso foglio di specifiche e parametri
>
> proverò a chiedere a loro, prima di rivolgermi al supporto MS
>

hai provato sia con autenticazione sqlserver sia con autenticazione
windows con lo stesso risultato?

BFS


text:
BFS has brought this to us :
> hai provato sia con autenticazione sqlserver sia con autenticazione windows
> con lo stesso risultato?

è stato configurato sempre per autenticazione SQL, non so nemmeno se è
stata fatto qualcosa per configurare anche l'autenticazione Windows

farò una prova



title: Applicazione terminata, ma che rimane attiva nel Task Manager

author: Eugenio

text:
Buongiorno.
Ho un'applicazione in Access97 che importa via VBA il contenuto di un foglio
di Excel che contiene un indirizzario (sono 7 colonne) di clienti.
Succede che l'applicazione esegue correttamente l'importazione, ma si
verifica una situazione strana e cioè resta attiva l'applicazione Excel solo
se il mio foglio contiene più di 60 righe. In caso contrario l'applicazione
Excel viene disattivata.
In sostanza nel primo caso in Task Manager risulta ancora attivo Excel.
Purtroppo succede anche che se non chiudo Excel, si verificano blocchi per
qualsiasi programma che eseguo sul pc.
Quello che segue è la porzione di codice che chiude Excel
    ...
    ...
    Set wkSh = Nothing
    wkBk.Close
    Set wkBk = Nothing
    oApp.Application.Quit
    Set oApp = Nothing
    MsgBox "Importazione terminata." & vbCr & "Sono state importate " &
Trim(str(iRigheImp)) & " righe.", vbInformation,   "Importazione Clienti"
    DoCmd.Close
Sicuramente i set vengono sempre eseguiti, il messaggio viene sempre emesso
e ovviamente l'ìapplicazione si chiude.
Qualcuno può darmi qualche informazione che mi possa aiutare a risolvere il
problema?
Grazie
Ciao
Eugenio


author: namor

text:
Eugenio ha scritto:

Le righe di chiusura sembrano esatte, ma sei sicuro che vengano
effettivamente eseguite? Non è che una qualche gestione degli errori le
bypassa? Mettici dei punti di interruzione, dei debug.print o degli msgbox
per verificare che le istruzioni vengano eseguite.
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
>
> Le righe di chiusura sembrano esatte, ma sei sicuro che vengano
> effettivamente eseguite? Non è che una qualche gestione degli errori le
> bypassa? Mettici dei punti di interruzione, dei debug.print o degli msgbox
> per verificare che le istruzioni vengano eseguite.
> Namor
>
>
Ho seguito l'elaborazione passo passo la procedura ponendo un punto
d'interruzione poco prima delle righe di chiusura e le istruzioni vengono
eseguite tutte. Del resto al termine dell'elaborazione viene emessa una
msgbox, come puoi vedere, e quindi non c'è possibilità che esca per un
errore.
Ho provato a fare anche una prova assurda ripetendo il blocco della chiusura
e, ovviamente, il risultato è stato che il primo gruppo è stato eseguito,
mentre il secondo terminava in errore a causa della mancanza
dell'applicazione attiva.
Grazie
Ciao
Eugenio


text:
Eugenio ha scritto:
> > Le righe di chiusura sembrano esatte, ma sei sicuro che vengano
> > effettivamente eseguite? Non è che una qualche gestione degli errori le
> > bypassa? Mettici dei punti di interruzione, dei debug.print o degli msgbox
> > per verificare che le istruzioni vengano eseguite.
> > Namor
> Ho seguito l'elaborazione passo passo la procedura ponendo un punto
> d'interruzione poco prima delle righe di chiusura e le istruzioni vengono
> eseguite tutte. Del resto al termine dell'elaborazione viene emessa una
> msgbox, come puoi vedere, e quindi non c'è possibilità che esca per un
> errore.
Se ci fosse da qualche parte un 'On error resume next' ti potrebbe
sembrare che le righe vengano eseguite mentre in effetti non lo sono
perchè restituiscono un errore che non viene segnalato.
> Ho provato a fare anche una prova assurda ripetendo il blocco della chiusura
> e, ovviamente, il risultato è stato che il primo gruppo è stato eseguito,
> mentre il secondo terminava in errore a causa della mancanza
> dell'applicazione attiva.
> Grazie
> Ciao
> Eugenio
Quindi il codice che termina excel funziona. Non è che per qualche motivo
apre due istanze di excel, e poi ne chiude una sola? Verifica prima
durante e dopo l'esecuzione del codice quanti excel sono in esecuzione.
Ciao.



text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:c8i4fk$c9v$1...@news.newsland.it...

Seguendo passo passo mi pare tutto regolare.
Comunque di seguito espondo il codice della sub che mi crea il problema.
Prima di questa ci sono altre due sub che utilizzano Excel: la prima serve
per selezionare il foglio e la seconda estrare l'elenco delle colonne che
compongono il foglio.
Private Sub Importazione()
Dim oApp As Excel.Application
Dim wkBk As Excel.Workbook
Dim wkSh As Excel.Worksheet
Dim dbST As DATABASE
Dim rsST As Recordset
Dim rsCP As Recordset
Dim rsColl As New Collection
Dim i As Integer
Dim iRigheImp As Integer
Dim intRowIndex As Integer
Dim iR As Integer
Dim intColIndex As Integer
Dim iC As Integer
Dim blInsert As Boolean
Dim blErrore As Boolean
On Error GoTo Err_Importazione
    DoCmd.Hourglass True
    iRigheImp = 0
    Set oApp = CreateObject("Excel.Application")
    Set wkBk = oApp.Workbooks.Open(Me!Percorso)
    i = Me!Foglio.Column(1)
    Set wkSh = wkBk.Worksheets(i)
    Set dbST = CurrentDb
    Set rsCP = dbST.OpenRecordset("Clienti", dbOpenDynaset, dbSeeChanges)
    iR = 0
    'Lettura righe del foglio a partire dalla riga 2, perchè la riga 1
contiene le intestazioni
    For intRowIndex = 2 To 9999
        If wkSh.Cells(intRowIndex, 1) > "" Then
            blInsert = False
            iC = 0
            'Lettura colonne del foglio
            For intColIndex = 1 To 250
                If Trim(wkSh.Cells(1, intColIndex)) > "" Then
                    Set rsST = dbST.OpenRecordset("Select NomeTabella,
NomeCampo, TipoCampo, LunghezzaCampo, ColonnaFoglio " & _
                                                  "From StrutturaTabelle " &
_
                                                  "Where NomeTabella =
'UniClientiPotenziali' and ColonnaFoglio = '" &
Trim(SostituisciStringa(wkSh.Cells(1, intColIndex), "'", " ")) & "'")
                    If rsST.EOF = False Then
                        If blInsert = False Then
                            rsCP.AddNew
                            rsCP!RagioneSociale = ""
                            rsCP!Indirizzo = ""
                            rsCP!Citta = ""
                            rsCP!Cap = ""
                            rsCP!Provincia = ""
                            rsCP!Zona = ""
                            rsCP!nazione = ""
                            rsCP!NrTelefono = ""
                            rsCP!NrFax = ""
                            rsCP!Email = ""
                            blInsert = True
                        End If
                        If wkSh.Cells(intRowIndex, intColIndex) > "" Then
                            Select Case rsST!NomeCampo
                                Case "RagioneSociale": rsCP!RagioneSociale =
Mid(Trim(wkSh.Cells(intRowIndex, intColIndex)), 1, 100)
                                Case "Indirizzo":      rsCP!Indirizzo =
Mid(Trim(wkSh.Cells(intRowIndex, intColIndex)), 1, 100)
                                Case "Cap":            rsCP!Cap =
Mid(Trim(wkSh.Cells(intRowIndex, intColIndex)), 1, 10)
                                Case "Citta":          rsCP!Citta =
Mid(Trim(wkSh.Cells(intRowIndex, intColIndex)), 1, 50)
                                Case "Provincia":      rsCP!Provincia =
Mid(Trim(wkSh.Cells(intRowIndex, intColIndex)), 1, 2)
                                Case "Zona":           rsCP!Zona =
Mid(Trim(wkSh.Cells(intRowIndex, intColIndex)), 1, 3)
                                Case "Nazione":        rsCP!nazione =
Mid(Trim(wkSh.Cells(intRowIndex, intColIndex)), 1, 50)
                                Case "NrTelefono":     rsCP!NrTelefono =
Mid(Trim(wkSh.Cells(intRowIndex, intColIndex)), 1, 30)
                                Case "NrFax":          rsCP!NrFax =
Mid(Trim(wkSh.Cells(intRowIndex, intColIndex)), 1, 30)
                                Case "Email":          rsCP!Email =
Mid(Trim(wkSh.Cells(intRowIndex, intColIndex)), 1, 100)
                            End Select
                        Else
                            iC = iC + 1
                            If iC = 3 Then Exit For
                        End If
                    End If
                    rsST.Close
                    Set rsST = Nothing
                End If
            Next intColIndex
            If blInsert = True Then
                rsCP!ItaliaEstero = "I"
                'Prima di aggiornare viene verificato se il cliente esiste
già nella tabella
                blErrore = False
                Call ControllaEsistenzaCliente(rsCP!RagioneSociale,
rsCP!Indirizzo, rsCP!Citta, rsCP!Cap, rsCP!Provincia, rsCP!Zona,
rsCP!nazione, rsCP!NrTelefono, rsCP!NrFax, rsCP!Email, blErrore)
                If blErrore = False Then
                    rsCP.Update
                    iRigheImp = iRigheImp + 1
                    blInsert = False
                Else
                    'rsCP.Delete
                End If
            End If
        Else
            iR = iR + 1
            If iR = 3 Then Exit For
        End If
    Next intRowIndex
    rsCP.Close
    Set rsCP = Nothing
Exit_Importazione:
    Set wkSh = Nothing
    wkBk.Close
    Set wkBk = Nothing
    oApp.Application.Quit
    Set oApp = Nothing
    MsgBox "Importazione terminata." & vbCr & "Sono state importate " &
Trim(str(iRigheImp)) & " righe.", vbInformation, "Importazione Clienti"
    Forms!Sk_AnagCliPotenziali.Requery
    Me.SetFocus
    DoCmd.Hourglass False
    DoCmd.Close
    Exit Sub
Err_Importazione:
    MsgBox ERR.number & " - " & ERR.description
    Resume Exit_Importazione
End Sub
Ciao
Grazie
Eugenio


author: ALESSANDRO Baraldi

text:
"Eugenio" <Ci...@Eugenio.it> ha scritto nel messaggio
news:c8i5k6$u31$1...@lacerta.tiscalinet.it...

Porta pazienza, ma invece di chiamare una cella per volta di Excel
dagli il Nome alla cella= al nome Campo del Recordset.
Ciclando il Recordset Cicli contemporaneamente le 2 cose.
Una cosa del genere:
For Each fld In rs.Fields             ' Ciclo sull'insieme Fields
del recordset
      For Each nme In xlsActiveWkb.Names  ' Ciclo sull'insieme Names
della cartella attiva
        If fld.Name = nme.Name Then       ' Se il nome campo è uguale al
nome di Name
           With xlsActiveWkb.Worksheets(1).Range(nme.Name)
            '.Select                      'Seleziono la cella
            .Value = fld.Value            'Ci scrivo il Value del field
del recordset
          End With
        End If
      Next nme
    Next fld
Per il problema che denunci , non è che hai il Doc in MERGE con
il Database...???
Ciao.
@Alex.


text:
>
> Porta pazienza, ma invece di chiamare una cella per volta di Excel
> dagli il Nome alla cella= al nome Campo del Recordset.
> Ciclando il Recordset Cicli contemporaneamente le 2 cose.
>
> Una cosa del genere:
>
> For Each fld In rs.Fields             ' Ciclo sull'insieme Fields
> del recordset
>       For Each nme In xlsActiveWkb.Names  ' Ciclo sull'insieme Names
> della cartella attiva
>         If fld.Name = nme.Name Then       ' Se il nome campo è uguale al
> nome di Name
>            With xlsActiveWkb.Worksheets(1).Range(nme.Name)
>             '.Select                      'Seleziono la cella
>             .Value = fld.Value            'Ci scrivo il Value del field
> del recordset
>           End With
>         End If
>       Next nme
>     Next fld
>
>
Lo provo, anche se, non essendo un esperto, non ci ho capito molto. Ma
leggere ogni campo non equivale a leggere una cella?
Dove posso trovare documentazione che mi spieghi più approfonditamente la
parte relativa agli oggetti Excel?
L'help in linea si mescola a quello di Access e se non conosci il metodo o
la funzione è impossibile estrarre informazioni.
> Per il problema che denunci , non è che hai il Doc in MERGE con
> il Database...???
>
> Ciao.
> @Alex.
>
Pazienza ne ho molta, le ore gratis non si contano. Il problema è che spesso
oltre al programma bisogna considerare i bachi che Microsoft non corregge.
Devi comprare le correzioni, alias cambiare versione.
Il problema si è risolto sostituendo a
Dim oApp As Excel.Application
Dim wkBk As Excel.Workbook
Dim wkSh As Excel.Worksheet
le seguenti Dim
Dim oApp As Object
Dim wkBk As Object
Dim wkSh As Object
Meraviglie delle meraviglie, no?
Una curiosità, se mi vuoi rispondere, che non riguarda il mio problema, da
poco frequento questo NG, ma le persone com te, Sergio Mazza, Roberto da
casa, Antonio Biso, Pablito qualcosa, Namor e mi scuso con gli altri se non
ricordo il loro nome o nick, siete professionisti Access a tempo pieno, nel
senso che svolgete una libera professione? Sieti anche i curatori del Sito
Comune?
Grazie Alessandro
Ciao
Eugenio


author: Alessandro Baraldi

text:
"Eugenio" <Ci...@Eugenio.it> wrote in message
news:c8kcdq$eig$
1...@lacerta.tiscalinet.it
[CUT]
>
> Lo provo, anche se, non essendo un esperto, non ci ho capito molto. Ma
> leggere ogni campo non equivale a leggere una cella?
> Dove posso trovare documentazione che mi spieghi più approfonditamente la
> parte relativa agli oggetti Excel?
> L'help in linea si mescola a quello di Access e se non conosci il metodo o
> la funzione è impossibile estrarre informazioni.
>
[CUT]
Se devi aggiungere Celle devi riaprire il progetto ed aggiungere
righe, con questo sistema più fine è AUTOMATICO, ti basta
solo Nominare le Celle del Foglio ed aggiungere Fields nel Recordset
cose che fai in ogni caso.
> Una curiosità, se mi vuoi rispondere, che non riguarda il mio problema, da
> poco frequento questo NG, ma le persone com te, Sergio Mazza, Roberto da
> casa, Antonio Biso, Pablito qualcosa, Namor e mi scuso con gli altri se non
> ricordo il loro nome o nick, siete professionisti Access a tempo pieno, nel
> senso che svolgete una libera professione? Sieti anche i curatori del Sito
> Comune?
> Ciao
> Eugenio
Ovviamente ti rispondo per quanto mi compete:
1)Solo Hobby per me la mia Professione non è minimamente attinente.
2)Personalmente aderisco alla causa del SC inviando materiale
i curatori del SC sono la TRIADE che trovi elencata.
Ciao.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:ed0422092e9377dd96...@mygate.mailgate.org...

Solo Hobby? Complimenti!



author: Sergio MAZZA

text:
"Eugenio" <Ci...@Eugenio.it> ha scritto nel messaggio
news:c8kcdq$eig$1...@lacerta.tiscalinet.it...
----- omissis ----
>
> Una curiosità, se mi vuoi rispondere, che non riguarda il mio problema, da
> poco frequento questo NG, ma le persone com te, Sergio Mazza, Roberto da
> casa, Antonio Biso, Pablito qualcosa, Namor e mi scuso con gli altri se
non
> ricordo il loro nome o nick, siete professionisti Access a tempo pieno,
nel
> senso che svolgete una libera professione? Sieti anche i curatori del Sito
> Comune?
>
> Grazie Alessandro
> Ciao
> Eugenio
Io da parecchio non svolgo più la libera professione e access l'ho iniziato
ad utilizzare dalla versione 2.
Ciao.
--
Sergio MAZZA


title: Ocx che scompaiono ...

author: Logo

text:
Ciao a tutti.
Avrei un problema la cui soluzione mi sfugge, per cui vi chiedo aiuto.
In un db Access ho creato un report con un ocx esterno che visualizza i
codici a barre. L'ocx in questione č il CreaBar della Compuart di Genova
(shareware). Il problema č che A VOLTE quando creo le etichette (e solo su
alcune macchine) NON vedo il barcode. Apro il report in struttura e IL
CONTROLLO E' SPARITO !!! Vi č mai capitato qualcosa del genere, anche con
altri controlli di terze parti? Avete qualche suggerimento
Grazie
Daniele


title: Ocx che scompaiono ...

author: ACCESS

text:
"Logo" <
olor...@tin.it
> ha scritto nel messaggio
news:W26_9.14434$%p6.12...@news.edisontel.com...
> Ciao a tutti.
>
> Avrei un problema la cui soluzione mi sfugge, per cui vi chiedo aiuto.
>
> In un db Access ho creato un report con un ocx esterno che visualizza i
> codici a barre. L'ocx in questione è il CreaBar della Compuart di Genova
> (shareware). Il problema è che A VOLTE quando creo le etichette (e solo su
> alcune macchine) NON vedo il barcode. Apro il report in struttura e IL
> CONTROLLO E' SPARITO !!! Vi è mai capitato qualcosa del genere, anche con
> altri controlli di terze parti? Avete qualche suggerimento
>
> Grazie
> Daniele
>
Forse non su tutte è registrato? Hai visto nei riferimenti se manca?
Maurizio75


title: Ocx che scompaiono ...

text:
> > In un db Access ho creato un report con un ocx esterno che visualizza i
> > codici a barre. L'ocx in questione è il CreaBar della Compuart di Genova
> > (shareware). Il problema è che A VOLTE quando creo le etichette (e solo
su
> > alcune macchine) NON vedo il barcode. Apro il report in struttura e IL
> > CONTROLLO E' SPARITO !!! Vi è mai capitato qualcosa del genere, anche
con
> > altri controlli di terze parti? Avete qualche suggerimento
> >
> > Grazie
> > Daniele
> >
>
> Forse non su tutte è registrato? Hai visto nei riferimenti se manca?
>
> Maurizio75
Il fatto è che PER UN PO' DI TEMPO funziona correttamente, poi
improvvisamente sparisce dal report e devo ridisegnarcelo dentro!!!
Non so più che fare...
D.


title: Ocx che scompaiono ...

author: Alepetomane

text:
"Logo" <
olor...@tin.it
> ha scritto nel messaggio
news:W26_9.14434$%p6.12...@news.edisontel.com...

succede anche a me una cosa simile con tale ocx.
Quando vado in struttura del report, modifico le dimensioni del controllo
ocx  e salvo, si azzera l'origine (i dati del barcode), pero' risistemandolo
torna a funzionare perfettamente.
In mde pero' non ho mai avuto problemi.
Tieni presente che su ogni macchina che esegue il report oltre alla
registrazione dell' ocx (regsvr32) deve esserci una licenza Cbar21.rg sotto
la dir windows, il nomefile=Miopath\barcode.brc di configurazione che
richiami nel controllo deve essere giocoforza presente e con lo stesso path
su tutte le macchine, se no ciccia..
Ale.


title: Controllo esistenza di un file

author: Iuri

text:
Per controllare l'esistenza di un file fino a ora facevo:
if Dir(nomefile) == "" then
    ' non trovato
else
    ' trovato
Ma ho notato che questo metodo non funziona se in "nomefile" c'è specificata
un'unità non presente sul computer (tipo g:\test.mdb).
Viene infatti restituito un errore invece di darmi la stringa vuota.
Come posso fare a risolvere questo problema?
Grazie.


title: Controllo esistenza di un file

author: Antonio Biso

text:
"Iuri" <
iurit...@libero.it
> ha scritto nel messaggio
news:apqo36$443jd$1...@ID-112808.news.dfncis.de...

Intercetta e gestisci l'errore.
Comando On error
Antonio


title: Controllo esistenza di un file

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:xN5w9.98328$RO.25...@twister1.libero.it...
> Intercetta e gestisci l'errore.
> Comando On error
Grazie, ho risolto.
Speravo in qualche funzione più "intelligente" di Dir, ma meglio che niente.


title: Settare focus su report aperto da maschera popup...

author: Salvador Pierangelo

text:
Salve,
ho una maschera popup per la ricerca di record dalla quale posso aprire un
report che mostra i record risultanti dalla ricerca effettuata tramite la
maschera in questione; il report viene aperto tramite un pulsante di
comando. Il "problema" è che essendo la maschera impostata come popup mi
resta sopra il report mentre io vorrei che il report restasse in primo piano
e non voglio chiudere la maschera di ricerca per non perdere i criteri
impostati dall'utente e quindi il risultato della ricerca, esiste un modo?
Credo proprio di si ma non riesco a trovarlo...
Io stavo cercando di ovviare al problema minimizzando la form di ricerca
tramite DoCmd.Minimize dal pulsante di comando che apre il report ma non
riesco poi a ripristinarla alla grandezza normale quando chiudo il report
perchè il comando Maximize non accetta argomenti e lavora sull'oggetto che
lo richiama.
Ciao,
Pierangelo


author: sv

text:
Salvador Pierangelo ha scritto:

Ti basterà inserire sull'evento "Close" del report.
DoCmd.OpenForm "MiaMaschera", acNormal
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
"sv" <
sal...@nospaccessgroup.it
> ha scritto nel messaggio
news:cmq382$d3c$1...@news.newsland.it...

Grazie,
in effetti sono stato scemo a non pensarci! Mi era capitato in altre
occasioni come effetto collaterale di avere il comportamento che volevo
ora...
Ciao,
Pierangelo


title: Problema con la Creazione MDE.

author: Rita

text:
Salve!
Mi č venuto in mente di creare il file MDE.
Prima un messaggio mi dice che non č possibile creare l'MDE perchč il DB č
nella versione precedente, insomma ho dovuto convertire il DB da 2000 a 2003
(ho sempre l'Office 2003).
Non č finita! Mi accingo a creare l' MDE e mi appare il seguente messaggio
che mi blocca tutto:
Questo errore č in genere correlato alla compilazione di un database di
grandi dimensioni in un file MDE.  A causa del metodo utilizzato per la
compilazione del database, per ogni tabella viene creato un numero
considerevole di riferimenti TableID.  Il modulo di gestione di database
Microsoft Jet versione 4.0 supporta la creazione contemporanea di un massimo
di 2048 riferimenti TableID aperti. L'esportazione di un database come file
MDE puň comportare potenzialmente il superamento di questo limite se il
database include numerosi oggetti (tabelle, macro, maschere, report e cosě
via).
Non č disponibile un metodo preciso per stimare il numero di riferimenti
TableID utilizzati dal modulo di gestione di database Jet durante il
processo di compilazione di un database come file MDE. Tuttavia, ogni modulo
VBA e ogni maschera utilizza un riferimento TableID e ne consegue che, se il
database include 500 maschere e la proprietŕ Possiede modulo di ogni
maschera č impostata su Sě, verranno utilizzati 1.000 riferimenti TableID.
Ulteriori informazioni su questo messaggio di errore in linea.
Che faccio ora? Il mio DB non č poi cosě enorme, pesa solo 4 o 5 MB.
            Grazie ciao Rita
             Scusate mi sono formattata da sola......


title: Problema con la Creazione MDE.

author: Karl Donaubauer

text:
Rita wrote:
> Mi è venuto in mente di creare il file MDE.
> Prima un messaggio mi dice che non è possibile creare l'MDE perchè il DB è
> nella versione precedente, insomma ho dovuto convertire il DB da 2000 a
> 2003 (ho sempre l'Office 2003).
>
> Non è finita! Mi accingo a creare l' MDE e mi appare il seguente messaggio
> che mi blocca tutto:
>
> Questo errore è in genere correlato alla compilazione di un database di
> grandi dimensioni in un file MDE.  A causa del metodo utilizzato per la
> compilazione del database, per ogni tabella viene creato un numero
> considerevole di riferimenti TableID.  Il modulo di gestione di database
> Microsoft Jet versione 4.0 supporta la creazione contemporanea di un
> massimo di 2048 riferimenti TableID aperti. L'esportazione di un database
> come file MDE può comportare potenzialmente il superamento di questo
> limite se il database include numerosi oggetti (tabelle, macro, maschere,
> report e così via).
>
> Non è disponibile un metodo preciso per stimare il numero di riferimenti
> TableID utilizzati dal modulo di gestione di database Jet durante il
> processo di compilazione di un database come file MDE. Tuttavia, ogni
> modulo VBA e ogni maschera utilizza un riferimento TableID e ne consegue
> che, se il database include 500 maschere e la proprietà Possiede modulo
> di ogni maschera è impostata su Sì, verranno utilizzati 1.000 riferimenti
> TableID.
>
> Ulteriori informazioni su questo messaggio di errore in linea.
>
> Che faccio ora? Il mio DB non è poi così enorme, pesa solo 4 o 5 MB.
Gli MB non importano ma il numero dei oggetti e alcuni tipi di
riferimenti a oggetti. Allora quanti oggetti ci sono nel tuo db?
Prima di creare un MDE è sempre consigliabile di creare un
nuovo MDB, importare tutti oggetti, compattare e compilare il db.
Puoi anche provare di usare decompile per perdere resti di
codice compilato male. vedi
www.donkarl.com/it
 FAQ 1.23
Poi prova di creare un MDE.
Se tutto questo non aiuta per "perdere" TableId puoi provare di
impostare a "No" la proprietà "Possiede modulo" delle maschere
e report che non hanno codice VBA dentro.
v.a.
http://support.microsoft.com/?kbid=289686
 e il punto 15
nell'elenco sul
http://www.Access.QBuilt.com/html/conversion.html
che ha proposte come circa contare i misteriosi TableId.
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it
 + iscriviti alla prima Conferenza
Italiana per Sviluppatori di Access (CISA 1), Arezzo, 4+5/6/2005


title: Problema con la Creazione MDE.

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:3dr83uF...@individual.net...
> Rita wrote:
> > Mi č venuto in mente di creare il file MDE.
> > Prima un messaggio mi dice che non č possibile creare l'MDE perchč il DB
č
> > nella versione precedente, insomma ho dovuto convertire il DB da 2000 a
> > 2003 (ho sempre l'Office 2003).
> >
> > Non č finita! Mi accingo a creare l' MDE e mi appare il seguente
messaggio
> > che mi blocca tutto:
> >
> > Questo errore č in genere correlato alla compilazione di un database di
> > grandi dimensioni in un file MDE.  A causa del metodo utilizzato per la
> > compilazione del database, per ogni tabella viene creato un numero
> > considerevole di riferimenti TableID.  Il modulo di gestione di database
> > Microsoft Jet versione 4.0 supporta la creazione contemporanea di un
> > massimo di 2048 riferimenti TableID aperti. L'esportazione di un
database
> > come file MDE puň comportare potenzialmente il superamento di questo
> > limite se il database include numerosi oggetti (tabelle, macro,
maschere,
> > report e cosě via).
> >
> > Non č disponibile un metodo preciso per stimare il numero di riferimenti
> > TableID utilizzati dal modulo di gestione di database Jet durante il
> > processo di compilazione di un database come file MDE. Tuttavia, ogni
> > modulo VBA e ogni maschera utilizza un riferimento TableID e ne consegue
> > che, se il database include 500 maschere e la proprietŕ Possiede modulo
> > di ogni maschera č impostata su Sě, verranno utilizzati 1.000
riferimenti
> > TableID.
> >
> > Ulteriori informazioni su questo messaggio di errore in linea.
> >
> > Che faccio ora? Il mio DB non č poi cosě enorme, pesa solo 4 o 5 MB.
>
> Gli MB non importano ma il numero dei oggetti e alcuni tipi di
> riferimenti a oggetti. Allora quanti oggetti ci sono nel tuo db?
>
> Prima di creare un MDE č sempre consigliabile di creare un
> nuovo MDB, importare tutti oggetti, compattare e compilare il db.
> Puoi anche provare di usare decompile per perdere resti di
> codice compilato male. vedi
www.donkarl.com/it
 FAQ 1.23
> Poi prova di creare un MDE.
>
> Se tutto questo non aiuta per "perdere" TableId puoi provare di
> impostare a "No" la proprietŕ "Possiede modulo" delle maschere
> e report che non hanno codice VBA dentro.
> v.a.
http://support.microsoft.com/?kbid=289686
 e il punto 15
> nell'elenco sul
http://www.Access.QBuilt.com/html/conversion.html
> che ha proposte come circa contare i misteriosi TableId.
>
> --
> cu
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
 + iscriviti alla prima Conferenza
> Italiana per Sviluppatori di Access (CISA 1), Arezzo, 4+5/6/2005
Grazie mille Karl,
farň questi controlli.
Ciao Rita


title: Problema con la Creazione MDE.

text:
> Gli MB non importano ma il numero dei oggetti e alcuni tipi di
> riferimenti a oggetti. Allora quanti oggetti ci sono nel tuo db?
>
> Prima di creare un MDE è sempre consigliabile di creare un
> nuovo MDB, importare tutti oggetti, compattare e compilare il db.
> Puoi anche provare di usare decompile per perdere resti di
> codice compilato male. vedi
www.donkarl.com/it
 FAQ 1.23
> Poi prova di creare un MDE.
>
> Se tutto questo non aiuta per "perdere" TableId puoi provare di
> impostare a "No" la proprietà "Possiede modulo" delle maschere
> e report che non hanno codice VBA dentro.
> v.a.
http://support.microsoft.com/?kbid=289686
 e il punto 15
> nell'elenco sul
http://www.Access.QBuilt.com/html/conversion.html
> che ha proposte come circa contare i misteriosi TableId.
>
> --
> cu
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
 + iscriviti alla prima Conferenza
> Italiana per Sviluppatori di Access (CISA 1), Arezzo, 4+5/6/2005
>
Ciao KArl,
come al solito devo rinunciarci! Ho letto e seguito le tue indicazioni, ma
temo di non poter creare il file MDE.
Ho salvato gli oggetti in un nuovo DB, ho decompilato ed in alcune parti è
mancata l'esecuzione di alcune cose come ad esempio l'Autoexec.
Innanzitutto ho 37 tabelle, contando però anche quelle non coinvolte
direttamente nelle relazioni altrimenti ne ho molte di meno, circa una
dozzina.
Ho circa 70 maschere, circa 42 reports, 20 macro, 4 moduli, però tutte le
maschere e quasi tutti i report  hanno la proprietà 'Possiede modulo'
impostato a SI' perchè vi sono diversi oggetti con il codice, per cui non
posso fare nulla altrimenti mi salta il codice.
Ho tentato di realizzare il file MDE, convertendo in Access 2003, però alla
fine ho avuto lo stesso messaggio di errore.
Comunque non ho intenzione di impazzire di fronte a questo problema perchè
mi pare che nel mio caso non vi siano alternative: mi tengo il file MDB così
com'è! Possibile che mi debba andare sempre tutto storto?!?!?
Mi chiedo seriamente se una cosa del genere sia capitata solo a me o a
pochissimi altri ...............
                  Sempre grazie
                    Ciao Rita


title: Problema con la Creazione MDE.

text:
Rita wrote:
>> Gli MB non importano ma il numero dei oggetti e alcuni tipi di
>> riferimenti a oggetti. Allora quanti oggetti ci sono nel tuo db?
>>
>> Prima di creare un MDE è sempre consigliabile di creare un
>> nuovo MDB, importare tutti oggetti, compattare e compilare il db.
>> Puoi anche provare di usare decompile per perdere resti di
>> codice compilato male. vedi
www.donkarl.com/it
 FAQ 1.23
>> Poi prova di creare un MDE.
>>
>> Se tutto questo non aiuta per "perdere" TableId puoi provare di
>> impostare a "No" la proprietà "Possiede modulo" delle maschere
>> e report che non hanno codice VBA dentro.
>> v.a.
http://support.microsoft.com/?kbid=289686
 e il punto 15
>> nell'elenco sul
http://www.Access.QBuilt.com/html/conversion.html
>> che ha proposte come circa contare i misteriosi TableId.
> ...
> come al solito devo rinunciarci! Ho letto e seguito le tue indicazioni, ma
> temo di non poter creare il file MDE.
> Ho salvato gli oggetti in un nuovo DB, ho decompilato ed in alcune parti è
> mancata l'esecuzione di alcune cose come ad esempio l'Autoexec.
Non capisco.
> Innanzitutto ho 37 tabelle, contando però anche quelle non coinvolte
> direttamente nelle relazioni altrimenti ne ho molte di meno, circa una
> dozzina.
> Ho circa 70 maschere, circa 42 reports, 20 macro, 4 moduli, però tutte le
> maschere e quasi tutti i report  hanno la proprietà 'Possiede modulo'
> impostato a SI' perchè vi sono diversi oggetti con il codice, per cui non
> posso fare nulla altrimenti mi salta il codice.
Non sembrano molti oggetti ma certo non conosco il tuo codice,
la nomenclatura e la complessità dei tuoi oggetti.
Sembra che si tratta di un solo mdb dove si trovano anche
le tabelle invece del solito FE-BE.
> Ho tentato di realizzare il file MDE, convertendo in Access 2003, però
> alla fine ho avuto lo stesso messaggio di errore.
Perché in primo luogo usi il formato di 2000 se solo hai A03?
Una conversione puo cambiare molto.
Tutto questo che ti ho detto si riferisce al db nella versione nella
quale tenti di creare il MDE, cioè A03.
Se niente aiuta, l'ultimo modo di prova è sempre la forza brutta di
creare un nuovo MDB (certo tutto nella versione e formato del MDE
cioè qui in A03) e importare solo una parte dei oggetti, compattare
l'MDB, compilare il codice e tentare di creare un MDE. E così via fino
al punto quando occore l'errore.
Oppure fare in mode simile ma iniziare con l'intero MDB e riduciarlo
fino al punto quando funziona di creare l'MDE. Certo la compattazione
e compilazione del codice deve sempre funzionare per poter creare
un MDE. Vuol dire che sempre tutti oggetti e funzioni riferiti devono
essere presente. Puo darsi che con questi metodi è possibile di
trovare la causa del problema.
> Comunque non ho intenzione di impazzire di fronte a questo problema perchè
> mi pare che nel mio caso non vi siano alternative: mi tengo il file MDB
> così com'è! Possibile che mi debba andare sempre tutto storto?!?!?
> Mi chiedo seriamente se una cosa del genere sia capitata solo a me o a
> pochissimi altri ...............
Ho letto poche volte di problemi di questo tipo. Qualche volta
ho avuto l'impressione che con il messaggio non si tratta del
problema (e quindi della soluzione) descritta nella KB. Però è
difficile a dire con solo leggere le descrizioni.
--
HTH



title: Problema con la Creazione MDE.

text:

Ciao Karl,
non ho riprovato a creare il file MDE perchè non ho avuto tempo, in ogni
modo voglio specificare che il mio DB è diviso in FE-BE.
Mi sono ritrovata a lavorare con il DB (versione Access 2000) semplicemente
perchè il DB è nato 3 anni fa e la sua versione originaria è quella 2000, ho
visto che richiamandolo con Access 2003 viene mantenuta la sua versione
originaria non perchè sia io a forzarla.
Ora comunque rifaccio tutte le operazioni e ti faccio sapere.
    Ciao Rita


title: query con date

text:
Innanzitutto tanti saluti a tutto il Ng.
Il mio probblemino č il seguente:
devo semplicemente estrapolare da una tabella scadenze, tutte le date
antecedenti alla data di sistema piů 5 giorni.
Tanto semplice che non ci arrivo ....
Tante grazie ed ancora saluti a tutti


title: query con date

author: Pleiadi

text:
> Innanzitutto tanti saluti a tutto il Ng.
> Il mio probblemino è il seguente:
> devo semplicemente estrapolare da una tabella scadenze, tutte le date
> antecedenti alla data di sistema più 5 giorni.
> Tanto semplice che non ci arrivo ....
> Tante grazie ed ancora saluti a tutti
>
>
Cioè?
Alfio


title: query con date

author: Roberto da casa

text:
<
zan...@libero.it
> ha scritto nel messaggio
news:LnCf6.111307$ew1.6...@news.infostrada.it...
> Innanzitutto tanti saluti a tutto il Ng.
> Il mio probblemino è il seguente:
> devo semplicemente estrapolare da una tabella scadenze, tutte le date
> antecedenti alla data di sistema più 5 giorni.
> Tanto semplice che non ci arrivo ....
> Tante grazie ed ancora saluti a tutti
>
Nella riga criteri relativa al campo che porta la data di scadenza scrivi:
< Date() + 5
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com/index_new.html
---------------------------------------------


title: query con date

text:
Ho la tabella scadenze con i seguenti campi:
IDScadenza; Data_Sc; Descrizione_Sc; stato(concluso o meno).
Il mio scopo è di visualizzare tutte le scadenze da oggi a 5 giorni
(comprese le scadenze già passate ma non concluse)e per fare questo ho
creato una query, ma non riesco a creare un criterio di ricerca che
restituisca solo le scadenze da oggi a 5 gg...
saluti e grazie
"Pleiadi" <
za...@libero.it
> ha scritto nel messaggio
news:YBCf6.111474$ew1.6...@news.infostrada.it...



title: Invio e-mail con allegato pdf

author: Nicky

text:
So di toccare un argomento trito e ritrito e che sul sito comune posso
trovare vari metodi a disposizione...
Volevo solo sapere se, in base all'esperienza dei partecipanti a questo
NG, è "meglio" usare un metodo piuttosto che un altro nel mio caso
specifico.
La mia esigenza è inviare n e-mail (n può arrivare anche a 300-400) in
un ciclo for next con ciascuna un allegato pdf (diciamo 100kb max)
Il report è generato constestualmente nel ciclo for next.
non posso sapere a priori se è presente outlook o notes e posso avere
versioni differenti di access (92 2000 2003)
Volevo solo una dritta per non intraprendere una strada sbagliata.
Nicoletta


title: Invio e-mail con allegato pdf

text:
Nicky ha scritto:

Chi sviluppa senza sapere cosa ci sia dal Cliente sarebbe bene si
rendesse indipendente da tutto...!
Il metodo migliore è usare Dll o componenti esterni che si appoggiano
al Socket... senza obbligarti ad usare librerire incerte...!
Se hai VisialStudio  puoi usare Winsock, che personalmente è quello
che uso sempre con il quale si fà tutto....!
Ovviamente non è così semplice mandare via Mail come con MAPI o CDO,
ma trovi un mio demo completo funzionante...quì :
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=72
Se prendi questa strada non sbagli, in quanto devi solo distribuire
l'OCX e registrarlo, non avrai nessun problema o dipendenza da quanto
installato sulle macchine di nessuno.
Questo componente peraltro è usato quasi nella totalità degli
sviluppatori in VB proprio per le ragioni che ti ho evidenziato.
Ciao
@Alex


title: Invio e-mail con allegato pdf

text:
Alessandro Baraldi ha scritto:

Non ho visual studio, posso usarlo comunque?
Se si, dove acquisto il componente?
Nicoletta


title: stringhe a lunghezza zero

author: max

text:
Concateno 3 stringhe di tre differenti textbox in una textbox chiamata
"Me.DescrizioneCompleta" per un massimo di 50 caratteri, per� se nella prima
textbox inserisco 50 caratteri mi genera l'errore perch� i caratteri
risultano essere 53..
Come faccio a eliminare le stringhe a lunghezza zero sulla funzione
elencata?
Function descrcompl() As Boolean
stringa = 0
stringa = Len(Nz(Me.Descrizione & " ", "")) + Len(Nz(Me.Formato & " ", 0)) +
Len(Nz(Me.Colore & " ", 0))
If stringa > 50 Then
MsgBox "attenzione limite caratteri = 50", vbOKOnly
        descrcompl = True
Else
  Me.DescrizioneCompleta = Nz((Me.Descrizione + " "), Null) & Nz((Me.Formato
+ " "), Null) & Nz((Me.Colore + " "), Null)
  descrcompl = False
End If
End Function
Un grazie a tutti
Massimo


title: stringhe a lunghezza zero

author: Giovanni

text:
"max" <
mas...@inwind.it
> ha scritto nel messaggio
news:hbsb5d$p6s$1...@aioe.org...
> Concateno 3 stringhe di tre differenti textbox in una textbox chiamata
> "Me.DescrizioneCompleta" per un massimo di 50 caratteri, perï¿½ se nella
> prima textbox inserisco 50 caratteri mi genera l'errore perchï¿½ i caratteri
> risultano essere 53..
>
> Come faccio a eliminare le stringhe a lunghezza zero sulla funzione
> elencata?
>
>
>
> Function descrcompl() As Boolean
>
>
>
> stringa = 0
> stringa = Len(Nz(Me.Descrizione & " ", "")) + Len(Nz(Me.Formato & " ", 0))
> + Len(Nz(Me.Colore & " ", 0))
>
>
>
> If stringa > 50 Then
> MsgBox "attenzione limite caratteri = 50", vbOKOnly
>        descrcompl = True
>
>
>
> Else
>  Me.DescrizioneCompleta = Nz((Me.Descrizione + " "), Null) &
> Nz((Me.Formato + " "), Null) & Nz((Me.Colore + " "), Null)
>  descrcompl = False
>
>
>
> End If
>
>
>
> End Function
>
>
>
>
>
> Un grazie a tutti
>
> Massimo
>
Prima di sommarle, controlla se sono nulle, se non sono nulle le sommi
altrimenti no...


title: stringhe a lunghezza zero

text:
> Prima di sommarle, controlla se sono nulle, se non sono nulle le sommi
> altrimenti no...
Con una condizione If Then?


title: stringhe a lunghezza zero

author: Alessandro Cara

text:
max ha scritto:
> Concateno 3 stringhe di tre differenti textbox in una textbox chiamata
> "Me.DescrizioneCompleta" per un massimo di 50 caratteri, perï¿œ se nella prima
> textbox inserisco 50 caratteri mi genera l'errore perchï¿œ i caratteri
> risultano essere 53..
>
> Come faccio a eliminare le stringhe a lunghezza zero sulla funzione
> elencata?
>
>
>
> Function descrcompl() As Boolean
>
>
>
> stringa = 0
> stringa = Len(Nz(Me.Descrizione & " ", "")) + Len(Nz(Me.Formato & " ", 0)) +
> Len(Nz(Me.Colore & " ", 0))
>
>
>
> If stringa > 50 Then
> MsgBox "attenzione limite caratteri = 50", vbOKOnly
>         descrcompl = True
>
>
>
> Else
>   Me.DescrizioneCompleta = Nz((Me.Descrizione + " "), Null) & Nz((Me.Formato
> + " "), Null) & Nz((Me.Colore + " "), Null)
>   descrcompl = False
>
>
La questione e' che se inserisci piu' di 50 caratteri globalmente hai
l'errore
stringa = trim(left(controllo1 & controllo2 & controllo3 & space(50),50))
that's all
--
ac


title: stringhe a lunghezza zero

text:
"max" <
mas...@inwind.it
> ha scritto nel messaggio
news:hbsbm3$psq$1...@aioe.org...
>
>> Prima di sommarle, controlla se sono nulle, se non sono nulle le sommi
>> altrimenti no...
>
> Con una condizione If Then?
>
>
Function descrcompl() As Boolean
Dim A, B, C
if isnull(Len(Nz(Me.Descrizione & " ", ""))) then
    A=0
else
    A=Len(Nz(Me.Descrizione & " ", ""))
end if
if isnull(Len(Nz(Me.Formato & " ", 0))) then
    B=0
else
    B=Len(Nz(Me.Formato & " ", 0))
end if
if isnull(Len(Nz(Me.Colore & " ", 0))) then
    C=0
else
    C=Len(Nz(Me.Colore & " ", 0))
end if
stringa = 0
stringa = A+B+C
If stringa > 50 Then
MsgBox "attenzione limite caratteri = 50", vbOKOnly
        descrcompl = True
Else
  Me.DescrizioneCompleta = Nz((Me.Descrizione + " "), Null) & Nz((Me.Formato
+ " "), Null) & Nz((Me.Colore + " "), Null)
  descrcompl = False
End If
End Function
Prova cosï¿½...


title: stringhe a lunghezza zero

text:
>>
>>
>
> La questione e' che se inserisci piu' di 50 caratteri globalmente hai
> l'errore
>
> stringa = trim(left(controllo1 & controllo2 & controllo3 & space(50),50))
>
> that's all
> --
> ac
non devo inserire pi� di 50 caratteri ma se inserisco nella textbox
Me.Descrizione un articolo che contiene 50 caratteri, lasciando vuoti le
textbox Me.Formato e Me.Colore, il tutto non dovrebbe generare l'errore.


title: stringhe a lunghezza zero

author: Antonio

text:
"max" <
mas...@inwind.it
> ha scritto nel messaggio
news:hbselc$u1h$1...@aioe.org...

Io farei cos�:
Dim Area1 as string, Area2 as string, Area3 as string
Dim AreaCompleta as string
Area1 = trim$ (nz (me.controllo1))
Area2 = trim$ (nz (me.controllo2))
Area3 = trim$ (nz (me.controllo3))
AreaCompleta = left$ (trim$(Area1 & " " & Area2 & " " & Area3),50)
Comunque, se i 50 caratteri dipendono dalla dimensione di un campo di
tabella, per fare in modo che la routine funzioni anche se in un futuro tu
cambi la lunghezza del campo e ti dimentichi di cambiare il codice, l'ultima
istruzione sarebba meglio scriverla cos�:
AreaCompleta = left$ (trim$(Area1 & " " & Area2 & " " &
Area3),RecordSetTabella.Fields("CampoDellaTabella").FieldSize)
Ciao
Antonio


title: stringhe a lunghezza zero

text:
max ha scritto:
>>>
>> La questione e' che se inserisci piu' di 50 caratteri globalmente hai
>> l'errore
>>
>> stringa = trim(left(controllo1 & controllo2 & controllo3 & space(50),50))
>>
>> that's all
>> --
>> ac
>
> non devo inserire piï¿œ di 50 caratteri ma se inserisco nella textbox
> Me.Descrizione un articolo che contiene 50 caratteri, lasciando vuoti le
> textbox Me.Formato e Me.Colore, il tutto non dovrebbe generare l'errore.
>
>
>
>
E' esattamente quello che fa quell'istruzione
stringa = trim(controllo1 & " " & controllo2 & " " & controllo3)
if len(stringa) > 50 then
	msgbox "Orrore! Stringa eccede massimo"
else
	....istruzioni per l'ok
endif
--
ac


title: stringhe a lunghezza zero

text:
Grazie a tutti voi sono riuscito a realizzare la funzione........
Volevo capire se fosse possibile ridurre tutte le condizioni o se v� bene
cos�....
 Function descrcompl() As Boolean
Dim DescrizioneCompleta As String
Dim Stringa As Integer
Dim Stringa1 As String
Dim A, B, C, D, E, F, G As String
Stringa = 0
If IsNull(Me.Descrizione) Then
A = ""
Else
A = " "
End If
If IsNull(Me.Formato) Then
B = ""
Else
B = " "
End If
If IsNull(Me.Colore) Then
C = ""
Else
C = " "
End If
If IsNull(Me.Marchio) Then
D = ""
Else
D = " "
End If
If IsNull(Me.Serie) Then
E = ""
Else
E = " "
End If
If IsNull(Me.Scelta) Then
F = ""
Else
F = " " & "SC."
End If
If IsNull(Me.Tono) Then
G = ""
Else
G = " " & "T."
End If
Stringa1 = Trim(Me.Descrizione & B & Me.Formato & C & Me.Colore & D &
Me.Marchio1 & E & Me.Serie & F & Me.Scelta & G & Me.Tono)
Stringa = Len(Stringa1)
If Stringa > 50 Then
MsgBox "attenzione limite caratteri = 50", vbOKOnly
descrcompl = True
Else
Me.DescrizioneCompleta = Stringa1
descrcompl = False
End If
End Function
Grazie a tutti
Massimo


title: Esportare/Visualizzare tabelle di un file MDF (Sql Server)

author: Sandrobi

text:
Con Access è possibile fare quanto in oggetto? In ogni caso, che procedura
occorre eseguire?
--
Ciao, Sandrobi


author: Roberto da Parma

text:
"Sandrobi" <
sand...@tiscali.it
> ha scritto nel messaggio
news:49838b7c$0$834$4faf...@reader5.news.tin.it...

Controlla qui
http://www.dotnethell.it/forum/messages.aspx?ThreadID=26281
Ciao
--
Roberto da Parma


title: Maschere e file *.pdf

author: Infinito

text:
E' possibile visualizzare un file pdf in una maschera di Access?
Grazie Mille


title: Menu'........

author: Gianni

text:
salve a tutti una curiosità.......
È possibile in un db non visualizzare le barre standard ma visualizzare un
menu' personalzzato.......che sia viibile non solo nel compiuter in
questione ma anche in rete...?!?
Se si..... un suggerimento su come procedere grazie.
Gianni.


title: Menu'........

author: omnitow

text:
"Gianni" <
giian...@bluewin.ch
> ha scritto nel messaggio
news:3d303...@news.bluewin.ch...

strumenti/avvio/barra dei menu ed inserisci il nome del menu personalizzato
che vuoi visualizzare
omnitow


title: Menu'........

text:
"omnitow" <
omn...@libero.net
> ha scritto nel messaggio
news:ags0rt$qg2$1...@fe1.cs.interbusiness.it...

beh quello lo sapevo anchio ma ,il problema è che quando apri il db da un
alro compiuter la barra degli strumenti personalizzata và a farsi
friggere,spero di essere stato chiaro.....
grazie
Gianni.


title: Menu'........

text:
"Gianni" <
giian...@bluewin.ch
> ha scritto nel messaggio
news:3d31a...@news.bluewin.ch...

scusa non ci avevo pensato, in questi casi imposto delle routine per
caricare i menu nel caso non siano gia stati caricati, per poter utilizzare
scrivere routine del genere devi impostare il riferimento alla libreria di
office 9.0, per informazioni guarda la guida in linea, l'argomento è
ovviamente troppo vasto da spiegare, oppure puoi aggiungere i menu a mano in
ogni PC
ciao omnitow