title: Aggiornamento Sito Comune

text:
Alessandro Baraldi wrote:
> "MA" <
mas...@massimilianoamendola.it
> wrote in message
> news:n8Vpe.15683$
TR5....@news.edisontel.com
>
> [CUT]
>> va beh mi studio il materiale di Namor e mi cerco un insegnante meno
>> presuntuoso
>
>
> Non è questione di presunzione, accetta la critica perchè ti
> assicuro non essere inutile e non prenderla come offesa
> mi pari troppo permaloso.
Io eh.. sono l'unico dche deve accettare la critica.
Ci siamo apparati bene io e te,
io sono l'unico che non accetta le critiche e tu l'unico a conoscere tutto
del mondo: tu sai di procreazione, di codice, di logica di programmazione...
o è come dici tu o è sbagliato!
uhm...
>
> Le classi si usano per ottimizzare e flessibilizzare
> il Codice, per diminuire l'entropia prodotta da questo
> e non dover riscrivere inutilmente procedure su più fronti.
20 righe no di più
Private Istanze As New Collection
Private Sub Form_Load()
Dim EvidTxtb As pippo
Dim Ctl As Control
            For Each Ctl In Me.Controls
            Set EvidTxtb = New pippo
            EvidTxtb.associa Ctl
            Istanze.Add EvidTxtb
            Next
End Sub
Private WithEvents Casella As TextBox
Private Sub Casella_Enter()
    MsgBox "ciao"
End Sub
Public Function associa(TB As TextBox)
    Set Casella = TB
    Casella.OnEnter = "[Event Procedure]"
End Function
mi sembra una discreta ottimizzzzione.
>
> La Form Calendario è una Form StandAlone che non è flessibile
> ha solo quei 31Pulsanti da gestire non potranno essere 40
> o 25, e creato il primo nel quale hai
> scritto a fronte dell'evento di cui parliamo la chiamata
> poi ti basta fare un Copy/Past e modificare il Nome(che peraltro)
> devi fare sempre.
> Che senso avrebbe nell'ottica di OTTIMIZZARE dover dichiarare
> una Collection ed istanziare 31 Classi all'interno della Classe
> che intendi tu quando ti ho dimostrato che bastano 3 righe di
> codice....?
Avevo detto che questo caso caso era semplice, ma fare copiaincolla da un
guru come te...
non non ci credo.
Non mi sembra che sia uno spreco assoluto, al contrario mi sembra che il
vantaggio in termini di legibilità e pulizia sia indubbio
>
> La mi acritica è volta solo a dirti che prima di partire sparato
> con Tecniche alternative serve saper valutarne la reale necessità
> e ribadisco, quì sarebbe solo un'esercizio di STILE poco utile.
la mia invece è volta a sentire anche gli altri e non a sparare subito che
non è così.
guarda chei fa la morale su cervelloti e inutili esercizi di stile....
>
> Se la presunzione che intendi è quella di razionalizzare le cose
> ed insistere quando è tecnicamente insostenibile un discorso, beh
> io sono decisamente presuntuoso, ma tu non essere presuntuoso
> nel voler insegnare cose che hai imparato 2gg fà come fossero
> l'ABC del VBA....!!!
Il mio non era un saccente insegnamento, ma un invito a scaricare il lavoro
da poco prodotto.
il tuo sì.
Tecnicamente insostenibile? rileggiti le 20 righe...
Alessà e non esagerare...
>
> Saluti.
> @Alex



title: Aggiornamento Sito Comune

author: Alessandro Baraldi

text:
"MA" <
mas...@massimilianoamendola.it
> wrote in message
news:nxXpe.15731$
TR5....@news.edisontel.com
[CUT]
> Io eh.. sono l'unico dche deve accettare la critica.
> Ci siamo apparati bene io e te,
> io sono l'unico che non accetta le critiche e tu l'unico a conoscere tutto
> del mondo: tu sai di procreazione, di codice, di logica di programmazione...
> o è come dici tu o è sbagliato!
> uhm...
Vedi non voglio scendere in sterili assunti faccio finta
di passare oltre.
[CUT]
> 20 righe no di più
> Private Istanze As New Collection
>
> Private Sub Form_Load()
> Dim EvidTxtb As pippo
> Dim Ctl As Control
>             For Each Ctl In Me.Controls
>             Set EvidTxtb = New pippo
>             EvidTxtb.associa Ctl
>             Istanze.Add EvidTxtb
>             Next
> End Sub
>
>
> Private WithEvents Casella As TextBox
>
> Private Sub Casella_Enter()
>     MsgBox "ciao"
> End Sub
>
>
> Public Function associa(TB As TextBox)
>     Set Casella = TB
>     Casella.OnEnter = "[Event Procedure]"
> End Function
>
> mi sembra una discreta ottimizzzzione.
Rilassiamo gli animi.
Massimiliano ascoltami, voglio dimostrarti che intendo
farti capire quello che dico e non importelo non ho
la presunzione di conoscere meglio le classi, ma per
esperienza le uso da qualche anno, e passata l'euforia
iniziale ho capito meglio quando è il caso di usarle
e quando no.
Per spiegarti gli erorri del tuo codice:

Il codice che hai scritto non è sufficiente, o meglio
così imponi al programmatore di sviluppare tutto il codice
di controllo del Pulsante(Classe Oggetto CommandButton)
all'interno della Classe, e quì verrebbe meno la flessibilità
in quanto è la Form il centro del Codice, la Classe deve
essere essenziale per agevolare il lavoro della Form.

Come minimo devi generare un Evento di classe sfruttando
RaiseEvents(esponendo l'oggetto CommandButton come
parametro) per rilanciare nella Form l'event stesso
e gestire li la combinazione di evento.
Quindi nella Classe:
Public Event Casella_Enter(obj as Access.TextBox)
Private Sub Casella_Enter()
    RaiseEvent Class_Enter(Casella)
End Sub
Di conseguenza la classe Pippo istanziata
nella Form andrebbe dichiarata come Private WithEvents.
In questo modo si che nella Form genereresti un unico Evento
esponendone il Controllo che lo scatena.
Il tutto come vedi ha comportato qualche decina di righe
non considerando che in ogni caso dovresti premunirti di
sfruttare la proprietà TAG dei CommandButton da associare alla
classe in quanto come hai visto nel DEMO
ci sono ben altri controlli dentro e non puoi
indiscriminatamente metterli tutti ciclando semplicemente
con For...Each, percui altra opera ammanuense.
Ora sei libero di  considerare queste mie osservazioni
stupide critiche come hai ritenuto sino ad ora o come
utili consigli se avrai la possibilità di valutarli come
tali, altrimenti fai come credi che non sbagli.
Da parte mia ho solo cercato di non dare per scontate cose
che forse nemmeno tu hai proprio chiarissime e che vuoi
far passare come elementari.
Ciao
Non t'incazzare per ste minchiate è estate anche se non
sembra visto il tempo..!



title: Aggiornamento Sito Comune

author: MA

text:

[Cut] ai fini della discussione
>
> Ciao
Ok ora ragioniamo, ora il tono va molto meglio ed è proficuo
>
> Non t'incazzare per ste minchiate è estate anche se non
> sembra visto il tempo..!
Stamane commentavo che il tempo di questi giorni sembra un bella donna,
fa come gli pare e passa da caldo a gelo in un attimo e tu non sai che
sbaglio hai fatto.



title: Aggiornamento Sito Comune

author: ALESSANDRO Baraldi

text:
> Ok ora ragioniamo, ora il tono va molto meglio ed è proficuo
Dovresti saperlo che è il mio modo di fare non prenderla sempre
sul personale sono così scorbutico con tutti mi pare..!
Quanto ha fatto Marco è decisamnte corretto anzi didattico, ma non puoi
spalmarlo a marmellata su tutto...!
A completamento del demo di Marco trovi un demo semplice che ho sviluppato
quì:
Sezione GENERAL Faq 1.34
http://www.mantuanet.it/alessandro.baraldi/FilesEsempio/GENERAL/Gen_ClassEvents.exe
Ed uno non pubblicato perchè forse troppo complesso, quì:
http://www.mantuanet.it/alessandro.baraldi/AXPClassValidate.exe
Dal 2° demo capisci che le classi sono comode ma non razionalizzandone l'Uso
escono esempi non sempre utili, questo se guardi il codice nella Form
principale è banale, ma quanto è semplice capirlo...., non parliamo di
usarlo, io lo uso...! ;-)



title: Aggiornamento Sito Comune

author: Pablitomf (Maurizio Facciuti)

text:
[CUT]
> A completamento del demo di Marco trovi un demo semplice che ho sviluppato
> quì:
> Sezione GENERAL Faq 1.34
>
http://www.mantuanet.it/alessandro.baraldi/FilesEsempio/GENERAL/Gen_ClassEvents.exe
>
E smettetela su! Non è proprio il caso.
Alessandro questo esempio funziona, ma si blocca in chiusura... ti risulta
essere un problema generale?


title: Aggiornamento Sito Comune

text:
"Pablitomf (Maurizio Facciuti)" <
maurizio...@accessgroup.it
> ha scritto
nel messaggio news:d89qec$nl5$1...@domitilla.aioe.org...
> [CUT]
> > A completamento del demo di Marco trovi un demo semplice che ho
sviluppato
> > quì:
> > Sezione GENERAL Faq 1.34
> >
http://www.mantuanet.it/alessandro.baraldi/FilesEsempio/GENERAL/Gen_ClassEvents.exe
> >
>
> E smettetela su! Non è proprio il caso.
Per me non è successo nulla e sono certo che anche per MA.
Non mi scuso dei miei modi sono questi, sarebbe una forzatura
cambiarli.
> Alessandro questo esempio funziona, ma si blocca in chiusura... ti risulta
> essere un problema generale?
Perchè il 2° non funziona...?
Per il 1°:
No, nè la versione A2K(aperta con XP) nè AXP mi danno problemi simili, prova
a mettere un
Punto di Debug sull'evento Close e vedere se il problema può derivare
dall'annullamento
dell'istanza di Classe, a quel punto deve essere rimasto attivo stranamente
qualche cosa...!
Altra cosa magari elimina lo Sleep che è ovviamente solo a scopo di
rallentamento
per visualizzare meglio la sequenza Eventi



title: Aggiornamento Sito Comune

author: Roberto dalla campagna

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:kmUpe.15653$TR5....@news.edisontel.com...
> Roberto dalla campagna wrote:
> > "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
> > news:cJApe.15393$TR5....@news.edisontel.com...
> >> Roberto dalla campagna wrote:
> >>> E' stato messo on line l'aggiornamento del Sito Comune relativo al
> >>> mese di maggio 2005.
> >>
> >>
> >> L'articolo Calendario senza ocx è decisamente superato dalla
> >> conoscena comune e quindi dall'utilizzo
> >> di WithEvents.
> >> Se magari l'autore volesse upgradarlo con questo metodo..
> >
> > WithEvents?
> > Forse mi sfugge qualcosa.
>
> Con with events a prescindere dal controllo che "impegni" scateni un
evento
> intercettabile.
> poi ricevuto l'evento ne gestisci il valore ed il nome
Tenendo conto dell'esempio di cui stiamo discutendo, mi continua a sfuggire
qualcosa e sarà sicuramnente colpa mia; mi conforta il fatto di essere in
buona compagnia. ;-)
>
> > Comunque l'autore, come indicato nella FAQ, è "sua accessità" J.
> > L.Viescas, ed è un po' difficile chiedergli di modificarlo: insomma,
> > prendere o lasciare. ;-)
>
> e ha fatto sta cosa brutta???
> peccato
Sarà una licenza poetica o è bene che anche lui dopo 12 anni si aggiorni. :)
> --
> _ _
> Ciao
> MAssimiliano Amendola
www.accessgroup.it
--



title: Import dati

author: Marco

text:
Ciao!
Risolto un problema se ne fa un altro... :-)
Supponiamo abbia due copie dello stesso db su due PC diversi non in rete. su
di uno carico dei dati e sul secondo altri. Come faccio a tenerli
sincronizzati? Cioč posso ottenere un 3° db con i dati di 1°+ 2°?
Thanx.
Marco.


title: Maschere continue

author: OndaMax

text:
Ciao a tutti,
Ho impostato una form a "maschera continue" con relativi selettori record e
sto cercando di ottimizzarne la formattazione.
Domanda 1: sapete se č possibile forzare il Focus sul selettore di record
(ottenendo piů o meno l'effetto che si ha cliccando col mouse sul selettore
stesso) ? Ho quasi usurato la guida in linea ma non ho trovato nulla ...
Domanda 2: č possibile ottenere o simulare un'evidenziazione o un reverse
solo sul record dati attivo ? Ho fatto qualche test agendo sulle
formattazioni da codice ma se modifico il BackColor e il ForeColor la
variazione si riflette su tutte le righe dati della Form. Anche la
formattazione condizionale da gli stessi risultati.
Qualcuno sa darmi un suggerimento che mi consenta di "sbloccarmi" ?
Grazie in anticipo, grazie comunque.
Ciao
OndaMax


title: Maschere continue

author: lbo dal portatile

text:
>Domanda 1: sapete se è possibile forzare il Focus sul selettore di record
>(ottenendo più o meno l'effetto che si ha cliccando col mouse sul selettore
>stesso) ? Ho quasi usurato la guida in linea ma non ho trovato nulla ...
hai visto anche selstart e simili?  non sono sicuro che serva, ma
dacci uno sguardo.
>Domanda 2: è possibile ottenere o simulare un'evidenziazione o un reverse
>solo sul record dati attivo ? Ho fatto qualche test agendo sulle
sì e no.
>formattazioni da codice ma se modifico il BackColor e il ForeColor la
>variazione si riflette su tutte le righe dati della Form. Anche la
>formattazione condizionale da gli stessi risultati.
vedi in proposito la penultima faq sul sito comune.
--
make it idiot proof and someone will make a better idiot.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: Maschere continue

text:
lbo dal portatile wrote in message
> >Domanda 1: sapete se è possibile forzare il Focus sul selettore di record
> >(ottenendo più o meno l'effetto che si ha cliccando col mouse sul
selettore
> >stesso) ? Ho quasi usurato la guida in linea ma non ho trovato nulla ...
>
> hai visto anche selstart e simili?  non sono sicuro che serva, ma
> dacci uno sguardo.
Grazie lbo,
Ho dato un'occhiata al Selstart (che non conoscevo) e sembrerebbe utile in
situazioni in cui è necessario effettuare la selezione su valori di campi o
porzioni di esso ...
Il problema del focus sul selettore l'ho poi risolto con un banale comando
(Docmd.RunCommand acCmdSelectRecord). Sembrava un problema grosso, ed invece
era una c@xx@ta ... ;-)
> >Domanda 2: è possibile ottenere o simulare un'evidenziazione o un reverse
> >solo sul record dati attivo ? Ho fatto qualche test agendo sulle
>
> vedi in proposito la penultima faq sul sito comune.
Avevo già indagato sulle FAQ, ma gli esempi si riferivano a condizioni
legate a valori sui campi, non ai record attivi. Anche qui ho risolto
replicando sull'header della mask un controllo legato al contatore e
guidando la formattazione condizionale con una banale espressione di
controllo ([controllo1] = [controllo2]).
La soluzione me la sono subito spesa rispondendo a Piombo qualche post dopo
di questo.
> make it idiot proof and someone will make a better idiot.
Fantastico .... era un po' che lo volevo dire !!!
Ciao ;-)
OndaMax


title: Maschere continue

text:
>Avevo già indagato sulle FAQ, ma gli esempi si riferivano a condizioni
>legate a valori sui campi, non ai record attivi. Anche qui ho risolto
>replicando sull'header della mask un controllo legato al contatore e
>guidando la formattazione condizionale con una banale espressione di
>controllo ([controllo1] = [controllo2]).
be', questo era lasciato come utile esercizio al lettore...
--
make it idiot proof and someone will make a better idiot.



title: Maschere continue

text:
lbo dal portatile wrote in message ...
> >Avevo già indagato sulle FAQ, ma gli esempi si riferivano a condizioni
> >legate a valori sui campi, non ai record attivi. Anche qui ho risolto
> >replicando sull'header della mask un controllo legato al contatore e
> >guidando la formattazione condizionale con una banale espressione di
> >controllo ([controllo1] = [controllo2]).
>
> be', questo era lasciato come utile esercizio al lettore...
Già .. ed infatti utilissimo è stato :-)
Grazie 1000
OndaMax


title: Maschere continue

author: Calamus

text:
On Thu, 07 Sep 2000 20:00:05 GMT, "OndaMax" <
ond...@libero.it
> wrote:
>Ciao a tutti,
>Ho impostato una form a "maschera continue" con relativi selettori record e
>sto cercando di ottimizzarne la formattazione.
>
>Domanda 1: sapete se è possibile forzare il Focus sul selettore di record
>(ottenendo più o meno l'effetto che si ha cliccando col mouse sul selettore
>stesso) ? Ho quasi usurato la guida in linea ma non ho trovato nulla ...
>
Vedi nell'help in linea le proprietà RecordsetClone e Bookmark
>Domanda 2: è possibile ottenere o simulare un'evidenziazione o un reverse
>solo sul record dati attivo ? Ho fatto qualche test agendo sulle
>formattazioni da codice ma se modifico il BackColor e il ForeColor la
>variazione si riflette su tutte le righe dati della Form. Anche la
>formattazione condizionale da gli stessi risultati.
>
Ti hanno già risposto altri.
>Qualcuno sa darmi un suggerimento che mi consenta di "sbloccarmi" ?
>Grazie in anticipo, grazie comunque.
>Ciao
>OndaMax
>
>
Cal...@ciaoweb.it


title: Esportare in Excel Query a campi incrociati ( help federico!)

author: h

text:
Disperazione!!
Nonostante il grande aiuto che mi ha dato federico luciani (che dio lo abbia
in gloria:-)
 non ho ancora risolto totalmente il problema:
una delle query da esportare è a campi incrociati, quindi il numero di
colonne è variabili e quindi il codice di federico luciani (che riporto) non
può funzionare.
pensavo di fare una cosa di questo tipo:
1-esportare in excel la query (OutputTo.., fatto e funziona)
2-inserire un paio di righe nel foglio di lavoro, visto che output to parte
dalla prima riga)
3-inserire nella prima riga, ora liberata, il titolo.
sto seguendo una buona via, o c'è un altro modo?
(se qualcuno ha suggerienti per le fasi 2 e 3 lo prego di farsi avanti!)
domando umilmente aiuto, è da una settimana che ci batto la testa sopra e se
non
riesco a finire il lavoro, mi crocifiggono in sala mensa!
grazie a tutti!
codice di federico luciani
--------------------------------------------------
Private Sub cmdExcel_Click()
    Dim excApp As Object
    Dim excDoc As Object
    Dim dbs As Database
    Dim rst As Recordset
    Dim c As Integer
    Dim r As Integer
    On Error Resume Next
    Set excApp = GetObject(, "Excel.Application")
    If Err.Number = 429 Then
        Set excApp = CreateObject("Excel.Application")
        Err.Number = 0
    End If
    On Error GoTo gestErrori
    Set excDoc = excApp.workbooks.Add
    excApp.Visible = True
    excApp.WindowState = -4137 'xlMaximized
    excDoc.Worksheets(1).Cells(2, 2) = "Qui sotto c'e' la tabella"
    Set dbs = CurrentDb
    Set rst = dbs.OpenRecordset("nomeTabellaQuery")
    r = 4
    c = 1
    Do
        excDoc.Worksheets(1).Cells(r, c) = rst![campo1]
        excDoc.Worksheets(1).Cells(r, c + 1) = rst![campo2]
        excDoc.Worksheets(1).Cells(r, c + 2) = rst![campo3]
        r = r + 1
        rst.MoveNext
    Loop Until rst.EOF
    rst.Close
    Set dbs = Nothing
esci:
    Set excDoc = Nothing
    Set excApp = Nothing
    Exit Sub
gestErrori:
    MsgBox Err.Number & " - " & Err.Description
    GoTo esci
End Sub


text:
> Se fossi in te lascerei perdere Access per le query a campi
> incrociati. Fatti un collegamento con ODBC da Excel alla tabella..
la fregatura è che in azienda c'è già un mde acquistato che
fa questa cosa: clicchi, apre excel, esporta la query a campi incrociati ed
aggiunge nelle prime riche alcuni valori (titoli) e si sono impuntati sul
fatto che anche
quello che sto facendo deve essere così!
disperatamente
isa


author: Nicola Ardito

text:
h ha scritto nel messaggio ...
>Disperazione!!
>
>Nonostante il grande aiuto che mi ha dato federico luciani (che dio lo
abbia
>in gloria:-)
> non ho ancora risolto totalmente il problema:
>una delle query da esportare è a campi incrociati, quindi il numero di
>colonne è variabili e quindi il codice di federico luciani (che riporto)
non
>può funzionare.
>

>    Do
se ho capito bene il problema una cosa del genere dovrebbe funzionare (non
l'ho provato ma non vedo controindicazioni).
        for i = 0 to rst.fields.count -1
                excDoc.Worksheets(1).Cells(r, c+i) = rst(i)
        next
>        r = r + 1
>        rst.MoveNext
>    Loop Until rst.EOF
>    rst.Close
>    Set dbs = Nothing
>esci:
>    Set excDoc = Nothing
>    Set excApp = Nothing
>    Exit Sub
>gestErrori:
>    MsgBox Err.Number & " - " & Err.Description
>    GoTo esci
>End Sub
>
>
>
Ciao Nicola
email: metti inwind al posto  di NOSPAM


author: RoDAgo

text:
"h"  ha scritto nel messaggio ...

Ciao, ho visto il codice di Federico, ti consiglio di utilizzarlo anzichè
ricorrere all'OutputTo, ihmo quest'ultimo ti consente meno flessibilità.
Per esser indipendente dal numero di campi basta fare piccole modifiche, dai
un'occhiata:
Private Sub cmdExcel_Click()
  Dim excApp As Object
    Dim excDoc As Object
    Dim dbs As Database
    Dim rst As Recordset
    Dim c As Integer
    Dim r As Integer, j As Integer
    On Error Resume Next
    Set excApp = GetObject(, "Excel.Application")
    If Err.Number = 429 Then
        Set excApp = CreateObject("Excel.Application")
        Err.Number = 0
    End If
    On Error GoTo gestErrori
    Set excDoc = excApp.workbooks.Add
    excApp.Visible = True
    excApp.WindowState = -4137 'xlMaximized
    excDoc.Worksheets(1).Cells(2, 2) = "Qui sotto c'e' la tabella"
    Set dbs = CurrentDb
    Set rst = dbs.OpenRecordset("nomeTabellaQuery")
    r = 4
    c = 1
    Do
'Basta cliclare i Campi per ottenere quello che vuoi.
        For j = 0 To rst.Fields.Count - 1
            excDoc.Worksheets(1).Cells(r, c + j) = rst.Fields(j)
        Next j
'----------------------------------------------------------------------
        r = r + 1
        rst.MoveNext
    Loop Until rst.EOF
    rst.Close
    Set dbs = Nothing
esci:
    Set excDoc = Nothing
    Set excApp = Nothing
    Exit Sub
gestErrori:
    MsgBox Err.Number & " - " & Err.Description
    GoTo esci
End Sub
> disperatamente
>
> isa
Ciao
RoDAgo


text:
> Per esser indipendente dal numero di campi basta fare piccole modifiche,
dai
> un'occhiata:
> 'Basta cliclare i Campi per ottenere quello che vuoi.
>
>         For j = 0 To rst.Fields.Count - 1
>             excDoc.Worksheets(1).Cells(r, c + j) = rst.Fields(j)
>         Next j
>
Grazie mille, funziona egregiamente!
Per completare l'opera dovrei mettere il nome del campo in cima colonna.
Per i  campi fissi ho risolto con
excDoc.Worksheets(1).Cells(7, 4) = "Articolo "
Solo che visto che la query è a campi incrociati devo riuscire a raccattare
anche i nomi
dei campi "variabili". credo di aver capito che bisogna anche in questo caso
"ciclare"
ho fatto vari tentativi ma senza successo (lo so che è una scopiazzata ma ci
ho provato)
credo che gli errori siano nel modo di ricavare il nome del campo e poi come
gli si dice
"fino alla fine dei campi?" credo che eof
es.
'    XR = 7
'    XC = 2
'        For XJ = 0 To rst.Fields.Count - 1
'            excDoc.Worksheets(1).Cells(XR, XC + XJ) =
rst.Field.Name
(j)
'        Next j
'        r = r + 1
'        rst.MoveNext
'    Loop Until rst.EOF
grazie ancora per l'aiuto che mi hai (Avete!) dato!
ciao
isa


text:
"h" ha scritto nel messaggio ...
> Per completare l'opera dovrei mettere il nome del campo in cima colonna.

Non c'eri poi tanto lontana:
For j = 0 To rst.Fields.Count - 1
            excDoc.Worksheets(1).Cells(r, c + j) = rst.Fields(j).Name
Next j
> grazie ancora per l'aiuto che mi hai (Avete!) dato!
De nada.
Cià
RoDAgo


title: Differenza2

author: paolo

text:
Scusate la mia ignoranza,ma vorrei sapere in parole povere la differenza che
c'e' tra una applicazione mono utente,multi utente e client server.
Capisco la differenza tra mono utente e client server,ma non capisco quella
tra client server e multi utente.
Grazie
Paolo


title: Differenza2

text:
"paolo" <
venu...@libero.it
> wrote in message
news:sTWBb.177606$
vO5.7...@twister1.libero.it

Ancora...?
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Che cosa contine sta variabile?

author: Mario Scola

text:
Devo controllare cosa contiene una combo di nome Titolo ed se è vuota deve
presentarmi tutti i record con l'istruzione:
DoCmd.OpenReport stDocName, acPreview
se invece è contiene un valore deve presentarmi solo quello con
l'istruzione:
DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria
Per capire se nella casella combo ho qualche cosa assegno alla variabile
cosa il valore contenuto nella combo con l'istruzione
cosa = Me![Titolo]
e verifico che se la combo è vuota la variabile cosa è NULLO
Poi con un if then else verifico il tutto. Il codice completo è questo:
    Dim stDocName As String
    Dim stLinkCriteria As String
    Dim cosa As Variant
    cosa = Me![Titolo]
    stLinkCriteria = "[Titolo]=" & Chr(34) & Me![Titolo] & Chr(34)
    stDocName = "reportavvenimenti"
    If cosa Is Null Then
                   DoCmd.OpenReport stDocName, acPreview
          Else
    DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria
    End If
Mi compare però il seguente messaggio
Nessun oggetto. Che significa. Dove sbaglio?
Grazie
--
Scola Mario


title: Che cosa contine sta variabile?

text:
"Mario Scola" <marscol*NOSPAM*@
tin.it
> ha scritto nel messaggio
news:PH04c.30421$z23.1...@news3.tin.it...
> Devo controllare cosa contiene una combo di nome Titolo ed se č vuota deve
> presentarmi tutti i record con l'istruzione:
>
> DoCmd.OpenReport stDocName, acPreview
>
> se invece č contiene un valore deve presentarmi solo quello con
> l'istruzione:
>
> DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria
>
> Per capire se nella casella combo ho qualche cosa assegno alla variabile
> cosa il valore contenuto nella combo con l'istruzione
>
> cosa = Me![Titolo]
>
> e verifico che se la combo č vuota la variabile cosa č NULLO
>
> Poi con un if then else verifico il tutto. Il codice completo č questo:
>
>     Dim stDocName As String
>     Dim stLinkCriteria As String
>     Dim cosa As Variant
>
>     cosa = Me![Titolo]
>     stLinkCriteria = "[Titolo]=" & Chr(34) & Me![Titolo] & Chr(34)
>     stDocName = "reportavvenimenti"
>
>     If cosa Is Null Then
>                    DoCmd.OpenReport stDocName, acPreview
>           Else
>     DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria
>     End If
>
> Mi compare perň il seguente messaggio
>
> Nessun oggetto. Che significa. Dove sbaglio?
>
> Grazie
> --
> Scola Mario
Hai fatto un MIX non indifferente.....!!!
    Dim stDocName As String
    Dim stLinkCriteria As String
    Dim cosa As Variant
    If Len(me.Titolo)>0 then
        stLinkCriteria = "[Titolo]=" & Chr(34) & Me![Titolo] & Chr(34)
    Else
        stLinkCriteria =vbnullstring
    End If
    stDocName = "reportavvenimenti"
    DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria
Prova cosě.....!
@Alex.


title: Che cosa contine sta variabile?

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:c2q5v2$16q$1...@lacerta.tiscalinet.it...

Grazie... funzionaaaaaaaaaaaaaaaa
Per completezza aggiungo che ho messo un msgbox per chiedere conferma di
stampa di tutti i reports (possono essere + di 1000). Riporto il codice
completo per ricerche future.
    Dim stDocName As String
    Dim stLinkCriteria As String
    If Len(Me.Titolo) > 0 Then
        stLinkCriteria = "[Titolo]=" & Chr(34) & Me![Titolo] & Chr(34)
    Else
        Risposta = MsgBox("Attenzione stai per stampare tutti i report! Vuoi
Continuare?", vbYesNo, "ATTENZIONE!!!")
        If Risposta = vbYes Then stLinkCriteria = vbNullString
        If Risposta = vbRetry Then Exit Sub
    End If
    stDocName = "reportavvenimenti"
    DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria
Grazie ancora a tutti.
Mario
P.S. Lo dico subito che non ho ancora cercato di risolverlo da solo e ci
proverň... perň chiedo. Se volessi far comparire nel msgbox il numero di
report che sto per stampare come faccio?


title: Access 2010 64 bit - Apertura applicativo realizzato con A07

author: Mirko Caporali

text:
Ciao a tutti, sto provando ad aprire un applicativo realizzato con
A07, con Access 2010 64 bit (beta).
All'apertura, m iviene restituito il seguente messaggio:
"The code in this project must be updated for use on 64-bit systems.
Please review and update Declare statements and then mark them with
the PtrSafe attribute."
... ed ovviamente, NON funziona alcuna routine.
Non ho capito cosa debba fare in concreto per aggiornare l file ai 64
bit, qualcuno ne ha idea?


text:
On 27 Gen, 16:54, Mirko Caporali <
mirko.capor...@tin.it
> wrote:
>
> Non ho capito cosa debba fare in concreto per aggiornare l file ai 64
> bit, qualcuno ne ha idea?
Ho trovato il problema:
nel database avevo utilizzato delle API per aprire finestre di
dialogo. Per la precisione, ho utilizzato il modulo "BasCommonDialog"
della FAQ 5.42 del sitocomune.
Per la cronaca, riscontro anche un altro problema: non funziona il
TREEVIEW.
Altri riscontri?....


text:
On 28 Gen, 10:52, Mirko Caporali <
mirko.capor...@tin.it
> wrote:
> nel database avevo utilizzato delle API per aprire finestre di
> dialogo. Per la precisione, ho utilizzato il modulo "BasCommonDialog"
> della FAQ 5.42 del sitocomune.
Lo stesso problema viene riscontrato anche con il modulo "Utilità
calendario", prelevato dal sito di A. Baraldi, sezione FORMS, FAQ
5.42
A quanto pare, manca completamente la compatibilità con le API 32BIT.


text:
Altra segnalazione...
Dopo aver apportato modifiche anche pittosto banali, tipo moifiche di
proprietà di una maschera, mi è capitato di ricevere il messaggio "OUT
OF MEMORY".


title: DCount con criterio multiplo.

author: TANNHAUSER

text:
Buongiorno,
perchč se nella funzione DCount utilizzo una sola condizione da testare
nel criterio non ho problemi mentre se ne aggiungo una seconda con "and"
mi restituisce "Errore di run-time 13: Tipo non corrispondente"?
C'č una qualche regola particolare per la scrittura del criterio di
selezione?
Grazie,
TANNHAUSER
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: DCount con criterio multiplo.

text:
"TANNHAUSER" <
tannau...@virgilio.it
> wrote in message
news:ciu8g0$dqs$
1...@news.newsland.it
> Buongiorno,
>
> perchč se nella funzione DCount utilizzo una sola condizione da testare
> nel criterio non ho problemi mentre se ne aggiungo una seconda con "and"
> mi restituisce "Errore di run-time 13: Tipo non corrispondente"?
> C'č una qualche regola particolare per la scrittura del criterio di
> selezione?
> Grazie,
>
> TANNHAUSER
Sicuramente perchč hai sbagliato la sintassi.
Posta il codice specificando il TIPO di dati
nei criteri se Stringhe o Numerici o Data.
Ciao
Alessandro
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: DCount con criterio multiplo.

text:
Alessandro Baraldi ha scritto:



> Ciao
> Alessandro
Anch'io avevo tale sospetto e devo avere qualche virgoletta fuori posto,
soprattutto per i campi stringa.
Dim EsisteMisuraDiBa
EsisteMisuraDiBa = DCount("[MaterialeComposto]", "DistintaBase",
"[MaterialeComposto]=" & Me!IDMateriale and "[TagliaComposto]=" & Me!Misura
MaterialeComposto, IDMateriale=> Numerico
TagliaComposto, Misura=> Stringa
DistintaBase=> Tabella
Grazie eciao,



title: DCount con criterio multiplo.

text:
> Dim EsisteMisuraDiBa
> EsisteMisuraDiBa = DCount("[MaterialeComposto]", "DistintaBase",
> "[MaterialeComposto]=" & Me!IDMateriale and "[TagliaComposto]=" &
Me!Misura
>
> MaterialeComposto, IDMateriale=> Numerico
> TagliaComposto, Misura=> Stringa
> DistintaBase=> Tabella
>
> Grazie eciao,
>
> TANNHAUSER
Si ti confermo che oltre ad un'errore di formattazione dato c'è anche
un'errore di SINTASSI riferita al Criterio:
Correzione:
EsisteMisuraDiBa = DCount("[MaterialeComposto]", "DistintaBase", _
                            "[MaterialeComposto]=" & Me!IDMateriale & _
                            " and [TagliaComposto]=" & chr(34) & Me!Misura &
chr(34))
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: DCount con criterio multiplo.

text:
ALESSANDRO Baraldi ha scritto:
> > Dim EsisteMisuraDiBa
> > EsisteMisuraDiBa = DCount("[MaterialeComposto]", "DistintaBase",
> > "[MaterialeComposto]=" & Me!IDMateriale and "[TagliaComposto]=" &
> Me!Misura
> >
> > MaterialeComposto, IDMateriale=> Numerico
> > TagliaComposto, Misura=> Stringa
> > DistintaBase=> Tabella
> >
> > Grazie eciao,
> >
> > TANNHAUSER
> Si ti confermo che oltre ad un'errore di formattazione dato c'è anche
> un'errore di SINTASSI riferita al Criterio:
> Correzione:
> EsisteMisuraDiBa = DCount("[MaterialeComposto]", "DistintaBase", _
>                             "[MaterialeComposto]=" & Me!IDMateriale & _
>                             " and [TagliaComposto]=" & chr(34) & Me!Misura &
> chr(34))
> Ciao
Ho provato ad inserire il codice modificato che mi hai inviato. Mi sembra
di aver capito che la differenza sta nell'aver aggiunto le virgolette,
Chr(34) prima e dopo l'ultimo valore; immagino perchè il campo è di tipo
stringa. Non mi fornisce però il risultato sperato; mi spiego meglio. Ho
aggiunto il seguente codice in una visualizzazione a maschere continue
Private Sub Form_Current()
Dim EsisteMisuraDiBa
EsisteMisuraDiBa = DCount("[MaterialeComposto]", "DistintaBase", _
"[MaterialeComposto]=" & Me!IDMateriale & _
" and [TagliaComposto]=" & Chr(34) & Me!Misura & Chr(34))
If (EsisteMisuraDiBa <> "") Then
Me!Misura.ForeColor = 255
End If
End Sub
Ho sostituito al mio il codice che mi hai postato. Effettuando il test
però, indipendentemente dal valore assunto dala variabile EsisteMisura, il
risultato non cambia (cioè tutti i valori di Me!Misura sono in rosso).
Something more to suggest?
Grazie ancora ed in anticipo,



title: DCount con criterio multiplo.

text:
"TANNHAUSER" <
tannau...@virgilio.it
> wrote in message
news:cj15ec$pgb$
1...@news.newsland.it
[CUT]
> EsisteMisuraDiBa = DCount("[MaterialeComposto]", "DistintaBase", _
> "[MaterialeComposto]=" & Me!IDMateriale & _
> " and [TagliaComposto]=" & Chr(34) & Me!Misura & Chr(34))
> If (EsisteMisuraDiBa <> "") Then
> Me!Misura.ForeColor = 255
> End If
> End Sub
>
> Ho sostituito al mio il codice che mi hai postato. Effettuando il test
> però, indipendentemente dal valore assunto dala variabile EsisteMisura, il
> risultato non cambia (cioè tutti i valori di Me!Misura sono in rosso).
> Something more to suggest?
> Grazie ancora ed in anticipo,
>
> TANNHAUSER
Hai letto nell'Help il tipo di dati restituiti dalla Funzione
DCOUNT....?????
E' impossibile che vada se lo confronti con un valore stringa...!
Prova con il confronto con ZERO



title: DCount con criterio multiplo.

text:
Alessandro Baraldi ha scritto:




> Alessandro
Certo che ho letto l'help e, ovviamente, essento una funzione che conta
non può che restituire un numero. Lo ZERO era stata la mia prima scelta
ma, per sfizio, volevo provare anche con "": poi mi sono dimenticato di
ricorreggere e te l'ho postato senza riportare tutto alla forma originale.
In ogni caso, non funziona e mi lascia tutti valori in black (come se il
risultato fosse sempre =0).



title: DCount con criterio multiplo.

text:
"TANNHAUSER" <
tannau...@virgilio.it
> ha scritto nel messaggio
news:cj1cih$bdf$1...@news.newsland.it...

Usa il Debug per vedere dove si pianta o cosa non funziona.....!
Magari inserisci i criteri in una Query per verificare che effettivamente
funzionino......!
Purtroppo non ho in mano il tuo DB ma deve andare, la sintassi
in base a quanto hai detto è corretta.
Alessandro



title: DCount con criterio multiplo.

author: Michele

text:
'una visualizzazione a maschere continue'
Credo che il problema di fondo sia questo:
Se hai una visualizzazione di questo tipo credo che tenda a modificare la
maschera nello stesso modo per tutti i record visualizzati in base al
comportamento sul record corrente.
In pratica se per il record corrente la misura esiste allora avrai tutti i
record in rosso, se no tutti in nero (prova a scorrere i record e dimmi se
ho ragione)
Ho letto da qualche parte che su
www.sitocomune.com
 c'è qualcosa a riguardo
ma non sono ancora andato a vedere.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: DCount con criterio multiplo.

text:
"Michele" <
mvan...@inwind.it
> ha scritto nel messaggio
news:62Z152Z117Z97Y1...@usenet.libero.it...
> 'una visualizzazione a maschere continue'
> Credo che il problema di fondo sia questo:
> Se hai una visualizzazione di questo tipo credo che tenda a modificare la
> maschera nello stesso modo per tutti i record visualizzati in base al
> comportamento sul record corrente.
> In pratica se per il record corrente la misura esiste allora avrai tutti i
> record in rosso, se no tutti in nero (prova a scorrere i record e dimmi se
> ho ragione)
> Ho letto da qualche parte che su
www.sitocomune.com
 c'è qualcosa a
riguardo
> ma non sono ancora andato a vedere.
Se fosse così l'errore di base è quello di non dire l'effettivo risultato
voluto, ma solo un parziale....!
Confermo la tua valutazione, ma in questo caso si può ugualmente fare
appoggiandosi alla Formattazione Condizionale.
Ciao



title: DCount con criterio multiplo.

text:
ALESSANDRO Baraldi ha scritto:
> "Michele" <
mvan...@inwind.it
> ha scritto nel messaggio
> news:62Z152Z117Z97Y1...@usenet.libero.it...
> > 'una visualizzazione a maschere continue'
> > Credo che il problema di fondo sia questo:
> > Se hai una visualizzazione di questo tipo credo che tenda a modificare la
> > maschera nello stesso modo per tutti i record visualizzati in base al
> > comportamento sul record corrente.
> > In pratica se per il record corrente la misura esiste allora avrai tutti i
> > record in rosso, se no tutti in nero (prova a scorrere i record e dimmi se
> > ho ragione)
> > Ho letto da qualche parte che su
www.sitocomune.com
 c'è qualcosa a
> riguardo
> > ma non sono ancora andato a vedere.
> Se fosse così l'errore di base è quello di non dire l'effettivo risultato
> voluto, ma solo un parziale....!
> Confermo la tua valutazione, ma in questo caso si può ugualmente fare
> appoggiandosi alla Formattazione Condizionale.
> Ciao
Ma la formattazione condizionale non si applica a A97? O sbaglio?
Comunque, con il Debug, sembra che il codice non conti correttamente i
record secondo le condizioni imposte. La mia domanda nasceva dal voler far
capire subito a chi apriva l'anagrafica materiali quali erano le misure
che già avevano Distinta Base (evidenziandole con un colore diverso).
Se può servire, le tabelle interessate erano:
Materiali
IDMateriale (Contatore)
...
Misure
IDMateriale (Intero)
Misura (testo) <n-1 con Materiali attraverso IDMateriale>
DistintaBase
MaterialeComposto (Intero) <n-1 con Materiali attraverso IDMateriale>
TagliaComposto
La form su Materiali contiene sia una subform Misure (ovviamente per
aggiungerne in caso di necessità) sia una subform DistintaBase(per creare
la distinta delle misure che ci interessano).
L'unica cosa che non funziona è questa evidenziazione. Forse era solo una
volontà estetica ma mi sembrava che, sopratutto per materiali con numerose
taglie ciò potesse facilitare il compito: farò senza.
Grazie lo stesso,



title: DCount con criterio multiplo.

text:
> Ma la formattazione condizionale non si applica a A97? O sbaglio?
Sbagli, vai sul SitoComune o sul mio sito e troverai degli ottimi esempi di
Silvio Savoldi che implementano la Formattazione Condizionale per A97
in modo estremamente elementare.
> Comunque, con il Debug, sembra che il codice non conti correttamente i
> record secondo le condizioni imposte. La mia domanda nasceva dal voler far
> capire subito a chi apriva l'anagrafica materiali quali erano le misure
> che già avevano Distinta Base (evidenziandole con un colore diverso).
Impossibile, se il Codice non conta correttamente ci sono errori
nell'applicazione.
Ma nel tuo caso non si tratta di contare nulla devi solo CONDIZIONARE il
colore
relativamente ad una CONDIZIONE.
Vedi sul Mio sito nella sezione [FORMS] l'articolo "Evidenzia Records in
viste tabellari"
devi adattarlo alle tue esigenze, ma fà proprio al caso tuo.
[CUT]
> TANNHAUSER



title: DCount con criterio multiplo.

text:
ALESSANDRO Baraldi ha scritto:
> > Ma la formattazione condizionale non si applica a A97? O sbaglio?
> Sbagli, vai sul SitoComune o sul mio sito e troverai degli ottimi esempi di
> Silvio Savoldi che implementano la Formattazione Condizionale per A97
> in modo estremamente elementare.
> > Comunque, con il Debug, sembra che il codice non conti correttamente i
> > record secondo le condizioni imposte. La mia domanda nasceva dal voler far
> > capire subito a chi apriva l'anagrafica materiali quali erano le misure
> > che già avevano Distinta Base (evidenziandole con un colore diverso).
> Impossibile, se il Codice non conta correttamente ci sono errori
> nell'applicazione.
> Ma nel tuo caso non si tratta di contare nulla devi solo CONDIZIONARE il
> colore
> relativamente ad una CONDIZIONE.
> Vedi sul Mio sito nella sezione [FORMS] l'articolo "Evidenzia Records in
> viste tabellari"
> devi adattarlo alle tue esigenze, ma fà proprio al caso tuo.
> [CUT]
> > TANNHAUSER
> Ciao
Concordo con te quando dici che devo "condizionare" il colore ad una
condizione; il problema sta proprio nel fatto che non riesco a verificare
tale condizione prima di formattare la maschera.



title: Strano messaggio di errore senza Debug

author: Prometeo

text:
Ciao a tutti
Accade che durante l'esecuzione di un codice da cui vengono lanciate
alcune routine, che assegnano valori a variabili,aprono e chiudono
maschere e modificano dati, pur risultando dal debug il codice
sintatticamente corretto, si apre una piccola finestra di dialogo quadrata
- Titolo:MSAccess
e Pulsante OK - senza nessun'altra indicazione.
 Vi č capitato?
Saluti e grazie
Prometeo
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Strano messaggio di errore senza Debug

author: MA

text:
Prometeo wrote:
> Ciao a tutti
>
> Accade che durante l'esecuzione di un codice da cui vengono lanciate
> alcune routine, che assegnano valori a variabili,aprono e chiudono
> maschere e modificano dati, pur risultando dal debug il codice
> sintatticamente corretto, si apre una piccola finestra di dialogo
> quadrata - Titolo:MSAccess
> e Pulsante OK - senza nessun'altra indicazione.
>  Vi è capitato?
>
> Saluti e grazie
> Prometeo
Non hai messo un msgbox da qualche parte senza indicare il  testo?
--
_ _
Ciao
MAssimiliano Amendola
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:
www.donkarl.com/it


title: Strano messaggio di errore senza Debug

author: Alessandro Baraldi

text:
"Prometeo" <
Chiwa...@indi.it
> wrote in message
news:d5opqo$7bu$
1...@news.newsland.it
> Ciao a tutti
>
> Accade che durante l'esecuzione di un codice da cui vengono lanciate
> alcune routine, che assegnano valori a variabili,aprono e chiudono
> maschere e modificano dati, pur risultando dal debug il codice
> sintatticamente corretto, si apre una piccola finestra di dialogo quadrata
> - Titolo:MSAccess
> e Pulsante OK - senza nessun'altra indicazione.
>  Vi è capitato?
>
> Saluti e grazie
> Prometeo
Sembrerebbe il messaggio di Crash di MSAccess.
Non è che dopo si chiude l'applicativo...?
Se fosse quanto ho accennato potresti tentare di reimportare
il tutto in un nuovo DB(Pulito).
La causa però potrebbe essere generata da una non corretta gestione
delle risorse, in particolare sei sicuro di liberare
correttamente la memoria....?
Hai inserito la comune gestione degli errori nelle Routine
in modo da prevenire Errori non gestibili...?
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Strano messaggio di errore senza Debug

text:
Alessandro Baraldi ha scritto:
> "Prometeo" <
Chiwa...@indi.it
> wrote in message
> news:d5opqo$7bu$
1...@news.newsland.it
> > Ciao a tutti
> >
> > Accade che durante l'esecuzione di un codice da cui vengono lanciate
> > alcune routine, che assegnano valori a variabili,aprono e chiudono
> > maschere e modificano dati, pur risultando dal debug il codice
> > sintatticamente corretto, si apre una piccola finestra di dialogo quadrata
> > - Titolo:MSAccess
> > e Pulsante OK - senza nessun'altra indicazione.
> >  Vi è capitato?
> >
> > Saluti e grazie
> > Prometeo
> Sembrerebbe il messaggio di Crash di MSAccess.
> Non è che dopo si chiude l'applicativo...?
[CUT]
In un certo senso il Crash c'è stato ma nella mia testa
in fondo ad una delle routine mi era rimasto un:
Err_Tipo_P_Click:
MsgBox Err.Description
exit sub
un residuo che avevo lasciato con l'errata convinzione che se non
ci fossero stati errori sarebbe stato ignorato.
La prossima volta prima di postare faccio un pò di prove
ciao e grazie



title: Strano messaggio di errore senza Debug

text:
MA ha scritto:
> Prometeo wrote:
> > Ciao a tutti
> >
> > Accade che durante l'esecuzione di un codice da cui vengono lanciate
> > alcune routine, che assegnano valori a variabili,aprono e chiudono
> > maschere e modificano dati, pur risultando dal debug il codice
> > sintatticamente corretto, si apre una piccola finestra di dialogo
> > quadrata - Titolo:MSAccess
> > e Pulsante OK - senza nessun'altra indicazione.
> >  Vi è capitato?
> >
> > Saluti e grazie
> > Prometeo
> Non hai messo un msgbox da qualche parte senza indicare il  testo?
Ci hai azzeccato anzi ho fatto di peggio
in fondo ad una delle routine mi era rimasto un:
Err_Tipo_P_Click:
MsgBox Err.Description
exit sub
Saluti e grazie



title: Chiavi primarie e contatori

text:
ciao a tutti
quando access imposta un campo chiave primaria, ne fa corrispondere il tipo
(contatore)
č possibile forzare tale contatore ad iniziare a contare da un particolare
valore ? come ?
grazie


title: Chiavi primarie e contatori

text:
Il Thu, 16 Aug 2001 07:01:11 GMT, "pac77" <
pa...@libero.it
> scrisse:
>(.....)
>ciao a tutti
>
>quando access imposta un campo chiave primaria, ne fa corrispondere il tipo
>(contatore)
>
>è possibile forzare tale contatore ad iniziare a contare da un particolare
>valore ? come ?
>
>grazie
>
Se vuoi partire ad esempio da 100, inserisci 99 record, poi
cancellali.
Il prossimo inserito avrà valore 100 nel campo contatore.
Se però stai pensando di usare un campo contatore come numeratore
progressivo, per esempio di documenti fiscali, lascia perdere: infatti
se cancelli l'ultimo record inserito che ha valore 101 nel campo
contatore, il prossimo record inserito avrà comunque valore 102 nel
campo contatore.
Per gestire numeratori indipendenti dal contatore, guarda sul sito
comune
www.sitocomune.com
Vincenzo Turturro
---------------------------------------------------------
Se no diventiamo tutti **** dai portatili o peggio ancora
provetti poeti fiorentini come vturturro.
(Così disse Ivan Lelli Ven 25 Aug 2000 09:34:52 +0200)
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com/
---------------------------------------------
... e quello di it.comp.as400:
http://www.faq400.com/
---------------------------------------------


title: Interfaccia utente semplice: chi mi aiuta???

author: Maria Errico

text:
Mi son posta una domanda:
come è possibile effettivamente creare una interfaccia
utente, un qualcosa tipo maschera che abbia dei pulsanti
che aprano le varie tabelle, query e report realizzati e
che si apra in automatico cliccando sul nome del file
presente sul desktop del pc utente?
Sto cercando di creare un database semplice, che abbia una tabella e una
maschera di immissione dati, qualche query e qualche relativo reporE fin
qui sembra tutto filar liscio.
Vorrei che qualcuno, gentilmente, mi scrivesse come fare (con relativo
codice, così imparo) per creare una interfaccia utente, semplice, che sia
come una maschera che si apra cliccando sul nome del file creatomi e che
contenga una serie di bottoni ognuno dei quali permetta di aprire la
tabella, l'altro di lanciare una specifica query, ecc...così che non debba
muovermi nel menu stesso di access (pur avendolo sul mio pc).
Una sorta di eseguibile...non ho neanche io l'idea di cosa dovrebbe essere.
Per esempio, la tabella si chiama tabella1 e ho una query di nome query1
ed una maschera di nome maschera1.
Come si fa?
Grazie a chiunque avrà la pazienza si aiutarmi.
Kiss
Maria
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: max

text:
Per prima cosa dovresti cominciare a leggere qualcosa sui database
relazionali......Crearti le tabelle basilari per il lavoro che devi eseguire
e metterli in relazione tra di loro.
Comunque se sei alle prime armi ti consiglio di documentarti e leggere
qualche testo che parli di Access.
Saluti Max


author: sunrex

text:
"Maria Errico" <
maxe...@interfree.it
> ha scritto nel messaggio
news:bqfn9r$rv4$1...@news.newsland.it...
>
> Mi son posta una domanda:
> come è possibile effettivamente creare una interfaccia
> utente, un qualcosa tipo maschera che abbia dei pulsanti
> che aprano le varie tabelle, query e report realizzati e
> che si apra in automatico cliccando sul nome del file
> presente sul desktop del pc utente?
> Sto cercando di creare un database semplice, che abbia una tabella e una
> maschera di immissione dati, qualche query e qualche relativo reporE fin
> qui sembra tutto filar liscio.
> Vorrei che qualcuno, gentilmente, mi scrivesse come fare (con relativo
> codice, così imparo) per creare una interfaccia utente, semplice, che sia
> come una maschera che si apra cliccando sul nome del file creatomi e che
> contenga una serie di bottoni ognuno dei quali permetta di aprire la
> tabella, l'altro di lanciare una specifica query, ecc...così che non debba
> muovermi nel menu stesso di access (pur avendolo sul mio pc).
> Una sorta di eseguibile...non ho neanche io l'idea di cosa dovrebbe
essere.
> Per esempio, la tabella si chiama tabella1 e ho una query di nome query1
> ed una maschera di nome maschera1.
> Come si fa?
> Grazie a chiunque avrà la pazienza si aiutarmi.
> Kiss
> Maria
>
>
In poche parole come si fa a realizzare un'applicazione in Access?
1) Studiare  Basi di Dati Relazionali cosa che è Access ed SQL che è il
linguaggio per usarli
2) Studiare VBA che è il linguaggio di programmazione che puoi usare in
Access ( e non solo)
3) Studiare i post più significativi su questo ng
4)Studiare gli innumerevoli esempi del
http://www.sitocomune.com/
5)Studiare l'applicativo fornito in esempio con Office cioè  NorthWind.mdb
(Start Trova File o cartelle etc etc)
6) Miscelare il tutto agitare e servire il tutto a t.a. ;)
Ciao
SunRex


author: Claudio(BS)

text:
Maria Errico ha scritto:
> Mi son posta una domanda:
> come è possibile effettivamente creare una interfaccia
> utente, un qualcosa tipo maschera che abbia dei pulsanti
> che aprano le varie tabelle, query e report realizzati e
> che si apra in automatico cliccando sul nome del file
> presente sul desktop del pc utente?
Hai provato ad iniziare con l'autocomposizione maschera?
In questo modo ti si crea la maschera bella e pronta e devi solo
sbirciare nelle proprietà dei vari elementi per capirne le impostazioni.
Se poi, a quanto sopra, aggiungi l'autocomposizione bottone relativa
alla casella degli strumenti, puoi agganciare tutto quello che vuoi.
> Sto cercando di creare un database semplice, che abbia una tabella e una
> maschera di immissione dati, qualche query e qualche relativo reporE fin
> qui sembra tutto filar liscio.
> Vorrei che qualcuno, gentilmente, mi scrivesse come fare (con relativo
> codice, così imparo) per creare una interfaccia utente, semplice, che sia
> come una maschera che si apra cliccando sul nome del file creatomi e che
> contenga una serie di bottoni ognuno dei quali permetta di aprire la
> tabella, l'altro di lanciare una specifica query, ecc...così che non debba
> muovermi nel menu stesso di access (pur avendolo sul mio pc).
Poi crei una macro che di *deve* chiamare AutoExec ed imposti il comando
ad apri finestra, agganciandolo alla finestra che hai creato.
Una volta impostato in questo modo il database si apre automaticamente
con la tua maschera ma devi avere access installato o al limite il
runtime ma non credo che sia il tuo caso.
> Una sorta di eseguibile...non ho neanche io l'idea di cosa dovrebbe essere.
> Per esempio, la tabella si chiama tabella1 e ho una query di nome query1
> ed una maschera di nome maschera1.
> Come si fa?
> Grazie a chiunque avrà la pazienza si aiutarmi.
Prego e buono studio.
> Kiss
> Maria
Wow, dei kiss !!!
Così mi fai arrossire !!! :-P
--
Claudio(BS)
per rispondere aggiungi claudio
Posted from X-Privat Free NNTP server -
www.x-privat.org


author: MariaErrico

text:
Ciao Claudio, sei molto gentile con me.
Grazie per l'aiuto.
Mi diresti come contattarti via email per eventuali ulteriori mie
richieste in merito?
Ciao
Kiss
(e non arrossire...).



text:
MariaErrico ha scritto:
> Ciao Claudio, sei molto gentile con me.
> Grazie per l'aiuto.
> Mi diresti come contattarti via email per eventuali ulteriori mie
> richieste in merito?
> Ciao
> Kiss
> (e non arrossire...).
> Maria
>
Fai pure qui tutte le richieste che ti servono,
ci sono persone molto esperte e pazienti che ti daranno tutte le
risposte che ti servono ;-)
Se poi vuoi proprio utilizzare le e-mail, basta mettere claudio davanti
allo 0 (zero) dell'indirizzo.
ciao



author: Antonio Biso

text:
"Claudio(BS)" <
0...@hotmail.com
> ha scritto nel messaggio
news:3fcc...@x-privat.org...
> MariaErrico ha scritto:
> > Ciao Claudio, sei molto gentile con me.
> > Grazie per l'aiuto.
> > Mi diresti come contattarti via email per eventuali ulteriori mie
> > richieste in merito?
> > Ciao
> > Kiss
> > (e non arrossire...).
> > Maria
> >
>
> Fai pure qui tutte le richieste che ti servono,
> ci sono persone molto esperte e pazienti che ti daranno tutte le
> risposte che ti servono ;-)
>
> Se poi vuoi proprio utilizzare le e-mail, basta mettere claudio davanti
> allo 0 (zero) dell'indirizzo.
Oppure rivolgerti in privato a me...
He he eehe he heehhe
Antonio


text:
Antonio Biso ha scritto:


> Antonio
eheheheheh
mamma ha fatto gli gnocchi...ridi ridi...
PRRRRRRRRRRRRRRR!!!!!
KISSS



text:
"Maria Errico" <
maxerri...@interfree.it
> ha scritto nel messaggio
news:bqi768$f5p$1...@news.newsland.it...
> Antonio Biso ha scritto:
>
> > Oppure rivolgerti in privato a me...
> > He he eehe he heehhe
>
> > Antonio
>
> eheheheheh
> mamma ha fatto gli gnocchi...ridi ridi...
> PRRRRRRRRRRRRRRR!!!!!
> KISSS
Peccato...
volevo farti vedere la mia collezione di interfacce utente semplici....
Antonio


title: Valore modificato in una tabella?

author: Casalini s.r.l.

text:
Qualcuno ha creato (o se esiste, qual'è) un controllo che può risiedere in
memomoria al fine di verificare quale sia l'ultimo valore di un campo
indicizzato contatore di una tabella il cui record è stato modificato
(indifferentemente se da form, da codice o da query) indicando il valore
vecchio (prima della modifica) e il nome del campo modificato?


title: Valore modificato in una tabella?

author: Sib

text:
"Casalini s.r.l." <
in...@ydea.it
> ha scritto nel messaggio

Questo e' il classico comportamento di un trigger, ma per averso devi usare
MSDE invece di Jet come BE, molto meglio sotto svariati punti di vista ma
meno automatico e piu' complicato da gestire.
Te la senti?
Sib


title: "Impossibile passare al record specificato"

author: RobertoA

text:
Una form continua basata su una singola tabella
Unico campo not nul univoco ID_TABELLA, altri campi come indici ma possiibli
i doppi
L'istruzione
DoCmd.GoToRecord , , acNewRec
funziona correttamente sia in ambiente di sviluppo che da corrispondente
file mde
Se pero' lancio il primo mde dalla macchina 1 ed il secondo mde dala
macchina 2, il primo riesce ad inserire, il secondo non riesce e restituisce
l'errore
"impossibile passare al record specificato"
Tutto questo non succede se sulla seconda macchina provo con l'ambiente di
sviluppo ed il file mdb
Access versione 2003, tabelle linkate al db via driver odbc
In sostanza l'errore mi appare sulle macchine oltre la prima e solo se viene
lanciato il programma in formato mde
Tra l'altro, tutte le righe sono numerate e protete da apposita routine di
'acchiappamento errori'
Che ovviamente non intercetta l'errore, salta fuori la piccola form Access e
basta, neanche dopo aver dato l'ok viene fuori la routine di gestione errori
A cosa puo' essere dovuta l'anomalia ?
Cosa posso provare per eliminare l'inconveniente ?
Ciao e grazie
RobertoA


author: Oscar Manfredini

text:
"RobertoA"

Non č che, per qualche ragione, la maschera diventi a sola lettura dopo il
primo accesso?
Ciao: Oscar


title: maschere continue

author: danieleni

text:
Ciao ragazzi, avrei bisogno del vostro aiuto su una cosa semplice ma
per me impossibile
Vi spiego, ho una maschera a visualizzazione continua, in questa, ogni
volta che clicco su di un campo si/no per il record corrente, si
abilita un'altro campo disabilitato inizialmente.
Il problema č che come clicca sul  campo si/no, si abilitai il campo
in questione per tutti i record.
Ho provato i vari if...then su form current ma niente.
Mi dite qualcosa?
Ciao e grazie


title: maschere continue

author: Emyr

text:
On Tue, 15 Jan 2002 11:01:23 GMT,
a...@a.it
 (danieleni) wrote:
>Ciao ragazzi, avrei bisogno del vostro aiuto su una cosa semplice ma
>per me impossibile
>Vi spiego, ho una maschera a visualizzazione continua, in questa, ogni
>volta che clicco su di un campo si/no per il record corrente, si
>abilita un'altro campo disabilitato inizialmente.
>Il problema è che come clicca sul  campo si/no, si abilitai il campo
>in questione per tutti i record.
>Ho provato i vari if...then su form current ma niente.
>Mi dite qualcosa?
>Ciao e grazie
è normale che sia cosi,
al limite metti su lostfocus del comando che vuoi tenere bloccato un
controllo al tuo si/no e permetti o meno i cambiamenti via codice...
vedi le proprietà oldvalue e value
Saluti.
Emanuele.


title: Aprire Word da Access

text:
Buongiorno,
ho la necessità di aprire un file di Word da Access.
con il seguente codice, legato all'evento Click di un pulsante, eseguo il comando:

Dim Word as Object
Set Word = CreateObject("Word.Application")
Word.Visible = True
Word.Documents.Open ("Percorso completo al file")

Il file si apre, solo che la finestra di Word rimane ridotta a icona, e spesso l'utente non se ne accorge; che cosa devo fare per ottenere che si apra a schermo intero?

Uso Access e Word 2013, l'utente ha il Runtime di Access e Word 2013.

Grazie
Franco Maggio


title: Aprire Word da Access

text:

Ho risolto aggiungendo la seguente riga di codice:

Word.Activate


title: Aprire Word da Access

text:

Come non detto, ha funzionato solo due volte (giusto per darmi l'illusione), poi tutto come prima.
Il problema permane. Word si apre ma ridotto a icona.
Franco Maggio


title: Aprire Word da Access

author: BFS

text:

prova con

Word.Documents.Open ("Percorso completo al file")
Word.Documents.View.FullScreen = True

ciao


title: Aprire Word da Access

text:

Ti ringrazio, ma la risposta è:
"Proprietà o metodo non supportato dall'oggetto"

Franco M.


title: Aprire Word da Access

author: Bruno Campanini

text:
franco...@gmail.com
 has brought this to us :

Te ne manca un pezzo... WordApp.Activate!

=========================================
Private Sub Command79_Click()
Dim WordApp As New Word.Application, WordDoc As Word.Document

Set WordDoc = WordApp.Documents.Open("D:\Test\RG.doc")
WordApp.Visible = True
WordApp.Activate

'WordApp.Application.Run "macro1"

End Sub
======================================

Il file viene aperto come finestra attiva, dimensionata
così come è stata chiusa.

Bruno


title: Aprire Word da Access

text:

Niente da fare, neanche con questa tua versione (grazie)
Di seguito posto tutto il codice che ho utilizzato (remmato il vecchio codice, attivo il tuo). La risposta alla tua versione è: "Variabile non definita", riferita a "Dim WordApp As New Word.Application".
Forse non scrivo tutto correttamente:

Private Sub cmdGuida_Click()
On Error GoTo Err_cmdGuida_Click
    'Dim ObjWord As Object
    'Set ObjWord = CreateObject("Word.Application")
    'ObjWord.Documents.Open ("C:\FM\ScadenzaVisite\ScadenzaVisiteGuida.docx")
    'ObjWord.visible = True
    'ObjWord.Activate

    Dim WordApp As New Word.Application
    Dim WordDoc As Word.Document
    Set WordDoc = WordApp.Documents.Open("C:\FM\ScadenzaVisite\ScadenzaVisiteGuida.docx")
    WordApp.visible = True
    WordApp.Activate
Exit_cmdGuida_Click:
    Exit Sub
Err_cmdGuida_Click:
    MsgBox "Si è verificato il seguente errore: n° " & Err.Number & " - " & Err.Description
    Resume Exit_cmdGuida_Click
End Sub

I riferimenti alla libreria Office 15 sono caricati.

Grazie ancora,
Franco


title: Aprire Word da Access

text:
on 17-05-18,
franco...@gmail.com
 supposed :

[...]
> MsgBox "Si è verificato il seguente errore: n° " & Err.Number & " - " &
> Err.Description     Resume Exit_cmdGuida_Click
> End Sub
>
> I riferimenti alla libreria Office 15 sono caricati.

Ti manca un altro pezzo:
Microsoft Word xx.x Object Library.

E non dire che la mia "versione" non funziona... quel che
non funziona è il tuo computer! lol lol lol

Che se invece la libreria Microsoft Word xx.x Object Library
l'avessi caricata... allora la mia proprio non sarebbe
una battuta.

Bruno


title: Aprire Word da Access

text:

Grazie Bruno,
in effetti mi mancava la libreria Word 15.0.
Poi, incuriosito, sono andato a guardare i riferimenti ed ho trovato le librerie di ognuno dei programmi del pacchetto Office. Ma, allora, la libreria Office 15.0 a che serve? Io credevo che essa fosse onnicomprensiva di tutte le altre.
Franco


title: Stampa

author: Santoni

text:
Buongiorno a tutti
Ho un problema di stampa. Ho collegato 3 stampanti che stampano 3 report
diversi e dovranno stampare solo quelli,
è possibile impostare per ogni report una stampante predefinita  per ogni
stampa seno dovrei  sempre
cambiare la stampante.
Vi ringrazio e ciao a tutti.....


title: Stampa

author: Roberto da casa

text:
"Santoni" <
santo...@tiscali.it
> ha scritto nel messaggio
news:CZPq9.4125$6n3.1...@news1.tin.it...

Vai sul Sito Comune (link qui sotto) e nella Sezione General leggi la FAQ di
Carlo Costarella e di Lorenzo Coronati intitolata "Gestire la stampante
predefinita", penso che faccia proprio al caso tuo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Stampa

author: Rè Artu

text:
"Santoni" <
santo...@tiscali.it
> ha scritto nel messaggio
news:CZPq9.4125$6n3.1...@news1.tin.it...

Se non ho capito male vuoi stampare un report per stampante. Basta che
selezioni il report, vai in imposta pagina e da li gli imposti una stampante
specifica
Ciao
Luca


title: join tra tabelle

author: GIORGIO

text:
Salve ho questo problema:
ho una tabella allegata (anagrafica banche ) in formato (omins database)
dove non ho nessun campo definito come indice o chiave primaria.
Vorrei creare un'altra tabella in access con dei dati che non ho nella prima
e collegandola alla prima per mezzo del numero banca poter inserire in
questa dei campi che mi servono...
Il problema e' che non riesco a capire come creare la query in quanto non
essendoci nessuna chiave primaria mi dice "recordset non aggiornabile"
Grazie per l'aiuto
Ciao a tutti
Giorgio


title: Cancellare record con valore null da tabella

author: Andrea Pettenon

text:
Salve a tutti,
devo cancellare tutti i record che hanno valore null su un campo specifico di una tabella.
Sto usando questo comando VBA ma non riesco a trovare la sintassi corretta:

CurrentDb.Execute "DELETE * FROM t_helper_temp where [stock_number]="""

Come gli devo scrivere che [stock_number]=null?

Grazie

Andrea


text:
Andrea Pettenon wrote :

[stock_number] Is Null;

Bruno


text:

Grazie


title: Sito Comune - General - 6.5

author: Marco Antonioli

text:
Buon giorno a tutti
L'esempio in oggetto permette di selezionare una cartella scegliendola
dall'elenco (sfoglia).
E' possibile iniziare la visualizzazione dell'elenco a partire da una
cartella specifica ?
Grazie +
MArco
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Sito Comune - General - 6.5

author: MA

text:
Marco Antonioli wrote:
> Buon giorno a tutti
> L'esempio in oggetto permette di selezionare una cartella scegliendola
> dall'elenco (sfoglia).
> E' possibile iniziare la visualizzazione dell'elenco a partire da una
> cartella specifica ?
> Grazie +
> MArco
Sicuramente
Posta il codice
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Sito Comune - General - 6.5

author: Alessandro Baraldi

text:
"Marco Antonioli" <
in...@echovr.it
> wrote in message
news:9a10e0cff46f9c140b1...@mygate.mailgate.org
> Buon giorno a tutti
> L'esempio in oggetto permette di selezionare una cartella scegliendola
> dall'elenco (sfoglia).
> E' possibile iniziare la visualizzazione dell'elenco a partire da una
> cartella specifica ?
> Grazie +
> MArco
Prova ad usare questo demo, che dovrebbe essere pubblicato
anche sul SC ma non sono sicuro:
http://www.mantuanet.it/alessandro.baraldi/
Sezione [API]
1.26 Commondialog e Browse for folder attraverso #56 MsAccess.exe
Ciao
@Alex



title: mascehra legata validazione data inserita

author: pfm

text:
salve

ho una mascehra legata con i contolli legati a campi di un recordset.

come posso validare o no l'inserimento di una data in un campo?

vorrei che la data inserita non fosse accettata se e' non e' la data di oggi o al max quella di ieri

in che evento inserire il controllo?

GRAZIE


text:
Legata non esiste... si dice Associata... in inglese Bound.
Prova ad inserire bei criteri di valutazione Date()... oppure, ed io lo preferisco, su evento prima di aggiornare del controllo... verifichi la tua condizione e se non soddisfatta forzi il parametro CANCEL dell'evento a TRUE inviando un messaggio...
Valuta se oltre al cancel può servirti anche un UNDO.

@Alex


text:

GRAZIE provo


title: PROVA

author: PROVA

text:
PROVA
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Barre degli strumenti

author: Massimo

text:
Ciao
Vorrei togliere automaticamente le barre degli strumenti di formattazione e
struttura maschera ed eventualmente la barra dei Menů  ed inserirne solo una
da me creata chiamata "ricerca" ho provato con la macro
Sub Autoexec()
Application.SetOption "mostra barra degli strumenti", False
End Sub
ma mi dice che"mostra barra degli strumenti" non č un nome valido, ho
provato
con "toolbar", ma ho sempre lo stesso risultato.Allora ho provato con i
codici
nella maschera interessata:
'Personalizza il menů d'avvio
Private Sub Form_Load()
Forms![Schede Fabbricati].Toolbar = "": Forms![Schede Fabbricati].MenuBar =
"ricerca"
End Sub
Con questo codice riesco a far apparire la barra menů "Ricerca", mentre le
Barre degli Strumenti, rimangono al loro posto.
Qualche suggerimento?
Grazie
Massimo


title: Barre degli strumenti

author: AntoGal

text:
Massimo <
massimo...@tiscalinet.it
> wrote in message
939lar$tr0$1...@lacerta.tiscalinet.it...
> Vorrei togliere automaticamente le barre degli strumenti di formattazione
e
> struttura maschera ed eventualmente la barra dei Menù  ed inserirne solo
una
> da me creata chiamata "ricerca" ho provato con la macro
Io di solito faccio così:
 ModificaProprietà "StartUpMenuBar", dbText, "MiaBarraMenu"  'barra dei menù
 ModificaProprietà "AllowShortcutMenus", dbBoolean, False  'menù di scelta
rapida
 ModificaProprietà "AllowBuiltInToolbars", dbBoolean, False  'barre degli
strumenti incorporate
Dove ModificaProprietà è:
Function ModificaProprietà(strNomeProp As String, varTipoProp As Variant,
varValoreProp As Variant) As Boolean
 'modifica o aggiunge una proprietà al DB
 Dim dbs As Database, prp As Property
 Const conErroreProprietàNonTrovata = 3270
 Set dbs = CurrentDb
 On Error GoTo Modifica_Err
 dbs.Properties(strNomeProp) = varValoreProp
 ModificaProprietà = True
Modifica_Bye:
 Exit Function
Modifica_Err:
 If Err = conErroreProprietàNonTrovata Then  'proprietà non trovata
  Set prp = dbs.CreateProperty(strNomeProp, varTipoProp, varValoreProp)
  dbs.Properties.Append prp
  Resume Next
 Else 'errore sconosciuto
  ModificaProprietà = False
  Resume Modifica_Bye
 End If
End Function
--
Ciao, AntoGal
*************************************************
Gestione punti vendita (casse e pos NCR)

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


title: Barre degli strumenti

text:
"AntoGal" <zer...@NOSPAMtiscalinet.it> ha scritto nel messaggio
news:939qol$1nl$1...@lacerta.tiscalinet.it...

Scusa ma debbo inserire tutto il codice nella macro Autoexec? Altrimenti
dove?Sono alle prime armi......
Ciao
Massimo


title: Barre degli strumenti

author: Alex

text:
Ciao, sono Alessandro.
Ottima la parte in VB ma non era più semplice andare nel menù di avvio di
STRUMENTI e dove c'è la voce barra dei menù invece che predefinita selezioni
"Ricerca", poi togli il Flag da "Menù completi", "Visualizza barra di stato"
ed eventualmente se vuoi nascondere anche la finestra del DB il Flag anche
li, poi se hai una maschera d'inizio puoi selezionare qella che hai fatto.
Spero di non avere frainteso la richiesta bye Alex
--
Posted from
smtp3.libero.it
 [193.70.192.53]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: rete access

author: Giangiacomo Lucà

text:
ringrazierei molto chi riuscisse a indicarmi quanti utenti può supportare il
mio prg in rete .
ho creato un database composta da un file di access che funziona da archivio
e un altro che funziona da programma effettivo con le varie tabelle
collegate al primo.
le domande sono se io faccio risiedere il prg e l'archivio in un medesimo
disco di rete e faccio richiamare il prg dai client diversi quanti utenti
posso far collegare? e se invece faccio risiedere l'archivio su un disco di
rete e installo su ogni postazione client solo il prg?  in base alla
soluzione migliore mi potreste consigliare se devo dare dei particolari
blocchi di accesso.
con molta umiltà mi aspetto un vostro consiglio grazie atutti Giangiacomo


title: rete access

text:
Il Tue, 5 Sep 2000 18:07:59 +0200, "Giangiacomo Lucà"
<
gau...@hotmail.com
> scrisse:
>(.....)
>le domande sono se io faccio risiedere il prg e l'archivio in un medesimo
>disco di rete e faccio richiamare il prg dai client diversi quanti utenti
>posso far collegare? e se invece faccio risiedere l'archivio su un disco di
>rete e installo su ogni postazione client solo il prg?
La soluzione migliore è BE (quello che tu chiami archivio) sul server
in una cartella condivisa con accesso in lettura/scrittura e FE
(quello che tu chiami prg) su ciascun posto di lavoro.
Questo perchè in una rete locale l'elaborazione si svolge sui singoli
posti di lavoro, ovvero il programma dev'essere caricato nella RAM
della singola postazione; questo vuol dire che se il FE risiede sul
server, ogni posto di lavoro accede al server ogni volta che utilizza
il FE aumentando il traffico di rete in maniera esorbitante.
Se hai abilitato la sicurezza di Access (ovvero hai creato un file mdw
con gli utenti abilitati) anche questo deve risiedere sul server, in
una cartella condivisa (non necessariamente la stessa del BE) e
dev'essere impostato su ogni posto di lavoro con il programma wrkgadm
che trovi nella cartella di Office.
Il numero teorico di utenti concorrenti supportato da Access è 255, ma
è fortemente sconsigliato spingersi oltre 10/15.
> in base alla soluzione migliore mi potreste consigliare se devo dare dei particolari
>blocchi di accesso.
Cioè ?
Vincenzo Turturro
---------------------------------------------------------
Se no diventiamo tutti **** dai portatili o peggio ancora
provetti poeti fiorentini come vturturro.
(Così disse
ivan....@tiscalinet.it
 Ven 25 Aug 2000 09:34:52 +0200)


title: rete access

author: Sib

text:
"Giangiacomo Lucà" <
gau...@hotmail.com
> ha scritto nel messaggio
news:8p364d$3rv$1...@nslave1.tin.it...
[cut]
>  in base alla
> soluzione migliore mi potreste consigliare se devo dare dei particolari
> blocchi di accesso.
Alle altre domande a risposto il VT,
Forse intendi il tipo di blocco record da utilizzare, in questo caso dipende
piu' dalle abitudini degli utenti.
Io personalmente prediligo il blocco ottimistico, ma se i tuoi utenti sono
degli sconsiderati che tendono a combinare danno, forse e' meglio mettergli
un po' di bastoni tra le ruote con il blocco pessimistico per farli abituare
a non lasciare i record in modifica quando non lavorano.
Ciao, Sib


title: rete access

author: Carmine

text:
Secondo me, non esiste un limite o meglio esiste ma non è un problema.
Dipende da che tipo di server è utilizzato, che tipo di rete e che
protocollo è installato ed infine che sistemi operativi sono in gioco.
In linea di massima per ottimizzare il funzionamento dovresti mettere i
front-end cioè il prg sui client e condividere solo il database dei dati.
Per quanto riguarda i blocchi di accesso dipende dalle esigenze e non ci
sono problemi particolari.
"Giangiacomo Lucà" <
gau...@hotmail.com
> ha scritto nel messaggio
news:8p364d$3rv$1...@nslave1.tin.it...



title: argomento non valido (3001)

author: bizio

text:
Ciao a tutti,
in un db Access 2000 diviso in BE e vari FE.
quando l'operatore fa una ricerca di un nominativo in una maschera
tramite il pulsante di ricerca, a volte compare questo messaggio di
errore "Argomento non valido (3001)"!!
Da cosa può dipendere?
Saluti


title: argomento non valido (3001)

author: VT @ Work

text:
On Thu, 22 Nov 2007 04:31:52 -0800 (PST), bizio
<
fabriz...@libero.it
> wrote:
 (...)

Ricerca di nominativi con l'apostrofo ?
Tipo D'Ambrosio ...
Vincenzo Turturro
Certificato Eucip Core Level
ITA 0000-002299 del 14/05/2007
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

---------------------------------------------
risorse Access:
http://www.accessgroup.it

---------------------------------------------
Il sito comune di it.comp.as400
http://www.faq400.com

---------------------------------------------


title: argomento non valido (3001)

text:
> Ricerca di nominativi con l'apostrofo ?
> Tipo D'Ambrosio ...
> Vincenzo Turturro
No,senza apostrofo!!
Ma da cosa può dipendere?


title: argomento non valido (3001)

author: Carlo Costarella

text:
"bizio" <
fabriz...@libero.it
> ha scritto nel messaggio
news:ffdd53e4-6e80-4062...@v4g2000hsf.googlegroups.com...

-------------------------
Non è che usi qualcosa del genere:
"TuoValore = TuaVariabile"
se sì prova a cambiarlo in:
"TuoValore = " & TuaVariabile
Ciao, Carlo


title: argomento non valido (3001)

text:
> Non è che usi qualcosa del genere:
> "TuoValore = TuaVariabile"
> se sì prova a cambiarlo in:
> "TuoValore = " & TuaVariabile
>
> Ciao, Carlo
No sugli eventi della maschera ho solo una procedura che mi disciplina
ma modalità d'accesso,ma ce l'ho su tutte le maschere!
Che tipo di errore di access è questo?
A cosa puo essere dovuto?


title: argomento non valido (3001)

author: Alessandro Cara

text:

Qualche "null" disperso in giro?
--
ac
y-1=x


title: argomento non valido (3001)

text:
> > No sugli eventi della maschera ho solo una procedura che mi disciplina
> > ma modalità d'accesso,ma ce l'ho su tutte le maschere!
> > Che tipo di errore di access è questo?
> > A cosa puo essere dovuto?
>
> Qualche "null" disperso in giro?
mmmhh...come faccio ad intercettarlo?E' una cosa che riguarda solo il
codice di quella maschera o può essere in un punto qualsiasi del
codice nel db??
Grazie per le info


title: argomento non valido (3001)

text:

se si sapesse cosa e' e/o cosa fa questo
"ho solo una procedura che mi disciplina
ma modalità d'accesso"
forse gli altri che sono intervenuti ed il sottoscritto potremmo mettere
da parte la palla di vetro ;<)
comunque una qualsiasi funzione di ricerca in genere fa una cosa del genere
.find(first) "campo=" & valore & ........... & " and campon =" & valoren
se valore e' non assegnato o di tipo non corrispondente si rischia di
inciampare su "argomento non valido"
--
ac
y-1=x


title: argomento non valido (3001)

text:
> ac
> y-1=x wrote:
> se si sapesse cosa e' e/o cosa fa questo
> "ho solo una procedura che mi disciplina
> ma modalità d'accesso"
> forse gli altri che sono intervenuti ed il sottoscritto potremmo mettere
> da parte la palla di vetro ;<)
Ok scusa posto la routine presente nella maschera, con spiegazione:
Private Sub Form_Open(Cancel As Integer)
If var_tipo <> 0 Then
' var_tipo è una variabile globale dichiarata come Byte che memorizza
un numerico (mi serve per gestire la modalità d'accesso
dell'operatore.Es. lettura scrittura,ecc.)
Select Case var_tipo
Case 1, 2, 6
    Me.AllowAdditions = True
    Me.AllowDeletions = True
    Me.AllowEdits = True
    Me.AllowFilters = True
Case 3, 4, 5
    Me.AllowAdditions = True
    Me.AllowDeletions = False
    Me.AllowEdits = False
    Me.AllowFilters = False
End Select
Else
End If
AttivaLog Form
 'è il richiamo di una funzione dichiarata in un modulo (metodo di
gestione storico inserimenti,modifiche, eliminazioni di Marco
Pizzamiglio - Cisa1)
End Sub
> comunque una qualsiasi funzione di ricerca in genere fa una cosa del genere
>
> .find(first) "campo=" & valore & ........... & " and campon =" & valoren
La ricerca implementata nella maschera in oggetto è stata creata con
l'autocomposizione (cerca in tutti i campi della maschera)
> se valore e' non assegnato o di tipo non corrispondente si rischia di
> inciampare su "argomento non valido"
Ho ricontrollato anche i campi in tabella sono quasi tutti testo di
dimensione <=50 caratteri tranne qualche campo Si/no e un campo testo
di dimensione 200 (scrivo questo perchè su un altro thread il grande
Karl parlava di un possibile bug di A00 che dà "Invalid Argument" se
il testo ha >127 caratteri.
Questo è il riferimento del thread:
http://groups.google.com/group/it.comp.appl.access/browse_frm/thread/b96506881a2d9772/cd9a8e1d8d575da1#cd9a8e1d8d575da1
anche se in quello si parlava di accodamento.
Credete possa essere quello il problema anche nel mio caso??
Grazie ancora,spero di essere stato un pò piu chiaro stavolta
Ciao


title: argomento non valido (3001)

text:

> Questo è il riferimento del thread:
http://groups.google.com/group/it.comp.appl.access/browse_frm/thread/.
..
> anche se in quello si parlava di accodamento.
>
> Credete possa essere quello il problema anche nel mio caso??
>
> Grazie ancora,spero di essere stato un pò piu chiaro stavolta
> Ciao
Pare che ho risolto!!
In tabella facendo una ricerca ho notato che un record era
daneggiato,c'erano simboli strani e su un campo la sigla
#errore,cliccandoci sopra infatti mi dava proprio "argomento non
valido", quindi in sostanza quando da maschera faceva la
ricerca,scorrendo i vari record incontrava quello danneggiato e mi
restituiva l'errore!
Ho eliminato il record,ho compattato,e tutto sembra sia andato
apposto.
E' la prima volta che mi capita un errore in tabella di questo tipo.
Da cosa può essere dipeso secondo voi?
Modifica simultanea allo stesso record?Un errore in rete?...o cosa?
Grazie


title: Filtro da maschera di ricerca e errore su apertura report

author: Ami

text:
Buonasera a tutti,
la settimana scorsa mi avevate aiutato a risolvere un problema di apertura
maschera con filtro impostato da un'altra maschera di ricerca.
Il problema nasceva dal fatto che nella mia maschera di ricerca non ci sono solo
caselle di testo, ma anche delle caselle combinate. Alla fine, ripulendo il
codice e correggendo le queries ho raggiunto il risultato sperato:
Questo è il codice associato al pulsante di comando della maschera di ricerca:
[...]
       If Len(Me.Genere) > 0 Then
            If Len(stLinkCriteria) > 0 Then
                stLinkCriteria = stLinkCriteria & " AND [Genere] like '" &
Me![Genere] & "*'"
                Else
                 stLinkCriteria = "[Genere] like '" & Me![Genere] & "*'"
            End If
            End If
        DoCmd.OpenForm stDocName, acNormal, , stLinkCriteria
in alternativa ho provato anche
----
        DoCmd.OpenForm stDocName, acNormal
        With Forms("Frm_Audio_ALBUM")
        .Filter = stLinkCriteria
        .FilterOn = True
        End With
----
In entrambi i casi il filtro su maschera funziona, MA (e qui inizia il
problema!) non mi riesce di far funzionare i report.
Mi spiego meglio:
Io ho due report per la stampa degli stessi dati della maschera:
Report1 stampa il record corrente
Report2 stampa tutti i record (OPPURE QUELLI ATTUALMENTE FILTRATI)
Se apro la mascheraDati senza passare dalla maschera di ricerca, entrambi
funzionano perfettamente, con e senza filtro.
Sono basati sulla stessa query, l'unica differenza è il codice di "lancio" del
report, che per il secondo record è:
----
   If Me.FilterOn Then
        strFilter = Me.Filter
    End If
    DoCmd.OpenReport stDocName, acPreview, , strFilter
----
Se io invece faccio questo procedimento:
RICERCA --> MASCHERA --> REPORT1 (tutto OK)
ma
RICERCA --> MASCHERA --> REPORT2 (per avere i dati filtrati) mi dà
sistematicamente errore e proprio su quei parametri che erano caselle combinate
nella maschera di ricerca. Mi chiede l'immissione del parametro, ma qualsiasi
parametro io dia, mi restituisce tutti i record.
Se non do parametro, mi dà errore in un punto del codice che gestisce il
collegamento dell'immagine.
Se come criterio di ricerca in partenza uso la casella di testo, tutto funziona
perfettamente.
Ho rifatto tutte le queries e controllato le relazioni, ma mi sembra tutto OK.
Non capisco dove sia l'inghippo. Qualche suggerimento?
Grazie
Erika


text:
Mi rispondo da sola: l'errore era nelle queries.
In pratica io avevo creato tutte le queries indipendenti, invece dovevo legarle
ai corrispondenti nella tabella principali.
Mi sa che mi tocca rifarle tutte. Sigh.
Grazie comunque!
Erika



title: salvare una stringa in un file e comportamenti incomprensibili (almeno per me)

text:
Ciao
In una maschera di access ho scritto il seguente codice:
Private Sub Internet_Click()
   Me!browser1.Navigate [Remote], 4
End Sub
Private Sub browser1_NavigateComplete2(ByVal pDisp As Object, URL As
Variant)
Dim html As String
  html = browser1.Document.Body.InnerHTML
  Open [locale] For Binary Access Write As #1
  Put #1, , html
  Close #1
  [Last_update] = Now
End Sub
Il problema è il seguente: Se nel campo locale c'è solo il nome del
file, il contenuto della stringa che contiene una pagina html  viene
salvato correttamente, se il campo locale contiene anche la directory
di destinazione il programma mi salva solo la prima parte della
stringa, qualcuno sa il perché?
Grazie e buona pasqua
Ugo


title: ACCESS 97 e 2000 convivono se si utilizza AcLicn97.exe

author: Sergio de Pretis

text:
Volevo sapere se ACCESS 97 e ACCESS 2000 posssono convivere assieme se
si utilizza AcLicn97.exe.
Se questo è possibile vorrei sapere che procedura seguire per ottenere
il tutto.
Grazie in anticipo a tutto il ng
--------------------------------------------------------------------
Sergio de Pretis                     E-mail
de_p...@libero.it


title: Impossibile trovare ISAM installabile

text:
Salve a tutti, ho questo problema:
Devo prevedere il ricollegamento automatico del mio Applicativo (A.97) con
db esterno Mysql (attraverso il mysql connector 3.51).
Ho trovato proprio questa possibilità, alcuni gg. fa, mi pare (su sito
comune), attraverso l'apposita routine,di seguito, fornita da Alessandro
Baraldi.
(Elenco solamente la parte del modulo che, ritengo, sia indiziata alla
generazione del mio errore)
' ---- all'esecuzione della riga di comando:
CurrentDb.TableDefs.Append tdf
mi viene visualizzato il messaggio: "Errore di Run-Time: 3170. Impossibile
trovare ISAM installabile"
Mi pare fare riferimento al fatto che non viene trovato il driver ODBC
installato
(Premetto che, se eseguo il collega tabelle manualemente, tutto funziona
regolarmente: il collegamento ODBC al db è perfettamente installato e
funzionante).
Sapreste indicarmi che cosa manchi, o quale collegamento a libreria o driver
sia andato perso? (Penso il problema sia questo).
Grazie infinite
Marco
-------------------------------------------------
Option Compare Database
Option Explicit
Public Const fForm = "Forms"
Public Const fReport = "Reports"
Public Const fMacro = "Scripts"
Public Const fModulo = "Modules"
Public Const fTabella = "Tables"
Public Const fQuery = "Queries"
Private Const cCnnString As String = "DRIVER={mySQL ODBC 3.51 Driver};
Server=(inidirizzo ip del server);Database=xxxx;Uid=xxxx;Pwd=xxxx"
Private Const cLnkTbl As String = "_LinkedTables"
Public Function LinkODBCTbl() As Boolean
  On Error GoTo Err_RlnkODBCTbl
   Dim tdf As DAO.TableDef
   Dim rs As DAO.Recordset
   Dim S As String
   Dim strSQL As String
   LinkODBCTbl = False
   strSQL = cLnkTbl
   Set rs = CurrentDb.OpenRecordset(strSQL)
   rs.MoveFirst
   Do Until rs.EOF
      S = rs.Fields(0).Value
      If Esiste_Oggetto(S, fTabella) Then _
            CurrentDb.TableDefs.Delete S
            Set tdf = CurrentDb.CreateTableDef(S)
            tdf.Connect = cCnnString
            tdf.SourceTableName = S
            CurrentDb.TableDefs.Append tdf
            Set tdf = Nothing
            rs.MoveNext
   Loop
   LinkODBCTbl = True
Exit_Here:
   rs.Close
   Set rs = Nothing
   Set tdf = Nothing
   Exit Function
Err_RlnkODBCTbl:
   LinkODBCTbl = False
   MsgBox "Impossibile connettersi al Server"
   Resume Exit_Here
End Function
'


title: Impossibile trovare ISAM installabile

author: yronium

text:
> mi viene visualizzato il messaggio: "Errore di Run-Time: 3170. Impossibile
> trovare ISAM installabile"
Ciao. Leggi qui
http://www.andreavb.com/forum/viewtopic.php?TopicID=3851&page=0#13047
Spero ti sia utile. Ciao.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: [OT - EXCEL] Come ritornare una stringa rossa?

author: Carmelo

text:
Ciao ragazzi,
ho creato una formula in cui se mi torna un determinato valore,
mi ritorna "esatto"
altrimenti per un altro valore mi ritorna "errato"
Adesso posso far si che mi ritorni il carettere di un colore prestabilitp da
me?
Grazie.


author: Salvatore

text:
"Carmelo" <
accessNOSPA...@tin.it
> ha scritto nel messaggio
news:1jdnb.362577$R32.11...@news2.tin.it...

Vedi "Formattazione condizionale".
Ciao
Salvatore


title: Come fare lista eseguibili installati e dipendenze varie?

author: RobertoA

text:
Vorrei realizzare un modulo che consenta di eseguire l'elenco programmi
installati sul pc, ed eventuali file di dipendenze/configurazioni o
comunque necessari al funzionamento del programma stesso
L'obiettivo e' riuscire a re-installare quel programma specifico nel
caso serva
Un programma tipo 'inventario software', con la possibilita' di indicare
anche i file esterni alla directory programma, o librerie necessarie al
suo funzionamento
Esiste qualche programma specifico che possa avviare via riga di comando
da vba e leggerne il resoconto?
E' cosa fattibile da vba?


title: Formattazione condizionale

author: Jason

text:
Domandina, qualcuno ha valutato il "peso" della formattazione condizionale
applicata alle maschere continue in A2002. Cioè quanto costa in termini di
tempo la stessa.
Grazie, Jason.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Inserimento in una maschera stile treeview

author: Luca

text:
Ho questa esigenza:
usando un esempio semplice dovrei inserire la contabilità dove però
per ogni giorno ho più entrate e uscite e vorrei poterlo inserire in
modo stile treeview ovvero avendo un livello 1 dove c'è la data e la
somma delle entrate e uscite poi scendendo di livello avere la
distinta di entrate e uscite con descrizione....
Qualcuno sa darmi una mano???


title: System.mdw

author: Maurizio

text:
Saluti a tutti, domanda: la system.mdw di access97 (avevo una system
protetta) non posso in alcun modo portarla in access2000 ? Il problema è che
tutti i database creati
con la versione97 se provo a convertirli mi danno il messaggio non si
dispone
dell'autorizzazione a tale operazione. Grazie
--
----------------------------------------------------------
...chi va piano
                  ha tempo da perdere...
----------------------------------------------------------


title: System.mdw

author: sib

text:
Maurizio <
maur...@marchettiNOSPAM.dnet.it
> wrote in message
94bd55$t4p$1...@serv1.iunet.it...
> Saluti a tutti, domanda: la system.mdw di access97 (avevo una system
> protetta) non posso in alcun modo portarla in access2000 ? Il problema è
che
> tutti i database creati
> con la versione97 se provo a convertirli mi danno il messaggio non si
> dispone
> dell'autorizzazione a tale operazione. Grazie
Hai gia provato a creare un nuovo .mdw con lo stesso ID di quello che usavi
in A97? Ovviamenche creando anche gli utenti con relativi ID.
> ----------------------------------------------------------
> ...chi va piano
>                   ha tempo da perdere...
> ----------------------------------------------------------
Chi ben comincia...
    ... ne ha di strada da fare!
Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
La mia home (ancora non completa)
http://digilander.iol.it/syb
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: System.mdw

author: Michele Amato

text:
Maurizio <
maur...@marchettiNOSPAM.dnet.it
> wrote in message
94bd55$t4p$1...@serv1.iunet.it...
> Saluti a tutti, domanda: la system.mdw di access97 (avevo una system
> protetta) non posso in alcun modo portarla in access2000 ? Il problema è
che
> tutti i database creati
> con la versione97 se provo a convertirli mi danno il messaggio non si
> dispone
> dell'autorizzazione a tale operazione. Grazie
>
I due system.mdw non sono gli stessi.
I ti consiglio di non sostituire mai il system.mdw originale con una
versione personale.
Ti conviene avere due link per versione di Access:
(supponiamo che O97 sia installato in C:\Programmi\Office97\)
uno normale
"C:\Programmi\Office97\Office\Msaccess.exe"
uno "personalizzato" nel senso che nella proprietà "Destinazione" del link,
imposti:
"C:\Programmi\Office97\Office\Msaccess.exe" /wrkgrp
C:\ProgettiAccess\Sicurezza\MaeWrkGrp.mdw /user Ciccio
Dove C:\ProgettiAccess\Sicurezza\MaeWrkGrp.mdw indica il tuo file di
workgroup.
Per Access2000, crei altre due link, uno normale e l'altro "speciale"
(supponiamo che O2000 sia installato in C:\Programmi\Office2000\)
uno normale
"C:\Programmi\Office2000\Office\Msaccess.exe"
uno "personalizzato" nel senso che nella proprietà "Destinazione" del link,
imposti:
"C:\Programmi\Office2000\Office\Msaccess.exe" /wrkgrp
C:\ProgettiAccess\Sicurezza\MaeWrkGrp.mdw /user Ciccio
Il file di workgroup tra le due versioni è condiviso!!!
Per fortuna.
Saluti
Michele Amato
--
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}
Sulla mia pagina personale
http://utenti.worldonline.it/micheleamato
è possibile trovare una add-in per Access, shareware ma full-working e senza
expiration date
          Access Navigator 3.0
disponibile sia per
Access 8.0 che per
Access 9.0
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}


title: Gestore tabella collegate

author: Sib

text:
Salve a tutti.
Ho reinstallato Office97 nel mio PC e mi succede che se cerco di usare il
gestore tabelle collegate mi dice che l'activex non e' in grado di creare
l'oggetto.
Avevo letto qualcosa in proposito, ma non riesco a trovarla.
Che ci'ho da fa'?
Grazie, Sib


title: Gestore tabella collegate

text:
"Sib" <
cerriserv...@tiscalinet.it
> ha scritto nel messaggio
news:8m38b6$3lk$1...@lacerta.tiscalinet.it...

e ho installato pure l'aggiornamento SR 2
:-(


title: Query troppo lenta (inspiegabilmente)

author: Brunix

text:
Salve a tutti,
vi scrivo per chiedere un aiuto per risolvere un problema che mi sta facendo
dannare...
Sto facendo un programma che deve gestire dei pezzi di scarto per dei
prodotti in un'azienda.
Ho una query che deve prendere i primi 9 record da un'altra query e come 10°
record deve mettermi un "RESTANTI" e poi la somma dei pezzi di scarto
rimanenti, il costo di questi...
La query che ho fatto è:
SELECT TOP 9 DISEGNO, DENOMINAZIONE, DICHIARATI, SCARTO, PERC
FROM QUERY_COSTI
UNION ALL
SELECT "", "RESTANTI", SUM(DICHIARATI), SUM(SCARTO), SUM(PERC)
FROM QUERY_COSTI;
dove:
disegno è il codice prodotto;
dichiarati è il numero di pezzi di scarto;
scarto è il costo degli scarti;
perc è la percentuale del numero di scarti sul totale.
fatta così la query va velocissima, ma l'errore sta nel fatto che "Restanti"
comprende nelle sue somme anche i primi 9 record.
Per eliminare il problema ho inserito questa condizione alla fine:
WHERE
QUERY_COSTI.ID
 NOT IN (SELECT TOP 9 ID FROM QUERY_COSTI);
dove ID è l'id del prodotto.
Aggiunta questa condizione, la query, non so perchè, diventa estremamente
lenta... ci vogliono circa 5-6 minuti per tirar fuori i dati. Senza questa
condizione ci mette 1 secondo...
Dove può stare il problema???
Vi prego aiutatemi, sto impazzendo...
Grazie
Ciao
Brunix


title: Query troppo lenta (inspiegabilmente)

author: Papi Andrea

text:
"Brunix" <
dymios...@alice.it
> ha scritto nel messaggio
news:43b3d90e$0$1081$4faf...@reader4.news.tin.it...

Forse bisogna utilizzare una Vista al posto della sotto query
es.
SELECT "", "RESTANTI", SUM(QS.DICHIARATI), SUM(QS.SCARTO), SUM(QS.PERC)
FROM QUERY_COSTI AS QS LEFT JOIN (SELECT TOP 9 ID FROM QUERY_COSTI) AS P9 ON
QS.ID
 =
P9.ID
WHERE  ISNULL(
P9.ID
);
ciao
ap


title: Query troppo lenta (inspiegabilmente)

text:
"Papi Andrea" <
andre...@provincia.fc.it
> ha scritto nel messaggio
news:dp11ch$k03$1...@fata.cs.interbusiness.it...

Ciao,
finalmente grazie al tuo aiuto sono riuscito a risolvere il problema.
Ti ringrazio.
ciao
Brunix


title: Word & contatti Outlook

author: butterfly

text:
Sto creando un modello in Word vers. 2000.
Vorrei sapere se esiste la
possibilità di collegare uno o più campi alla rubrica contatti di Outlook.
Grazie.
--------------------------------
Inviato via
http://usenet.iol.it


title: Campi Memo e Blob

text:
Volevo sapere utilizzando le query dell'ODBC qual'č la sintassi per inserire
dei dati in un campo memo... con i dovuti accapi per esempio qualcosa tipo:
    INSERT INTO TabellaProva (CampoMemo) VALUES ((memo)'Riga1'CRLF'Riga2')
E poi c'e' un equivalente del campo Binary large object (blob) dell'SQL in
Access? E' per caso il campo memo o l'oggetto ole?
Grazie mille...
CIAOOO
Elisa


title: Campi Memo e Blob

author: ALESSANDRO Baraldi

text:
"Ely77" <Elisa.Adamoli...@Tiscali.it> ha scritto nel messaggio
news:GncDc.533234$rM4.22...@news4.tin.it...
> Volevo sapere utilizzando le query dell'ODBC qual'è la sintassi per
inserire
> dei dati in un campo memo... con i dovuti accapi per esempio qualcosa
tipo:
>     INSERT INTO TabellaProva (CampoMemo) VALUES ((memo)'Riga1'CRLF'Riga2')
Non ricordo.
> E poi c'e' un equivalente del campo Binary large object (blob) dell'SQL in
> Access? E' per caso il campo memo o l'oggetto ole?
> Grazie mille...
> CIAOOO
> Elisa
Sono sempre campi BLOB che però in access accedono a CAMPI OLE
Non oggetto OLE nè campo MEMO....!
Sul SC trovi un bell'esempio.
Ciao.
@Alex.


title: Campi Memo e Blob

text:
Volevo sapere utilizzando le query dell'ODBC qual'č la sintassi per
inserire dei dati in un campo memo...
con i dovuti accapi per esempio qualcosa tipo:
INSERT INTO TabellaProva (CampoMemo)
VALUES ((memo)'Riga1'CRLF'Riga2')
Grazie mille!!


title: Problemino filtri

text:
Per gli esperti sara' sicuramnte una sciocchezza ma io non so neanche cosa
cercare.
Ho fatto una rubrica. Ho creato una maschera di immissione dati. Per la
ricerca, per esempio per filtrare i nomi, vorrei inserire nella casella
stessa di immissione dati un pulsante che si riferisca ad una casella di
testo creata appositamente.
Per farla breve in questa casella io scrivo per dire "Andrea" e  il
programma mi seleziona tutti gli andrea della maschera facendomeli
visualizzare uno per uno con le freccette.
Ho creato una casella di testo (testo62) e un pulsante con la seguente
routine.
 Me.Filter = "NOME = Testo62"
 Me.FilterOn = True
Pero' ogni volta che provo mi appare una finestrella con scritto immettere
valore parametro e solo dopo funziona.
Probabilmente la prima riga sopra ha qualche serio errore di sintassi.
Me la dareste una mano?
Grazie


title: Problemino filtri

author: Alessandro Baraldi

text:
NOn sò quante volte è stato affrontato questo argomento nell'ultimo
mese
quindi se avessi effettuato una ricerca per argomento Filtri o sintassi
SQL o
simili avresti avuto risposta....!
La proprietà Filter richiede una stringa che tu stai cercando di
comporre
con elementi Dinamici( testo62) ai quali però dai la valorizzazione di
testo.
Se inserisci testo62 in una stringa non viene valorizzato il valore
della Casella
combinata, ma testo62.
Oltretutto i filtri SQL di tipo stringa vanno formattati come stringhe,
quindi:
Me.Filter = "NOME = " & chr(34) & Me!Testo62 & chr(34)
Uso il chr(34) per ovviare al problema di eventuali apostrofi.
Prova così.
Ciao
@Alex


title: Problemino filtri

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1144411089.6...@e56g2000cwe.googlegroups.com...
NOn sò quante volte è stato affrontato questo argomento nell'ultimo
mese
quindi se avessi effettuato una ricerca per argomento Filtri o sintassi
SQL o
simili avresti avuto risposta....!
;-P
Effettivamente come parole chiavi usavo termini caserecci. Poi invece nella
domanda che ho fatto ho menzionato i termini esatti..
Grazie per il chiarimento.


title: Problemino filtri

text:
Usate termini caserecci in questo settore non è una buona abitudine
perchè spesso siamo abituati alla rigidità dell'argomento e come
tale potresti incappare nel dare per scontati concetti non veri.
Usa, quando ti preme una questione tecnica, una precisione
da chirurgo, avrai una risposta tecnica precisa.
Ciao
@Alex