title: Rimuoviamo le linee commento?

text:
> "Tony" [...]:
> > "Maurizio Borrelli" [...]:
> >     Nel caso della creazione di un MDE credo che vengano rimosse.
> No, non vengono rimosse.
    Scusa ma sono curioso di natura. Su cosa ti basi per dire che non
vengono rimosse?
> > Ma,
> > rimosse o meno, il codice non dovrebbe essere leggibile. Mi confermi?
> In verità anche in un .mdb aperto con notepad ci leggi poco e niente, ma
in
> effetti la pulizia delle righe commento è legata proprio all'esigenza di
> distribuire un .mdb.
    Questo lo capisco.
[...]
> >         Visualizza > Barre degli strumenti > Personalizza...
> >         Comandi
> >         Modifica
> >         Rimuovi commento
> Incredibile, come ho fatto a non notarlo ... adesso vado a vedere ;-)
    Facci sapere, grazie.
> >     Attenzione perche' pare faccia qualche puttanata, in casi
particolari.
[...]



title: Rimuoviamo le linee commento?

author: Tony

text:
"Maurizio Borrelli"
> > Ne sapete qualcosa?
>
>         Visualizza > Barre degli strumenti > Personalizza...
>         Comandi
>         Modifica
>         Rimuovi commento
Ehmm ... non la trovo: può essere che tu stia utilizzando la versione 'XP e
non ci fosse in A '2000?
In ogni caso se doveste tirar fuori dal cilindro una proprietà per
l'identificazione della riga a Design Time postate, postate  ;-))
Ciao: Tony


title: Rimuoviamo le linee commento?

author: Maurizio Borrelli

text:
> "Tony" [...]:
> > "Maurizio Borrelli" [...]:
> >         Visualizza > Barre degli strumenti > Personalizza...
> >         Comandi
> >         Modifica
> >         Rimuovi commento
> Ehmm ... non la trovo: può essere che tu stia utilizzando la versione 'XP
e
> non ci fosse in A '2000?
    Meno male che non l'hai trovata...
    Sai cosa fa effettivamente? Rimuove l'apice.
    Prima:
        ' Commento
    Dopo:
        Commento
ROTFL
    Su questo pc ho installato Ac2k e VB6SP5. Puo' darsi che io abbia quei
comandi "grazie" a vb6. Boh? Non ho approfondito queste faccende.
> In ogni caso se doveste tirar fuori dal cilindro una proprietà per
> l'identificazione della riga a Design Time postate, postate  ;-))
    Se e' solo questione della riga allora potrebbe andar bene questo
abbozzo. Se invece si tratta dei commenti del tipo:
    <codice> : REM <commento>
-oppure-
    <codice> ' <commento>
non ci ho nemmeno pensato a scrivere qualcosa.
Public Sub DebugPrintAllModulesLinesUncommented()
  Dim lModuleIndex  As Long
  Dim oAcModule     As Access.Module
  Dim lLineIndex    As Long
  Dim sLine         As String
  Dim sTrimmedLine  As String
  With CurrentProject.AllModules
    For lModuleIndex = 0 To .Count - 1
      With .Item(lModuleIndex)
        DoCmd.OpenModule .Name
        Set oAcModule = Modules(.Name)
      End With
      With oAcModule
        Debug.Print .Name
        For lLineIndex = 1 To .CountOfLines
          sLine = .Lines(lLineIndex, 1)
          sTrimmedLine = Trim$(sLine)
          If (Len(sTrimmedLine) = 0) Then
            ' NO PRINT
          Else
            If ( _
                (Left$(sTrimmedLine, 1) = "'") _
                Or _
                (UCase$(Left$(sTrimmedLine, 4)) = "REM ") _
            ) Then
              ' NO PRINT
            Else
              Debug.Print sLine
            End If
          End If
        Next
        DoCmd.Close acModule, .Name
      End With
      Set oAcModule = Nothing
    Next
  End With
End Sub



title: Rimuoviamo le linee commento?

text:
"Maurizio Borrelli"
>     Meno male che non l'hai trovata...
>
>     Sai cosa fa effettivamente? Rimuove l'apice.
>
>     Prima:
>
>         ' Commento
>
>     Dopo:
>
>         Commento
>
> ROTFL
Olииииииииииии  ;-D
>     Se e' solo questione della riga allora potrebbe andar bene questo
> abbozzo.
> Public Sub DebugPrintAllModulesLinesUncommented()

Eh, eh ... non и dissimile dal codice che un collega ha preparato stamane,
con i rischi che potrebbe comportare.
Ovviamente il massimo sarebbe l'identificazione a botta sicura stile VBE,
comunque proverт certosinamente queste soluzioni, puт darsi che vadano
benone.
Ti ringrazio Maurizio.
Ciao, Tony


title: Rimuoviamo le linee commento?

text:
"Maurizio Borrelli"
> > >     Nel caso della creazione di un MDE credo che vengano rimosse.
> > No, non vengono rimosse.
>
>     Scusa ma sono curioso di natura. Su cosa ti basi per dire che non
> vengono rimosse?
Crei un .mdb con un solo modulo di codice e lo riempi di righe commento.
Crei il relativo .mde
Apri con Notepad ... se le ritrovi ho ragione io  ;-D
Ciao: Tony


title: Rimuoviamo le linee commento?

text:
> "Tony" [...]:
> > "Maurizio Borrelli" [...]:
> >     Se e' solo questione della riga allora potrebbe andar bene questo
> > abbozzo.
> > Public Sub DebugPrintAllModulesLinesUncommented()
[...]
> Eh, eh ... non è dissimile dal codice che un collega ha preparato stamane,
    Quelli so' gli oggetti... :-)
> con i rischi che potrebbe comportare.
    Infatti. Io quel procedimento l'ho usato solo per stampe.
> Ovviamente il massimo sarebbe l'identificazione a botta sicura stile VBE,
> comunque proverò certosinamente queste soluzioni, può darsi che vadano
> benone.
        Property VBE As VBE
            sola lettura
            Membro di Access.Application
    Ho provato ad aggiungere ai riferimenti:
        Library VBIDE
            C:\Programmi\Microsoft Visual Studio\VB98\VB6EXT.OLB
            Microsoft Visual Basic 6.0 Extensibility
che contiene:
        Class VBE
            Membro di VBIDE
            L'oggetto di primo livello che contiene tutti gli altri
            oggetti e insiemi rappresentati in Visual Basic,
            Applications Edition.
ma come dicevo ho installato vb6. Potrebbe essere pero' che questa
possibilita' esista con MSOD e non con MSO Prof.



title: Rimuoviamo le linee commento?

author: Rob

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:akdtg4$1hourf$1...@ID-52090.news.dfncis.de...
CUT
>     <codice> ' <commento>
>
> non ci ho nemmeno pensato a scrivere qualcosa.
>
Non pensare che io pensi che tu non ci abbia gia' pensato ma se trovi
l'apice in una funzione tipo...
var = Dlookup("[Campo]", "Tabella", "CampoTrallalla = '" & Me.Trallallero &
"'")
cheffai?
e ci saranno sicuramente innumerevoli altri casi in cui l'apice e' incluso
in altro codice quindi non e' sempre vera :
<codice> ' <commento>
dovresti prevedere tutti i casi in cui....
... lassa star!
Tieniti i commenti che anche se uno li vede con il Notepad non se ne fa un
gran che.
Mandi Rob.


title: Rimuoviamo le linee commento?

text:
> "Rob" [...]:
> > "Maurizio Borrelli" [...]:
> >     <codice> ' <commento>
> > non ci ho nemmeno pensato a scrivere qualcosa.
> Non pensare che io pensi che tu non ci abbia gia' pensato ma se trovi
> l'apice in una funzione tipo...
[...]
> dovresti prevedere tutti i casi in cui....
> ... lassa star!
> Tieniti i commenti che anche se uno li vede con il Notepad non se ne fa un
> gran che.
    Infatti. Intendevo proprio che non ci penso neppure.



title: Rimuoviamo le linee commento?

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ake3n3$1hcb52$1...@ID-52090.news.dfncis.de...
CUT
> Ciao :-)
> Maurizio
> --------
> ?SPQR(C)
>  X
> --------
Notte!


title: Rimuoviamo le linee commento?

text:
"Maurizio Borrelli"
> > Ovviamente il massimo sarebbe l'identificazione a botta sicura stile
VBE,
> > comunque proverò certosinamente queste soluzioni, può darsi che vadano
> > benone.
>
>         Property VBE As VBE
>             sola lettura
>             Membro di Access.Application
>
>     Ho provato ad aggiungere ai riferimenti:
>
>         Library VBIDE
>             C:\Programmi\Microsoft Visual Studio\VB98\VB6EXT.OLB
>             Microsoft Visual Basic 6.0 Extensibility
>
> che contiene:
>
>         Class VBE
>             Membro di VBIDE
>             L'oggetto di primo livello che contiene tutti gli altri
>             oggetti e insiemi rappresentati in Visual Basic,
>             Applications Edition.
>
> ma come dicevo ho installato vb6. Potrebbe essere pero' che questa
> possibilita' esista con MSOD e non con MSO Prof.
Ne sai una più del diavolo ;-)
Domattina vediamo che si può fa.
Ciao, Tony


title: Rimuoviamo le linee commento?

text:
> "Tony" [...]:
> > "Maurizio Borrelli" [...]:

    Ok. Io l'ho fatto ( AC2K ). E tu?



title: Scansire e archiviare un Cdrom o una serie di directory

author: Claudio

text:
Saluti a tutto il NG !
Torno sull'argomento circa la possibilitą di scansire e archiviare in un
database access il contenuto di un cd o di una o piu directory su HD
(directory, sottodirectory e files) .
Ho provato le soluzioni presenti nei post precedenti ma non sono riuscito,
per mia incompetenza, a farle funzionare.
Sareste cosi gentili da indirizzarmi su questo argomento dato che devo
archiviare una mole di CD non indifferente?
Grazie per l'aiuto che vorrete darmi!
Ciao!
Paolo


text:
"Claudio" <
hac...@fastwebnet.it
> ha scritto nel messaggio
news:OCZP9.6772$lj5....@tornado.fastwebnet.it...
> Saluti a tutto il NG !
>
> Torno sull'argomento circa la possibilità di scansire e archiviare in un
> database access il contenuto di un cd o di una o piu directory su HD
> (directory, sottodirectory e files) .
> Ho provato le soluzioni presenti nei post precedenti ma non sono riuscito,
> per mia incompetenza, a farle funzionare.
>
> Sareste cosi gentili da indirizzarmi su questo argomento dato che devo
> archiviare una mole di CD non indifferente?
>
> Grazie per l'aiuto che vorrete darmi!
>
> Ciao!
>
> Paolo
>
Prova a vedere se ti è utile Application.FileSerch e i vari metodi ......!
@Alex.


author: Carlo Costarella

text:
"Claudio" <
hac...@fastwebnet.it
> ha scritto nel messaggio
news:OCZP9.6772$lj5....@tornado.fastwebnet.it...
> Saluti a tutto il NG !
>
> Torno sull'argomento circa la possibilità di scansire e archiviare in un
> database access il contenuto di un cd o di una o piu directory su HD
> (directory, sottodirectory e files) .
> Ho provato le soluzioni presenti nei post precedenti ma non sono riuscito,
> per mia incompetenza, a farle funzionare.
>
> Sareste cosi gentili da indirizzarmi su questo argomento dato che devo
> archiviare una mole di CD non indifferente?
>
> Grazie per l'aiuto che vorrete darmi!
>
> Ciao!
>
> Paolo
>
>
Ciao Paolo.
Se ho ben capito hai dei db su cdrom che vuoi usare nel senso di usare le
tabelle in essi contenute.
Se è così credo che il suggerimento di Roberto sia più che giusto: allega al
db corrente le tabelle provenienti dal o dai db su cdrom.
E' chiaro che le tabelle allegate saranno in sola lettura.
Se non ho capito posta una spiegazione con un esempio concreto di quello che
ti aspetti di ottenere.
Ciao, Carlo


text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> ha scritto nel
messaggio news:3f%P9.39805$Q%4.12...@news1.tin.it...

Cari Carlo e @Alex...purtroppo mi sono spiegato male, chiedo venia.....,
intendevo una soluzione circa la catalogazione del contenuto di CDRom
contenenti dati di vario tipo e non database. (adesso comunque mi studio un
po "Application.FileSearch").
Ovvero mi piacerebbe che mi effettuasse la scansione del cd e mi archiviasse
in una tabella directory e loro contenuto  (con un IDcd per catalogarli) per
poter non ricercare "a memoria" in una marea di cdrom il file che mi
interessa recuperare.
Ogni vostra saggia indicazione è bene accetta anche perche capirete che
trovare qualcosa oggi per me è un impresa!
Come da post precedente ....Buon Anno! e come sempre ...Grazie!
Paolo
Come da post


title: Ma si puo' usare TsPlus su Windows10pro ???

author: RobertoA

text:
I vari sistemi di server terminal a volte risolvono dal punto di vista
tecnico il problema dell'utilizzo da remoto di procedure software
installate su pc aziendali
Ma dal punto di vista formale, 'sti sistemi, sono utilizzabili su
versioni desktop dei sistemi operativi Microsoft ?
Vorrei capire se i vari XpUnlimited, Aads, TsPlus, installati su Windows
7/8/10 pro, sono legalmente utilizzabili
Qualcuno ha mai approfondito la questione?


author: BFS

text:

Lo usavo e l'ho sempre considerato illegale come sistema.
Da qualche anno ai clienti che vogliono lavorare da remoto impongo
windows server + licenze terminal. Costa un salasso ma almeno non ho rogne.

Sono andato a riguardare la guida di AADS e vedo che hanno aggiunto
questa pagina

https://www.aads-worldwide.hk/faqs/scr/Microsoft_Windows_Licenses.html

dove mi par chiaro che serve avere una licenza valida per ogni utente
che si connette.
Quindi se hai 1 PC con Win 7  e ti ci colleghi con 5 user differenti da
5 diversi dispositivi , dovresti avere 5 licenze W7 anche se ti colleghi
da 5 tablet android o da thin client

Per il discorso invece server...glissano alla grande

"We can unfortunately not inform you in an "easy, simple" way about the
License Terms for Microsoft Windows Server, because those License Terms
are far to complicated for this FAQ to describe them. Advice on
Microsoft Windows Server licensing is a special job in itself."

BFS


text:

Eh, ma il punto non e' quanto dicono quelli di Aads ma quanto dicono
quelli di Microsoft
Personalmente ho provato a telefonare al servizio clienti Microsoft ma
non si sono voluti sbilanciare ne' fornire documentazione per chiarire i
dubbi esposti


text:
Il 28/03/2018 13:22, BFS ha scritto:

Ma col server terminal Microsoft risolvi anche il collegamento via  browser?


text:

non lo uso da anni ma su windwos server bastava abilitare l'accesso via
webbrowser
poi se non ricordo male inserire nel browser ip:porta/tsweb
forse funziona solo con internet explorer

non lo uso più perchè lo trovo inutile essendoci in ogni dispositivo
windows/ios/androis/thin client un normale software di connessione rdp

ciao
BFS


text:

Capisco, quindi non usi la possibilita' di far accedere a programmi via
browser, senza installare niente sul client
Mi sembrava una possibilita' molto molto interessante, che consentiva di
fornire al cliente un pc da collegare in rete, gia' con tutto
confezionato dentro
La 'nessuna installazione' lato client mi sembra una caratteristica che
permette i svincolarsi da problemi delle singole postazioni lavoro


text:

su windows c'è gia presente di suo il software rdp di
connessione..quindi nel 99% dei casi sono gia operativi
per mondo android e ios si tratta di scaricare una app in 10 secondi

ciao


text:

Sicuramente, un client rdp non si nega a nessuno
Certo che, se la stessa cosa si potesse fare senza
installare/configurare niente sarebbe ancor meglio
Ma mi sto accorgendo che via browser alcune cose non vengono bene-bene
Tipo la firma operatore sul tablet (strisciando il dito entra in
funzione lo scorrimento del browser ed il dito non segna niente)
Come sempre, ci sono pro e contro, da valutare caso per caso
Pasiensa, speravo nella solussione universale
Mi sa che mi tocca cercare ancora


title: inserire valore in una tabella

author: BB

text:
ho una tabella contenente centinaia di record, ho aggiunto un campo a tale
tabella, in questo campo e per tutti i record devo inserire un valore
sempre uguale, come fare per non farlo manualmente con copia/incolla ma in
un'unica soluzione?
grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: inserire valore in una tabella

text:
"BB" <
onof...@tin.it
> ha scritto nel messaggio
news:cc0d5c$kgp$1...@news.newsland.it...

prova con questa query:
UPDATE Tabella1 SET Tabella1.Campo1 = "Quello_che_vuoi";
ciao e fammi sapere.


title: inserire valore in una tabella

author: MA

text:
"BB" <
onof...@tin.it
> ha scritto nel messaggio
news:cc0d5c$kgp$1...@news.newsland.it...

Query di aggiornamento
MAssimiliano


title: inserire valore in una tabella

text:
Giovanni_A ha scritto:

> prova con questa query:

> ciao e fammi sapere.
grazie!
ho inserito il codice in una query di aggiornamento e funziona!



title: inserire valore in una tabella

text:
MA ha scritto:



title: Recordset.FindFirst

text:
Buon giorno a tutti, volevo chiedervi se anche a voi è successo che
convertendo un vecchio db in un db 2013 il metodo .FindFirst non venisse
più riconosciuto. Ho notato che non c'è più tra i riferimenti la DAO 3.6
e provando ad attivarla non me lo permette. Sicuramente serve attivare
un altro riferimento ma non so quale. Vi sarei molto grato se poteste
aiutarmi. Grazie


title: Recordset.FindFirst

author: Bruno Campanini

text:
it.comp.appl.access brought next idea :

Dovrebbe essere (vado a memoria):
Microsoft Office 15.0 Access database engine Object Library

Bruno


title: arrotondamento alle decine

author: Ivan da casa

text:
in una query vorrei ottenere un arrotondamento della cifra ( adesso intera)
ai 10 euro immediatamente superiori.
Ad esempio
3427 --> 3430
121  -->  130
ho provato con la funzione ROUND, ma non riesco a concertare il risultato.
ammettendo che io abbia un campo [prezzo] che vorrei 'arrotondare' ai 10
euro superiori, come deve essere la fetta di codice riguardante quel campo?
INT((ROUND([prezzo];1)/10)*10)
mi sembra troppo complicata, esiste un metodo più semplice?
Ivan
PS
per errore avevo postato lo stesso quesito su office.excel ed ho anche
ottenuto una risposta corretta.
Peccato che non la possa usare in una query!
IvanDaBologna


title: arrotondamento alle decine

author: Alessandro Cara

text:

seeee... si fa presto a dire arrotondameto
cfr
www.donkarl.com/it
 Faq 2.1
--
ac


title: arrotondamento alle decine

text:
"Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio
news:yn%hg.14980
[CUT]
>
> seeee... si fa presto a dire arrotondameto
> cfr
www.donkarl.com/it
 Faq 2.1
> --
> ac
>
ORCA! potevo fare una domandina più semplice!  LOL ;))
grazie, studio e applico!
Ivan


title: arrotondamento alle decine

text:
"Ivan da casa" <
ivanSENZAQ...@tin.it
> ha scritto nel messaggio
news:44887efa$0$36937$4faf...@reader3.news.tin.it...

sono arrivto ad un buon compromesso, allego la stringa SQL creata solo per
provare. Basta cambiare il valore in [base] per vedere se il calcolo è
corretto.
SELECT 141 AS base, IIf([base] Mod 10=0,[base],Int([base]/10+1)*10) AS uno
FROM doveTiPare;
però è una vera complicazione non avere una funzione bell'e pronta in
Access.
IvanDaCasa


title: label

author: Paolo

text:
Nel report rptBancaItalia vorrei non visualizzare
la presenza di tre etichette denominate
lbl_01, lbl_02, lbl_03 quando il controllo txtCausale risulta True,
vorrei visualizzare le etichette quando invece
il controllo txtNominativo risulta True.
La tabella tblPagamenti è l'origine dei controlli.
Il comando di stampa del report si verifica a mezzo del
pulsante cmdStampa nella form frmPagamenti.
ciao, Paolo


title: label

author: Roberto dal portatile

text:
"Paolo" <***
bjh...@tin.it
> ha scritto nel messaggio
news:2KmT7.12027$o9.5...@news1.tin.it...

E se txtCausale risulta True e contemporaneamente txtNominativo risulta
True, cosa devi fare?
Visualizzi solo le label dispari? :-)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: label

text:
> > Nel report rptBancaItalia vorrei non visualizzare
> > la presenza di tre etichette denominate
> > lbl_01, lbl_02, lbl_03 quando il controllo txtCausale risulta True,
> > vorrei visualizzare le etichette quando invece
> > il controllo txtNominativo risulta True.
> > La tabella tblPagamenti è l'origine dei controlli.
> > Il comando di stampa del report si verifica a mezzo del
> > pulsante cmdStampa nella form frmPagamenti.
> >
> > ciao, Paolo
> >
>
> E se txtCausale risulta True e contemporaneamente txtNominativo risulta
> True, cosa devi fare?
> Visualizzi solo le label dispari? :-)
>
> --
> Roberto
>
Giusto, nella form frmPagamenti deve risultare se
txtCausale True allora txtNominativo False o
txtCausale False allora txtNominativo True
ad ogni modo devo visualizzare le tre etichette quando
txtNominativo = true
txtCausale = False
che devo fare
ciao, Paolo


title: label

text:
"Paolo" <***
bjh...@tin.it
> ha scritto nel messaggio
news:EcqT7.13082$o9.5...@news1.tin.it...

Sperando di averci capito qualcosa.
Se txtNominativo  e txtCausale sono due controlli di tipo Si/No di una
maschera chiamata frmPagamenti.
Se la maschera frmPagamenti resta aperta durante la stampa del report.
Se le labels lbl_01, lbl_02, lbl_03 sono contenute nel corpo del report.
Se dette labels vanno visualizzate SOLAMENTE se txtNominativo è True e
contemporaneamente txtCausale è False.
A fronte dell'evento "Su formattazione" della sezione Corpo del report prova
a generare il seguente codice VBA:
If Forms!frmPagamenti!txtNominativo = True And Forms!frmPagamenti!txtCausale
= False Then
    Me!lbl_01.Visible = True
    Me!lbl_02.Visible = True
    Me!lbl_03.Visible = True
Else
    Me!lbl_01.Visible = False
    Me!lbl_02.Visible = False
    Me!lbl_03.Visible = False
End If



title: Asincronia? (anche per x Antonio Bisio)

author: LG

text:
Solo 4 punti! Dai, non sono poi tanti, sembrano lunghi ma e' solo per
essere chiaro.
1.
Faccio delle modifiche ad uno o piu' record (update e addnew) di una
tabella; subito dopo, nel programma, c'e'l'istruzione di requery della
lista di riepilogo di tutta la tabella (piccola) o di una
sottomaschera col suo  foglio dati. Ebbene, la riscrittura parte, e
mentre viene completata parte anche in parallelo l'istruzione di
requery, con evidenti esiti di sfasamento (ad es. mi compare tutta la
lista riepilogo con scritto "#Eliminato" in tutte le colonne e in
tutte o in parte delle righe). Succede sia in locale (CurrentDb) sia
in client-server.
Altro caso: il click su un bottone esegue DoCMD.OpenForm di una
mascherina, seguito da un IF su un campo della maschera di partenza in
cui, da dentro la maschera aperta,  immetto dall'esterno un valore. La
maschera da aprire parte (inizia il caricamento) ma contemporaneamente
(o con insignificante ritardo) parte anche l'IF, che ovviamente non
trova ancora il valore da testare.
Come posso eliminare queste asincronie? Voglio semplicemente  che il
Sistema Operativo termini PRIMA le operazioni che fa partire in
parallelo, e solo POI prosegua nel programma; o almeno conoscere un
parametro da testare per sapere quando ha finito.
Ho provato SetOptions ma i parametri citati (dbEsclusiveAsyncDelay,
dbSharedAsyncDelay, dbImplicitCommitSync, ammesso siano quelli che
servono) non sono riconosciuti dal mio Access (eppure credo di avere
la versione 97).
Ho anche provato a modificare i parametri di Jet 3,5 sul registro di
configurazione di W95, ma - salvo errori - non ho ottenuto risultati
(a meno che non dovessi chiudere e far ripartire W.).
Ho anche provato Begin/End Transaction, dbFlashCache e Idle,  ma
niente.
Mi resta solo da provare alla neuro, dove finiro' se non mi aiutate,
giacche'  queste asincronie mi stanno stremando! Possibile che non
abbiate di questi problemi? Datemi pure dell'ignorante.
2.
Per BISIO: ti ringrazio molto per la risposta che mi avevi dato sulla
citazione di una casella di un FD sottomaschera. Non mi hai pero'
detto - se hai ancora pazienza - come posso fare, partendo dalla
casella puntata, tornare a programma col mouse a fuoco da dove ero
partito, in risposta al click su un bottone . Se rido' il fuoco alla
sottomaschera, si posiziona all'inizio-alto-sinistra, facendo nel caso
scorrere orizzontalmente le colonne per portarsi  li' (e facendo
cadere fuori dai limiti della finestra la colonna da cui ero partito).
Il nome della casella da cui ho cliccato sul bottone e' corrente,
cioe' non fisso, per cui non posso citarlo in modo esplicito (o no?).
In pratica: al click dell'utente sul bottone, il programma deve
spostare il contenuto della casella (che sulla sottomaschera era
puntata) in un campo della maschera, mettere nella casella un altro
valore e ripuntarla.
3.
Visto che l'appetito vien mangiando, ecco subito un problema
correlato: come posso far scorrere a programma il fuoco su tutte le
caselle di un foglio dati, colonna per colonna, e - all'interno di
essa - riga per riga?
4.
 Lavorandone la struttura, un mdb (praticamente un cliente di solo
software) mi si e' ingolfato a 51megabyte; compattato si e' ridotto a
10mega. Allora ho aperto un nuovo mdb e pazientemente (un po' come voi
che siete arrivati a leggere fin qui), maschera per maschera, report
per report etc., ci ho copiato dentro tutto. Risultato 2mega e mezzo.
Secondo voi, in questa copia puo' mancare qualcosa? Non c'e' una
opzione di Access con cui eliminare in modo piu' rapido
l'ingolfamento, "lo sporco" (presumo tenuto solo per avere la
possibilita' di ripristino del database -  o no?).
Grazie mille agli intervenuti.
LG


title: Asincronia? (anche per x Antonio Bisio)

author: Antonio Biso

text:
LG <
lugu...@tiscalinet.it
> wrote in message
3c4488ed...@news.tiscalinet.it...
> Solo 4 punti! Dai, non sono poi tanti, sembrano lunghi ma e' solo per
> essere chiaro.
>
> 1.
> Faccio delle modifiche ad uno o piu' record (update e addnew) di una
> tabella; subito dopo, nel programma, c'e'l'istruzione di requery della
> lista di riepilogo di tutta la tabella (piccola) o di una
> sottomaschera col suo  foglio dati. Ebbene, la riscrittura parte, e
> mentre viene completata parte anche in parallelo l'istruzione di
> requery, con evidenti esiti di sfasamento (ad es. mi compare tutta la
> lista riepilogo con scritto "#Eliminato" in tutte le colonne e in
> tutte o in parte delle righe). Succede sia in locale (CurrentDb) sia
> in client-server.
Metti un docmd.echo false all'inizio e un docmd.echo true alla fine dei vari
requery
> Altro caso: il click su un bottone esegue DoCMD.OpenForm di una
> mascherina, seguito da un IF su un campo della maschera di partenza in
> cui, da dentro la maschera aperta,  immetto dall'esterno un valore. La
> maschera da aprire parte (inizia il caricamento) ma contemporaneamente
> (o con insignificante ritardo) parte anche l'IF, che ovviamente non
> trova ancora il valore da testare.
Non ho capito questo
> 2.
> Per BISIO:
^^^^^^^^^^^^^
BisIo... Sigh...
>  ti ringrazio molto per la risposta che mi avevi dato sulla
> citazione di una casella di un FD sottomaschera. Non mi hai pero'
> detto - se hai ancora pazienza - come posso fare, partendo dalla
> casella puntata, tornare a programma col mouse a fuoco da dove ero
> partito, in risposta al click su un bottone . Se rido' il fuoco alla
> sottomaschera, si posiziona all'inizio-alto-sinistra, facendo nel caso
> scorrere orizzontalmente le colonne per portarsi  li' (e facendo
> cadere fuori dai limiti della finestra la colonna da cui ero partito).
> Il nome della casella da cui ho cliccato sul bottone e' corrente,
> cioe' non fisso, per cui non posso citarlo in modo esplicito (o no?).
> In pratica: al click dell'utente sul bottone, il programma deve
> spostare il contenuto della casella (che sulla sottomaschera era
> puntata) in un campo della maschera, mettere nella casella un altro
> valore e ripuntarla.
Non ricordo bene il problema e non so se ho capito. Però in un caso simile
una volta risolsi così:
Al clic su uno dei campi mi salvavo in un controllo nascosto un riferimento
alla riga univoco, magari l'ID. A questo punto, al clic del pulsante, per
tornare a quella riga, da codice mi posizionavo sul primo record con
docmd.gotorecord acfirst. Quindi facevo un ciclo sui record fino a trovare
quello col valore ID salvato. A questo punto ero sulla riga giusta. Il ciclo
lo facevo coll'echo disattivato se no si vedeva lo sfarfallio, poi rimettevo
l'echo...
Antonio


title: Tasso d'interesse

text:
sull'origine del controllo tasso ho inserito questa espressione
=Left(100*[Interesse]/[Numeri];4)
tutto Ok se il tasso è > di 0
ma se il tasso è < di 0 si visualizza 4,89 anzichè 0,04
ho necessità di troncare i numeri dopo le due cifre decimali
cosa devo fare ???
ciao, paolo


title: Tasso d'interesse

author: Brunix

text:
Eccoti la formula generale per avere numeri con due cifre decimali...
tasso = format$(tasso, "0.00")
nel tuo caso la formula da inserire sull'origine del controllo tasso
dovrebbe essere:
=Format$(Left(100*[Interesse]/[Numeri];4), "0.00")
Fammi sapere
Ciao
Brunix
Paolo <***
bjh...@tin.it
> wrote in message
mivob.74089$e5.27...@news1.tin.it...



title: Tasso d'interesse

text:
CUT
grazie
la tua idea mi ha permesso di utilizzare l'espressione in questo modo
e risolvere il problema
=Left(Format$(100*[Interesse]/[Numeri];"0,000");4)
Brunix <
dym...@libero.it
> wrote in message
NdLob.83486$e6.30...@twister2.libero.it...



title: [OT] Controllo digitalizzazione immagine Kodak

author: Federico Luciani

text:
Ciao a tutti,
sto cercando di utilizzare (in access) il controllo per la digitalizzazione
delle immagini (imgscan.ocx) e gli altri della stessa serie, forniti con
windows 98.
Sono +o- riuscito a fare quello che volevo:
- scansione
- salvataggio in formato TIF RGB24
  imgEdit.SaveAs imgAdmin.Image, wiFileTypeTIFF, wiPageTypeRGB24
il problema e' che, per motivi di copyright (pare), non e' possibile utilizzare
la compressione LZW, inoltre non e' possibile salvare in formato jpg.
in definitiva, quindi, si ottengo dei file di grosse dimensioni; troppo grossi.
qualcuno li ha usati e mi conferma quanto detto?
qualcuno sa consigliarmi qualche altro controllo per poter fare scansioni
(twain), che invece permette di salvare in tif compresso? free e' meglio, ma
non e' un problema.
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: He He, Stavolta il nottambulo sono io!

text:
A parte il subjet un po' fuori tema, volevo sapere se esiste un manuale
*italiano* che mi inizi ad HTML Help Workshop. Ho fatto una ricerca fra le
pubblicazioni MS Press: Nisba! :-(
PS. Non è 'sto problema che mi tiene sveglio, che sia chiaro!
Vive cordialità.


title: [VBA]Eventi Form

text:
Domanda difficile...
Ho una Form(TEST) che può essere usata sia come Form che come SubForm,
ma in entrambi i casi viene
legata ad una Form MASTER dalla quale eredita Eventi.
Se usata come SubForm si auto configura come si vede nel codice sotto,
se usata come Form(Esterna) su Load della Form Master, assegno la
dipendenza:
' =============================================================
		CODE MASTER(ESTERNA)
' =============================================================
Private Sub Form_Load()
   Docmd.OpenForm "TEST"
   Forms!Test.SetMaster Me
End Sub
' =============================================================
		CODE Form_TEST
' =============================================================
Private WithEvents mF as Access.Form
Private Sub Form_Load()
   If IsSubForm(Me) Then Call SetMaster(Me.Parent)
End Sub
Public Sub SetMaster(frm As Access.Form)
    Set mF=frm
    With mF
       .BeforeUpdate = "[Event procedure]"
       .OnDirty="[Event procedure]"
    End With
End Sub
Private Sub Form_BeforeUpdate(Cancel As Integer)
..... fa qualcosa
End Sub
Private Sub Form_Dirty(Cancel As Integer)
.... fa qualcosa
End Sub
' =============================================================
		END CODE
' =============================================================
Ora se la mia Form(TEST) è SubForm nel momento in cui la MASTER è in
EDIT
e mi sposto sulla SubForm(TEST) viene generato il SALVA, quindi
l'evento BeforeUpdate si attiva e posso
intercettarlo.
Se la stessa cosa la faccio con Form(TEST) esterna, quindi se la
MASTER è in EDIT e mi sposto
sulla mia Form(TEST), l'evento di BeforeUpdate(Master) non viene
generato.
Aggiungo che questo è ovvio e corretto, ma io volevo trovare un modo
per forzare il salvataggio a questo punto...
Ho pensato a forzare il Salva dalla MASTER su GotFocus della
Form(TEST)... ma non mi piace moltissimo e non funziona molto bene...
IDEEE....
@Alex


title: [VBA]Eventi Form

text:
.....

RISOLTO, mi do un pò del pollo forse ho perso un pò la mano....

Il problemi sono 3 di base:

1) La form esterna(TEST) non deve essere Popup, in qunato si dissocia
dagli oggetti legati alla Access(MDI) di conseguenza la Form(Master)
non perde lo stato ATTIVO.
2) Se la Form(TEST) non riceve il FOCUS non la Form(Master) non perde
lo stato ATTIVO.
3) Se si attiva un controllo interno alla Form(TEST) senza prima
attivare la Form(TEST), e questo avviene sempre se si preme un Button
o un Controllo senza aver Cliccato la CAPTION/CORPO ecc... la
Form(Master) non perde lo stato ATTIVO

SOLUZIONI

1) POPUP=FALSE
2) Su Deactivate della Form(MASTER) forzo il Salva che genera il
BeforeUpdate che posso intercettare...
3) Su Click del Button/Controllo della Form(TEST) forzo il Focus della
Form(Test) questo genera il Deactivate della Form(MASTER) e di
conseguenza il BeforeUpdate...

Saluti
@Alex


title: Rotellina mouse (scroll)

author: Volo 61

text:
Come faccio ha disattivare la rotellina del mouse in modo che non si passi
da un campo all'altro nelle maschere senza disattivare la funzione dal
driver del mouse?
Grazie
Stefano


title: Rotellina mouse (scroll)

text:
"Volo 61" <
vol...@libero.it
> ha scritto nel messaggio
news:UpNOd.25986$lB4.6...@twister1.libero.it...

Dai un'occhiata qui:
http://www.donkarl.com/it/
Maschere 4.29
Anche su
www.sitocomune.com
 trovi qualcosa...del sottoscritto.
E anche qui:
http://www.mantuanet.it/alessandro.baraldi/
Ciao, Carlo


title: Ancora sul Problema dei Pulsantini ...

author: Marco

text:
Sto cercando di realizzare una applicazione con il controllo list
view.
All' apertura dell' applicazione massimizzo la maschera  principale ma
...
in alto a destra compare il pulsantino di ripristino.
Ho provato ad utilizzare la routine di Antogal presente sul sito
comune ed in effetti ottengo come risultato la scomparsa dei
pulsantini dell finestra dell'applicazione, mentre vorrei ottenere la
scomparsa del pulsante di ripristino e mantenere i pulsantini della
finestra dell'applicazione.
Esiste una routine che fa uso delle api, per ottenere questo
risultato?
Grazie
Marco


title: Menu Disabilitati

author: Silvia

text:
Ho un problema con la gestione dei menu di access. La mia applicazione
prevede una maschera di menu dove all'evento "Su caricamento" ho
associato il seguente codice
    CommandBars("Menu Bar").Enabled = False
    CommandBars("Formatting (Form/Report)").Enabled = False
    CommandBars("Form View").Enabled = False
    CommandBars("Form Design").Enabled = False
    CommandBars("Toolbox").Enabled = False
    CommandBars("Database").Enabled = False
per poter disabilitare i menu standard di access. E in effetti
funziona. Ma nel momento in cui dalla mia maschera di menu richiamo un
ulteriore maschera ("Emissione fattura") dove è presente al suo
interno una sottomaschera e digito un dato nella sottomaschera,
riappare una parte di menu di access.
Riappare solo la barra degli strumenti che gestisce la formattazione
del testo (Font, dimensione, colore, neretto, sottolineato...)e anche
le due icone "Griglia completa" e "Aspetto:piatto". Come posso fare
per inibire anche questa barra degli strumenti? Grazie per l'aiuto!


title: Menu Disabilitati

author: namor

text:
Silvia ha scritto:
> Ho un problema con la gestione dei menu di access. La mia applicazione
> prevede una maschera di menu dove all'evento "Su caricamento" ho
> associato il seguente codice
>     CommandBars("Menu Bar").Enabled = False
>     CommandBars("Formatting (Form/Report)").Enabled = False
>     CommandBars("Form View").Enabled = False
>     CommandBars("Form Design").Enabled = False
>     CommandBars("Toolbox").Enabled = False
>     CommandBars("Database").Enabled = False
> per poter disabilitare i menu standard di access. E in effetti
> funziona. Ma nel momento in cui dalla mia maschera di menu richiamo un
> ulteriore maschera ("Emissione fattura") dove č presente al suo
> interno una sottomaschera e digito un dato nella sottomaschera,
> riappare una parte di menu di access.
> Riappare solo la barra degli strumenti che gestisce la formattazione
> del testo (Font, dimensione, colore, neretto, sottolineato...)e anche
> le due icone "Griglia completa" e "Aspetto:piatto". Come posso fare
> per inibire anche questa barra degli strumenti? Grazie per l'aiuto!
Perchč non vai su Strumenti-Avvio e disabiliti i menů da lě, che č piů
semplice e funziona sicuramente?
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


title: Menu Disabilitati

text:
do...@spam.me
 (namor) wrote in message news:<cbootc$72o$
1...@news.newsland.it
>...
> Perchč non vai su Strumenti-Avvio e disabiliti i menů da lě, che č piů
> semplice e funziona sicuramente?
> Namor
Ho fatto come dici tu, grazie!!
Silvia


title: manipolazione dati sulle caselle di testo (date)

text:
Salve, ho una casella di testo che ha come origine dati il seguente codice:
=Format(Date();"aaaa")
che restituisce  il valore dell'anno corrente....
Ho la necessità diun'altra casella di testo, che però restituisca
automaticamente il valore 31/12 dell'anno indicato nell'altra...
Ho provato a fare una cosa così: =31/12/[Nome_casella], ma risultano solo
numeri stranissimi (sarebbe stato troppo bello)
Come posso fare?
Grazie


author: Brown

text:
R1[[ky ha scritto:

=DateSerial([Nome_Casella],12,31)


author: Sergio MAZZA

text:
"R1[[ky" <ric...@NOSPAMlibero.it> ha scritto nel messaggio news:f9pje.109373$IN.18...@twister2.libero.it...

="31/12/" & [Nome_casella]
Ciao.
--
Sergio MAZZA


title: Estrarre immagini da Access in file

author: aaa

text:
Ho sviluppato un piccolo programma in vb6 che dovrebbe estrarre le immagini
contenute in un campo di una tabella e renderle in file .bmp . Purtroppo il
file risultante non risulta leggibile anche se i files hanno dimenvione
diversa come se all'interno riesca a scalvarci qualcosa.
Ho effettuato la lettura in stream e posso postarvi anche il codice.
Non comprendo il perchè nel file access se creo una maschera riesco a vedere
l'immagine mentre col prog no.
Grazie!
Ecco il codice:
Private Sub DisplayBLOBGrid(cn As ADODB.Connection, sfilename As String)
    Dim rs As New ADODB.Recordset
    Dim fld As ADODB.Field
    Dim hflxResults
    Dim stm As New ADODB.Stream
    Dim sfilenameAppo As String
    MousePointer = vbHourglass
    lblRecordCorrente.Caption = 0
    rs.Open "Select tabfoto.* from tabfoto order by id", cn, , , adCmdText
    'Move through each row in the recordset.
    Do Until rs.EOF
        lblRecordCount.Caption = "di " & rs.RecordCount
        lblRecordCorrente.Caption = CLng(lblRecordCorrente.Caption) + 1
'        sfilenameAppo = sfilename & rs(3) & "_" & rs(4) & ".bmp"
        sfilenameAppo = sfilename & rs(2) & ".bmp"
        'Loop through all fields.
        For Each fld In rs.Fields
            If fld.Type = adLongVarBinary And fld.Name = "Foto" Then
                With stm
                    .Type = adTypeBinary
                    .Open
                    .Write fld.Value
                    .SaveToFile sfilenameAppo, adSaveCreateOverWrite
                    .Close
                End With
            End If
        Next fld
        rs.MoveNext
    Loop
    'If no data was returned, set the grid to show two rows.
    'Close all the ADO objects.
    rs.Close
    Set rs = Nothing
    Set stm = Nothing
    MousePointer = vbDefault
End Sub


title: Artitolo-Componenti articolo/Agg.Maschera e sottomaschera

author: abc

text:
Salve a tutti. Vado immediatamente ad esporre il problema.
- Ho una tabella di articoli(articoli tipo pane brioche etc)con un campo
contatore che si chiama idarticolo
- Ho una tabella che combina articolo/ingredienti tramite il campo
idarticolo presente nella tabella dell'articolo
- Gli articoli si differenziano fra prodotti finiti e ingredienti tramite un
flag ingrediente si/no.
Ho costruito una maschera con un controllo struttura a scheda.
Nella prima cartella ci sono gli articoli.
Nella seconda cartella ci sono gli ingredienti di quell'articolo
Tramite un pulsante apro una scheda che mi mostra tutti gli articoli tipo
ingredienti.
Nella tabella articoli c'è un flag che si chiama selezionato e un campo che
si chiama idarticolo,che viene valorizzato rispettivamente a sì e al codice
articolo presente nella prima cartella,quella dell'articolo tramite il click
su un pulsante.
Con un pulsante chiamato aggiorna,lancio un query di accodamento che accoda
quegli articoli tipo ingrediente nella tabella che combina
articolo/ingrediente.
Il problema è che quando ritorno sulla maschera con il controllo a scheda
non mi aggiorna la seconda cartella,quella con gli ingredienti relativi a
quell'articolo e non mi mostra subito i record relativi legati tramite id
articolo. Ovviamente andando al record successivo e tornando al record con
gli ingredienti la lista viene aggiornata. Penso quindi che il problema
risiede nell'aggiornamento del record....
Su quale evento m devo basare? Cosa posso fare in modo che chiudendo quella
maschera che mi mostra gli ingredienti e accoda gli ingredienti stessi sia
aggiornata quando ci ritorno sopra?
Grazie anticipatamente a tutti.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


author: Alessandro

text:
"abc" <
andread...@libero.it
> ha scritto nel messaggio
news:81Z72Z53Z253Y1...@usenet.libero.it...

Dopo aver lanciato la qery di accodamento prova a scrivere
nomequery.Requery



text:
Il 11 Nov 2003, 12:28, "Alessandro" <
ale...@tiscali.it
> ha scritto:
>
> "abc" <
andread...@libero.it
> ha scritto nel messaggio
> news:81Z72Z53Z253Y1...@usenet.libero.it...
> > Salve a tutti. Vado immediatamente ad esporre il problema.
> >
> > - Ho una tabella di articoli(articoli tipo pane brioche etc)con un campo
> > contatore che si chiama idarticolo
> > - Ho una tabella che combina articolo/ingredienti tramite il campo
> > idarticolo presente nella tabella dell'articolo
> > - Gli articoli si differenziano fra prodotti finiti e ingredienti
tramite
> un
> > flag ingrediente si/no.
> >
> > Ho costruito una maschera con un controllo struttura a scheda.
> >
> > Nella prima cartella ci sono gli articoli.
> > Nella seconda cartella ci sono gli ingredienti di quell'articolo
> >
> > Tramite un pulsante apro una scheda che mi mostra tutti gli articoli
tipo
> > ingredienti.
> >
> > Nella tabella articoli c'č un flag che si chiama selezionato e un campo
> che
> > si chiama idarticolo,che viene valorizzato rispettivamente a sě e al
> codice
> > articolo presente nella prima cartella,quella dell'articolo tramite il
> click
> > su un pulsante.
> >
> > Con un pulsante chiamato aggiorna,lancio un query di accodamento che
> accoda
> > quegli articoli tipo ingrediente nella tabella che combina
> > articolo/ingrediente.
> >
> > Il problema č che quando ritorno sulla maschera con il controllo a
scheda
> > non mi aggiorna la seconda cartella,quella con gli ingredienti relativi
a
> > quell'articolo e non mi mostra subito i record relativi legati tramite
id
> > articolo. Ovviamente andando al record successivo e tornando al record
con
> > gli ingredienti la lista viene aggiornata. Penso quindi che il problema
> > risiede nell'aggiornamento del record....
> >
> > Su quale evento m devo basare? Cosa posso fare in modo che chiudendo
> quella
> > maschera che mi mostra gli ingredienti e accoda gli ingredienti stessi
sia
> > aggiornata quando ci ritorno sopra?
> >
> > Grazie anticipatamente a tutti.
> >
> >
> Dopo aver lanciato la qery di accodamento prova a scrivere
> nomequery.Requery
>
> > --------------------------------
> > Inviato via
http://arianna.libero.it/usenet/
Ciao. Ti ringrazio dell'attenzione. Non sň...Il mio pulsante lancia la
query, chiude la maschera degli "ingredienti", seleziona l'oggetto maschera
articoli/ingredienti e a questo punto dovrei vedere la lista degli
ingredienti aggiornata. Tieni conto che con maschera/sottomaschera con la
sottomaschera tipo foglio dati il giochino mi funziona facendo una requery
sul nome del controllo Id della maschera ma in questo caso non sň a quale
evento,a quale maschera-controllo etc fare riferimento...



title: Compatibilità impossibile

author: HTML Andrea

text:
Utilizzo una banalissima funziona al click di un pulsante su di una maschera
access.
Ho sviluppato il tutto su Access 97 per word 97 (cioè con riferimento a
libreria 8.0 di word)
In più il file word che utilizzo è in stampa unione col medesimo database
della maschera.
Ecco cosa succede:
Con access97 e word97 tutto ok (cioè la funzione salva funziona
correttamente)
Con Access2000 e word2000 vengono fuori infiniti errori
Più che tutto, quello che mi lascia perplesso è che aprendo il file doc con
word2000 mi chiede nuovamente l'origine dei dati.. e questo è il principale
motivo per cui si blocca.
In più penso che voglia le librerie 9.0, ma non voglio andare su tutti i pc
e ricompliare con le librerie oppoirtune.
Esiste un metodo per rendere questa funzione compatibile?
Private Sub Salva_Click()
    Dim oApp As New Word.Application
    Dim NomeCartella, PercNuovo As String
    Me.Form.Requery
    NomeCartella = Left(CurrentDb.Name, Len(CurrentDb.Name) -
Len(Dir(CurrentDb.Name)))
    PercNuovo = NomeCartella & "Atti\"
    NomeFile = "Atto_" & StripString(Me.mittente.Value) & "_" &
StripString(Me.cedente.Value) & ".doc"
    oApp.Application.Documents.Open NomeCartella & "\Modulo_primo.doc", , ,
, "pwd", , , "pwd"
    oApp.Visible = False
    With oApp.ActiveDocument.MailMerge
        .Destination = wdSendToNewDocument
        .Execute
    End With
    oApp.ActiveDocument.SaveAs FileName:=PercNuovo & NomeFile
    oApp.ActiveDocument.Close SaveChanges:=False
    oApp.Quit SaveChanges:=False
    Set oApp = Nothing
End Sub
Grazie a tutti per l'aiuto


title: Compatibilità impossibile

author: Roberto da casa

text:
"HTML Andrea" <
htmla...@inwind.it
> ha scritto nel messaggio
news:ni_uc.382143$rM4.15...@news4.tin.it...

Di due l'una: o modifichi i riferimenti a word 2000 o installi word 97.
>
> Grazie a tutti per l'aiuto
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Compatibilità impossibile

text:
"HTML Andrea" <
htmla...@inwind.it
> ha scritto nel messaggio
news:ni_uc.382143$rM4.15...@news4.tin.it...

Se lo fai, prova a non indicare la versione della libreria quando crei
l'istanza:
es.
Dim oApp as Word.Application
Set oApp = createobject("Word.Application")
Ciao.
--
Sergio MAZZA


title: Compatibilità impossibile

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:c9i4tf$j77$1...@canarie.caspur.it...

Ok sono un coglione.. in pratica l'errore non stava nella versione di word
(specificando 8.0 funziona sia con l'8 che con il 9) ma stà proprio
nell'apertura dell'origine dati. In poratica non riusciva a trovare
l'origine e mi dava quell'errore. Adesso ho risolto con un apertura di
origine dinamica.
Ma adesso mi resta un problema: su un pc con word 2000 e access 97 (solo su
quello, poichè ne ho provati altri con la medesima configurazione) mi da
sempre errore di memoria insufficiente nel momento in cui esegue
oApp.Application.Documents.Open NomeCartella & "\Modulo_primo.doc", , , ,
"pwd", , , "pwd"
Ma se lo apro manualmente, lo stesso file si apre regolarmente.
Da cosa potrebbe dipendere?
Grazie a tutti


title: reference variabili interne

author: Pimpoli

text:
Domandina penso semplice:
sapete dirmi se da qualche parte in rete è possibile scaricare una reference
delle variabili interne del VBA di Access97; ad esempio quelle che si usano
con DoCmd o RunCommand.
Qursto eprchè sull'help in linea molte volte sono solo elencate, senza
ulteriori spiegazioni, ed alcune sono abbastanza "evidenti" nel loro
significato e nel loro uso, altre non tanto.....
Grazie


title: reference variabili interne

author: warp

text:
"Pimpoli" <
> Domandina penso semplice:
> sapete dirmi se da qualche parte in rete è possibile scaricare una
reference
> delle variabili interne del VBA di Access97; ad esempio quelle che si
usano
> con DoCmd o RunCommand.
Non sono variabili ma costanti interne.
Sul sito comune
www.sitocomune.com
  o su The Access Web (non ricordo bene
quale dei due) puoi scaricare la documentazione: dai un'occhiata.


title: reference variabili interne

text:
> Non sono variabili ma costanti interne.
Si, scusa, hai ragione, sono costanti.
Ciao
Giorgio


title: Strano Problema su maschera:Aiuto!

author: bizio

text:
Ciao a tutti,
vi spiego in breve la situazione.Ho utilizzato una soluzione presente
sul Sito Comune per l'autenticazione utente:in sostanza in base al
login+psw inserite, memorizzo un valore numerico in una variabile
globale (var_tipo).
In questo modo a seconda del valore assunto dalla variabile gestisco
il tipo di autorizzazione sull'apertura delle varie maschere di
inserimento dati! (1=Admin;2=inserimento;3=Solo Visualizzazione;ecc)
Questo è la routine che inserisco sull'evento apertura di maschere e
sottomaschere:
Private Sub Form_Open(Cancel As Integer)
Me.OrderBy = "anno desc"
Me.OrderByOn = True
If var_tipo <> 0 Then
Select Case var_tipo
Case 1
    Me.AllowAdditions = True
    Me.AllowDeletions = True
    Me.AllowEdits = True
    Me.AllowFilters = True
Case 2, 4
    Me.AllowAdditions = True
    Me.AllowDeletions = False
    Me.AllowEdits = True
    Me.AllowFilters = True
Case 3, 5, 6
    Me.AllowAdditions = False
    Me.AllowDeletions = False
    Me.AllowEdits = False
    Me.AllowFilters = True
End Select
Else
End If
End Sub
La M_Principale contiene una struttura a schede con 7 sottomaschere
collegate tramite il campo id_Utente!
Il problema è che se accedo come Admin (quindi var_tipo=1) è tutto ok,
mentre se accedo con altri login mi succede una cosa strana nelle
sottomaschere della M_Principale:non visualizza in molti record i dati
nelle sottomaschere,o meglio riesco solo a vedere il colore di sfondo
delle stesse,non si vede nessun controllo!!
Mi aiutate per favore a trovare dove può essere la soluzione??Sono
giorni che ci provo!!
Grazie


title: Strano Problema su maschera:Aiuto!

text:
bizio wrote:
> Ciao a tutti,
Ciao.
> Mi aiutate per favore a trovare dove può essere la soluzione??Sono
> giorni che ci provo!!
Lo so' sarà traumatico e (io) antipatico, ma dovresti leggerti le (poche)
regole di questo NG; le trovi qui:
www.sitocomune.com
 Sezione ICAA - Come
comportarsi in questo NG.
> Grazie
Ciao.
--
Sergio MAZZA


title: Strano Problema su maschera:Aiuto!

text:
On 23 Ott, 22:29, "Sergio MAZZA" <
sergioma...@tiscali.it
> wrote:
> bizio wrote:
> > Ciao a tutti,
>
> Ciao.
>
> > Mi aiutate per favore a trovare dove può essere la soluzione??Sono
> > giorni che ci provo!!
>
> Lo so' sarà traumatico e (io) antipatico, ma dovresti leggerti le (poche)
> regole di questo NG; le trovi qui:www.sitocomune.comSezione ICAA - Come
> comportarsi in questo NG.
>
> > Grazie
>
> Ciao.
> --
> Sergio MAZZA
Ok hai ragione ho letto le condizioni,mi scuso per alcune cose come ad
esempio l'oggetto posto troppo generico!!
Ricerche invece ne avevo fatte sia sul sito comune sia sul neswgroup.
Comunque ho risolto il problema al mio quesito,era questo:
Me.AllowAdditions = False
dovevo porlo a True.Era questo che mi impediva di vedere i controlli e
i dati su alcune maschere.
Ringrazio lo stesso e una buona giornata a tutti


title: Stampa di Struttura tabella

author: Mosquarello

text:
Un saluto a tutto l'NG, vorrei sapere se in access 2000 o utilizzando
qualche altra applicazione, e' possibile la stampa della la struttura delle
tabelle, evidenziando il nome ed il tipo di ogni campo non che le proprieta'
impostate su quel campo.
Grazie anticipatamente per la risposta


title: Stampa di Struttura tabella

author: Mattia Sarti

text:
"Mosquarello" <
n...@no.it
> ha scritto nel messaggio
news:91sl0f$9t...@news.edisons.net...

Prova Strumenti -> Analizza -> Analizzatore e poi scegli l'oggetto o gli
oggetti da analizzare. Otterrai un Report con una valanga di informazioni.
Aloa                            Mattia


title: REPORT: perchè mi cambi i margini....

author: sdamy

text:
Ciao a tutti,
nel caso di un report in A2000 io imposto la pagina in orrizzontale e i
margini DX,SX , inf e sup a 10 mm.
quando chiudo l'mdb e lo riapro lui mi rimette le impostazioni in verticale
e i margini a 20
C'e' il modo di mantenere le impostazioni date ad una pagina?
GRAZIE


title: Formato data 25.07.2001 anzichè 25/07/2001

author: Arianna

text:
Ciao a tutti,
forse è un problema semplice ma non riesco a risolverlo..
di solito le date vengono gestite in formato 25/07/2001
su un PC ho formato data di sistema gg.mm.aaaa (mi serve data in questo
formato)
io devo aggiornare una tabella con campo data in cifre
quando vado a scrivere data formato 25/07/2001 la query di accodamento
funziona a puntino (formato sistema gg/mm/aaaa)
cambio la data di sistema e metto gg.mm.aaaa tutte le date di access nelle
tabelle sono visualizzate corrette col punto es. 24.07.2001
ma quando vado a scrivere nella tabella una data 24.07.2001 la query mi
genera questo errore:
"Syntax error in date in query expression '#07.25.2001#'."
e non mi accoda nulla..
riporto formato data in gg/mm/aaaa tutto funziona bene..
l'istruzione con cui costruisco la query per accodare è la seguente:
"#" & Format(Me.DATE_ORDER, "mm/dd/yyyy") & "# AS [DATE_ORDER]"
se formato data = gg/mm/aaaa la data nella stringa risulta essere 25/07/2001
se formato data = gg.mm.aaaa la data nella stringa risulta essere 25.07.2001
ma non accoda..
come faccio? spero di essermi spiegata in modo comprensibile un saluto e un
ringraziamento anticipato
Arianna


author: Riccardo

text:
Arianna <
ari...@tecna.it
> wrote in message
yDv77.30357$NZ6.1...@news.infostrada.it...
> Ciao a tutti,
> forse č un problema semplice ma non riesco a risolverlo..
> di solito le date vengono gestite in formato 25/07/2001
> su un PC ho formato data di sistema gg.mm.aaaa (mi serve data in questo
> formato)
>
> io devo aggiornare una tabella con campo data in cifre
> quando vado a scrivere data formato 25/07/2001 la query di accodamento
> funziona a puntino (formato sistema gg/mm/aaaa)
>
> cambio la data di sistema e metto gg.mm.aaaa tutte le date di access nelle
> tabelle sono visualizzate corrette col punto es. 24.07.2001
> ma quando vado a scrivere nella tabella una data 24.07.2001 la query mi
> genera questo errore:
> "Syntax error in date in query expression '#07.25.2001#'."
> e non mi accoda nulla..
> riporto formato data in gg/mm/aaaa tutto funziona bene..
>
> l'istruzione con cui costruisco la query per accodare č la seguente:
> "#" & Format(Me.DATE_ORDER, "mm/dd/yyyy") & "# AS [DATE_ORDER]"
> se formato data = gg/mm/aaaa la data nella stringa risulta essere
25/07/2001
> se formato data = gg.mm.aaaa la data nella stringa risulta essere
25.07.2001
> ma non accoda..
>
>
> come faccio? spero di essermi spiegata in modo comprensibile un saluto e
un
> ringraziamento anticipato
> Arianna
>
prova cosě:
Format("Tua data", "dd.mm.yyyy")


text:
> > Ciao a tutti,
> > forse è un problema semplice ma non riesco a risolverlo..
> > di solito le date vengono gestite in formato 25/07/2001
> > su un PC ho formato data di sistema gg.mm.aaaa (mi serve data in questo
> > formato)
> >
> > io devo aggiornare una tabella con campo data in cifre
> > quando vado a scrivere data formato 25/07/2001 la query di accodamento
> > funziona a puntino (formato sistema gg/mm/aaaa)
> >
> > cambio la data di sistema e metto gg.mm.aaaa tutte le date di access
nelle
> > tabelle sono visualizzate corrette col punto es. 24.07.2001
> > ma quando vado a scrivere nella tabella una data 24.07.2001 la query mi
> > genera questo errore:
> > "Syntax error in date in query expression '#07.25.2001#'."
> > e non mi accoda nulla..
> > riporto formato data in gg/mm/aaaa tutto funziona bene..
> >
> > l'istruzione con cui costruisco la query per accodare è la seguente:
> > "#" & Format(Me.DATE_ORDER, "mm/dd/yyyy") & "# AS [DATE_ORDER]"
> > se formato data = gg/mm/aaaa la data nella stringa risulta essere
> 25/07/2001
> > se formato data = gg.mm.aaaa la data nella stringa risulta essere
> 25.07.2001
> > ma non accoda..
> >
> >
> > come faccio? spero di essermi spiegata in modo comprensibile un saluto e
> un
> > ringraziamento anticipato
> > Arianna
> >
> prova così:
> Format("Tua data", "dd.mm.yyyy")
>
>
non funziona lo stesso già tentato.. ma poi non centra "mm.dd.aaaa" xchè se
hai fai "mm/dd/aaaa" nella stringa poi viene convertito automaticamente in
"mm.dd.aaaa"..
se io scrivo nella tabella a mano una data con il punto la accetta, ma da
query nulla
Grazie..Riccardo
Arianna


text:
Arianna <
ari...@tecna.it
> wrote in message
yDv77.30357$NZ6.1...@news.infostrada.it...
> Ciao a tutti,
> forse č un problema semplice ma non riesco a risolverlo..
> di solito le date vengono gestite in formato 25/07/2001
> su un PC ho formato data di sistema gg.mm.aaaa (mi serve data in questo
> formato)
>
> io devo aggiornare una tabella con campo data in cifre
> quando vado a scrivere data formato 25/07/2001 la query di accodamento
> funziona a puntino (formato sistema gg/mm/aaaa)
>
> cambio la data di sistema e metto gg.mm.aaaa tutte le date di access nelle
> tabelle sono visualizzate corrette col punto es. 24.07.2001
> ma quando vado a scrivere nella tabella una data 24.07.2001 la query mi
> genera questo errore:
> "Syntax error in date in query expression '#07.25.2001#'."
> e non mi accoda nulla..
> riporto formato data in gg/mm/aaaa tutto funziona bene..
>
> l'istruzione con cui costruisco la query per accodare č la seguente:
> "#" & Format(Me.DATE_ORDER, "mm/dd/yyyy") & "# AS [DATE_ORDER]"
> se formato data = gg/mm/aaaa la data nella stringa risulta essere
25/07/2001
> se formato data = gg.mm.aaaa la data nella stringa risulta essere
25.07.2001
> ma non accoda..
>
>
> come faccio? spero di essermi spiegata in modo comprensibile un saluto e
un
> ringraziamento anticipato
> Arianna
>
_____
Ma se ti da quell'errore ,nell'accodamento delle tabella, č probabile che
non
si possa fare nulla, in quanto il formato con il punto, č proprio delle ore
e non
delle date.
Ho provato a creare una tabella con un campo data/ora e inserirgli come
formato
gg.mm.aaaa  ma non mi fa inserire direttamente i  dati scrivendo:
25.7.2001
ma se scrivo 25/07/2001 mi visualizza 25.07.2001
quindi forse ti basta cambiare il formato della tabella ed accodare la data
cosě com'č
"gg/mm/aaaa"
ciao Riccardo


text:

cambio data di sistema il tipo di data nelle tabelle cambia da se.
se metto data di sistema = "gg.mm.aaaa" nella tabella posso liberamente
scrivere data con punto
ma nn riesco a scriverla da query
ho provato a mettere il formato dell'ora a ":" pensando..creasse problemi
ma non č servito a nulla!
Arianna


text:
Arianna <
ari...@tecna.it
> wrote in message
MAz77.31630$NZ6.1...@news.infostrada.it...

Ho cambiato il formato data in una tabella, ho creato una query di
accodamento
con origine dati un'altra tabella con un campo data (in formato gg/mm/aaaa)
ed ho
accodato il campo data della tabella di origine in quella di destinazione.
Mi ha accodato tutto, senza errori ed in formato gg.mm.aaaa senza dover
utilizzare
neanche la funzione format.
Ho fatto le prove su a97.
Non riesco a capire da cosa dipende il problema.
ciao Riccardo


text:

da tabella a tabella il formato lo prende automaticamente
da casella di testo no.
io ho in casella formato "gg.mm.aaaa"
e quando accodo devo mettere "mm.gg.aaaa"
se ho come formato "/" funziona tutto..metto il "." funziona piů..
Grazie infinite comunque!
Arianna


text:
Arianna <
ari...@tecna.it
> wrote in message
wJz77.31678$NZ6.1...@news.infostrada.it...

scuasa, ma ho letto bene solo ora!
hai la casella in gg.mm.aaaa e devi accodare in mm.gg.aaaa
Allora metti il formato della tabella in
mm.gg.aaaa
a me cosě funziona anche dalla casella!
ciao Riccardo
spero vivamente di esserti stato di aiuto.
bye


text:

lo sei sempre... eh eh!
>
> bye
>
>
non funziona..lo stesso..forse ho problemi (come sempre) io sul pc, che ne
so!
Grazie.. per ora ci rinuncio!
Arianna
(ora provo su un altro PC a fare girare la cosa..)
GRAZIE
Arianna


title: mex da gianluca per sib "query a campi incrociati modificabile"

author: gianluca

text:
ciao sib, ho sentito microsoft e mi ha detto che e possibile aggiornarla,
come intendevo io nel mio mex, se riesco ti faccio sapere.......... come
dimenticavo ... ma ad esempio se io ho questa situazione :
codice descr            art col   0 38 40 42 44 46 ..............
(intestazione della tabella o query)
    123        abito        1    ro     1  2    4   3   0    2
come posso fare per far si che riesco a generare una etichetta per ogni
articolo (ad esempio NB per la taglia 38 ho n° 2 capi  come potrei fare per
avere 2 etichette (naturalmente con un numero diverso ; puo essere un
barcode che faccio generare con un code39 a numeri casuali .


title: Help x query su campi NULL multipli

author: Fabietto

text:
Ciao a tutti,
sto cercando una soluzione per poter effettuare un query parametrica in
Access 2000 su circa 6 campi che possono essere tutti impostati NULL.
Sono arrivato a 4 elemeti senza grossi problemi a parte ripetere tutto su
ogni riga OR di Access, il problema e' che ora ho finito sia le colonne che
le righe disponibili per aggiungere elementi... visto che non mi sembra
neppure una soluzione molto pulita mi chiedevo se si puo' fare in un modo
piu' intelligente e veloce...
L'idea : [parametro] & "*" OR Is Null e' buona ma restituisce sempre tutti i
valori impedendo di selezionare gli elementi specificati dai parametri...
Help!
Fabi


title: Modifica contemporanea!

author: GIUSEPPE TUTTOILMONDO

text:
Salve.
Mi chiamo Pietro, e sono un novellino dell' access.
Sto realizzando un piccolo programma che deve gestire alcuni dati, fra cui
l'anagrafica di alcuni clienti.
Ho una maschera per l'inserimento e la modifica dei dati anagrafici.Gestisco
la scelta dei dati tramite una sottomaschera (Su corrente) pero' se cerco di
fare la modifica dei dati, avviene che il recordset della maschera viene
aggiornato mentre  al momento in cui faccio un refresh mi visualizza un
messaggio di "MODIFICA TEMPORANEA DI RECORD" sul recordset della "subform".
In pratica e' come se un utente cercasse di modificare un record salvato da
un altro utente. Ho provato ad aprire in database in accesso esclusivo, ma
niente. Gestisco le operazioni di modifica inserimento etc, da codice quindi
abilitando o disabilitando le proprieta' della maschera.
Ho provato anche ad usare le transazioni ma non ho risolto il problema.!!
Tengo a sottolineare che il database e' in ACCESS 97.
Aspetto presto una possibile soluzione.


title: [OT]: Libri per ontabilità

author: Zappus

text:
Salve a tutti, da alcuni anni realizzo applicazioni per piccole aziende
artigiane o commerciali che non necessitano di una contabilità interna
completa.
Esempio: bilancio, mastrini ecc ecc.
Non avendo grosse conoscenze in campo contabile o di ragioneria vorrei
trovare dei testi che mi aiutino in modo SEMPLICE e chiaro a capire di che
cosa una piccola o media impresa può aver bisogno per gestire autonomamente
la propria contabilità interna.
Escluderei dalla lista testi universitari.....
Grazie Luca


title: [OT]: Libri per ontabilità

author: Andrea

text:
Zappus wrote:
>Salve a tutti, da alcuni anni realizzo applicazioni per piccole aziende
>artigiane o commerciali che non necessitano di una contabilitŕ interna
>completa.
>Esempio: bilancio, mastrini ecc ecc.
>Non avendo grosse conoscenze in campo contabile o di ragioneria vorrei
>trovare dei testi che mi aiutino in modo SEMPLICE e chiaro a capire di che
>cosa una piccola o media impresa puň aver bisogno per gestire autonomamente
>la propria contabilitŕ interna.
>Escluderei dalla lista testi universitari.....
>Grazie Luca
>
>
Se vuoi scrivere un programma di contabilita' interna (forse se ho
capito dovrebbe essere la *prima nota*) credo che ti serva un libro di
ragioneria informatica.
se invece non e' la prima nota che ti serve ma una vera contabilita'
credo che piu' dei testi universitari ti serva un team di persone che
conoscano ragioneria, fisco, ecc... oltre ad un team di programmatori.
un programma di contabilita' non e' uno scherzo se ci sono errori di
programma che portano ad errori nelle dichiarazioni dei redditi sono
dolori.
--
Ciao
Andrea Malfatti


title: Blocco di due tabelle

author: Maurizio

text:
Salve a tutti. Volevo chiedere come potrei fare a bloccare una tabella X
se un utente sta modificando i dati in una tabella Y. Apro anche X e le setto
un blocco pessimistico ? Non mi viene in mentre nulla.
Ciao e grazie
maurizio.


title: Blocco di due tabelle

author: Maurizio Montanari

text:
"Maurizio" <
mamon...@regione.emilia-romagna.it
> wrote in message
news:5203294c.04032...@posting.google.com

Ho fatto cosi', mentre apro la maschera Y carico una Maschera X che
viene ridotta ad icona e nella proprietà "Blocco Records" metto
"Tutti i records" (di Tabella X). Non mi pare pero' un gran metodo.
Per una Query lanciata da codice pero' non so come fare a bloccare
la Tabella X.
Ciao
maurizio.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: query di formazione tabella

text:
Salve a tutto il news..
Il mio problema è il seguente:
Attraverso una sottomaschera (SMDATI1) inserisco dei dati in una tabella
(TAB1).
Attraverso una query di formazione tabella (QFT1) modifico automaticamente
questi dati e vado a formare una nuova tabella (TAB2).
Come posso fare affinchè automaticamente la QFT1 mi modifichi i dati nella
tab2 ogni volta che chiudo la SMDATI1?
Spero di essere stato chiaro.
Non sono esperto di VBA.
Grazie a tutti......ciao


title: query di formazione tabella

author: Sergio MAZZA

text:
<
ca...@flag.it
> ha scritto nel messaggio news:e795q2$280$1...@carabinieri.cs.interbusiness.it...

[risposta]
La query è di creazione (non formazione) tabella e la puoi eseguire nell'evento "su chiusura" della SMDATI1; ma se quest'ultima è
una sottomaschera come fai a chiuderla? E' probabile che essendo sottomaschera sia inserita in una maschera principale e quindi
soggetta agli eventi della prima (difatti il controllo sottomaschera non ha eventi "su chiusura"). Quindi l'evento "su chiusura" da
gestire è quello della maschera principale inserendoci:
'---
if me.dirty then me.refresh
Docmd.OpenQuery "nomeQueryDiCreazioneTabella"
Docmd.Close acquery, "nomeQueryDiCreazioneTabella"
'---
trovi informazioni sui comandi attivando l'help con ALT-F11 poi F1...
Ciao.
--
Sergio MAZZA


title: query di formazione tabella

text:
Grazie mille per il suggerimento.
Quando però vado a chiudere la maschera Access mi presenta automaticamente
questi messaggi:
1)"la query di creazione tabella che sta per essere eseguita modificherà i
dati nella tabella"
2)"la tabella TAB2 verrà eliminata prima dell'esecuzione della query"
3)"numero di righe che verranno incollate in una nuova tabella......."
E' possibile evitare la visualizzazione di questi messaggi?
Grazie di nuovo.....ciao


title: query di formazione tabella

text:
<
ca...@flag.it
> ha scritto nel messaggio news:e7apkp$m2e$1...@fata.cs.interbusiness.it...

[risposta]
Vedi help, attivabile con ALT-F11 poi F1, alla voce: Metodo SetWarnings...
Ciao.
--
Sergio MAZZA


title: Access e desktop remoto

author: Giovanni

text:
Salve,
sto proggettando un programma in access da distribuire successivamente ad
alcuni utenti sparsi per l'italia.
La difficoltà sta nel gestire l'installazione e gli aggiornamenti ed anche
eventuali errori che potrebbe restituire il programma, e quindi avevo
pensato ad un collegamento tramite desktop remoto ad un computer che si
trova fisicamente nella mia sede operativa e dove è installato e settato il
programma di access.
Ovviamente a questo computer si potranno connettere più persone
contemporaneamente collegandosi tramite nome utente e password nella loro
area di lavoro dove troveranno il programma a loro dedicato.
Secondo voi è una cosa fattibile con desktop remoto? Qualcuno di voi ha mai
fatto una cosa simile?
Qualche indicazione sarebbe ben accetta.
Grazie anticipatamente a tutti
Giovanni Artiglio


title: Access e desktop remoto

author: Carlo Costarella

text:
"Giovanni" <
artig...@deejaymail.it
> ha scritto nel messaggio
news:4fzkl.27322$8Z.1...@tornado.fastwebnet.it...

Io da anni faccio così:
il db è sempre diviso in BE e FE; in un mio sito (oggi si trovano a meno di
30 euro) "piazzo" gli aggiornamenti che riguardano sempre il solo FE con
tanto di data e versione; il cliente (se ha una connessione internet) riceve
via e-mail il link per scaricare l'aggiornamento oppure, controllando il
sito, può scaricare il file aggiornato.
Il file è in formato rar .exe, quindi un autoinstallante e sostituisce il FE
presente nella cartella del cliente o, se il cliente ha cambiato la cartella
di installazione predefinita, chiede dove installare.
Ovviamente all'interno del FE sono previste le routine per riallegare (se
necessario) le tabelle.
Ciao, Carlo


title: Access e desktop remoto

text:
"Carlo Costarella" <
carloantoni...@gmail.com
> ha scritto nel
messaggio news:gmugkq$1mi$1...@tdi.cu.mi.it...

Grazie carlo per la celere risposta, ma io vorrei dare la possibilità ad un
mio eventuale cliente di non installare niente sul proprio pc ma trovarselo
già bello e pronto su un computer esterno al quale può accedere tramite
desktop remoto.
Non so se sono stato abbastanza chiaro.


title: Access e desktop remoto

text:
"Giovanni" <
artig...@deejaymail.it
> ha scritto
cut
> Grazie carlo per la celere risposta, ma io vorrei dare la possibilità ad
> un mio eventuale cliente di non installare niente sul proprio pc ma
> trovarselo già bello e pronto su un computer esterno al quale può accedere
> tramite desktop remoto.
>
> Non so se sono stato abbastanza chiaro.
Parlavi di aggiornamenti....comunque avevo avuto qualche dubbio.
La soluzione, imho, più performante è XPUnlimited...di cui si è parlato
molto spesso su questo NG.
In ogni caso è richiesto un IP pubblico se lavori su rete geografica, ma ci
possono essere anche altre soluzioni come Hamachi in accoppiata con VNC o
Hamachi in accoppiata con XPUnlimited.
Ovviamente resta sempre disponibile terminal server.
Ciao, Carlo


title: Access e desktop remoto

text:
"Carlo Costarella" <
carloantoni...@gmail.com
> ha scritto nel
messaggio news:gmunl2$adt$1...@tdi.cu.mi.it...

Ciao Carlo,
ho letto la tua recensione su XPUnlimited (Usiamo XPUnlimited.doc) e devo
dire che fa proprio al caso mio, però non mi è chiara una cosa e cioè che se
ad esempio ad un utente rilascio la possibilità di utilizzare un programma
(esempio Adobe Reader) poi l'utente dalla funzione File>Apri può accedere a
tutte le cartelle del computer a cui si è connesso comprese le cartelle
degli altri uetnti.
Forse ho sbagliato qualcosa?
Ciao e grazie


title: Access e desktop remoto

text:
"Giovanni" <
artig...@deejaymail.it
> ha scritto
cut
> ho letto la tua recensione su XPUnlimited (Usiamo XPUnlimited.doc) e devo
> dire che fa proprio al caso mio, però non mi è chiara una cosa e cioè che
> se ad esempio ad un utente rilascio la possibilità di utilizzare un
> programma (esempio Adobe Reader) poi l'utente dalla funzione File>Apri può
> accedere a tutte le cartelle del computer a cui si è connesso comprese le
> cartelle degli altri uetnti.
> Forse ho sbagliato qualcosa?
>
> Ciao e grazie
>
Assolutamente no. L'utente vede solo quello che tu vuoi fargli vedere e usa
solo quello che tu decidi di fargli usare.
Tieni presente che XPUnlimited eredita le autorizzazioni dal file system di
windows, aggiungendone delle proprie.
Dunque puoi agire sui permessi che atribuisci ai vari utenti.
In pratica se gli consenti di usare Acrobat Reader e l'utente "sfoglia" le
cartelle alla ricerca di un file, non potrà accedere a quelle cartelle che
avrai provveduto a marcare come private, nel senso di private per gli altri
utenti.
Fino a tre utenti XPUnlimited è gratuito...quindi hai modo di provarlo.
Fai molta attenzione se decidi per l'acquisto: installa la versione full
sulla macchina server, quella definitiva perchè la ditta è molto ma molto
restia a dare una seconda chiave.
Ciao, Carlo


title: Access e desktop remoto

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:gn0te7$33d$1...@tdi.cu.mi.it...

Ok perfetto per le cartelle degli altri utenti che posso rendere private
quando creo l'account, ma per tutte le altre cartelle del computer ad
esempio c:\programmi? dove lo devo impostare che non può accederci?
Scusa se ti faccio tutte queste domande ma è la prima volta che utilizzo
questo metodo per poter distribuire un programma...
Ciao e grazie


title: Access e desktop remoto

text:
"Giovanni" <
artig...@deejaymail.it
> ha scritto
cut
> Ok perfetto per le cartelle degli altri utenti che posso rendere private
> quando creo l'account, ma per tutte le altre cartelle del computer ad
> esempio c:\programmi? dove lo devo impostare che non può accederci?
> Scusa se ti faccio tutte queste domande ma è la prima volta che utilizzo
> questo metodo per poter distribuire un programma...
>
> Ciao e grazie
Si fa, si fa...
Questo un esempio:
il desktop di XPU:
http://www.carlocostarella.it/XPUDesktop.jpg
Il desktop con i programmi permessi:
http://www.carlocostarella.it/XPUDesktopOpen.jpg
Qui l'utente apre il Notepad e con sfoglia cerca di aprire un programma
(WinWord):
http://www.carlocostarella.it/XPUDesktopOpenFromNotepad.jpg
Tieni presente che l'aver messo Notepad nell'elenco di XPU è fatto solo a
scopo didattico.
Nella versione data all'utente Notepad non compare ma solo il/i programma/i
che può utilizzare.
Ciao, Carlo


title: Access e desktop remoto

author: Pablitomf

text:
> Grazie anticipatamente a tutti
> Giovanni Artiglio
io con alcuni utenti faccio così... Win 2003 Server con TS... settato
l'utente, metti nell'ambiente che deve eseguire Access e relativo tuo
applicativo, e l'utente vedrà sempre e solo quello... lavorando fisicamente
sulla tua macchina ma virtualmente usando la sua...
--
---
Ciao
Pablitomf
FORZA NAPOLI - - - SEMPRE!
Tifosi Napoletani, gente fantastica
http://it.youtube.com/watch?v=gUqFHOXrK-M&feature=related


title: Access e desktop remoto

text:
"Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:gn1b5o$ip0$1...@tdi.cu.mi.it...
>> Grazie anticipatamente a tutti
>> Giovanni Artiglio
>
> io con alcuni utenti faccio così... Win 2003 Server con TS... settato
> l'utente, metti nell'ambiente che deve eseguire Access e relativo tuo
> applicativo, e l'utente vedrà sempre e solo quello... lavorando
> fisicamente sulla tua macchina ma virtualmente usando la sua...
>
Ciao Maurizio,
anche in privato...puoi scrivermi quanto costa questo sistema?
Diciamo per 10 utenti di TS?
Ciao, Carlo


title: Access e desktop remoto

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:gn1jcd$s47$1...@tdi.cu.mi.it...

Wè Carletto...
posso anche in pubblico...
diciamo che di default l'acquisto di Win2003 Standard Ed. R2 da 5 lic. TS
incluse... le CAL per aggiungere ulteriori utenti si vende a pacchetti... e
onestamente non ricordo a quanto (ma ti fò sapere se vuoi)... cmq ti dirò,
la cosa è super funzionale... io la uso alla grande da anni ormai... e mi
trovo benissimo... anche perchè poi puoi dal SO monitorare gli accessi, gli
utenti, le sessioni, i files aperti... gestirli, modificarli, sottoporli a
policy e roba varia... praticamente hai e fai tutto tu... e il cliente (per
me l'utente filiale) accede solo all'applicativo ad esso dedicato (deciso da
te)...
se vuoi sapere come configurarlo, chiedi pure... è semplicissimo (io uso
anche MDW ad hoc, quindi vai tranquillo)...
Saluti ai pargoli Carlo...



title: Access e desktop remoto

text:
"Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:gn4i3a$i6d$1...@tdi.cu.mi.it...

Stima che un W2003 server lo paghi euro + euro - intorno ai 5-600 euro... ed
è effettivamente un SO con le palle...


title: Proprietà non impostabili da codice ????

author: Eriberto

text:
Utilizzo Access per creare un database di orari per lavoro, trovandomi di
fronte alla necessità di strutturare
una nuova tabella per ogni nuovo dipendente e dovendo quindi mantenere la
struttura della Tabella simile per
tutti ho risolto il problema creando una tabella denominata
'DipendentiStruttura', che per ogni nuovo copio con
una funzione realizzata in VBA. Ultimamente stavo realizzando un funzione
come quella sottoriportata per ovviare
al fatto di dover mantenere una tabella vuota solo perchè ne utilizzo la
struttura:
Function fCreaDbDipendenti(nome As String) As Integer
On Error GoTo ErrHandler
Dim db As DAO.Database
Dim tdf As DAO.TableDef
Dim idx As DAO.Index
Dim fld As DAO.Field
  Set db = Application.CurrentDb
  Set tdf = db.CreateTableDef(nome)
  With tdf
    Set fld = .CreateField("ID", dbLong)
      fld.Attributes = fld.Attributes Or dbAutoIncrField
    .Fields.Append fld
    .Fields.Append .CreateField("Data", dbDate)
    .Fields.Append .CreateField("Settimana", dbInteger)
    .Fields.Append .CreateField("Nome", dbText, 30)
    .Fields.Append .CreateField("Commessa", dbText, 15)
    .Fields.Append .CreateField("Attivita", dbText, 5)
    .Fields.Append .CreateField("Ore", dbSingle)
    .Fields.Append .CreateField("Trasferta", dbText, 5)
    .Fields.Append .CreateField("Pranzo", dbInteger)
    .Fields.Append .CreateField("PSRic", dbInteger)
    .Fields.Append .CreateField("PCRic", dbInteger)
    .Fields.Append .CreateField("KM", dbInteger)
    .Fields.Append .CreateField("KMP", dbInteger)
    .Fields.Append .CreateField("AutoTipo", dbText, 25)
    .Fields.Append .CreateField("AutoKMinit", dbInteger)
    .Fields.Append .CreateField("AutoKMfine", dbInteger)
    Set idx = .CreateIndex
    With idx
      .Name = "PrimaryKey"
      .Primary = True
      .Unique = True
      .Fields.Append .CreateField("ID", dbAutoIncrField)
    End With
    .Indexes.Append idx
  End With
  ' Accoda un nuovo oggetto TableDef al database
  db.TableDefs.Append tdf
ExitHere:
    Set fld = Nothing
    Set idx = Nothing
    Set tdf = Nothing
    Set db = Nothing
    Exit Function
ErrHandler:
    MsgBox Err.Number & " " & Err.Description
    Resume ExitHere
End Function
Ora il mio problema è che alcune proprietà tipo il formato o la maschera di
input del campo 'DATA' non riesco
nel modo più assoluto a settarlo con il codice VBA.....
Cosa invece impostabile nelle maschere di struttura per la creazione guidata
di una nuova TABELLA
QUALCUNO POTREBBE AIUTARMI ???
SE NON E' POSSIBILE POTRESTE RISPONDERMI LO STESSO GRAZIE
erib...@supereva.it


author: Sandro

text:
Eriberto ha scritto il sab 09 set 2000 01:42:55a
>Ora il mio problema è che alcune proprietà tipo il formato o la maschera
>di input del campo 'DATA' non riesco
>nel modo più assoluto a settarlo con il codice VBA.....
>
formato  -> proprieta'  format
maschera di input -> proprieta' InputMask
Comunque non e' il metodo migliore di creare una tabella a partire da una
gia' esistente.
Potresti iterare tra  campi e proprieta' della tabella esistente e
aggiungerli (e settare le proprieta' ) alla  tabella  in costruzione.
In questo modo avresti un metodo generale per clonare una qualsiasi
tabella senza doverti preoccupare del numero e  nome dei campi e delle
proprieta'.
Sandro


text:
Eriberto ha scritto il sab 09 set 2000 01:42:55a
>una nuova tabella per ogni nuovo dipendente
Cosi' strutturi male il database.
Se hai 10000 o piu'  dipendenti?
Tutti i dipendenti devono stare in una unica tabella che avra' un campo
che individua il dipendente.


author: Sirio

text:
Ti stai complicando la vita.
Il modo più semplice per affrontare questo problema è usare un'unica tabella
con la stessa struttura dati di quelle che usi tu, alla quale basta
aggiungere un campo dipendente o codice_dipendente.
Per gestire i dati poi basta usare una maschera con sottomaschera per
filtrare i record relativi ad un particolare dipendente o usare il campo
codice_dipendente nelle query per selezionare soli i record voluti.


author: Federico Luciani

text:
Eriberto wrote:
> Utilizzo Access per creare un database di orari per lavoro, trovandomi di
> fronte alla necessità di strutturare
> una nuova tabella per ogni nuovo dipendente e dovendo quindi mantenere la
> struttura della Tabella simile per
> tutti ho risolto il problema creando una tabella denominata
> 'DipendentiStruttura', che per ogni nuovo copio con
> una funzione realizzata in VBA. Ultimamente stavo realizzando un funzione
> come quella sottoriportata per ovviare
> al fatto di dover mantenere una tabella vuota solo perchè ne utilizzo la
> struttura:
> [cut]
> Ora il mio problema è che alcune proprietà tipo il formato o la maschera di
> input del campo 'DATA' non riesco
> nel modo più assoluto a settarlo con il codice VBA.....
> Cosa invece impostabile nelle maschere di struttura per la creazione guidata
> di una nuova TABELLA
Alcune proprieta', tra le quali Formato e Maschera, prima
di poter essere impostate, devono essere create.
Una volta create possono essere modificate a piacimento.
Quindi il codice necessario diventa:
  Dim dbs As Database
  Dim tdf As TableDef
  Dim prp As Property
  Set dbs = currentdb
  Set tdf = dbs.TableDefs("tblTimeStamp")
  Set fld = tdf.Fields("DataOper")
  Set prp = fld.CreateProperty("Format", 10, "dd/mm/yyyy")
  fld.Properties.Append prp
  Set prp = fld.CreateProperty("InputMask", 10,
"99/99/00;0;_")
  fld.Properties.Append prp
  ...
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: Interfacciare access con Outlook

author: leonardo

text:
Vi chiedo un consiglio se qualcuno lo ha gia' fatto oppure se ha qualche
consiglio su dove posso documentare.
Attualmente in outlook archiviamo tutte le email in cartelle predefinite in
funzione del numero ordine ,lo stesso che poi usiamo anche per gestire i
numeri ordine nel nostro database
ho trovato come componente in access [Microsoft Outlook View
Control]qualcuno mi sa dire qualcosa ? perche' ho provato ad inserirlo nel
database ma riesco solo a gestire le email in arrivo ,invece vorrei poteri
dare un parametro di ricerca in  funzione del numero ordine .
grazie a tutti


title: Interfacciare access con Outlook

author: Ungi

text:
"leonardo" <
leonardo...@email.it
> ha scritto nel messaggio
news:ATSZd.2156$kC3...@tornado.fastwebnet.it...

Potresti usare l'oggetto Outlook.
Per prima cosa inserisci tra i riferimenti "Microsoft Outlook (il numero
della versione) Object Library"
(Il numero della versione è 10.0 per Outlook 2002 e 11.0 per Outlook 2003)
Poi prova questo codice:
Dim myOlApp As Object
Dim myNameSpace As NameSpace
Dim Cartelle As Folders
Dim Cartella As MAPIFolder
Dim MyItem As MailItem
Set myOlApp = CreateObject("Outlook.Application")
Set myNameSpace = myOlApp.GetNamespace("MAPI")
Set Cartelle = myNameSpace.Folders
Set Cartella = Cartelle.Item("Cartelle personali")
Set Cartella = Cartella.Folders("Ordinexxx")
Dove Ordinexx rappresenta la tua cartella con il numero Ordine (si suppone
che faccia parte delle Cartelle Personali)
Per scorrere i vari messaggi contenuti usa il comando Cartella.Items(i)
Facci sapere
Ungi


title: Interfacciare access con Outlook

text:
"Ungi" <
liber...@libero.it
> ha scritto nel messaggio
news:uuXZd.1069853$35.39...@news4.tin.it...

> ci provo e domani ti faccio sapere come e andata !!!
grazie per adesso!
Leo


title: Interfacciare access con Outlook

text:
> > >
> > >
> > Potresti usare l'oggetto Outlook.
> > Per prima cosa inserisci tra i riferimenti "Microsoft Outlook (il numero
> > della versione) Object Library"
> >
> > (Il numero della versione è 10.0 per Outlook 2002 e 11.0 per Outlook
2003)
> >
> >
> > Poi prova questo codice:
> >
> >
> > Dim myOlApp As Object
> > Dim myNameSpace As NameSpace
> > Dim Cartelle As Folders
> > Dim Cartella As MAPIFolder
> > Dim MyItem As MailItem
> >
> >
> > Set myOlApp = CreateObject("Outlook.Application")
> > Set myNameSpace = myOlApp.GetNamespace("MAPI")
> > Set Cartelle = myNameSpace.Folders
> >
> > Set Cartella = Cartelle.Item("Cartelle personali")
> >
> > Set Cartella = Cartella.Folders("Ordinexxx")
> >
> > Dove Ordinexx rappresenta la tua cartella con il numero Ordine (si
suppone
> > che faccia parte delle Cartelle Personali)
> >
> > Per scorrere i vari messaggi contenuti usa il comando Cartella.Items(i)
> >
> > Facci sapere
> > Ungi
> >
aiuto mi sono perso un po'
essendo tanto alle prime armi non riesco a seguirti sui vari passaggi
1) dove inserisco tra i riferimenti m.outlook?
2)quel codice come lo inserisco e dove?
grazie e scusami ancora


title: Interfacciare access con Outlook

author: ALESSANDRO Baraldi

text:
"leonardo" <
leonardo...@email.it
> ha scritto nel messaggio
news:K1_Zd.3449$kC3....@tornado.fastwebnet.it...

Inserire i riferimenti alle Librerie dell'Automazione è un rischio
che non sempre è bene correre.
In questo caso poi non si capisce perchè usa parte del codice
con tecnica LateBinding ed in parte Early.
La cosa migliore è l'associazione tardiva(LateBinding) che non
vincola lo sviluppo alla versione installata, ma lascia all'interprete
la gestione, non andando ad incappare in eventuali errori di versioni.
Nel tuo caso se non vuoi inserire i riferimenti non serve farlo, ti basta
dichiarare tutti gli Oggetti legati alla Outlook.Application come Object
invece che esplicitarne il Type.
Al momento dell'assegnazione sarà Access stesso che riconoscerà
l'oggetto assegnandolo al Tipo corretto.
Ricordati alla fine di liberare la memoria settando a Nothing le risorse.
Saluti
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Interfacciare access con Outlook

text:
> Inserire i riferimenti alle Librerie dell'Automazione è un rischio
> che non sempre è bene correre.
> In questo caso poi non si capisce perchè usa parte del codice
> con tecnica LateBinding ed in parte Early.
>
> La cosa migliore è l'associazione tardiva(LateBinding) che non
> vincola lo sviluppo alla versione installata, ma lascia all'interprete
> la gestione, non andando ad incappare in eventuali errori di versioni.
>
> Nel tuo caso se non vuoi inserire i riferimenti non serve farlo, ti basta
> dichiarare tutti gli Oggetti legati alla Outlook.Application come Object
> invece che esplicitarne il Type.
> Al momento dell'assegnazione sarà Access stesso che riconoscerà
> l'oggetto assegnandolo al Tipo corretto.
>
> Ricordati alla fine di liberare la memoria settando a Nothing le risorse.
>
> Saluti
> --
> @Alex (Alessandro Baraldi)
> --------------------------------------------------------------------------
-
>
http://www.sitocomune.com/
>
http://www.mantuanet.it/alessandro.baraldi/
> --------------------------------------------------------------------------
-
>
>
Questo è un aspetto che ho sempre trascurato, in effetti ho a volte avuto
problemi con i riferimenti, e non ho mai distinto tra tecnica Late Binding e
Early.
Magari anche nel caso del codice in questione mi potresti fare due esempi
delle due tecniche?
Grazie
Per quanto riguarda Leonardo la parte di codice in questione la potresti
inserire in un evento che va a cercare i messaggi di email all'interno della
cartella di Outllok
Ciao
Ungi


title: Interfacciare access con Outlook

text:
> Questo è un aspetto che ho sempre trascurato, in effetti ho a volte avuto
> problemi con i riferimenti, e non ho mai distinto tra tecnica Late Binding
e
> Early.
> Magari anche nel caso del codice in questione mi potresti fare due esempi
> delle due tecniche?
> Grazie
>
>
> Per quanto riguarda Leonardo la parte di codice in questione la potresti
> inserire in un evento che va a cercare i messaggi di email all'interno
della
> cartella di Outllok
> Ciao
>
>
> Ungi
LateBinding:
Dim myOlApp As Object
Set myOlApp = CreateObject("Outlook.Application")
EarlyBinding:
Dim myOlApp As Outlook.Application
Set myOlApp = CreateObject("Outlook.Application")
Ciao



title: Interfacciare access con Outlook

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:4238c2f2$0$32338$5fc...@news.tiscali.it...

> --------------------------------------------------------------------------
-
>
http://www.sitocomune.com/
>
http://www.mantuanet.it/alessandro.baraldi/
> --------------------------------------------------------------------------
-
>
> Grazie a tutti adesso mi applico un po' !!!1 vediamo cosa riesco a fare


title: maschera massimizzata dopo chiusura report

text:
ho una maschera con nell'evento apertura:
docmd.maximize
nella maschera ho un pulsante che apre un report con nell'evento apertura:
docmd.maximize
ora quando chiudo il report la maschera non č piů "massimizzata".
come posso fare?
grazie
ciao


author: MA

text:
"@Roberto" <
tas...@libero.it
> ha scritto nel messaggio
news:6WFgb.17788$vO5.6...@twister1.libero.it...
> ho una maschera con nell'evento apertura:
>
> docmd.maximize
>
> nella maschera ho un pulsante che apre un report con nell'evento apertura:
>
> docmd.maximize
>
> ora quando chiudo il report la maschera non è più "massimizzata".
> come posso fare?
> grazie
>
Prova a metterlo sull'evento focus
MAssimiliano


text:
"MA" <
keiko...@libero.it
> ha scritto nel messaggio
news:%hOgb.6033$uv4....@news.edisontel.com...
> >
> Prova a metterlo sull'evento focus
> MAssimiliano
>
non funziona............
qualche altro suggerimento?
ciao


title: Codice che da errore

author: Augusto

text:
  Name "D:\001.mdb" As "D:\"&right("00000"&val(a(0))+1,3)&"."&a(1)
Questo codice mi dà errore di compilazione e mi dice Sub o function non definita
Aiutatemi....


title: Codice che da errore

text:

Hai un problema di Riferimenti ERRATI nel progetto, di conseguenza il compilatore/interprete si blocca.

Verifica nei Riferimenti se hai un [MANCA:.....]

@Alex


title: Codice che da errore

text:

No Alex, nei riferimenti è tutto a posto....


title: Codice che da errore

text:
Hai usato OPTION EXPLICIT nei moduli VBA...?
Hai compilato il codice...?

Di solito il mancato riconoscimento delle Funzioni di LIBRERIA NATIVE dipende da questo...

@Alex


title: Codice che da errore

text:

Questo è tutto il codice che ho nella maschera

Option Compare Database
Option Explicit

Private Sub Comando_LANCIA_Click()
Call Shell("XCOPY /Q/Y D:\APN\000.mdb D:\")
Name "D:\000.mdb" As "D:\" & Right("00000" & Val(a(0)) + 1, 3) & "." & a(1)
End Sub

Private Sub pulsante_MULTIFUNZIONE_Click()
DoCmd.Quit
End Sub


title: Codice che da errore

text:

Allora proverei ad importare TUTTO, maschere/tabelle/ecc... in un nuovo Progetto e dovrebbe sparire...

@Alex


title: Codice che da errore

text:

Ho provato Alex ma mi da sempre lo stesso errore.....
te lo mostro con una immagine...


title: Codice che da errore

text:
Nessuna immagine visibile sul NG... almeno per me che accedo via GoogleGroups.

@Alex


title: Codice che da errore

text:
Il giorno mercoledì 28 settembre 2016 12:44:14 UTC+2, @Alex ha scritto:
> Nessuna immagine visibile sul NG... almeno per me che accedo via GoogleGroups.
>
> @Alex

hai ragione, non so come metterla......


title: Codice che da errore

author: Alessandro Cara

text:
Il 26/09/2016 14:36, Augusto ha scritto:
> Il giorno lunedì 26 settembre 2016 12:28:27 UTC+2, @Alex ha scritto:
>> Hai usato OPTION EXPLICIT nei moduli VBA...?
>> Hai compilato il codice...?
>>
>> Di solito il mancato riconoscimento delle Funzioni di LIBRERIA NATIVE dipende da questo...
>>
>> @Alex
>
> Questo è tutto il codice che ho nella maschera
>
> Option Compare Database
> Option Explicit
>
> Private Sub Comando_LANCIA_Click()
> Call Shell("XCOPY /Q/Y D:\APN\000.mdb D:\")
> Name "D:\000.mdb" As "D:\" & Right("00000" & Val(a(0)) + 1, 3) & "." & a(1)
> End Sub

Questa riga di codice la ho suggerita io,
Dove'e' la split?

>
> Private Sub pulsante_MULTIFUNZIONE_Click()
> DoCmd.Quit
> End Sub
>

--
ac (x=y-1)
Aborro il Killfile
(La violenza e' l'ultimo rifugio degli incapaci -Salvor Hardin-)


title: Codice che da errore

text:

Ah ciao Alessandro, cos'è la split ? e perché la tua riga di codice mi dà errore di compilazione e mi dice Sub o function non definita ?


title: Codice che da errore

text:

a(0) e' un elemento di array dato da
a=split("D:\000.mdb",".")
in a(0) hai D:\000
in a(1)="mdb"
il tutto dopo la istruzione dovrebbe tornare D:\001.mdb
ma cosi' /non/ funziona perche' la split deve essere su "000.mdb"

i.e
a=split(nomedb,".")
allora a(0) = "000"
e    a(1)="mdb"
e quindi
Right("00000" & Val(a(0)) + 1, 3) & "." & a(1)   ===> "001.mdb"

Al tuo errore avrei dato la stessa risposta di @Alex anche se avevo
gia' visto la mancanza della split ma pensavo fosse solo uno /snip/ del
codice.



title: Codice che da errore

text:

Alessandro non ci ho capito niente..!
Io non sono al tuo livello, fammi capire cosa devo fare affinché la tua riga di codice funzioni. Grazie


title: Codice che da errore

text:
Il 29/09/2016 06:34, Augusto ha scritto:
> Il giorno mercoledì 28 settembre 2016 19:49:10 UTC+2, Alessandro Cara ha scritto:
>> Il 28/09/2016 19:20, Augusto ha scritto:
>>> Il giorno mercoledì 28 settembre 2016 19:10:10 UTC+2, Alessandro Cara ha scritto:
>>>> Il 26/09/2016 14:36, Augusto ha scritto:
>>>>> Il giorno lunedì 26 settembre 2016 12:28:27 UTC+2, @Alex ha scritto:
>>>>>> Hai usato OPTION EXPLICIT nei moduli VBA...?
>>>>>> Hai compilato il codice...?
>>>>>>
>>>>>> Di solito il mancato riconoscimento delle Funzioni di LIBRERIA NATIVE dipende da questo...
>>>>>>
>>>>>> @Alex
>>>>>
>>>>> Questo è tutto il codice che ho nella maschera
>>>>>
>>>>> Option Compare Database
>>>>> Option Explicit
>>>>>
>>>>> Private Sub Comando_LANCIA_Click()
>>>>> Call Shell("XCOPY /Q/Y D:\APN\000.mdb D:\")
>>>>> Name "D:\000.mdb" As "D:\" & Right("00000" & Val(a(0)) + 1, 3) & "." & a(1)
>>>>> End Sub
>>>>

Nel modo in cui ha scritto la funzione la /mia/ riga di codice /non/ ha
senso!

Questa si:
Name "D:\000.mdb" As "D:\001.mdb"

e poi..
se c'e' la xcopy (in quel modo)  che senso ha la Name?

Private Sub Comando_LANCIA_Click()
Call Shell("XCOPY /Q/Y D:\APN\000.mdb D:\001.mdb")
End Sub

questa non e' sufficiente?



title: Codice che da errore

author: marcopio

text:
Il giorno giovedì 22 settembre 2016 05:14:45 UTC+2, Augusto ha scritto:

Non so se è questo il caso, ma io a volte ho questo errore, su "right" o "left", per problemi nelle dll che seleziono nei riferimenti.
Non ho trovato una soluzione logica, a volte sistemo il problema solamente dando un altro ordine di priorità nei riferimenti (banalmente sposto in su o in giù qualche dll delle ultime ma senza una logica) a volte invece sovrascrivo le dll copiandole da un altro PC, quest'ultima soluzione non mi piace ma a me funziona.
Continuo a seguire il 3D sperando che qualcuno abbia una soluzione più sensata della mia.


title: Disegnare una linea da codice

author: npuleio

text:
Ciao ragazzi,
avrei bisogno di disegnare in un report una linea che varia come
lunghezza tra diversi record raggruppati... esiste un modo per
disegnarla da codice?
Questo in modo che ad esempio quando mi spara a stampa 10 records
raggruppati, ogni tre record viene disegnata una linea più lunga che mai
di solito...
Presumo però che non si possa fare, vero?...
Grazie,
Ciaoooooo
Luigi
--
Luigi
Inviato da
www.mynewsgate.net


title: Disegnare una linea da codice

text:
"npuleio" <
npu...@rocketmail.com
> ha scritto nel messaggio
news:200404011...@mynewsgate.net...

Sito comune (
www.sitocomune.com
)...
Ciao.
--
Sergio MAZZA


title: Disegnare una linea da codice

author: Roberto da casa

text:
"npuleio" <
npu...@rocketmail.com
> ha scritto nel messaggio
news:200404011...@mynewsgate.net...
> Ciao ragazzi,
>
> avrei bisogno di disegnare in un report una linea che varia come
> lunghezza tra diversi record raggruppati... esiste un modo per
> disegnarla da codice?
> Questo in modo che ad esempio quando mi spara a stampa 10 records
> raggruppati, ogni tre record viene disegnata una linea più lunga che mai
> di solito...
> Presumo però che non si possa fare, vero?...
>
> Grazie,
Usa il metodo Line (vedi help).
Per maggiori dettagli vai sul Sito Comune (link qui sotto) e nella Sezione
Reports leggi la FAQ di Sib intitolata "Inserire linee e rettangoli in un
report".
> Ciaoooooo
> Luigi
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Disegnare una linea da codice

author: Luigino

text:
Roberto da casa wrote:
> Usa il metodo Line (vedi help).
> Per maggiori dettagli vai sul Sito Comune (link qui sotto) e nella Sezione
> Reports leggi la FAQ di Sib intitolata "Inserire linee e rettangoli in un
> report".
Roberto e Sergio,
GRAZIEEEEEEEEEEEEEEEEEEEEEEEEEEEE :))))))
Ciao e a presto!
Luigi


title: Interrogazione campo e mem. risultati

author: Enzo

text:
ciao a tutti, rieccomi con un altro problema:
Vorrei sapere come fare fare per interrogare una casella di testo di una
maschera e memorizzare i valori in tre diversi campi della tabella.
Esempio: nella casella di testo c'è un codice formato da 16 cifre, vorrei
che le prime tre venissero memorizzate nel campo1, le tre successive nel
campo2, quella successiva nel campo3 etc. Lo riporto schematicamente
1701011008709928 questo è il codice intero da mettere nell'unica casella
di testo.
deve essere così diviso e memorizzato:
170(mem. in campo1)  101(mem. in campo2)  1(mem. in campo3)
008709928(mem. in campo4)
Grazie mille!
Enzo
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Interrogazione campo e mem. risultati

text:
>
> Esempio: nella casella di testo c'è un codice formato da 16 cifre, vorrei
> che le prime tre venissero memorizzate nel campo1, le tre successive nel
> campo2, quella successiva nel campo3 etc. Lo riporto schematicamente
>
> 1701011008709928 questo è il codice intero da mettere nell'unica casella
> di testo.
>
> deve essere così diviso e memorizzato:
>
> 170(mem. in campo1)  101(mem. in campo2)  1(mem. in campo3)
> 008709928(mem. in campo4)
>
devi usare la funzione Mid esempio
Dim AnyString, MyStr
Campo = "1701011008709928"    ' Definisce la stringa.
Campo1=Mid(Campo, 1,3)
Campo2=Mid(Campo, 4,6)
Campo3=Mid(Campo, 7,7)
Campo4=Mid(Campo, 8,16)
Ciao.


title: Interrogazione campo e mem. risultati

text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:b28jn3$7av$1...@lacerta.tiscalinet.it...

Forse è meglio:
Campo1=Mid(Campo, 1,3)
Campo2=Mid(Campo, 4,3)
Campo3=Mid(Campo, 7,1)
Campo4=Mid(Campo, 8)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Interrogazione campo e mem. risultati

text:
> Forse č meglio:
>
> Campo1=Mid(Campo, 1,3)
> Campo2=Mid(Campo, 4,3)
> Campo3=Mid(Campo, 7,1)
> Campo4=Mid(Campo, 8)
>
> --
> Roberto
Giŕ forse č meglio! momento difficile ;)


title: macro convertita...

author: ciroteo

text:
Per iniziare a scrivere qualche riga di codice in vba ho provato a
convertire una macro e creare un modulo...
Ora, come fare ad associare il modulo creato all'evento su click del
pulsante? Nell'elenco a discesa appare ancora la macro ma non so dove
cercare il modulo ...