text:
"Bruno Campanini" <
brun...@libero.it
> ha scritto nel messaggio
news:4f17707a$0$1389$4faf...@reader2.news.tin.it...

grazie a tutti

ma non va ancora bene.

Provo a spiegare meglio la stuttura della maschera.

maschera principale "M_Ordine"
dove utilizzo sia una casella combinata che
su clic di un controllo:
    Forms!M_Ordine!M_Carichi_Ordine.Form.Recordset.FindFirst _
    "IdOrdine = " & Me!IDOrdine
per accedere al record corrispondente nella
dalla Sottomaschera "M_Elenco_Ordine"
alla sottomaschera "M_Carichi_Ordine",
entrambe in visualizzazione maschere continue.
Questa è l SQL della query origine sottomaschera "M_Carichi_Ordine"

SELECT TbOrdine.IDOrdine, TbOrdine.NumeroOrdineVendita, TbOrdine.DataOrdine,
TbClienti.Ragione_Sociale, TbClienti.Indirizzo, TbClienti.CAP,
TbClienti.Citta, TbClienti.IdCliente, TbOrdine.IdPorto, TbOrdine.IDSconto,
TbOrdine.DataCarico, TbOrdine.GiorniConsegna
FROM TbClienti LEFT JOIN TbOrdine ON TbClienti.IdCliente =
TbOrdine.IDCliente
WHERE (((TbClienti.IdCliente)=[Forms]![M_Ordine]![CboCliente_1] Or
(TbClienti.IdCliente)=[Forms]![M_Ordine]![CboCliente_2]))
ORDER BY TbOrdine.NumeroOrdineVendita DESC , TbOrdine.DataOrdine DESC;

In pratica il problema l'ho quando elimino un record dalla Sottomaschera
"M_Elenco_Ordine"
dove il cliente è al suo primo record.
Grazie ancora a tutti.


title: Report a scelta obbligatoria

author: Alby

text:
Ciao! Domandina: voglio far sì che quando un report è aperto l'utente non
possa parcheggiarlo e navigare sulle altre maschere, ma permetterglielo a
report chiuso..Ho settato la proprietà del report A SCELTA OBBLIGATORIA a
sì, ma non funziona come nelle maschere, perchè posso tranquillamente
abbassare il report e selezionare le maschere aperte dietro..Che faccio?Che
consigli mi date?
Grazie molte..


title: Report a scelta obbligatoria

author: Informatica Education Center

text:
"Alby" <
NOSPAMa...@sistemics.it
> ha scritto nel messaggio
news:d23dto$a1k$1...@fata.cs.interbusiness.it...

Ciao,
prova un pò ad utilizzare il seguente codice:
Use the OpenReport sub in the code below by Terry Kreft in the same manner
as you use the OpenReport method.
'************ Code Start **********
'This code was originally written by Terry Kreft.
'It is not to be altered or distributed,
'except as part of an application.
'You are free to use it in any application,
'provided the copyright notice is left unchanged.
'
'Code Courtesy of
'Terry Kreft
'
Sub OpenReport(ReportName As String, Optional View As Integer, Optional _
    FilterName As String, Optional WhereCondition As String)
Dim loFormArray() As String
Dim loform As Form
Dim intCount As Integer
Dim intX As Integer
    For Each loform In Forms
        If loform.Visible Then
            ReDim Preserve loFormArray(intCount)
            loFormArray(intCount) = loform.Name
            loform.Visible = False
            intCount = intCount + 1
        End If
    Next
    DoCmd.OpenReport ReportName, View, FilterName, WhereCondition
    Do While IsVisible(acReport, ReportName): DoEvents: Loop
    For intX = intCount - 1 To 0 Step -1
        Forms(loFormArray(intX)).Visible = True
    Next
End Sub
Function IsVisible(intObjType As Integer, strObjName As String) As Boolean
Dim intObjState As Integer
    intObjState = SysCmd(acSysCmdGetObjectState, intObjType, strObjName)
    IsVisible = intObjState And acObjStateOpen
End Function
'*********** Code End **************Buona
PasquaGasparehttp://
www.studioieducation.com


title: Report a scelta obbligatoria

text:
"Alby" <
NOSPAMa...@sistemics.it
> ha scritto nel messaggio
news:d23dto$a1k$1...@fata.cs.interbusiness.it...

Ciao,
dovresti settare la proprietà "Popup" del report a "sì"
e poi se proprio devi "bloccare" l'utente vai sul "Pulsanti
ingrand./riduzione" = "Nessuno" e "Pulsante Chiusura" = "no"
Ovviamente il report rimane in primo piano solo all'interno di access...
È anche possibile utilizzare la proprietà Modal per specificare se una
maschera o un report debba essere aperto come finestra a scelta
obbligatoria. Quando si apre una maschera o un report come finestra a scelta
obbligatoria, è necessario chiudere la finestra prima di poter spostare lo
stato attivo su un altro oggetto. Elemento Boolean in lettura e scrittura
Esempio
Per ottenere il valore della proprietà Modal per la maschera "Order Entry",
è possibile utilizzare il codice seguente:
Dim b As Boolean
b = Forms("Order Entry").Modal
Per impostare il valore della proprietà Modal, è possibile utilizzare il
codice seguente:
Forms("Order Entry").Modal = True
Ciao
Buona Pasqua
Gaspare
http://www.studioieducation.com


title: Importare dati

author: Andrea Ciocia

text:
Ciao,
ho un problema, ho due db uno su uno strumento di misura e l'altro su un
pc collegato in rete, siccome le dimensione del db dello strumento
rallentano le prestazioni dello stesso ho la necessità di copiare i dati
di una tabella delo stesso nell'altro db che tra l'altro gestisce la
visualizzazione e ricerca dei dati, però devo copiare la tabella e
svuotare la tabella di origine !
Non so se sono stato chiaro !
Ringrazio in anticipo tutti coloro i quali mi aiuteranno !
Ciao
Andrea
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Importare dati

author: Emyr

text:
On Fri, 10 May 2002 08:11:34 +0000 (UTC), "Andrea Ciocia"
<
aci...@betanet.it
> wrote:
>Ciao,
>
>ho un problema, ho due db uno su uno strumento di misura e l'altro su un
>pc collegato in rete, siccome le dimensione del db dello strumento
>rallentano le prestazioni dello stesso ho la necessità di copiare i dati
>di una tabella delo stesso nell'altro db che tra l'altro gestisce la
>visualizzazione e ricerca dei dati, però devo copiare la tabella e
>svuotare la tabella di origine !
>
>Non so se sono stato chiaro !
>
>Ringrazio in anticipo tutti coloro i quali mi aiuteranno !
>
>Ciao
>Andrea
vedi transferdatabase per importare il database
vedi db.execute(DELETE * from tabella in nomedatabase") per cancellare
i dati (se non ricordo male)
Saluti.
Emanuele.


title: Access 2007/2010

text:
Ho un problema! Un applicativo in Access 2007 ha un comportmento
anomalo sia che giri con Access 2007 che con Access 2010.
Saltuariamente sia durante l'uso che durante una qualsiasi operazione
di manutenzione si blocca e dà il messaggio di malfunzionamento con
avviso di salvataggio di un backup.
Dopo questa operazione, alla successiva riapertura, compare il
messaggio che alcuni moduli VBA sono malfunzionanti e, ad una
verifica, risultano essere privi di codice.
C'è qualcuno che ha avuto problemi di questo tipo e ne ha scoperta la
causa?


title: Access 2007/2010

text:
gfran...@live.it
 ha scritto:
>Ho un problema! Un applicativo in Access 2007 ha un comportmento
>anomalo sia che giri con Access 2007 che con Access 2010.
>Saltuariamente sia durante l'uso che durante una qualsiasi operazione
>di manutenzione si blocca e d=E0 il messaggio di malfunzionamento con
>avviso di salvataggio di un backup.
>Dopo questa operazione, alla successiva riapertura, compare il
>messaggio che alcuni moduli VBA sono malfunzionanti e, ad una
>verifica, risultano essere privi di codice.
>C'=E8 qualcuno che ha avuto problemi di questo tipo e ne ha scoperta la
>causa?
Qualche errore nel codice? Corruzzione del file? Provato il debug e
l'importazione in un db vuoto? Tutte le volte che i miei sw fanno cose strane
e io maledico Access(perdono!!!), alla fine trovo qualche mostruosità che
avevo fatto io....
--


title: Runtime error 3027

author: Fabio Valsangiacomo

text:
Ciao a tutti
ho il seguente problema
installato access 2003 + SP2 su winXP pro SP 2 e questo su diverse macchine
FE + BE  PC in rete
Su 2 PC (portatili) mi da l'errore sopra indicato, (Runtime error 3027)
quando si eseque una istruzione SQL qualsiasi.
All'apertura dell'applicazione mi segnala Database di solo lettura,
verificato attributi del fine e non sono in sola lettura.
Se sul portatile mi collego con il mio account (installatore) il tutto
funzione
Se sul portatile si collega un mio collega mi da l'errore sopra segnalato
Se un mio collega si collega su un altro PC tutto funziona
Per ora sono senza idee, e voi?
Per correttezza posto il tutto anche su microsoft.xxxx
Grazie
Fabio


title: Runtime error 3027

text:

Segnalo che posto.....
Fabio
>
> Grazie
>
> Fabio


title: Runtime error 3027

author: Alessandro Baraldi

text:
Fabio Valsangiacomo ha scritto:

Perchè posti su più di un NG senza avvisare...?
@Alex


title: Runtime error 3027

text:
>>> Per correttezza posto il tutto anche su microsoft.xxxx
>> Segnalo che posto.....
>> Fabio
>>>
>>> Grazie
>>>
>>> Fabio
>
> Perchè posti su più di un NG senza avvisare...?
Scusa Alex
ma l'ho scritto subito, commettendo un chiaro errore di scrittura  che la
frase doveva essere
...Per correttezza segnalo che posto il tutto anche su microsoft.xxxx...
rileggendo il mio 1° messaggio mi sono accorto dell'errore e l'ho segnalato,
sulla correttezza ci tengo, ci mancherebbe nei 40 min di differenza fra il
1° e il 2° messaggio fatta doccia e bagnato le rose ecco tutto !
Chiedo venia comunque al NG
Fabio
> @Alex


title: Runtime error 3027

text:
Fabio Valsangiacomo ha scritto:
[CUT]
> > Perchè posti su più di un NG senza avvisare...?
> Scusa Alex
> ma l'ho scritto subito, commettendo un chiaro errore di scrittura  che la
> frase doveva essere
> ...Per correttezza segnalo che posto il tutto anche su microsoft.xxxx...
> rileggendo il mio 1° messaggio mi sono accorto dell'errore e l'ho segnalato,
> sulla correttezza ci tengo, ci mancherebbe nei 40 min di differenza fra il
> 1° e il 2° messaggio fatta doccia e bagnato le rose ecco tutto !
> Chiedo venia comunque al NG
> Fabio
>
>
> > @Alex
Scusa tu, con Google non vedevo assolutamente il messaggio di
spiegazioni, non lo vedo
nemmeno ora ...... ma non importa.
Verifica che nei riferimenti non manchi qualche SPUNTA o che
addirittura non sia
segnalata qualche libreria mancante.
@Alex


title: Runtime error 3027

text:
Alessandro Baraldi wrote:
> Fabio Valsangiacomo ha scritto:
>
> [CUT]
>
>
> Scusa tu, con Google non vedevo assolutamente il messaggio di
> spiegazioni, non lo vedo
> nemmeno ora ...... ma non importa.
>
> Verifica che nei riferimenti non manchi qualche SPUNTA o che
Ho verificato e lunedě lo farň ancora
> addirittura non sia segnalata qualche libreria mancante.
Strano č perň che se su questa macchina mi collego io tutto funziona.
Non dovrebbe essere nemmeno un problema di diritti in quanto se l'utente si
collega su un altra macchina funziona
Grazie
Fabio
>
> @Alex


title: OT Traduzione FAQ 5.9

author: Karl Donaubauer

text:
********************
5.9 Print only the current record
Problem
You want to print only the current record of a form.
But when you open the according report all records of the form
i.e. of the underlying table or query are returned.
Solution
Use a query as data source of the report that as criteria in a
uniquely identifying column has a reference to your form e.g:
Forms!MyForm!Id
or
If you open the report via VBA you can directly hand over
the reference to the current record in the form e.g.:
for a number field:
DoCmd.OpenReport "MyReport", , , "Id =" & Me!Id
for a text field:
DoCmd.OpenReport "MyReport", , , "Company = " & _
    Chr$(34) & Me!Company & Chr$(34)
In the same way you can handle the case that you don't want
to print just a single (current) record but a group of records that
have an item in common.
***********************
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it
+info sulla prima Conferenza Italiana per Sviluppatori di Access (CISA1)


title: OT Traduzione FAQ 5.9

author: sv

text:
Karl Donaubauer ha scritto:
> ********************
> 5.9 Print only the current record
> Problem
> You want to print only the current record of a form.
> But when you open the according report all records of the form
> i.e. of the underlying table or query are returned.
> Solution
> Use a query as data source of the report that as criteria in a
> uniquely identifying column has a reference to your form e.g:
> Forms!MyForm!Id
> or
> If you open the report via VBA you can directly hand over
> the reference to the current record in the form e.g.:
> for a number field:
> DoCmd.OpenReport "MyReport", , , "Id =" & Me!Id
> for a text field:
> DoCmd.OpenReport "MyReport", , , "Company = " & _
>     Chr$(34) & Me!Company & Chr$(34)
> In the same way you can handle the case that you don't want
> to print just a single (current) record but a group of records that
> have an item in common.
> ***********************
5.9 Stampare solo il record corrente
Problema
Vuoi stampare soltanto il record corrente di una maschera.
Quando, però, apri il corrispondente report, vengono restituiti
tutti i record della maschera, cioè della tabella o query sottostante.
Soluzione
Utilizza una query come origine dati del report che ha, come
criterio in una colonna che la identifica univocamente, un riferimento
alla tua maschera. P. e.:
Forms!MiaMaschera!Id
Oppure
Se apri  il report via VBA puoi direttamente dare il riferimento
al record corrente nella maschera. P. e.,:
Per un campo numerico:
DoCmd.OpenReport "MioReport", , , "Id =" & Me!Id
Per un campo testo:
DoCmd.OpenReport "MioReport", , , "Azienda = " & _
Chr$(34) & Me!Azienda & Chr$(34)
Nello stesso modo puoi gestire il caso in cui non vuoi stampare
proprio un singolo(corrente) record ma un gruppo di record che
hanno un argomento (riferimento) in comune.
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Impostazioe report seconda pagina....

author: Pino uff.

text:
Ciao NG,
Come posso fare, per dirgli di  inizire la stampa qualche centimetro più
in basso quando non si
tratta della prima pagina.
Grazie anticipatamente
Pino
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Guarisci presto

author: Agos

text:
Anche se non mi faccio "sentire", vengo a "spulciare" spesso nel NG e ci
vuole poco a capire che sei una delle sue colonne portanti. Mi dispiace per
quello che ti è capitato. Spero, come tutti, che ti rimetta presto e bene.
In bocca al lupo.
Agos


title: Guarisci presto

author: Roberto da casa

text:
"Agos" <
agostino...@tin.it
> ha scritto nel messaggio
news:gIR48.29797$hi.7...@news1.tin.it...

Grazie infinite per le tue gentili parole.
> Agos
Ciao
Roberto


title: requery di una sottomaschera

author: stefano

text:
Grazie a tutti,
Ho un imprecisione con un requery di una sottomaschera continua.
La mia sottomaschera ha come origine dati la query "Pippo"
Io dalla maschera principale a seconda di varie scelte faccio distruggere e
ricreare la query "pippo" e poi faccio fare il requery alla sottomaschera,
Il problema è che funziona una volta su due
cioè la prima la terza la quinta ecc non funziona
mentre la seconda ecc funziona.
scusate se non mi sono spiegato bene.
alego il codice
me!elenco6.rowsource cambia ad ogni step
Set dbmiodb = CurrentDb
sqlmiastr = Me!Elenco6.RowSource
' TO DO: Turn normal error handler on when this condition is finished.
    On Error Resume Next
    dbmiodb.QueryDefs.Delete "miaperclaodesc"
    dbmiodb.QueryDefs.Refresh
' TO DO: Turn normal error handler on when this condition is finished.
    On Error GoTo 0
  ''' fine codice di controllo errore per query '''
Set qdmiaqd = dbmiodb.CreateQueryDef("miaperclaodesc", sqlmiastr)
dbmiodb.QueryDefs.Refresh
Forms!percespmc.Requery
Grazie a tutti per l'aiuto
Stefano


title: requery di una sottomaschera

author: Alessandro Cara

text:
stefano ha scritto:

ragazzi quanti giri fa una boccia!
1) come fa a cambiare rowsource (da questo codice non si evince)
per il resto
2) Forms!percespmc.recordsource = Me!Elenco6.RowSource
   (finito! solo questa!) se poi per andare da milano a casalpusterlengo
vuoi
passare per Palermo, padronissimo
--
a.cara
togli qualcosa dall'email


title: requery di una sottomaschera

text:
"Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
news:3E3EF1BC...@blunet.it...
[CUT]
> ragazzi quanti giri fa una boccia!
>
> 1) come fa a cambiare rowsource (da questo codice non si evince)
> per il resto
>
> 2) Forms!percespmc.recordsource = Me!Elenco6.RowSource
>    (finito! solo questa!) se poi per andare da milano a casalpusterlengo
> vuoi
> passare per Palermo, padronissimo
> --
> a.cara
> togli qualcosa dall'email
Grazie effittivamente mipiace molto guidare ma cosě č molto meglio.
Stefano


title: FileSystemObject: problema spazi nome directory.

author: oierpa

text:
Salve a tutti.
So che è un problema già trattato ma le soluzioni trovate non hanno funzionato per me.
In sostanza devo creare un file .bat con dei semplici comandi xcopy (generati da una selezione su una maschera). Il file deve essere creato in una directory:

C:\Program files\mieapp\utility\file.bat

come vedete la directory contiene uno spazioe e non riesco in nessun modo a scrivere lì dentro (non è un problema di autorizzazioni già testato).
Uso i comandi:

Dim dirDest As FileSystemObject
Dim fso As FileSystemObject
Dim oFile As Object
Dim strPath As String

strPath = "C:\Program files\mieapp\utility\file.bat"
Set fso = CreateObject("Scripting.FileSystemObject")
Set oFile = fso.CreateTextFile(strPath)
....
'genero il testo che metto nella variabile "testo"

oFile.WriteLine testo
oFile.Close
Set fso = Nothing
Set oFile = Nothing

Ho provato a scrivere strPath come segue (oltre che come scritto sopra):
strPath = """" & "C:\Program files\mieapp\utility\file.bat" & """"
strPath = "'C:\Program files\mieapp\utility\file.bat'"
strPath = chr(34) & "C:\Program files\mieapp\utility\file.bat" & chr(34)
ho anche provato a crea strPath come somma di più stringhe, separando il nome del file ma il risultato non cambia.

Mi viene restituito l'erroe di runtime 76.
Facendo dei test su un percorso che non contiene spazi il problema non sussiste.
La finestra delle variabili locali come valore di strPath mi restituisce quello corretto, ossia: C:\Program files\mieapp\utility\file.bat e con il testo che voglio nel file ...

Grazie in anticipo.


author: Bruno Campanini

text:
oierpa expressed precisely :

Prova così:
strPath = "C:\" & %ProgramFiles% & "\mieapp\utility\file.bat"

Bruno


text:

Ciao Bruno.
Grazie mille per la risposta.
Ho appena provato (ieri ero fuori sede, oggi ho subito voluto provare), ma restituisce lo stesso errore.
In particolare, se non metto le virgolette VBA mi dice subito "carattere non valido", se invece lo metto fra virgolette alla variabile viene assegnato il valore scritto, ossia %ProgramFiles% invece che andare a cercarsi la variabile del SO.
Non so più dove sbattere la testa, speravo davvero che questo tentativo andasse a buon fine perché è l'unico che non avevo provato di quelli proposti da Internet.
Grazie comunque


text:
oierpa was thinking very hard :

Windows 10 Pro
==============

1 - Ho creato in C:\Program Files la directory "Uti lity"
2 - DxClick su "Uti lity" ==> Properties ==> Security
    assegna a tutti il Permission "Full Control"

Dopodiché funziona tutto

Bruno

PS
Che Windows stai usando?


text:
Windows 7 64 bit, con office/access 2013.
Provo fra poco e ti dico.
Grazie


text:
Provato:
errore di runtime 76, impossibile trovare il percorso.
Mi sembra che nel caso di difficoltà di acesso l'errore sia diverso.
Grazie comunque


text:
oierpa was thinking very hard :

Non so che dirti; alle condizioni che ti ho indicato
da me funziona regolarmene.
Hai ptovato ad assegnare gli stessi Permission
"Full Control" a tutte le directory interessate?

Bruno


text:

Ciao Bruno.
Si ho provato ma contina a darmi l'errore di runtime 76.
Ho poensato di creare una variabile di windows dove scrivo il percorso, ma non so come richaimarla in VBA (visto che %nomevaraibile% non gli piace).


author: GiovanniDettoSola

text:
On Mon, 26 Oct 2015 02:58:43 -0700 (PDT), oierpa <
oie...@gmail.com
>
wrote:

Dim dirDest As FileSystemObject
Dim fso As FileSystemObject
Dim oFile As Object
Dim strPath As String

strPath = "C:\Program files\mieapp\utility\file.bat"
Set fso = CreateObject("Scripting.FileSystemObject")
Set oFile = fso.CreateTextFile(strPath)
oFile.WriteLine "testo"
oFile.Close
Set fso = Nothing
Set oFile = Nothing

il tuo codice sotto win7 32 bit e office 2010 funziona perfettamente
se metto al posto di mieapp mieapp1 ottengo l'errore tu dici.

sei sicuro di scrivere bene il percorso?

prova a spostare il tuo test sotto la directory users.


text:
Il giorno martedì 27 ottobre 2015 10:56:37 UTC+1, GiovanniDettoSola ha scritto:
> On Mon, 26 Oct 2015 02:58:43 -0700 (PDT), oierpa

Ciao Giovanni.
Scusa il ritardo nella risposta, nel frattempo in azienda siamo passati da Samba a windows 2012 sul server, non senza problemi.
Io uso win 7 64 e il problema persiste.
Domani provo su una macchina diversa e vedo se ho lo stesso problema o meno.
Grazie mille per l'interessamento.


title: uso di between and in Visual Basic

author: badush

text:
Una piccola premessa
se voglio che in una query, in riferimento ad un campo data,  visulizzare
solo le date a partire da quella anteriore di 7 giorni fa a quella odierna
inserisco nel criterio questa espressione:
Between Date()-7 And Date()
Come si puo ottenere in una maschera lo stesso risultato associandolo
all'evento click di un command botton?  Qual'è la sintassi in Visual Basic?
Grazie


title: uso di between and in Visual Basic

author: George

text:
"badush" <
bad...@martucci.com
> ha scritto nel messaggio
news:zu7Ga.84648$Ny5.2...@twister2.libero.it...

Scusa, non capisco, vuoi filtrare il recordset che sta dietro alla maschera?


title: uso di between and in Visual Basic

text:
Esattamente puoi aiutarmi?
"George" <
giorgio.ben...@libero.it
> ha scritto nel messaggio
news:bcbrn7$nas$1...@newsreader.mailgate.org...



title: uso di between and in Visual Basic

text:
"badush" <
bad...@martucci.com
> ha scritto nel messaggio
news:AjkGa.85879$Ny5.2...@twister2.libero.it...

Scrivi DOPO il quoting, please...
Usa questo codice associato all'evento del pulsante:
Me.Filter = "Data Between date()-7 and date()"
Me.FilterOn = True
Ciao.
george


title: uso di between and in Visual Basic

text:
"George" <
giorgio.ben...@libero.it
> ha scritto nel messaggio
news:bcck2q$3dr$1...@newsreader.mailgate.org...

Thank you
PS: Scrivero, da ora in poi, dopo il quoting. :-)


title: dbf

author: Ivan

text:
Stò tentando di importare in una tabella di access dei dati esterni
provenienti da un file generato dalla procedura di remote banking avente
estensione .dbf
altre volte sono riuscito ma oggi mi compare un messaggio che dice : la
tabella esterna non è nel formato previsto (3274).
Qualcuno mi può dare un suggerimento ??? la banca mi garantisce che il
formato di questo file è identico a quelli precedentaemnte aperti.
Grazie mille.


title: dbf

author: Gaspare

text:
[CUT]
Ciao,
sinceramente l'unica cosa che mi viene in mente è che il file sia in qualche
modo danneggiato...succede: sopratutto quando te lo garantiscono ! ;-)


title: dbf

author: TheMax

text:
Ivan wrote:
> Stň tentando di importare in una tabella di access dei dati esterni
> provenienti da un file generato dalla procedura di remote banking
> avente estensione .dbf
> altre volte sono riuscito ma oggi mi compare un messaggio che dice :
> la tabella esterna non č nel formato previsto (3274).
> Qualcuno mi puň dare un suggerimento ??? la banca mi garantisce che il
> formato di questo file č identico a quelli precedentaemnte aperti.
Cosě, proprio un suggerimento.
Prova importandolo in excel(magari csv), poi da excel passalo in access.
A me una volta ha risolto il problema.
> Grazie mille.
Fa sapere,
Ciao,
Massimo


title: dbf

author: Marco Ragusa

text:
"TheMax" <
massimo...@accessgroup.it
> ha scritto nel messaggio
news:defms2$88m$1...@area.cu.mi.it...
> Ivan wrote:
>> Stò tentando di importare in una tabella di access dei dati esterni
>> provenienti da un file generato dalla procedura di remote banking
>> avente estensione .dbf
>> altre volte sono riuscito ma oggi mi compare un messaggio che dice :
>> la tabella esterna non è nel formato previsto (3274).
>> Qualcuno mi può dare un suggerimento ??? la banca mi garantisce che il
>> formato di questo file è identico a quelli precedentaemnte aperti.
>
> Così, proprio un suggerimento.
> Prova importandolo in excel(magari csv), poi da excel passalo in access.
> A me una volta ha risolto il problema.
>
>> Grazie mille.
>
> Fa sapere,
> Ciao,
> Massimo
Provaci anche a me e successo, importalo con execl e poi lo importi in
access e funzionerà  ciao
>


title: mi rispiego... bottone di comando x query

author: JOE

text:
ciao a tutti...
ho fatto una query di aggiornamento di una data di un campo che si trova
in una tabella
e funge tutto regolarmente.... ma mi interessava sapere se questa
routine la potevo eseguire direttamente dalla maschera principale....mi
spiego..
creo il bottone di comando e vorrei che la query mi restituisse una
opzione in cui inserire a piacimento la data da aggiornare nella
tabella...
è possibile ???
grazie


author: Cinzia

text:
"JOE" <
to...@invalid.it
> ha scritto nel messaggio
news:801Pj.62856$FR.2...@twister1.libero.it...

> č possibile ???
> grazie
Ciao Joe,
sul click del bottone
DoComd.RunSql "Update TabellaX set DataDaAggiornare=[Immetti la
data?]"
Ovviamente dovrai modificare i nomi dei campi e della tabella per
adattarli alla tua struttura
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
http://accessdaziacin.live.spaces.com
----------------------------------------


author: Carlo Costarella

text:
"JOE" <
to...@invalid.it
> ha scritto nel messaggio
news:801Pj.62856$FR.2...@twister1.libero.it...

> č possibile ???
> grazie
E' possibile in diversi modi.
Nel criterio della query scrivi:
Like [immetti una data]
questo permette all'utente di inserire una data (p.e. 01/01/2008)
Altra strada, crea una funzione pubblica che restituisce una data:
Public Function DimmiLaData() As Date
Dim inpu As String
inpu = InputBox("Immetti una data per la ricerca, nel formato gg/mm/aaaa",
"Inserisci una data.", Date)
If inpu = "" Then
DimmiLaData = Format(Date, "dd/mm/yyyy")
Else
DimmiLaData = Format(inpu, "dd/mm/yyyy")
End If
End Function
nel criterio della query scriverai:
Like DimmiLaData()
Altra strada passi al criterio una data che si trova in un controllo su di
una maschera.
Una preghiera: usa il termine pulsante e non bottone
Ciao, Carlo


text:
"Carlo Costarella" <
carloantoni...@gmail.com
> ha scritto nel
messaggio news:fui7rd$pt$1...@tdi.cu.mi.it...
>
>
> E' possibile in diversi modi.
> Nel criterio della query scrivi:
> Like [immetti una data]
> questo permette all'utente di inserire una data (p.e. 01/01/2008)
>
> Altra strada, crea una funzione pubblica che restituisce una data:
> Public Function DimmiLaData() As Date
> Dim inpu As String
> inpu = InputBox("Immetti una data per la ricerca, nel formato
> gg/mm/aaaa", "Inserisci una data.", Date)
> If inpu = "" Then
> DimmiLaData = Format(Date, "dd/mm/yyyy")
> Else
> DimmiLaData = Format(inpu, "dd/mm/yyyy")
> End If
>
>
> End Function
> nel criterio della query scriverai:
> Like DimmiLaData()
>
> Altra strada passi al criterio una data che si trova in un controllo
> su di una maschera.
> Una preghiera: usa il termine pulsante e non bottone
-----------
Ciao Carlo ho optato per la soluzione di Cinzia in quanto funziona
bene...vi ringrazio tantissimo entrambi...
un piccolo dubbio... ma la query di aggiornamento, ho notato che anche
cancellandola
la routine funziona.. oppure deve essere presente ??
Ciao da Giuseppe


text:
"JOE" <
to...@invalid.it
> ha scritto nel messaggio
news:KBiPj.294580$%k.40...@twister2.libero.it...


------------------------------------
...funziona bene? Perchè la mia non funziona? Ti ho proposto non solo
l'identica soluzione ma anche altre...
Senza nulla togliere alla super Cinzia da cui ho molto da imparare, la
soluzione che prevede la funzione che ti ho scritto (imho) è più
professionale.
Comunque è importante che tu abbia risolto.
Ciao, Carlo


author: Sam --

text:
On Tue, 22 Apr 2008 13:17:12 +0200, "Carlo Costarella"
<
carloantoni...@gmail.com
> wrote:
>
>> Ciao Carlo ho optato per la soluzione di Cinzia in quanto funziona
>> bene...vi ringrazio tantissimo entrambi...
>------------------------------------
>...funziona bene? Perchè la mia non funziona? Ti ho proposto non solo
>l'identica soluzione ma anche altre...
>Senza nulla togliere alla super Cinzia da cui ho molto da imparare, la
>soluzione che prevede la funzione che ti ho scritto (imho) è più
>professionale.
>Comunque è importante che tu abbia risolto.
>
>Ciao, Carlo
Abbi pazienza Carlo,
tu ti chiami carlO e lei cinziA
capisci.... :-))))
sam--


text:
"Sam --" <
noe...@hotmail.com
> ha scritto nel messaggio
>>
>>> Ciao Carlo ho optato per la soluzione di Cinzia in quanto funziona
>>> bene...vi ringrazio tantissimo entrambi...
>>------------------------------------
>>...funziona bene? Perchè la mia non funziona? Ti ho proposto non solo
>>l'identica soluzione ma anche altre...
>>Senza nulla togliere alla super Cinzia da cui ho molto da imparare, la
>>soluzione che prevede la funzione che ti ho scritto (imho) è più
>>professionale.
>>Comunque è importante che tu abbia risolto.
e questo è importante...e cmq avevo visto nella soluzione di Cinzia
una strada + semplice x un novellino come me...;.))
tu parlavi di funzione pubblica ed io pensavo a chissà quale incarico
ministeriale ti riferivi.. :>))
> Abbi pazienza Carlo,
> tu ti chiami carlO e lei cinziA
> capisci.... :-))))
-
e vuoi mettere !!
Ciao e grazie a tutti
ps.. a parte gli scherzi, vorrei testare anche la soluzione di carlo..
dove devo inserire il codice ??
su click di un pulsante di comando ??
grazie


text:
"JOE" <
to...@invalid.it
> ha scritto nel messaggio
news:qoFPj.295241$%k.40...@twister2.libero.it...
> "Sam --" <
noe...@hotmail.com
> ha scritto nel messaggio
cut
> ps.. a parte gli scherzi, vorrei testare anche la soluzione di carlo..
> dove devo inserire il codice ??
> su click di un pulsante di comando ??
> grazie
>
No. La funzione č una funzione pubblica e non privata a un codice di
maschera o report.
La F.P. va inserita in un modulo pubblico e puň essere richiamata da un
punto qualsiasi dell'applicativo.
Cosě nel tuo caso crei la query e nella sezione "Aggiorna a:" corrispondente
al campo (data... immagino) scrivi:
NomeFunzione(), nell'esempio che ti ho postato scriverai: DimmiLaData() ....
Per riprendere l'esempio di Cinzia e se non vuoi utilizzare una query
salvata (a mio avviso la soluzione migliore) l'istruzione sql diventa:
DoComd.RunSql "Update TabellaX set
NomeTabellaX.NomeCampoData=DimmiLaData();"
Ciao, Carlo


text:


Una era quella di creare una maschera con una casella di testo che
corrisponde al tuo criterio di aggiornamento
Facciamo conto che la maschera si chiami "Maschera1" e la casella di
testo "Testo1".
Ti prepari una query di update tipo questa:
UPDATE [TabellaXX] SET Ordine = 'valoreYY'
WHERE [CampoTabella]=Forms!Maschera1!Testo1;
e la salvi con un nome, es: "Query1"
Nell'evento click del pulsante della tua maschera ci metti un bel:
DoCmd.OpenQuery "Query1", acNormal, acEdit
Quello che ti ho scritto sopra è lo scheletro, aggiungi le strutture
di controllo degli errori, disabilita eventuali warnings
e il gioco è fatto.
ciao
sam--


text:
"Sam --" <
noe...@hotmail.com
> ha scritto nel messaggio >>
>>e vuoi mettere !!
>>ps.. a parte gli scherzi, vorrei testare anche la soluzione di carlo..
>>dove devo inserire il codice ??
>>su click di un pulsante di comando ??
>>grazie
>>
>>
> Una era quella di creare una maschera con una casella di testo che
> corrisponde al tuo criterio di aggiornamento
>
> Facciamo conto che la maschera si chiami "Maschera1" e la casella di
> testo "Testo1".
>
> Ti prepari una query di update tipo questa:
> UPDATE [TabellaXX] SET Ordine = 'valoreYY'
> WHERE [CampoTabella]=Forms!Maschera1!Testo1;
> e la salvi con un nome, es: "Query1"
>
> Nell'evento click del pulsante della tua maschera ci metti un bel:
> DoCmd.OpenQuery "Query1", acNormal, acEdit
>
>
> Quello che ti ho scritto sopra è lo scheletro, aggiungi le strutture
> di controllo degli errori, disabilita eventuali warnings
> e il gioco è fatto.
--------------
grazie ad entrambi.. mi divertirò a provare le varie soluzioni...
Ciao


title: selezione record

author: Roberto

text:
Ho una maschera (modalità masc.singola), collegata alla tabella anagrafico
contenente circa 5000 record, da cui vorrei poter selezionare alcuni record
e stampare le buste con gli indirizzi da inviare a ciascun socio. Ho risolto
il problema riuscendo a stampare le buste singolarmente ma non è un metodo
molto veloce.
E' possibile utilizzare la maschera in modalità maschere continue, inserire
una casella di controllo, selezionare solo i record che mi interessano e far
stampare solo le buste relative?


title: selezione record

author: Sergio MAZZA

text:
"Roberto" <
ro...@freemai.it
> ha scritto nel messaggio
news:DTJo6.80600$Y93.2...@news.infostrada.it...

Certo che è possibile, aggiungi nella tabella un campo "sì/no", magari
impostando come valore predefinito 0 (Zero), e poi nella query di selezione,
alla colonna del campo "sì/no",  inserisci nella riga della condizione -1
(che equivale a sì)...
Ciao.


title: selezione record

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:97vrrc$t0m$1...@suite03.caspur.it...

Il problema è che la tabella mi viene spedita periodicamente aggiornata e
non vorrei ogni volta dover aggiungere il campo si/no. non posso intervenire
sulla struttura della tabella a monte. ( so che sarebbe la soluzione
migliore)
>
>


title: selezione record

text:
"Roberto" <
ro...@freemai.it
> ha scritto nel messaggio
news:suKo6.80759$Y93.2...@news.infostrada.it...
>
> Il problema č che la tabella mi viene spedita periodicamente aggiornata e
> non vorrei ogni volta dover aggiungere il campo si/no. non posso
intervenire
> sulla struttura della tabella a monte. ( so che sarebbe la soluzione
> migliore)
>
Crei una query di creazione tabella che legge i dati inviati e ti crea
(appunto) una (nuova) tabella con un nuovo campo "sě/no" impostato a 0...
Ciao.


title: selezione record

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:97vt36$1l$1...@suite03.caspur.it...

Nel frattempo ho risolto il problema cosě, fammi sapere se č una procedura
"ortodossa":
Ho duplicato la tabella in questione nominandola PROVV
Nella maschera ho inserito un pulsante che esegue una query di accodamento
che aggiunge il record selezionato alla tabella PROVV
 Con un altro pulsante avvio l'anteprima dell report "buste" che ho
duplicato ed a cui ho messo come origine dati la tabella PROVV
Un altro pulsante esegue  una query di eliminazione e  "svuota" la tabella
PROVV preparandola a ricevere altri record per un altra lista.
E' troppo macchinoso?


title: selezione record

text:
"Roberto" <
ro...@freemai.it
> ha scritto nel messaggio
news:KnLo6.82335$Y93.2...@news.infostrada.it...
>
> >
> Nel frattempo ho risolto il problema cosě, fammi sapere se č una procedura
> "ortodossa":
> Ho duplicato la tabella in questione nominandola PROVV
> Nella maschera ho inserito un pulsante che esegue una query di accodamento
> che aggiunge il record selezionato alla tabella PROVV
>  Con un altro pulsante avvio l'anteprima dell report "buste" che ho
> duplicato ed a cui ho messo come origine dati la tabella PROVV
> Un altro pulsante esegue  una query di eliminazione e  "svuota" la tabella
> PROVV preparandola a ricevere altri record per un altra lista.
> E' troppo macchinoso?
>
No č un'altro modo...
Ciao.


title: Form-disattivare tutte le sottomaschere

author: Cataldo Formaro

text:
Ciao,
nella miamaschera ho parecchie sottomaschere che rendo invisibili
all'apertura della maschera principale, nel seguente modo:
M_AE_A_Nuovo.Visible = False
M_AE_E_Nuovo.Visible = False
M_AE_U_Nuovo.Visible = False
M_AE_B_Nuovo.Visible = False
M_AE_C_Nuovo.Visible = False
M_AE_D_Nuovo.Visible = False
M_AE_S_Nuovo.Visible = False
M_AE_F_Nuovo.Visible = False
Esiste un comando piů veloce che mi dia lo stesso risultato??
Saluti CF


title: Form-disattivare tutte le sottomaschere

author: Mak

text:
--
Access 2000 SR1
"Cataldo Formaro" <
formaro...@inwind.it
> ha scritto nel messaggio
news:XFJG9.46875$3l.13...@twister1.libero.it...
> Ciao,
> nella miamaschera ho parecchie sottomaschere che rendo invisibili
> all'apertura della maschera principale, nel seguente modo:
> M_AE_A_Nuovo.Visible = False
> M_AE_E_Nuovo.Visible = False
> M_AE_U_Nuovo.Visible = False
> M_AE_B_Nuovo.Visible = False
> M_AE_C_Nuovo.Visible = False
> M_AE_D_Nuovo.Visible = False
> M_AE_S_Nuovo.Visible = False
> M_AE_F_Nuovo.Visible = False
>
> Esiste un comando più veloce che mi dia lo stesso risultato??
>
> Saluti CF
>
Puoi utilizzare questa funzione sull' evento apertura:
Sub Invisible(x as String)
' Rende invisibili tutte le sub form
' dove x è il nome del controllo subform
Dim ctl As Control
    For Each ctl In Forms(x).Controls
        If ctl.ControlType = acSubform Then
           ctl.Visible = False
        End If
    Next
End Sub
Saluti
Mak


title: Form-disattivare tutte le sottomaschere

text:
> Puoi utilizzare questa funzione sull' evento apertura:
>
> Sub Invisible(x as String)
> ' Rende invisibili tutte le sub form
> ' dove x è il nome del controllo subform
> Dim ctl As Control
>
>     For Each ctl In Forms(x).Controls
>         If ctl.ControlType = acSubform Then
>            ctl.Visible = False
>         End If
>     Next
>
> End Sub
>
> Saluti
> Mak
Correggo un piccolo errore sulla dicitura libera
' Dove X è il nome della maschera Principale dove sono
situati i controlli subform
Saluti
Mak


title: Form-disattivare tutte le sottomaschere

author: Roberto da casa

text:
"Cataldo Formaro" <
formaro...@inwind.it
> ha scritto nel messaggio
news:XFJG9.46875$3l.13...@twister1.libero.it...
> Ciao,
> nella miamaschera ho parecchie sottomaschere che rendo invisibili
> all'apertura della maschera principale, nel seguente modo:
> M_AE_A_Nuovo.Visible = False
> M_AE_E_Nuovo.Visible = False
> M_AE_U_Nuovo.Visible = False
> M_AE_B_Nuovo.Visible = False
> M_AE_C_Nuovo.Visible = False
> M_AE_D_Nuovo.Visible = False
> M_AE_S_Nuovo.Visible = False
> M_AE_F_Nuovo.Visible = False
>
> Esiste un comando più veloce che mi dia lo stesso risultato??
>
> Saluti CF
Nella proprietà Tag dei controlli sottomaschera di cui sopra e che vuoi
rendere non visibili scrivi una X.
Quindi gnera il seguente codice VBA:
Dim ctl As Control
For Each ctl In Me.Controls
    If ctl.Tag = "X" Then
        ctl.Visible = False
    End If
Next ctl
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Form-disattivare tutte le sottomaschere

author: Alex

text:
"Cataldo Formaro" <
formaro...@inwind.it
> wrote in message
news:XFJG9.46875$
3l.13...@twister1.libero.it
> Ciao,
> nella miamaschera ho parecchie sottomaschere che rendo invisibili
> all'apertura della maschera principale, nel seguente modo:
[CUT]
>
> Esiste un comando più veloce che mi dia lo stesso risultato??
>
> Saluti CF
Dim ctl as Control
For Each Ctl in Me.Controls
    If ctl.ControlType=acSubform then ctl.Visiblr = False
Next
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Form-disattivare tutte le sottomaschere

text:
"Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:77549c6f02b948c671...@mygate.mailgate.org...
> "Cataldo Formaro" <
formaro...@inwind.it
> wrote in message
> news:XFJG9.46875$
3l.13...@twister1.libero.it
>
> > Ciao,
> > nella miamaschera ho parecchie sottomaschere che rendo invisibili
> > all'apertura della maschera principale, nel seguente modo:
> [CUT]
> >
> > Esiste un comando più veloce che mi dia lo stesso risultato??
> >
> > Saluti CF
>
Ringrazio tutti per i suggerimenti, proverò domani e vi darò conferma del
buon funzionamento.
Cmq tenete presente che le sottomaschere, al bisogno dovranno essere rese
visible=tru, credo non ci siano problemi con i vostri suggerimenti.
Ciao a domani CF


title: Form-disattivare tutte le sottomaschere

text:
>
> Dim ctl as Control
> For Each Ctl in Me.Controls
>     If ctl.ControlType=acSubform then ctl.Visiblr = False
volevi dire If ctl.ControlType=acSubform then ctl.Visible = False
> Next
>
> @Alex.
>
PERFETTO!!!!!!!
Vorrei capire
1) Questo codice lo posso utilizzare anche per le etichette? e come?
2) una maschera in modalità visible=false (considerando quante sono) può
rallentare il sistema??
Grazie Alex, gentile come sempre.
saluti CF


title: Form-disattivare tutte le sottomaschere

text:
> > Puoi utilizzare questa funzione sull' evento apertura:
> >
> > Sub Invisible(x as String)
> > ' Rende invisibili tutte le sub form
> > ' dove x č il nome del controllo subform
> > Dim ctl As Control
> >
> >     For Each ctl In Forms(x).Controls
> >         If ctl.ControlType = acSubform Then
> >            ctl.Visible = False
> >         End If
> >     Next
> >
> > End Sub
> >
> > Saluti
> > Mak
> Correggo un piccolo errore sulla dicitura libera
> ' Dove X č il nome della maschera Principale dove sono
> situati i controlli subform
>
> Saluti
> Mak
>
Mi segnala un errore di end sub, piů o meno....
riprovo e riposto
Ciao CF


title: Form-disattivare tutte le sottomaschere

text:
> Nella proprietą Tag dei controlli sottomaschera di cui sopra e che vuoi
> rendere non visibili scrivi una X.
>
> Quindi gnera il seguente codice VBA:
>
> Dim ctl As Control
> For Each ctl In Me.Controls
>     If ctl.Tag = "X" Then
>         ctl.Visible = False
>     End If
> Next ctl
>
> --
> Roberto
>
Ciao Roberto,
Ho inserito una X nella proprietą Tag di ogno sottomaschera.
Sull'evento apertura della maschera principale ho inserito il tuo codice.
Le vedo lostesso.
Saluti CF


title: Form-disattivare tutte le sottomaschere

text:
"Cataldo Formaro" <
formaro...@inwind.it
> ha scritto nel messaggio
news:Vu3H9.52825$2B1.1...@twister2.libero.it...
> > Nella proprietà Tag dei controlli sottomaschera di cui sopra e che vuoi
> > rendere non visibili scrivi una X.
> >
> > Quindi gnera il seguente codice VBA:
> >
> > Dim ctl As Control
> > For Each ctl In Me.Controls
> >     If ctl.Tag = "X" Then
> >         ctl.Visible = False
> >     End If
> > Next ctl
> >
> > --
> > Roberto
> >
> Ciao Roberto,
> Ho inserito una X nella proprietà Tag di ogno sottomaschera.
> Sull'evento apertura della maschera principale ho inserito il tuo codice.
>
> Le vedo lostesso.
> Saluti CF
La X non la devi scrivere nella proprietà Tag delle sottomaschere, ma nella
proprietà Tag dei CONTROLLI SOTTOMASCHERA che sono contenuti nella maschera
principale.



title: Form-disattivare tutte le sottomaschere

text:
"Cataldo Formaro" <
formaro...@inwind.it
> wrote in message
news:Wu3H9.52826$
2B1.1...@twister2.libero.it
> >
> > Dim ctl as Control
> > For Each Ctl in Me.Controls
> >     If ctl.ControlType=acSubform then ctl.Visiblr = False
> volevi dire If ctl.ControlType=acSubform then ctl.Visible = False
> > Next
> >
> > @Alex.
> >
> PERFETTO!!!!!!!
> Vorrei capire
> 1) Questo codice lo posso utilizzare anche per le etichette? e come?
Si, invece di confrontare con la Costante acSubForm sarà acLabel...!
> 2) una maschera in modalità visible=false (considerando quante sono) può
> rallentare il sistema??
Sinceramente non sò, ma sicuramente non nel Refresh video....!
Saluti.
@ALex.



title: Form-disattivare tutte le sottomaschere

text:
"Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:04e2086d1ebec23f11...@mygate.mailgate.org...

ciao  CF
PS:Hai dato un'occhiatina al mio post:
Query di unione..... del 2-12-2002


title: Form-disattivare tutte le sottomaschere

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:A24H9.52994$2B1.1...@twister2.libero.it...

Mi pare di capire, che secondo il tuo suggerimento, andrei a rendere
invisibile "singolarmente" ogni controllo contenuto nella sottomaschera o in
più sottomaschere? A me interessa invece, rendere invisibile (all'apertura)
tutte le sottomaschere contenute nella maschera principale, poi le attiverò
man mano che mi occorrono.
Ciao CF


title: Form-disattivare tutte le sottomaschere

text:
"Cataldo Formaro" <
formaro...@inwind.it
> ha scritto nel messaggio
news:9T8H9.54379$2B1.1...@twister2.libero.it...
[CUT]
> >
> Mi pare di capire, che secondo il tuo suggerimento, andrei a rendere
> invisibile "singolarmente" ogni controllo contenuto nella sottomaschera o
in
> più sottomaschere?
Nooooo.
Rendo non visibile il controllo sottomaschera e quindi, automaticamente,
tutto ciò che contiene.
Insomma la mia routine fa quello che fa quella di Alex, con la sola
differenza che lui determina i campi da rendere non visibili verificando il
tipo del controllo (sottomaschera) e quindi rende non visibili tutti i
controlli sottomaschera della maschera, invece io rendo non visibili i
controlli che hanno X nella proprietà Tag.
Comunque, visto che hai risolto con il suggerimento di Alex, non credo che
valga la pena che tu perda altro tempo a cercare di applicare la mia
soluzione, che ha solo il pregio di essere più flessibile (a condizione che
ti serva una soluzione più flessibile), ma il difetto (rispetto a quella di
Alex) di essere meno automatica.
> A me interessa invece, rendere invisibile (all'apertura)
> tutte le sottomaschere contenute nella maschera principale, poi le
attiverò
> man mano che mi occorrono.
Se riesci ad applicarla correttamente, questo fa la mia routine.
> Ciao CF



title: Form-disattivare tutte le sottomaschere

text:
"Roberto da casa" <
r.ma...@libero.it
> wrote in message
news:NwlH9.54785$
3l.15...@twister1.libero.it
[CUT]
> Nooooo.
> Rendo non visibile il controllo sottomaschera e quindi, automaticamente,
> tutto ciò che contiene.
> Insomma la mia routine fa quello che fa quella di Alex, con la sola
> differenza che lui determina i campi da rendere non visibili verificando il
> tipo del controllo (sottomaschera) e quindi rende non visibili tutti i
> controlli sottomaschera della maschera, invece io rendo non visibili i
> controlli che hanno X nella proprietà Tag.
> Comunque, visto che hai risolto con il suggerimento di Alex, non credo che
> valga la pena che tu perda altro tempo a cercare di applicare la mia
> soluzione, che ha solo il pregio di essere più flessibile (a condizione che
> ti serva una soluzione più flessibile), ma il difetto (rispetto a quella di
> Alex) di essere meno automatica.
>
Sante parole......! ;-)
Io solitamente uso spesso i TAG per altre
gestioni, e per queste cose se posso li evito.
Se lo conosci lo eviti....!!!
Ciao Roberto.
@Alex



title: Intercettare caso in cui query accodamento = 0

author: esseAemme

text:
Ciao,
ho questa query di accodamento che funziona alla grande. Vorrei sapere
come, nel caso in cui la query di accodamento sia uguale a zero, dire
al mio utente che non ci sono record da accodare, perchè  il record è
già presente. Questa è la query di accodamento da vba:
Dim strSQL As String
strSQL = "INSERT INTO TBL_CSTMP ( cstmp_mpid, cstmp_vsid )SELECT
TBL_MP.mp_id, " & Forms!msc_cstmp!versionelistino & " As Versione FROM
TBL_MP" & _
         " WHERE (TBL_MP.mp_id = " & Me![mp_id] & ") and (TBL_MP.mp_id
Not In (SELECT cstmp_mpid FROM TBL_CSTMP" & _
         " WHERE tbl_cstmp.cstmp_vsid = " & Forms!msc_cstmp!
versionelistino & "));
DoCmd.RunSQL strSQL
Grazie,
Samantha


author: miciomao

text:
dirò una cavolata ?
If DCount("*", "nomedellatuaquery") = 0 Then
msgbox "Ritenta sarai più fortunato"
Else
DoCmd.RunSQL strSQL
end if


text:
si credo di dirla perchè una query di comando non può essere
utilizzata come origine riga
come non detto scusa


author: Marco Pizzamiglio

text:
esseAemme ha scritto:
> Ciao,


> Grazie,
> Samantha
Conta i record prima e dopo l'esecuzione della query:
  record_prima = dcount("*","TBL_CSTMP")
  ........
  DoCmd.RunSQL strSQL
  record_dopo = dcount("*","TBL_CSTMP")
  if record_prima <> record_dopo then
    msgbox "Hai inserito " & record_dopo - record_prima & " nuovi record."
  else
    msgbox "Non hai inserito nuovi record."
  end if
Ciao.
-Marco-
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
On 23 Ott, 12:41,
marco.pizzamig...@gmail.com
 (Marco Pizzamiglio)
wrote:

Bella soluzione elegante, grazie Marco!!!!!
Samantha


text:
On 23 Ott, 12:12, esseAemme <
samantha.ci...@gmail.com
> wrote:
cut
dim dbCorrente as DAO.Database
set dbCorrente = currentDb
dbCorrente.execute strSQL
msgbox "Ho accodato " & dbCorrente.RecordsAffected & " record."
set dbCorrente = nothing
Utilizzando il metodo execute access non chiede conferma, ma sei
obbligato ad usare una variabile DAO.database perché il metodo
currentDb.RecordsAffected ritorna sempre 0 (ovviamente).


title: far ereditare all'apertura di una form la posizione della form chiamante.

author: Giuseppe

text:
Buongiorno.
Nel mio db ho le form tutte della stessa dimensione. Quando ne apro
una faccio chiudere la precedente.
A volte capita di aver bisogno di un'altra sessione di lavoro, e per
evitare di aprire una copia del file fe (visto che è in continua
evoluzione), ho creato su ogni maschera un comando su tasto giù delle
form (F10) che mi apre il menu principale e di lì ho come due sessioni
di lavoro. Per evitare di non accorgermene che sotto una form ce n'è
un'altra vorrei far ereditare alle form la posizione di quella
chiamante. E' possibile? Come?
Grazie.
Giuseppe.


author: Karl Donaubauer

text:
Giuseppe wrote:
> Nel mio db ho le form tutte della stessa dimensione. Quando ne apro
> una faccio chiudere la precedente.
> A volte capita di aver bisogno di un'altra sessione di lavoro, e per
> evitare di aprire una copia del file fe (visto che č in continua
> evoluzione), ho creato su ogni maschera un comando su tasto giů delle
> form (F10) che mi apre il menu principale e di lě ho come due sessioni
> di lavoro. Per evitare di non accorgermene che sotto una form ce n'č
> un'altra vorrei far ereditare alle form la posizione di quella
> chiamante.
Non sono sicuro di capirti e anche non hai scritto il codice con
quale apri le maschere. Per questo solo alcune indicazioni
generiche:
Puoi copiarti un mezzo metro di codice API come p.e.
http://support.microsoft.com/?kbid=143162
in un modulo standard per ottenere la posizione (e le mesure)
di una maschera.
Poi puoi usare la funzione del KB nel codice della tua "maschera
chiamante" in questo modo:
Dim lngLeft As Long, lngTop As Long
GetFormDimensions Me, lngLeft, lngTop, 0, 0
DoCmd.OpenForm "LaMiaProssimaMaschera"
DoCmd.MoveSize lngLeft, lngTop
--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


text:
On 11 Ago, 12:57, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:
> Giuseppe wrote:
> > Nel mio db ho le form tutte della stessa dimensione. Quando ne apro
> > una faccio chiudere la precedente.
> > A volte capita di aver bisogno di un'altra sessione di lavoro, e per
> > evitare di aprire una copia del file fe (visto che è in continua
> > evoluzione), ho creato su ogni maschera un comando su tasto giù delle
> > form (F10) che mi apre il menu principale e di lì ho come due sessioni
> > di lavoro. Per evitare di non accorgermene che sotto una form ce n'è
> > un'altra vorrei far ereditare alle form la posizione di quella
> > chiamante.
>
> Non sono sicuro di capirti e anche non hai scritto il codice con
> quale apri le maschere. Per questo solo alcune indicazioni
> generiche:
>
> Puoi copiarti un mezzo metro di codice API come p.e.
http://support.microsoft.com/?kbid=143162
> in un modulo standard per ottenere la posizione (e le mesure)
> di una maschera.
>
> Poi puoi usare la funzione del KB nel codice della tua "maschera
> chiamante" in questo modo:
>
> Dim lngLeft As Long, lngTop As Long
>
> GetFormDimensions Me, lngLeft, lngTop, 0, 0
>
> DoCmd.OpenForm "LaMiaProssimaMaschera"
> DoCmd.MoveSize lngLeft, lngTop
>
> --
> Ciao
> Karl
> *********
> Access FAQ:
http://www.donkarl.com/it
Ciao Karl.
Ecco il codice che utilizzo per aprire le form:
docmd.openform "miamaschera",,,,,,
me.name
docmd.closeform, "primamaschera"
Su apertura della maschera ho
docmd.movesize 0,0,10000,8000
In questo modo ho sempre solo una form aperta.
Se però ho bisogno di aprirne un'altra senza chiudere quella aperta,
con il comando su tasto giu della maschera attiva apro la una nuova
form (menu principale)
che farei aprire con una posizione diversa da quella già aperta in
modo da non sovrapporsi.
In questo momento avrei due form in due posizioni diverse.
Le form che apro dalla form appena aperta devono ereditare la
posizione in modo da mantenere una posizione diversa da quella che è
rimasta aperta.
Io ho pensato a quest'altra soluzione:
su apertura di qualsiasi form se risulta già aperta una form ultilizzo
un docmd.movesize diverso, altrimenti quella attuale.
Può andar bene? E se sì, come faccio per far controllare ad una form
che non ce ne siano altre aperte?
Giuseppe.


text:
Giuseppe wrote:
> ...
> Ecco il codice che utilizzo per aprire le form:
> docmd.openform "miamaschera",,,,,,
me.name
> docmd.closeform, "primamaschera"
> Su apertura della maschera ho
> docmd.movesize 0,0,10000,8000
> In questo modo ho sempre solo una form aperta.
> Se però ho bisogno di aprirne un'altra senza chiudere quella aperta,
> con il comando su tasto giu della maschera attiva apro la una nuova
> form (menu principale)
> che farei aprire con una posizione diversa da quella già aperta in
> modo da non sovrapporsi.
> In questo momento avrei due form in due posizioni diverse.
> Le form che apro dalla form appena aperta devono ereditare la
> posizione in modo da mantenere una posizione diversa da quella che è
> rimasta aperta.
> Io ho pensato a quest'altra soluzione:
> su apertura di qualsiasi form se risulta già aperta una form ultilizzo
> un docmd.movesize diverso, altrimenti quella attuale.
> Può andar bene?
No, perché se ti capisco bene, in questo momento hai sempre
aperto 2 maschere: la chiamante e la chiamata
Per questo devi
o invertire le due righe di sopra, cioè Close --> OpenForm
o passare OpenArgs o altro "signale" di posizionarsi alla chiamata
o posizionare la seconda dalla prima.
> E se sì, come faccio per far controllare ad una form
> che non ce ne siano altre aperte?
Application.Forms.Count
dà il numero delle maschere aperte.



title: arrotondamenti

author: Mario Masi

text:
qualcuno puo' dirmi
come si fanno gli arrotondamenti matematici o comunque come si gestiscono gli
arrotondamenti in access?

 grazie

mario


title: arrotondamenti

author: Harry Evans

text:
Per esempio con qs funzione:
' da: NeatCode.mdb
' Neat Code for Microsoft Access 97
' Malcolm Stewart (Updated for 97 by Susan Vinson)
*****************************************************************
Function RoundN(x, N As Integer)
'
' Rounds a number to N decimal places
' Uses arithmatic rounding
' N should be in the range 0-10 for proper results
'
Dim Factor As Long
  Factor = 10 ^ N
  RoundN = Int(x * Factor + 0.5) / Factor
End Function
"Mario Masi" <
mario...@mix.it
> wrote in message
LPBBIAALFKPKHDLIMIB...@mix.it...



title: Masterizzare

author: Filippo

text:
Supponendo che io abbia memorizzato il precorso dei file a me interessati in
una tabella dinome commesse come faccio a masterizzzare i file da me
selezionati.
Sono partito creando due listbox :
File presenti sul computer nella prima.
File da masterizzare nella seconda.
Dopo aver selezionato i file da masterizzare spostandoli nella 2
listbox,come facco a masterizzarli direttamente senza passare da programmi
vari?
Sono a posto per il controllo dello spazio ma come faccio ad inviari al cd?
Devo tener presente che i supporti sono DVD.
Grazie tante.
Se non c'è la possibilità di farlo me lo potreste dire?
Di nuovo
Filippo Mazzella.


title: Masterizzare

author: Setec Astronomy

text:
Filippo wrote:
> Supponendo che io abbia memorizzato il precorso dei file a me
> interessati in una tabella dinome commesse come faccio a
> masterizzzare i file da me selezionati.
[cut]
Prova ad utilizzare DirectCD.
Su Windows XP dovrebbero esserci delle api, ma e' da verificare.
Comunque non e' una cosa molto semplice.
Saluti.


title: Masterizzare

text:
"Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
news:ZihDa.37426$pR3.8...@news1.tin.it...

Semplicemente usando l'Istruzione FileCopy (vedi help).
Che tu stia copiando un file sull'HD, sul floppy o sul masterizzatore ai
fini di Access non ti cambia assolutamente nulla: naturalmente
nell'istruzione FileCopy, nel percorso del file di output, dovrai indicare
il nome dell'unità nella quale vuoi registrare.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Masterizzare

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:IfjDa.59536$lK4.1...@twister1.libero.it...

Certo,per access non cambia niente però il cd deve essere pronto alla
scrittura.
Infatti se faccio solo Filecopy e come destinazione uso il cd (con cd vuoto
inserito),access mi da errore,
"Nome o numero file non valido".
Il problema quindi è quello di preparare il cd alla scrittura con  access
usando qualcosa(ocx,api ecc..) e che purtroppo mi sfugge.
Grazie per le risposte,
Filippo Mazzella


title: Masterizzare

text:
"Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
news:Vb_Da.84275$g92.1...@news2.tin.it...

> Certo,per access non cambia niente però il cd deve essere pronto alla
> scrittura.
> Infatti se faccio solo Filecopy e come destinazione uso il cd (con cd
vuoto
> inserito),access mi da errore,
> "Nome o numero file non valido".
> Il problema quindi è quello di preparare il cd alla scrittura con  access
> usando qualcosa(ocx,api ecc..) e che purtroppo mi sfugge.
Non sono in grado di darti un aiuto per risolvere questo problema.
Permettimi però una considerazione: non mi sembra un problema predisporre il
CD alla registrazione prima dell'inizio dell'elaborazione; puoi inoltre
sfruttare la gestione degli errori per segnalare la mancata predisposizione
all'utente finale; in fin dei conti è come quando si deve registrare su un
floppy: la formattazione del floppy si effettua prima della registrazione.
>
> Grazie per le risposte,
> Filippo Mazzella
--



title: Masterizzare

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:V31Ea.65784$Ny5.1...@twister2.libero.it...
>
>
> Non sono in grado di darti un aiuto per risolvere questo problema.
> Permettimi perň una considerazione: non mi sembra un problema predisporre
il
> CD alla registrazione prima dell'inizio dell'elaborazione; puoi inoltre
> sfruttare la gestione degli errori per segnalare la mancata
predisposizione
> all'utente finale; in fin dei conti č come quando si deve registrare su un
> floppy: la formattazione del floppy si effettua prima della registrazione.
[CUT]
Infatti.. se hai Nero INCD o Roxio EASY CD... il controllo lo dovrebbe fare
il TASK attivo appena nominato.
Infatti se attraverso un comando DOS (es. Copy *.* ... ecc ) č possibile
sotto Windows copiare un intera cartella su CD.. non vedo perchč non ci deve
riuscire ACCESS
ciao


title: Masterizzare

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:V31Ea.65784$Ny5.1...@twister2.libero.it...

Controllo errore,
sono d'accordo va bene,
grazie e ciao.


title: WXP-A00 - Filtro durante la digitazione

author: Il Giova

text:
Salve!
in una maschera continua ho creato un pulsante che filtra i record tramite
quello che inserisco in una determinata casella di testo.
Mi piacerebbe riuscire a fare un filtro "automatico", ovvero mentre digito B
mi vengono tutti i nomi che iniziano per B*, se scrivo BI appaiono i BI*
ecc. ecc., senza dover tutte le volte premere un pulsante di ricerca, ne
invio... un po' come nella rubrica dei cellulari...
Ho notato che nelle caselle combinate questo tipo di ricerca funziona in
automatico, ma a volte capita di ricercare un testo che è parte del campo e
non l'inizio e quindi devo utilizzare per forza una casella di testo.
Qualcuno mi da qualche dritta per il codice...?
Grazie mille
Il Giova


title: WXP-A00 - Filtro durante la digitazione

text:

Questo dovrebbe essere la risposta:
www.sitocomune.com
 Sezione Forms
3.114 Come creare un controllo di ricerca (3)
Ciao.
--
Sergio MAZZA


title: Errore su settaggio recordset

author: vuLCan Karayan

text:
Ma tutte a me!
Ho questo codice _elementare_
Sub Compila
    Dim curA As Currency
    Dim curB As Currency
    Dim curC As Currency
    Dim intConteggioRecord As Integer
    Dim rs As DAO.Recordset
    Set rs = CurrentDb.OpenRecordset("SELECT * FROM MyQuery")
    intConteggioRecord = rs.RecordCount
    If intConteggioRecord = 0 Or IsNull(intConteggioRecord) Then
       MsgBox "Nessun record trovato"
       Exit Sub
    End If
    If intConteggioRecord = 1 Then
       curA= DLookup("ImportoA", "MyQuery")
       curB= DLookup("ImportoB", "MyQuery")
       curC= DLookup("ImportoC", "MyQuery")
    End If
    Me.ValoreA = curA
    Me.ValoreB = curB
    Me.ValoreC = curC
End Sub
MyQuery è una query parametrica che seleziona un solo record da una tabella
che contiene migliaia di record. I parametri sono espressi in una maschera
che invia i dati alla query.
Preleva, dicevo, il record dall'archivio e (se non erro) dovrebbe essere
contenuto nel DAO.Recordset che chiamo rs..
L'errore comunicato è "Previsto 3" !!!!!
Ma che vuol dire?


title: Errore su settaggio recordset

author: sv

text:
vuLCan Karayan ha scritto:

> Sub Compila






> End Sub


http://www.donkarl.com/it/
FAQ 6.4
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Errore su settaggio recordset

text:
>
http://www.donkarl.com/it/
> FAQ 6.4
Porc....
Grazie mille!


title: Errore su settaggio recordset

text:

Niente, da fare.
Punto e a capo.
Anche con l'uso di EVAL nei parametri della query stesso errore.
Soluzione: creo il recordset senza passare dalla query, utilizzando WHERE e
prendendo i dati
dalla tabella principale.
Ciao


title: Errore su settaggio recordset

text:
vuLCan Karayan ha scritto:



> Ciao
La 6.4 rimanda alla 6.16. Potrebbe essere anche un problema di apici..



title: Errore su settaggio recordset

text:
> La 6.4 rimanda alla 6.16. Potrebbe essere anche un problema di apici..
Si, ho visto
Ma ho già impostato il filtro sulla tabella principale.
E' corretto, secondo te?
Set rs = CurrentDb.OpenRecordset("SELECT * FROM Schede WHERE [CodiceImpresa]
= " & Me.CodiceImpresa & " AND [CodiceMese] = " & Me.MeseDistinta & " AND
[Anno]= " & Me.AnnoDistinta)
Tnx


title: Errore su settaggio recordset

text:
vuLCan Karayan ha scritto:


> E' corretto, secondo te?

> Tnx
Mi sembra di sì.
Sono tutti di tipo numerico.



title: Errore su settaggio recordset

text:
> Mi sembra di sě.
> Sono tutti di tipo numerico.
Si.
Grazie ancora.


title: modifiche ad un campo

author: Carlo D.

text:
Scusate ma non risco a aggiornare un campo di un'altra tabella
ad esempio
in una Maschea ho un pulsante che se premuto
mi deve aggiungere 30 al campo data di un'altra tabella (unico record)
io avevo pensato
me!data=me!data+30
ma me!data va bene se il campo è della stessa form, invece è di un'altra
tabella, come devo fare per dirgli di scriverci??
Grazie
Carlo


title: modifiche ad un campo

text:
"Carlo D." <
dalmass...@tin.it
> ha scritto nel messaggio
news:1cQ7a.252300$0v.70...@news1.tin.it...

Direi che non puoi scrivere in una Tabella chiusa.......!
Allora per eseguire queste modifiche si usano QUERY ACTION.
Nel tuo Caso "UPDATE tabella SET nuovovalore WHERE criteri"
Quindi su evento che deve provocare la modifica scrivi:
CurrentDb.Execute "UPDATE Nometabella SET [Data= DateAdd("d", 30,
[Data]);",dbfailOnError
Ciao.
@Alex.


title: modifiche ad un campo

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:rf_7a.166707$ZE.49...@twister2.libero.it...

ti ringrazio.
Carlo


title: modifiche ad un campo

text:
"Carlo D." <
dalmass...@tin.it
> ha scritto nel messaggio
news:vK68a.256579$0v.71...@news1.tin.it...

Fatto, funziona perfettamente,
Grazie dell'aiuto
Carlo D.


title: Legare diversi DB simili

text:
HO 4 DB diversi ma uguali nella struttura (rappresentano
gli anni 1999-2000-2001-2002) ed ho necessita' di unirli in
un unico DB. La soluzione che ho trovato e' quella di accodare
ognuno di esso in un unica grande tabella, ma il problema trovato
sono le chiavi primarie, perche' giustamente non sono ammessi
quattro 1, quattro 2 ec ecc, si potrebbe ovviare eliminando tutte le
chiavi primarie, ma mi sembra molto empirica come soluzione anche se
funzionale.
Avete qualche soluzione tecnica piu' snella, piu' veloce ed elegante?
In pratica il tutto mi serve come mega archivio e a volte devo cercare
qualcosa senza avere l'anno di riferimento.
Vi ringrazio in anticipo per la sempre cortese e puntuale
disponibilita'.


title: Legare diversi DB simili

text:
<
eapi...@tiscali.it
> ha scritto nel messaggio
news:3e304584...@news.tiscali.it...

I database non si accodano né tantomeno si "uniscono".
Sono i record di tabelle che si accodano e ciò viene fatto in base alla
struttura delle tabelle di input e la struttura della tabella risultante,
notizie che tu non indichi nella tua richiesta.
Inoltre, ognuno dei 4 database quante tabelle contiene; se contengono più di
una tabella, quali vuoi accodare?
Se ogni database ha più tabelle, come sono in relazione fra di loro?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Legare diversi DB simili

text:
>I database non si accodano né tantomeno si "uniscono".
Ovviamente, scusami per l'orrenda esposizione tecnica.
>Sono i record di tabelle che si accodano e ciò viene fatto in base alla
>struttura delle tabelle di input e la struttura della tabella risultante,
>notizie che tu non indichi nella tua richiesta.
Vorrei accodare i record di una tabella presente in tutti e 4 i DB,
che hanno identica struttura, in una unica tabella che ovviamente ha
identica struttura delle altre 4.
>Inoltre, ognuno dei 4 database quante tabelle contiene; se contengono più di
>una tabella, quali vuoi accodare?
I DB sono uguali, in pratica uno e' la riproduzione dell'altro, in
pratica alla chiusura dell'anno, si salva da qualche parte e si prende
quello vuoto di base e si inizia un nuovo anno...Per essere piu'
precisi sono piccoli DB per la gestione delle delibere.
>Se ogni database ha più tabelle, come sono in relazione fra di loro?
Ogni DB ha 3 - 4 tabelle, una e' quella principale dove finiscono
tutti i dati e 2-3, contengono Servizi,Dirigenti,Trasmesso a, ma
sembra non siano in relazione.
Quindi io mi trovo 4 DB di 4 anni differenti, identici nella struttura
tra loro, che vorrei mettere insieme per operare delle ricerche su
tutti e 4 gli anni, senza doverne aprire uno alla volta.
Spero che sia stato piu' chiaro e di aver usato un linguaggio piu'
tecnico.
Ti ringrazio per la pazienza e le risposte che mi darai, ciao


title: Legare diversi DB simili

text:
<
eapi...@tiscali.it
> ha scritto nel messaggio
news:3e32a9e...@news.tiscali.it...

Mi sembra di capire che le chiavi primarie delle tabelle da accodare sono
dei campi contatori.
Se così è, nelle query con cui accodi le quattro tabelle non accodare i
campi delle chiavi primarie, tanto, se come penso, anche la tabella
risultante ha un campo contatore come chiave primaria, ci penserà Access
automaticamente a dare il valore alla chiave primaria, senza bisogno di
copiarla dalle tabelle in input.



title: Legare diversi DB simili

text:
>Mi sembra di capire che le chiavi primarie delle tabelle da accodare sono
>dei campi contatori.
Esatto....
>Se così è, nelle query con cui accodi le quattro tabelle non accodare i
>campi delle chiavi primarie, tanto, se come penso, anche la tabella
>risultante ha un campo contatore come chiave primaria, ci penserà Access
>automaticamente a dare il valore alla chiave primaria, senza bisogno di
>copiarla dalle tabelle in input.
Io avevo pensato di eliminare tutte le chiavi primarie, altrimenti
come dici tu avrei problemi sicuramente....Il discorso e' questo:
alla fine mi devo ritrovare con la delibera 1  del 1999, la 1 del 2000
la 1 del 2001 e la 1 del 2002 (gli UNO erano dei contatori nei
rispettivi DB e chiavi primarie alla fine saranno degli identificatori
non univoci), se metto la chiave primaria non sara' piu' possibile.
Grazie, ciao


title: Legare diversi DB simili

author: Gio'

text:
<
eapi...@tiscali.it
> wrote in message 3e32f079...@news.tiscali.it...

Potresti tentare con una query di unione (Istruzione SQL UNION) su cui
basare un'altra query con un campo calcolato in questo modo:
NumeroDelibera = Trim(Str$(CampoContatore)) & "/" & Year(DataDelibera)
Il valore di NumeroDelibera potresti calcolarlo via codice con una funzione
oppure direttamente nella query.
Per quanto riguarda l'istruzione SQL UNION prova a cercare nell'help in
linea.
Il tutto presuppone che le tabelle siano presenti nel DB e per questo basta
allegarle.
Gio'


title: Come ci si dovrebbe comportare in un newsgroup, ovvero 'Istruzioni per l'uso'

text:
Ecco alcune regole pubblicate sul nostro Sito Comune e che è auspicabile
vengano rispettate da tutti i frequentatori di questo NG.
==============================================
Anche i newsgroups, come tutte le comunita' di esseri umani, hanno delle
regole la cui conoscenza e rispetto permette un proficuo utilizzo del ng da
parte di tutti i partecipanti evitando incomprensioni, malintesi ed inutili
polemiche.
Alcune regole sono generali e di elementare educazione, altre proprie di
questo gruppo di discussione cresciute e consolidate nel tempo soprattutto
con il contributo dei frequentatori piu' anziani.
Premesso che
il ng e' gestito da 'volontari' che mettono a disposizione gratuitamente il
proprio tempo, le proprie conoscenze e la loro professionalita' per aiutare
chiunque, persone che spesso non conoscono e che dalle quali non riceveranno
alcun compenso, per cui qualsiasi forma di pretesa o obbligo da parte di chi
scrive sono decisamente fuori luogo:
- prima di inviare la propria richiesta provate a verificare se nei messaggi
dei giorni precedenti non siano gia' presenti delle soluzioni al quesito che
si vuole porre.
Non e' il massimo delle figure fare una domanda a cui e' gia' stata data
ampia ed esauriente risposta magari il giorno prima, di sicuro poi
l'eventuale replica difficilmente potra' essere piu' completa.
Si possono effettuare delle ricerche nell'archivio storico del Sito Comune.
- provate anche a verificare che i vostri dubbi e le relative soluzioni non
siano gia' presenti sul Sito Comune di questo newsgroup:
http://www.sitocomune.com
Se si decide comunque di scrivere al ng sarebbe bene tenere presente:
Il SUBJECT
-------------------
Nello scrivere l'oggetto del messaggio si dovrebbe dare maggiore importanza
perche' contribuisce ad identificare immediatamente l'argomento e il tipo
diproblema, attirando subito l'attenzione di chi legge.
Si sconsiglia di inserire subject insignificanti come:
'AIUTO','URGENTE','PROBLEMA ACCESS', 'SOLO PER ESPERTI' 'SONO PRINCIPIANTE',
'SONO DEFICIENTE', 'come si fa...' ECC.,
nel marasma generale dei messaggi perdono visibilita'.
Ecco invece alcuni esempi da considerarsi corretti:
- Gestire il tasto Applica Filtro/Rimuovi Filtro
- Sincronizzare repliche via Internet con Access 2000
- Formattazione diversa per il solo record selezionato
- Come ricercare in una casella combinata
- Formato Numerico Nelle query
- Copia e incolla di piu' dati nello stesso campo
TESTO DEL MESSAGGIO
-------------------
Anche qui, soprattutto nell'interesse di chi posta il messaggio, il suo
contenuto dovrebbe essere pensato e redatto con attenzione al fine di
evitare la spedizione di messaggi incomprensibili, che non potranno avere
risposte immediate soddisfacenti.
E' consigliabile indicare la versione di MSAccess a cui ci si riferisce ed
il sistema operativo utilizzato (A2/W95, A95/W98, A97/NT4, A00/W00).
Se dopo aver inviato un messaggio non si dovessero ricevere risposte si puo'
provare a riformularlo evitando pero' di assumere un tono polemico del tipo
'Possibile che nessuno sappia come ...', 'Perche' non mi volete rispondere'
I motivi per cui certi messaggi non ricevono risposte possono essere i
piu'svariati, dalla domanda mal posta, al fatto che nessuno effettivamente
abbia una risposta da dare.
*Alcuni consigli per chi risponde*
- Scrivere dopo il quoting
Quando si replica (risponde) ad un messaggio si dovrebbe iniziare a scrivere
sempre dopo il testo del precedente.
Lasciare il contenuto del testo originario se breve, oppure riassumere il
contenuto tagliando le parti meno significative, lasciando quelle
piu'interessanti per la comprensione del discorso.
- Non farsi coinvolgere in polemiche con altri partecipanti ed eventuali
disaccordie sarebbe meglio proseguirle in e-mail private.
Alcune richieste o comportamenti *sicuramente* non graditi in questo ng:
- chiedere di programmi per 'sproteggere' database e quindi presumibilmente
il lavoro di altre persone.
Oltre a non essere moralmente corretto, e' illegale, inoltre, considerando
che in questo ng possono esserci persone che si guadagnano la pagnotta
sviluppando programmi con Access, non ci sembra corretto contribuire a
diffondere questo tipo di informazioni;
- richiedere risposte personalizzate al proprio indirizzo e-mail e' contro
lo spirito di questo ng in cui si presuppone che tutte le domande e tutte le
risposte debbano essere visibili perche' potrebbero interessare a tutti;
- contattare direttamente altri frequentatori del ng inviando richieste di
informazioni via e-mail, magari a quelli che sembrano piu' bravi e piu'
disponibili di tutti ad aiutare gli altri;
- chiedere del compilatore di access, semplicemente perche' non esiste, lo
sanno anche i bambini ormai;
- chiedere l'invio di programmi gia' fatti con la scusa di dover imparare,
vedere, bla bla bla;
- inviare messaggi con pubblicita' commerciale anche se riferita all'oggetto
del ng. (ben vengano segnalazioni di siti o iniziative free che parlano di
Access, anche se personali, ma il tutto deve sempre essere senza scopo di
lucro;
Alcune regole legate invece alla netiquette, dove con il termine netiquette
'retichetta', si intende l'insieme di regole nate col tempo per autoregolare
il comportamento degli utenti delle news.
- EVITARE DI SCRIVERE IN MAIUSCOLO sia gli oggetti e soprattutto il testo
dei messaggi che nelle regole equivale ad urlare;
- Scrivere in formato testo e non in HTLM (quindi con formattazioni varie),
questo perche' non tutti i lettori di messaggi (newsreader) visualizzano
correttamente questo formato;
- Evitate le polemiche personali con gli altri partecipanti.
Se proprio non potete farne a meno cercate di trasferirle in privato.
Alcuni link per chi volesse approfondire:
The Net: Guida per l'utente e Netiquette, di Arlene Rinaldi
http://www.inferentia.it/netiquette/
Etica e norme di buon uso dei servizi di rete
http://web.tiscalinet.it/enterprise_videotext/itamidi/netiquette/netiquetteit.htm
ATTENZIONE
I successivi sono testi carichi d'ironia, cioe' sono suggerimenti da
EVITARE!
GALAMAILEO di John of the Homepage
http://www.mamofaq.usenet.eu.org/FAQ-galamalileo.txt
Cara Emily Postnews...
http://uniper.unimo.it/uniper/cara_emily_postnews.htm
Grazie per la collaborazione
Questo documento e' stato redatto da Carlo VE
----------------------------------------------------------------------------
Alcune utili abbreviazioni (acronimi)
AFAIK As Far As I Know
BTW By The Way
CU See You
CUL8R See You Later
CUT Taglio (quando non si riporta tutto il testo a cui si risponde)
HTH Hope This Helps
IMO In My Opinion
IMHO In My Humble Opinion
LOL Laughing out loud
NEWBIE Nuovo arrivato, persona nuova per il NG
NG Newsgroup
OT Off-Topic: fuori argomento
ROTFL Rolling on the floor laughing
ROTFLASTC Rolling on the floor laughing and scaring the cat
ROTFLMAO Rolling on the floor laughing my ass off
RTFM Read the fuckin' manual
SPAM Messaggio pubblicitario fortemente OT, sui NG è assolutamente vietato
TIA Thanks In Advance
TROLL Persona che vuole solo creare disturbo e scompiglio
Ce ne sono tanti altri, li trovate qui:
http://www.acronymfinder.com


title: Compattare il BE

author: Luca

text:
Ciao a tutti,
ho un db che ho diviso in FE e BE. Come faccio a compattare il BE con un
bottone dal FE.
Ho visto che sul sito comune c'e' un codice ma non sono riuscito a farlo
funzionare.
Ovviamente prima di compattare deve verificare se qualcuno sta accedendo al
BE con un'altro FE.
Mi potreste aiutare?
Grazie
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Compattare il BE

text:
Alternativa:
crea un file vbs e scrivici dentro quanto segue:
'*******************************************************************
'start code
'*******************************************************************
'Nome:        Compact.vbs
'Descrizione: compatta e riapre l'mdb in uso
'Autore:      strano...mavero
'Creato:      Dicembre 2004
'Utilizzo:    dall'mdb eseguire:
'   Dim strPath As String
'   strPath = "wscript.exe " & "C:\... path ...\Compact.vbs " & Chr$(34) &
CurrentDb.Name & Chr$(34)
'   Call Shell(strPath, vbNormalFocus)
'
'Se presenti AntiVirus ricordarsi di autorizzare l'esecuzione dello script
'
'*******************************************************************
Set objArgs = WScript.Arguments
Call Init()
Dim objMDB
Dim objFSO
Dim strMdbFile
Dim strTmpFile
'nome e path dell'mdb passato come argomento allo script
strMdbFile = objArgs(0)
Set objFSO = CreateObject("Scripting.FileSystemObject")
'genera un nome file temporaneo
strTmpFile = objFSO.GetTempName
strTmpFile = Left(strMdbFile, InstrRev(strMdbFile, "\")) & strTmpFile
'si collega alla sessione access aperta
Set objMDB = WScript.GetObject(strMdbFile)
'minimizza la finestra di access
objMDB.RunCommand 11
'chiude l'mdb in uso
objMDB.CloseCurrentDatabase
'compatta l'mdb in un file temporaneo
objMDB.Dbengine.CompactDatabase strMdbFile, strTmpFile
'Msgbox strMdbFile & " -> " & strTmpFile
'elimina l'mdb originale
objFSO.DeleteFile(strMdbFile)
'copia il file tempraneo nel'mdb originale
objFSO.CopyFile strTmpFile, strMdbFile
'elimina il file temporaneo
objFSO.DeleteFile(strTmpFile)
'riapre l'mdb compattato
objMDB.OpenCurrentDatabase strMdbFile
'maximizza la finestra di access
objMDB.RunCommand 10
Set objFSO = nothing
Set objMDB = nothing
'*******************************************************************
'Controlla che il parametro sia un file mdb
'*******************************************************************
Sub Init()
 'controlla che l'argomento sia un mdb
  If objArgs.Count  < 1 Then WScript.Quit
  If Right(objArgs(0),4) <> ".mdb" Then
    Msgbox "ATTENZIONE!!! Il file selezionato non e' un mdb.",  16,
"Errore!"
    WScript.Quit
  End If
End Sub
'*******************************************************************
'end code
'*******************************************************************
poi associ ad esempio all'evento click di un tuo pulsante:
Dim strPath As String
  strPath = "wscript.exe " & "C:\infostore\dati\Compact.vbs " & Chr$(34) &
CurrentDb.Name & Chr$(34)
  Call Shell(strPath, vbNormalFocus)
Questa procedura ti compatta l'mdb anche se è aperto.
Saluti,
--
strano...mavero


title: Compattare il BE

author: Alessandro Baraldi

text:
"Luca" <
gcaire...@tiscali.it
> wrote in message
news:194Z185Z233Z6Y1...@usenet.libero.it
> Ciao a tutti,
> ho un db che ho diviso in FE e BE. Come faccio a compattare il BE con un
> bottone dal FE.
> Ho visto che sul sito comune c'e' un codice ma non sono riuscito a farlo
> funzionare.
> Ovviamente prima di compattare deve verificare se qualcuno sta accedendo al
> BE con un'altro FE.
> Mi potreste aiutare?
> Grazie
La tua 2° osservazione è molto IMPORTANTE ed è la prima cosa
da tenere in considerazione.
Se lavori in MultiUtenza dovrai predisporre tutto un sistema
di LOGOUT forzato dei FE altrimenti non verrà compattato.
A questo punto devi decidere tu come muoverti, per fare una
forzatura alla chiusura dei FE l'unico metodo è creare una
Maschera Hide(nascosta) che su evento Timer 5000ms controlli
un FLAG in una tabella nel BE e se a TRUE Docmd.QUIT.
Questo Flag ovviamente lo dovrai Settare a TRUE tu con una
QueryAction da un Applicativo di Manutenzione oppure dal
FE ma la devi discriminare il LOGOUT per macchina e non forzare
quello del FE dal quale lanci il comando.
A questo punto da una Form NON ASSOCIATA, quindi con tutti
i Recordet chiusi, lanci la compattazione
con il Metodo DAO CompactDatabase, quindi ripristini
il FLAG.
ALternativa a questo metodo un pò di dettaglio è schedulare
l'esecuzione di un file VBS(ad esempio quello postato da
Strano ma vero) e mandarlo in esecuzione a mezzanotte.
Io personalmente uso il 1° metodo.
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: help scambio dati

author: Dr. Aid

text:
Ciao a tutti. Vi spiego il mio problema su cui mi sto scervellando, ma
essendo alle prime armi sto veramente sclerando.
Io avevo una tabella  ANAGRAFE:
Nome__Cognome__via__Citta__Provincia__CAP
ora per motivi che non sto a raccontarvi (cambio programma aziendale)
il nuovo database è formato da una tabella ANAGRAFE:
Nome__Cognome__via__Città__IDProvincia
e da una tabella PROVINCIA:
IDProvincia__Nome__Sigla__CAP
Visto che ho molti record, e vorrei tenermi il mio ANAGRAFE vecchio,mi
serve un pezzo di codice che sostuisca il nome della provincia (
VERONA ) con l' IDProvincia, utilizzando la nuova tabella PROVINCIA...
Ringrazio anticipatamente chiunque mi darà una mano
Marco


title: help scambio dati

author: Roberto dal portatile

text:
"Dr. Aid" <
dr....@europe.com
> ha scritto nel messaggio
news:39e213f6...@news.tiscalinet.it...

Aggiungi alla tabella ANAGRAFE il campo IDProvincia; poi con una query di
aggiornamento, usando la funzione DLookUp, riempilo con il dato reperito
dalla tabella PROVINCIA. Dopo l'aggiornamento puoi eventualmente eliminare i
campi provincia e cap.
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: help scambio dati

author: Fabio Dalla Villa

text:
Dr. Aid <
dr....@europe.com
> wrote in message
39e213f6...@news.tiscalinet.it...
> Ciao a tutti. Vi spiego il mio problema su cui mi sto scervellando, ma
> essendo alle prime armi sto veramente sclerando.
>
> Io avevo una tabella  ANAGRAFE:
>
> Nome__Cognome__via__Citta__Provincia__CAP
>
> ora per motivi che non sto a raccontarvi (cambio programma aziendale)
> il nuovo database è formato da una tabella ANAGRAFE:
>
> Nome__Cognome__via__Città__IDProvincia
>
> e da una tabella PROVINCIA:
>
> IDProvincia__Nome__Sigla__CAP
>
> Visto che ho molti record, e vorrei tenermi il mio ANAGRAFE vecchio,mi
> serve un pezzo di codice che sostuisca il nome della provincia (
> VERONA ) con l' IDProvincia, utilizzando la nuova tabella PROVINCIA...
>
> Ringrazio anticipatamente chiunque mi darà una mano
>
> Marco
>
>
>
Potresti creare una nuova query collegando tutti i campi con tipo di
collegamento 1-1 su IDProvincia, poi esporti i dati in un formato esterno
tipo Excel e infine crei la stessa struttura della query in una nuova
tabella, che vai a riempire importando i dati dal formato esterno appena
creato.
A scrivere il codice per una cosa simile ci vogliono almeno 2 ore tra
stesura e test (a me) e forse non vale la pena.
--
Fabio Dalla Villa
via Villani 6/3
Biella (BI) 13900


title: help scambio dati

author: Luciano (DOC)

text:
Dr. Aid <
dr....@europe.com
> wrote in message
39e213f6...@news.tiscalinet.it...
> Visto che ho molti record, e vorrei tenermi il mio ANAGRAFE vecchio,mi
> serve un pezzo di codice che sostuisca il nome della provincia (
> VERONA ) con l' IDProvincia, utilizzando la nuova tabella PROVINCIA...
Fai una query di aggiornamento prendendo le tue tabelle e collegandole sull
IDPROVINCIA.
Magari da un'occhiata all'help su cosa sono e coem si usano le query di
aggiornamento.
SAluti.
Luciano
(DOC)


title: help scambio dati

text:
Fabio Dalla Villa <
f...@gvo.it
> wrote in message
8rtb2s$q6i$1...@lacerta.tiscalinet.it...
> Potresti creare una nuova query collegando tutti i campi con tipo di
> collegamento 1-1 su IDProvincia, poi esporti i dati in un formato esterno
> tipo Excel e infine crei la stessa struttura della query in una nuova
> tabella, che vai a riempire importando i dati dal formato esterno appena
> creato.
Oh Gesu'!!!!!!
> A scrivere il codice per una cosa simile ci vogliono almeno 2 ore tra
> stesura e test (a me) e forse non vale la pena.
No, certo! Meglio una sana lettura, qualcosa tipo 'I DB relazionali' o anche
'Le basi dell'SQL'!!:-))
Saluti.
Luciano
(DOC)


title: help scambio dati

author: guxdav

text:
Dr. Aid <
dr....@europe.com
> wrote in message
39e213f6...@news.tiscalinet.it...
> Ciao a tutti. Vi spiego il mio problema su cui mi sto scervellando, ma
> essendo alle prime armi sto veramente sclerando.
>
> Io avevo una tabella  ANAGRAFE:
>
> Nome__Cognome__via__Citta__Provincia__CAP
>
> ora per motivi che non sto a raccontarvi (cambio programma aziendale)
> il nuovo database è formato da una tabella ANAGRAFE:
>
> Nome__Cognome__via__Città__IDProvincia
>
> e da una tabella PROVINCIA:
>
> IDProvincia__Nome__Sigla__CAP
>
> Visto che ho molti record, e vorrei tenermi il mio ANAGRAFE vecchio,mi
> serve un pezzo di codice che sostuisca il nome della provincia (
> VERONA ) con l' IDProvincia, utilizzando la nuova tabella PROVINCIA...
>
> Ringrazio anticipatamente chiunque mi darà una mano
>
> Marco
>
Prima di fare queste operazioni ti conviene fare una copia del tuo DB così
da non perdere eventuali dati.
Per prima cosa creati una query tra ANAGRAFE (vecchia) e PROVINCIA mettendo
in relazione   "Provincia" e  "Nome".
Lancia la query e verifica che tutti i record siano presenti perché, dato
che si tratta di campi testo, è molto probabile che errori di digitazione ti
facciano perdere qualche relazione.
Se tutto è OK trasforma la query in query di aggiornamento.
Nel campo "provincia" della tabella ANAGRAFE scrivi nell'apposito spazio
dove c'è scritto Aggiorna a: [PROVINCIA].[IDProvincia]
In questo modo avrai aggiornato il campo con i valori (credo di tipo
numerico) di IDProvincia.
Se vuoi uniformare la vecchia ANAGRAFE con la nuova cambia il nome a
"provincia" trasformandolo in "IDProvincia" e cambia anche il tipo di dati
(da testo a numerico).
Saluti
Davide


title: help scambio dati

author: Gustavo Bartolini

text:
Dr. Aid <
dr....@europe.com
> wrote in message
39e213f6...@news.tiscalinet.it...
> Ciao a tutti. Vi spiego il mio problema su cui mi sto scervellando, ma
> essendo alle prime armi sto veramente sclerando.
>
> Io avevo una tabella  ANAGRAFE:
>
> Nome__Cognome__via__Citta__Provincia__CAP
>
> ora per motivi che non sto a raccontarvi (cambio programma aziendale)
> il nuovo database è formato da una tabella ANAGRAFE:
>
> Nome__Cognome__via__Città__IDProvincia
>
> e da una tabella PROVINCIA:
>
> IDProvincia__Nome__Sigla__CAP
>
> Visto che ho molti record, e vorrei tenermi il mio ANAGRAFE vecchio,mi
> serve un pezzo di codice che sostuisca il nome della provincia (
> VERONA ) con l' IDProvincia, utilizzando la nuova tabella PROVINCIA...
>
> Ringrazio anticipatamente chiunque mi darà una mano
>
> Marco
>
E come fai quando CAP non è fisso? vedi Roma, Milano ecc.
Via tizio dal civico 1 al 535 cap 00177
Via tizio dal civico 2 al 536 cap 00180
Via caio cap 00322
saluti GB


title: help scambio dati

author: Antonio Biso

text:
Luciano (DOC) <
mc5...@mclink.it
> wrote in message
8rtage$fcc$1...@news.mclink.it...
>
> Oh Gesu'!!!!!!
>
> > A scrivere il codice per una cosa simile ci vogliono almeno 2 ore tra
> > stesura e test (a me) e forse non vale la pena.
>
> No, certo! Meglio una sana lettura, qualcosa tipo 'I DB relazionali' o
anche
> 'Le basi dell'SQL'!!:-))
Caustico...
Antonio


title: help scambio dati

author: Sib

text:
"Fabio Dalla Villa"
cut
> Potresti creare una nuova query collegando tutti i campi con tipo di
> collegamento 1-1 su IDProvincia, poi esporti i dati in un formato esterno
> tipo Excel e infine crei la stessa struttura della query in una nuova
> tabella, che vai a riempire importando i dati dal formato esterno appena
> creato.
> A scrivere il codice per una cosa simile ci vogliono almeno 2 ore tra
> stesura e test (a me) e forse non vale la pena.
O, Fabio!
Ma per andare dal tuo dirimpettaio ci vai saltando dal balcone?
Sib


title: da Casella di Riepilogo a Excel, come?

author: Dave

text:
Salve a tutti, come devo fare per creare un pulsante che mi esporti i dati
da una casella di riepilogo a una tabella excel?
grrazie


title: da Casella di Riepilogo a Excel, come?

author: Roberto da casa

text:
"Dave" <god.d...@XYZlibero.it> ha scritto nel messaggio
news:hHHLa.2434$FI4....@tornado.fastwebnet.it...
> Salve a tutti, come devo fare per creare un pulsante che mi esporti i dati
> da una casella di riepilogo a una tabella excel?
>
> grrazie
Con il Metodo TransferSpreadsheet (vedi help) trasferisci su un foglio
elettronico i dati della query o della tabella che è origine riga della
casella di riepilogo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Problemi Access scanner

author: Gigi

text:
Ho provat a scaricare il DB dal sito comune per l'acquisizione immagine da
scanner ha funzionato per un po poi mi ha dato un mess.
Errore di run time
"unknown error has occurred with WIA device."
Qualcuno sa dirmi cosa può essere successo.
Grazie
Ps. Ho correttamente caricato la dll
Questa è la routine che esegue la scansione
Private Sub Comando1_Click()
Dim aaaa As New WIA.CommonDialog
Dim V As WIA.Vector
Dim Img As WIA.ImageFile
Dim C As Long
'creo un'immagine colorata
'il colore (uno qualsiasi, si tratta di una immagine in memoria)
C = &HFF0000FF 'Blu opaco (A=255,R=0,G=0,B=255)
'creo l'oggetto Vettore
Set V = CreateObject("WIA.Vector")
'aggiungo il colore
V.Add C
V.Add C
V.Add C
V.Add C
'attribuisco a Img l'immagine restituita dallo scanner o dalla periferica
predefinita
Set Img = aaaa.ShowAcquireImage(, ColorIntent, MaximizeQuality, , False,
True)
'Salvo l'immagine
Img.SaveFile "C:\MiaFoto." & Img.FileExtension
'visualizzo l'immagine salvata in un controllo immagine
Me.Picture1.Picture = "C:\MiaFoto." & Img.FileExtension


title: Problemi Access scanner

author: Access

text:
"Gigi" <
rs...@email.it
> ha scritto nel messaggio
news:ioxpr8w9pega.1j473tdumzwwd$.dlg@40tude.net...

Ciao Gigi, hai aggiunto il riferimento a "Microsoft Windows Image
Acquisition Library 2.0"?


title: Problemi Access scanner

text:


si ma mi funzionava ho fatto un paio di prove
poi come vedi dalla routine il file viene sempre salvato con losteso nome.
ho provato a sostituirlo con una input box in modo da evitare l'errore che
si genera qualora il programma trova un file già salvato come miafoto.bmp.
Da li si è bloccato tutto e pur riportando la routine al testo originale
non va....


title: Problemi Access scanner

author: Carlo Costarella

text:
"Gigi" <
rs...@email.it
> ha scritto nel messaggio
news:ioxpr8w9pega.1j473tdumzwwd$.dlg@40tude.net...
> Ho provat a scaricare il DB dal sito comune per l'acquisizione immagine da
> scanner ha funzionato per un po poi mi ha dato un mess.
> Errore di run time
> "unknown error has occurred with WIA device."
>
> Qualcuno sa dirmi cosa può essere successo.
>
> Grazie
>
> Ps. Ho correttamente caricato la dll
>
Credo che il problema sia nello scanner o meglio nel suo driver.
Probabilmente un aggiornamento del driver dal sito del produttore dovrebbe
risolvere il problema.
Qui puoi scaricare una versione più completa della demo:
http://www.frantoiogestione.com/WIAScannerXP.zip
Prova anche ad aprire lo scanner in un programma per immagini e vedi se ti
da lo stesso problema.
Ciao, Carlo


title: Problemi Access scanner

text:
"Gigi" <
rs...@email.it
> ha scritto nel messaggio
news:2wqfq8rwanm8.1o5zqazxxsqem$.dlg@40tude.net...

Le foto che vai a salvare a chi si riferiscono?
Se ad esempio si riferiscono ad una persona e all'interno della form vi è un
campo "cognome" prova a fare cosi:
Img.SaveFile "c:\" & "Forms!tuaforms.Cognome" & "." & Img.FileExtension
Ciao


title: Corsi on line di programmazione VBA per Acces

text:
Impara a Programmare in VBA per Microsoft Access con i corsi on line
di programmazione Access. Impara secondo i tuoi tempi ed i tuoi ritmi.
Inoltre, corsi di Visual Basic ed SQL.
Inizio nuovi corsi il 22 Giugno.
Per informazioni, contattare
fdif...@mclink.it
--
----------- HTTP : / /  USERS . IOL . IT / CCPARDO/ ACCESS /
LEZIONI.HTM -------
Gestore del sito
http://users.iol.it/ccpardo/Access/lezioni.htm
Materiale:
http://users.iol.it/ccpardo/Access/lezioni.htm
Tutto su VBA
http://users.iol.it/ccpardo/Access/lezioni.htm
Tutto Su Visual Basic
http://users.iol.it/ccpardo/Access/lezioni.htm
----------- HTTP : / /  USERS . IOL . IT / CCPARDO/ ACCESS /
LEZIONI.HTM -------Ogni giorno una nuova Lezione su:
http://users.iol.it/ccpardo/Access/lezioni.htm
----------- HTTP : / /  USERS . IOL . IT / CCPARDO/ ACCESS /
LEZIONI.HTM -------


title: Stampa unione su Word - formattare un campo

author: Angelodannato

text:
Ciao
Il mio problema è questo.
Faccio una stampa unione via ODBC su un doc di World usando come origine
dei dati una query di selezione.
Il campo "datadinascita" mi viene visualizzato 16/12/1668 0.00.00
Come fare a togliere sto 0.00.00.
Ho già provato visualizzando i Codici di Campo e formattando in questa
maniera {MERGEDFIELD DATADINASCITA \@ dd/mm/yyyy} .... RISULTATO? mi
restituisce la data odierna!!!
l'altra soluzione sarebbe salvare il risultato della qwery in una
tabella in modo che la data divenga un Testo ed usare la tabella come
origine dei dati per la stampa unione.... ma non vorrei farlo.
ULTIMXA DOMANDA: esiste un comando che trasforma la data in testo (col
linguaggio Clipper era DTOC(campo) cioè DataToCaracter.
Grazie


author: Sergio MAZZA

text:
"Angelodannato" <
il...@email.com
> ha scritto nel messaggio news:Z_aJc.1605$OR2....@news3.tin.it...
> Ciao
> Il mio problema è questo.
> Faccio una stampa unione via ODBC su un doc di World usando come origine
> dei dati una query di selezione.
> Il campo "datadinascita" mi viene visualizzato 16/12/1668 0.00.00
>
> Come fare a togliere sto 0.00.00.
>
> Ho già provato visualizzando i Codici di Campo e formattando in questa
> maniera {MERGEDFIELD DATADINASCITA \@ dd/mm/yyyy} .... RISULTATO? mi
> restituisce la data odierna!!!
Prova con:
{MERGEDFIELD DATADINASCITA \@ "dd/MM/yyyy"} (occhio alle emme maiuscole e alle doppie virgolette);
> l'altra soluzione sarebbe salvare il risultato della qwery in una
> tabella in modo che la data divenga un Testo ed usare la tabella come
> origine dei dati per la stampa unione.... ma non vorrei farlo.
altra opzione (secondo me ancora meglio) indicare il formato del campo (in tabella) a "data in cifre" e se c'è un valore di default
indicare Date() non Now().
> ULTIMXA DOMANDA: esiste un comando che trasforma la data in testo (col
> linguaggio Clipper era DTOC(campo) cioè DataToCaracter.
Vedi help funzione Format, o CStr...
> Grazie
Ciao.
--
Sergio MAZZA


text:
Sergio MAZZA wrote:
> "Angelodannato" <
il...@email.com
> ha scritto nel messaggio news:Z_aJc.1605$OR2....@news3.tin.it...
>
>>Ciao
>>Il mio problema è questo.
>>Faccio una stampa unione via ODBC su un doc di World usando come origine
>>dei dati una query di selezione.
>>Il campo "datadinascita" mi viene visualizzato 16/12/1668 0.00.00
>>
>>Come fare a togliere sto 0.00.00.
>>
>>Ho già provato visualizzando i Codici di Campo e formattando in questa
>>maniera {MERGEDFIELD DATADINASCITA \@ dd/mm/yyyy} .... RISULTATO? mi
>>restituisce la data odierna!!!
>
>
> Prova con:
> {MERGEDFIELD DATADINASCITA \@ "dd/MM/yyyy"} (occhio alle emme maiuscole e alle doppie virgolette);
>
si..scusa l'imprecisione avevo fatto con le MM... ;-))  ma mi
restituisce la data di oggi...comunque
>>l'altra soluzione sarebbe salvare il risultato della qwery in una
>>tabella in modo che la data divenga un Testo ed usare la tabella come
>>origine dei dati per la stampa unione.... ma non vorrei farlo.
>
>
> altra opzione (secondo me ancora meglio) indicare il formato del campo (in tabella) a "data in cifre" e se c'è un valore di default
> indicare Date() non Now().
>
stai parlando della nuova tabella che mi devo creare o della tabella che
già ho e che è l'origine della query di selezione??
>
>>ULTIMXA DOMANDA: esiste un comando che trasforma la data in testo (col
>>linguaggio Clipper era DTOC(campo) cioè DataToCaracter.
>
>
> Vedi help funzione Format, o CStr...
>
trovato nulla.... :-((((  ho una  guida "de merda"! :-((
>
>>Grazie
>
>
> Ciao.
>


text:
"Angelodannato" <
il...@email.com
> ha scritto nel messaggio
news:RqcJc.2047$OR2....@news3.tin.it...
>
> si..scusa l'imprecisione avevo fatto con le MM... ;-))  ma mi
> restituisce la data di oggi...comunque
Comunque funziona o no? Hai messo le doppie virgolette?
> stai parlando della nuova tabella che mi devo creare o della tabella che
> già ho e che è l'origine della query di selezione??
Della tabella origine dei dati; se utilizzi una query, creati un campo
calcolato e lo formatti con la funzione format([campoData];"dd/mm/yyyy");
> trovato nulla.... :-((((  ho una  guida "de merda"! :-((
Access 200x? No acc'97? Ahi! Ahi!
Puoi controllare anche sul sito MS sezione MSDN...
>Grazie
Ciao.
P.S. Cerca di rispettare le regole di questo NG per quanto riguarda le
risposte ai messaggi con oggetto non significativo.
--
Sergio MAZZA


text:
Sergio MAZZA wrote:
MA TU NON SEI MAZZA.... SEI UN GRAN MANICO!! GRANDE!!
riassumo per renderti partecipe :-)
office 2000 Pro
> Comunque funziona o no? Hai messo le doppie virgolette?
no, anche con le virgolette non funziona...continua a darmi la data
odierna (settaggi di Word??)
>>stai parlando della nuova tabella che mi devo creare o della tabella che
>>già ho e che è l'origine della query di selezione??
>
>
> Della tabella origine dei dati; se utilizzi una query, creati un campo
> calcolato e lo formatti con la funzione format([campoData];"dd/mm/yyyy");
il format ha funzionato!! solo che ho dovuto metterlo nel formato
gg/mm/aaaa (in word chiedeva il formato dd/MM/yyyy...... bho...chi ci
capisce..)
>
>>trovato nulla.... :-((((  ho una  guida "de merda"! :-((
>
>
> Access 200x? No acc'97? Ahi! Ahi!
> Puoi controllare anche sul sito MS sezione MSDN...
ma come?? è meglio O97 pro che  O2000 pro????  E io che ho appena
migrato tutto il gestionale...nooooo!
>
>>Grazie
>
>
> Ciao.
>
> P.S. Cerca di rispettare le regole di questo NG per quanto riguarda le
> risposte ai messaggi con oggetto non significativo.
questa non l'ho capita...che intendidi preciso??
cmq grazie e ciao


text:
Angelodannato wrote:
.
>>
>> P.S. Cerca di rispettare le regole di questo NG per quanto riguarda le
>> risposte ai messaggi con oggetto non significativo.
>
>
> questa non l'ho capita...che intendidi preciso??
>
ahhhh... ho capito... intendi la mia risposta al post "cosa fareste voi"??
scusa, dai... perņ ho aiutato un bisognoso, per una volta che ho una
risposta...
scusa...cmq mi atterrņ alle regole.