text:
"Eric Arthur Blair" <aLe...@NOSPAMlibero.it> ha scritto nel messaggio
news:uTMYb.336350$_P.11...@news4.tin.it...
>
> Ciao a tutti !
>
> Ho un problema con Access. Quando cerco di creare un DB nuovo , con o
senza
> autocomposizione, mi appare un msgbox che recita "Il componente ActiveX
non
> è in grado di creare l'oggetto" .
> Qualcuno mi può aiutare per favore ?!?
>
> PS: uso Access 2000
>
>
> Grazie 1000 , aLe
VAi sul Sito Comune (link qui sotto) e nella Sezione General leggi la FAQ di
Karl Donaubauer intitolata "Errore 429 - Il componente Activex non e' in
grado di creare l'oggetto".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Il componente ActiveX non è in grado di creare l'oggetto

author: Eric Arthur Blair

text:
-
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:ua4Zb.18443$FJ6.7...@twister1.libero.it...
>
> "Eric Arthur Blair" <aLe...@NOSPAMlibero.it> ha scritto nel messaggio
> news:uTMYb.336350$_P.11...@news4.tin.it...
> >
> > Ciao a tutti !
> >
> > Ho un problema con Access. Quando cerco di creare un DB nuovo , con o
> senza
> > autocomposizione, mi appare un msgbox che recita "Il componente ActiveX
> non
> > è in grado di creare l'oggetto" .
> > Qualcuno mi può aiutare per favore ?!?
> >
> > PS: uso Access 2000
> >
> >
> > Grazie 1000 , aLe
>
> VAi sul Sito Comune (link qui sotto) e nella Sezione General leggi la FAQ
di
> Karl Donaubauer intitolata "Errore 429 - Il componente Activex non e' in
> grado di creare l'oggetto".
>
Grazie 1000, ho risolto il problema.
aLe



title: Da ERWIN ad ACCESS....Come ?

author: Guglielmo & Monica

text:
Salve a tutti.
Il mioproblema è il seguente:ho realizzato uno schema E.R. usando il tool
ERWin della PLATINUM ed ho generato il relativo script di creazione  per una
connessione ODBC creata su DB ACCESS.Fino a qui nessun problema ma...le
relazioni create?dove sono ?perchè non le vedo quando apro il relativo file
*.mdb?.
Dove sbaglio?
Avete altre soluzioni oltre l'uso della ODBC?
grazie in anticipo !


author: Maurizio

text:
Non riesco a visualizzare i messaggi di oggi domenica 15
postatemi una risposta!!!!


title: numero di record in una tabella

author: Kokko

text:
Scusate, all'interno di una Sub di un qualsiasi pulsante in una
qualsiasi maschera è possibile conoscere il numero di record di una
tabella (che non c'entra nulla con quella maschera)? Ed eventualmente
l'ID numero dell'ultimo record?
Sapreste indicarmi come fare?
Grazie
Ciao
Giovanni


title: numero di record in una tabella

author: MA

text:
"Kokko" <
giomontanoN...@libero.it
> ha scritto nel messaggio
news:n0tau0l519dlees5j...@4ax.com...

Ciao
guarda sull'help
Dcount e dmax
MAssimiliano


title: numero di record in una tabella

author: Luca

text:
hai provato con le funzioni di aggregazione di dominio DCount, DMax, DMin
etc.?
"Kokko" <
giomontanoN...@libero.it
> ha scritto nel messaggio
news:n0tau0l519dlees5j...@4ax.com...



title: numero di record in una tabella

author: ALESSANDRO Baraldi

text:
"Kokko" <
giomontanoN...@libero.it
> ha scritto nel messaggio
news:n0tau0l519dlees5j...@4ax.com...
> Scusate, all'interno di una Sub di un qualsiasi pulsante in una
> qualsiasi maschera č possibile conoscere il numero di record di una
> tabella (che non c'entra nulla con quella maschera)? Ed eventualmente
> l'ID numero dell'ultimo record?
>
> Sapreste indicarmi come fare?
>
> Grazie
>
> Ciao
>
> Giovanni
Si possono usare le funzioni di aggregazione sui domini, ma
francamente hannop restazioni molto scarse quando il numero di Records
č elevato.
Io uso questa che risulta decisamente piů veloce:
msgbox tblCount(NomeTabella)
Function tblCount(strTable As String, _
		    Optional ByVal Nome_Dbs As String = vbNullString) As long
   Dim dbs As DAO.Database
   Dim tdf As DAO.TableDef
   Dim rs As DAO.Recordset
   Dim x, num_ogg As Integer
   If IsMissing(Nome_Dbs) Or Nome_Dbs = vbNullString Then
      Set dbs = CurrentDb
   Else
      Set dbs = OpenDatabase(Nome_Dbs)
   End If
   Set rs = dbs.Openrecordset("SELECT COUNT(*) As Conteggio FROM " &
strTable)
   tblCount= rs!Conteggio
   rs.close
   Set rs = Nothing
   dbs.Close
   set dbs=nothing
End Function
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Loop delle maschere sulla Formattazione Condizionale

author: Francesco

text:
Prima di passare ad un progetto ADP di access usavo la funzione
riportata a margine, che ho ricavato da Internet per gestire la
formattazione condizionale.
Verificavo se il record era pari 0 dispari per variare i colori.
Nel Progetto ADP e i collegamenti alle tabelle SQL, le maschere che
contengono la formattazione vanno in Loop.
Come posso ovviare ??
Public Function GetRecNum( _
) As Long
  On Error GoTo erh
  Dim frm As Access.Form
  Dim rst As DAO.Recordset
  Set frm = CodeContextObject
  Set rst = frm.RecordsetClone
  With rst
    If Not ((.BOF = True) And (.EOF = True)) Then
      .Bookmark = frm.Bookmark
      GetRecNum = .AbsolutePosition + 1
    End If
  End With
ext:
  Set rst = Nothing
  Set frm = Nothing
  Exit Function
erh:
  GetRecNum = 0
  Resume ext
End Function
Ciao e grazie.


author: Roberto dalla campagna

text:
"Francesco" <
francov...@tin.it
> ha scritto nel messaggio
news:79217c6f.04092...@posting.google.com...

Vai sul Sito Comune (link qui sotto) e nella Sezione Forms prova a vedere se
può esserti utile la FAQ di Silvio Savoldi intitolata "Formattazione
Condizionale nelle maschere continue".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Come avere campi in grassetto e corsivo in una maschera?

author: Marco Gualdrini

text:
Ciao a tutti.
Scusate l'insistenza, ci riprovo. Sono un neofita di Access, e sto
realizzando un database in cui alcune maschere dovrebbero riportare i miei
dati in modalita' grassetto e corsivo. Pensavo di utilizzare qualcosa tipo
la RichTextBox di Visual Basic, ma non riesco a far funzionare niente...
Qualcuno mi sa dare una mano?
grazie anticipatamente
ciao
Marco


author: Paolo

text:
Marco Gualdrini <
gu...@worldonline.it
> wrote in message
duWI6.213001$lj4.6...@news6.giganews.com...
> CUT
>
> Me.NomeControllo.FontWeight = 700
>Me.NomeControllo.FontItalic = True
>Me.pippo.FontName = "Courier"
>Me.NomeControllo.fontsize = 16
>
>see you again,Paolo


text:
"Paolo" <***
bjh...@tin.it
> ha scritto nel messaggio
news:H6_I6.3618$DF1....@news1.tin.it...

Grazie ma non era quello che intendevo.
Del resto c'hai ragione pure tu, se non mi spiego bene e' normale che riceva
delle risposte che non c'entrano molto....
Provo a rispiegarmi meglio.
Ho una maschera che contiente una casella di testo. All'interno di questa
casella di testo vorrei poter mettere il testo con diversi stili, una parte
in grassetto, una parte in corsivo, ecc. ecc.
In VisualBasic userei la RichTextBox, in Access non so come regolarmi....
qualcuno mi sa dare una indicazione?
grazie mille e scusate il disturbo.
ciao
Marco


author: Angelo Mariani

text:
Marco Gualdrini wrote in message ...
>Ho una maschera che contiente una casella di testo. All'interno di questa
>casella di testo vorrei poter mettere il testo con diversi stili, una parte
>in grassetto, una parte in corsivo, ecc. ecc.
>In VisualBasic userei la RichTextBox, in Access non so come regolarmi....
La casella di testo deve essere riempita di volta in volta con testo
diverso, vero?
Altrimenti, suggerimento ovvio :-), ti basta usare PIU'caselle di testo
affiancate, in ognuna delle quali userai un font diverso. Metodo rozzo e
brutale, ma efficace.
Ciao,
A.-


text:
"Angelo Mariani" <
angelo...@tin.it
> ha scritto nel messaggio
news:9d698d$gqj$1...@pegasus.tiscalinet.it...
>
> Marco Gualdrini wrote in message ...
>
> >Ho una maschera che contiente una casella di testo. All'interno di questa
> >casella di testo vorrei poter mettere il testo con diversi stili, una
parte
> >in grassetto, una parte in corsivo, ecc. ecc.
> >In VisualBasic userei la RichTextBox, in Access non so come regolarmi....
>
>
> La casella di testo deve essere riempita di volta in volta con testo
> diverso, vero?
Esatto. Si riempie di volta in volta di testi provenienti dall'incrocio di
diverse tabelle. Pero', posso sapere con precisione quali campi di quali
tabelle daranno un output in grassetto, quali in corsivo ecc.
>
> Altrimenti, suggerimento ovvio :-), ti basta usare PIU'caselle di testo
> affiancate, in ognuna delle quali userai un font diverso. Metodo rozzo e
> brutale, ma efficace.
Purtoppo non mi serve. La mia casella di testo e' un riepilogo di dati
relativi ad un record, provenienti da varie tabelle.
grazie comunque
ciao
Marco
>


text:
Marco Gualdrini wrote in message ...
>
>"Angelo Mariani" <
angelo...@tin.it
> ha scritto nel messaggio
>news:9d698d$gqj$1...@pegasus.tiscalinet.it...
>> La casella di testo deve essere riempita di volta in volta con testo
>> diverso, vero?
>Esatto. Si riempie di volta in volta di testi provenienti dall'incrocio di
>diverse tabelle. Pero', posso sapere con precisione quali campi di quali
>tabelle daranno un output in grassetto, quali in corsivo ecc.
Prova ad usare il controllo "Microsoft Rich Textbox Control, version 6.0".
Io lo trovo in "Inserisci controllo ActiveX...", voce del menu "Inserisci"
del mio Access2000. Se sapevi come riempirlo in VB con del testo in
grassetto, corsivo, eccetera, dovrebbe essere la stessa cosa. Se riesci a
riempirlo, per favore spiega come fai :-)
Ciao,
A.-


author: Federico Luciani

text:
Marco Gualdrini wrote:
> "Paolo" <***
bjh...@tin.it
> ha scritto nel messaggio
> > Marco Gualdrini <
gu...@worldonline.it
> wrote in message
> > duWI6.213001$lj4.6...@news6.giganews.com...
> > > CUT
> > >
> Grazie ma non era quello che intendevo.
> Del resto c'hai ragione pure tu, se non mi spiego bene e' normale che riceva
> delle risposte che non c'entrano molto....
> Provo a rispiegarmi meglio.
> Ho una maschera che contiente una casella di testo. All'interno di questa
> casella di testo vorrei poter mettere il testo con diversi stili, una parte
> in grassetto, una parte in corsivo, ecc. ecc.
> In VisualBasic userei la RichTextBox, in Access non so come regolarmi....
> qualcuno mi sa dare una indicazione?
> grazie mille e scusate il disturbo.
> ciao
> Marco
non e' possibile farlo con i ctrl testo di access, pero' se hai VB, usa
il RichTextBox cosi' come lo useresti in VB.
--
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


text:
> > Marco
>
> non e' possibile farlo con i ctrl testo di access, pero' se hai VB, usa
> il RichTextBox cosi' come lo useresti in VB.
il problema e' quello di fornire un prodotto finale che non necessiti di
librerie "estranee". con tutte le varie versioni, tra Access97, 2000, i vari
VB, mi ritrovo sempre con il rischio di arrivare con l'applicazione
definitiva che non gira su una macchina o sull'altra perche' manca la tal
libreria...
vedro' come poter fare ad inglobare la libreria VB in Access senza essere
costretto tutte le volte a reinstallarla.....
ciao
Marco


text:
"Angelo Mariani" <
angelo...@tin.it
> ha scritto nel messaggio
news:9d6h3r$dsn$1...@lacerta.tiscalinet.it...
>
> Marco Gualdrini wrote in message ...
> Prova ad usare il controllo "Microsoft Rich Textbox Control, version 6.0".
> Io lo trovo in "Inserisci controllo ActiveX...", voce del menu "Inserisci"
> del mio Access2000.
Purtroppo sto usando Access97, e comunque, si', si puo' inserire in quel
modo, ma poi quando vado su un PC in cui non e' installato VB6, mi si
inchioda tutto (runtime error, library not found o simile)
Scusatemi, come vi ho detto sono un neofita e di runtime e cose simili
ancora non me ne erano capitati... abbiate pazienza...
>Se sapevi come riempirlo in VB con del testo in
> grassetto, corsivo, eccetera, dovrebbe essere la stessa cosa. Se riesci a
> riempirlo, per favore spiega come fai :-)
va bene, non manchero'! :)
ciao
Marco


text:

se usi quell'ocx, devi per forza installarlo su tutte le macchine dove
usi l'mdb.
ti conviene creare un set d'installazione.



title: tabelle collegate in .mde: A00 le apre, A02 no.

author: chippo

text:
Buon pomeriggio a tutto il ng.
Ho un mde in rete che funge da FE e punta ad un mdb collocato nella
stessa dir.
Da due postazioni diverse (Nt4/A00 e Win00/A02) punto al mde. Sulla
postazione Nt va tutto bene; dalla postazione Win00 mi viene richiesto
il path delle tabelle collegate (più la pwd di accesso al db). Ho
pensato che fosse qualcosa sulla versione di Access e così, dalla
postazione Win00/A02, ho provato a convertire all'indietro il mde (alla
ver A00), ma mi dice che il file è già convertito.
Prima di disinstallare A02 ed installare A00 (che mi sembra una cosa
poco seria; la versione più recente dovrebbe essere più completa, o
no?), c'è qualche altro tentativo che posso fare?
Grazie in anticipo.


author: Oscar Manfredini

text:
"chippo" <
...

Non so se il tuo problema sia legato a versioni differenti di Access, posso
dirti che è impensabile distribuire applicazioni in quel modo.
A te non deve interessare se e quale versione di Full Access sia installato
sul PC dell'utente: procurati e utilizza la DEV per Access, che ti svincola
da discorsi di quel genere.
Probabilmente è reperibile sul mercato solo la realese più recente:
http://www.microsoft.com/italy/msdn/prodotti/vstudio/officetools/sviluppo.ms
px
Ciao.


author: Bruno Campanini

text:
"Oscar Manfredini" <
os...@nospam.it
> wrote in message
news:43a1b7b1$0$27607$4faf...@reader1.news.tin.it...
> Non so se il tuo problema sia legato a versioni differenti di Access,
> posso
> dirti che è impensabile distribuire applicazioni in quel modo.
> A te non deve interessare se e quale versione di Full Access sia
> installato
> sul PC dell'utente: procurati e utilizza la DEV per Access, che ti
> svincola
> da discorsi di quel genere.
>
> Probabilmente è reperibile sul mercato solo la realese più recente:
>
>
http://www.microsoft.com/italy/msdn/prodotti/vstudio/officetools/sviluppo.ms
> px
>
> Ciao.
Parole sante!
Soprattutto dopo il tentativo non riuscito di
"convertire all'indietro il mde"...
Bruno


text:
Molte grazie per la risposta.
Purtroppo l'applicativo (e la successiva distribuzione) non è mio e
non saprei come intervenire.
Pensavo di riuscire a trovare qualche accrocchio per far lavorare gli
utenti.
Grazie ancora.
PS: per DEV di access, intendete il developer tool kit? Il link che mi
avete consigliato punta ad una pagina inesistente...
Ciao e buona giornata.
F.


text:
"chippo"
Molte grazie per la risposta.
Purtroppo l'applicativo (e la successiva distribuzione) non è mio e
non saprei come intervenire.
Pensavo di riuscire a trovare qualche accrocchio per far lavorare gli
utenti.
Grazie ancora.
In tal caso fai in modo che sulle macchine sia installata la stessa realese
di Full Access.
PS: per DEV di access, intendete il developer tool kit? Il link che mi
avete consigliato punta ad una pagina inesistente...
Ciao e buona giornata.
Certo che esiste: occhio al "PX" che è andato a capo nel post sul ng.
Ciao.


text:
ok.
molte grazie
F.


title: duplicare o triplicare record a seconda del valore di un campo

text:
Salve a tutti,
ho una tabella con un campo numerico "numero controlli" e devo
estrarre con una query i vari record: questi però mi devono comparire
tante volte quanti sono i controlli (cioè se un record ha "numero
controlli" = 3 mi deve comparire tre volte). Ho dato un'occhiata nel
neswgroup e ho visto del codice sql dove si fa duplicare un record in
funzione di un valore deciso a priori, con la preposizione WHERE. ma
come faccio se voglio che l'operazione di INSERT ...INTO venga
ripetuta tante volte quante sono indicate nel campo "numero
controlli"? e soprattutto in questo caso cosa metto nella preposizione
WHERE?
grazie in anticipo per l'aiuto


author: GC

text:

Ti propongo una soluzione che ha senso solo se il titolo del post è
esatto (nel senso se gli unici valori possibili per "numero controlli"
sono 2 e 3): crea una nuova tabella ausiliaria, con un unico campo
"numero controlli", ed inserisci due record con il valore del campo
uguale a 2 e tre record con il valore del campo uguale a 3. In
sostanza:
numero controlli
2
2
3
3
3
Crea poi una query in cui metti inserisci la tabella originale e
quella ausiliaria, e crea un join tra i campi "numero controlli" delle
due tabelle. Esegui la query, ed avrai duplicato le righe con numero
controlli=2 e triplicato le righe con numero controlli=3


title: Re: [SQL] Operatore Between...And

text:
> Ciao @Alex,
>
> non sono sicuro che quel formato data sia valido,
> prova con aaaa/mm/gg
> ---------------
> strDal = Format(Nz(Me.txtDal,#1/1/2004#), "\#yyyy/mm/dd\#")
> strAl = Format(nz(Me.txtAl,Date), "\#yyyy/mm/dd\#")
> ---------------
>
> nel caso il formato da te usato andasse bene prova a controllare che nella
> tua tabella il campo Data non contenga valori con la parte ora.
> Nel caso di inquinamento della parte ora puoi fare così
>
> ---------
> strFilt = "Fix([Data]) Between " & strDal & " AND " & strAl
> ---------
> Ciao Giorgio
Ciao Giorgio, innanzitutto mi fà piacere sentirti.
Allora il formato sul quale hai dubbi in realtà è il formato ISO
"\#yyyy\-mm\-dd\#" e, da quanto ne sò, è compatibile con tutti
i Database.
In ogni caso il problema non era quello ma proprio il fatto della Data
comprensiva di hh:mm:ss, dovuta all'uso di Now() come DefaultValue
di un campo Data.
Ovviamente ho risolto con il tuo suggerimento, ma ora andrò a Formattare
il DefaultValue a Format(Now();"gg/mm/aaaa"), per ovviare ad altri
inconvenienti
Grazie
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Re: [SQL] Operatore Between...And

text:
Mi risulta dall'Help, e spero mi smentiate, che l'operatore in questione
restituisce l'intervallo COMPRESO.
Ora è quasi un'ora che provo questo codice e mi esclude gli estremi:
   Dim strDal     As String
   Dim strAl      As String
   Dim strFilt    As String
   strDal = Format(Nz(Me.txtDal,#1/1/2004#), "\#yyyy\-mm\-dd\#")
   strAl = Format(nz(Me.txtAl,Date), "\#yyyy\-mm\-dd\#")
   strFilt = "[Data] Between " & strDal & " AND " & strAl
   Me.frmSubSearch.Form.FilterOn = False
   Me.frmSubSearch.Form.Filter = strFilt
   Me.frmSubSearch.Form.FilterOn = True
Ora ho inserito in data Odierna 2 movimenti ma il Filtro me li elimina.
Dall'Help:
----------------------------------------------------------------------------
-----------------------
Osservazioni
Se il valore di espr è compreso tra valore1 e valore2 (inclusi),
l'operatore Between...And restituisce True; altrimenti restituisce False.
----------------------------------------------------------------------------
-----------------------
Che succede...?



title: Re: [SQL] Operatore Between...And

author: giorgio rancati

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:4218c5ec$0$32347$5fc...@news.tiscali.it...
> Mi risulta dall'Help, e spero mi smentiate, che l'operatore in questione
> restituisce l'intervallo COMPRESO.
Esatto
> Ora č quasi un'ora che provo questo codice e mi esclude gli estremi:
>
>    Dim strDal     As String
>    Dim strAl      As String
>    Dim strFilt    As String
>
>    strDal = Format(Nz(Me.txtDal,#1/1/2004#), "\#yyyy\-mm\-dd\#")
>    strAl = Format(nz(Me.txtAl,Date), "\#yyyy\-mm\-dd\#")
>    strFilt = "[Data] Between " & strDal & " AND " & strAl
>    Me.frmSubSearch.Form.FilterOn = False
>    Me.frmSubSearch.Form.Filter = strFilt
>    Me.frmSubSearch.Form.FilterOn = True
>
> Ora ho inserito in data Odierna 2 movimenti ma il Filtro me li elimina.
>
Ciao @Alex,
non sono sicuro che quel formato data sia valido,
prova con aaaa/mm/gg
---------------
strDal = Format(Nz(Me.txtDal,#1/1/2004#), "\#yyyy/mm/dd\#")
strAl = Format(nz(Me.txtAl,Date), "\#yyyy/mm/dd\#")
---------------
nel caso il formato da te usato andasse bene prova a controllare che nella
tua tabella il campo Data non contenga valori con la parte ora.
Nel caso di inquinamento della parte ora puoi fare cosě
---------
strFilt = "Fix([Data]) Between " & strDal & " AND " & strAl
---------
Ciao Giorgio


title: Re: [SQL] Operatore Between...And

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:4218cab8$0$6306$5fc...@news.tiscali.it...
> > Ciao @Alex,
[CUT]
>
> Ciao Giorgio, innanzitutto mi fà piacere sentirti.
:-)
> Allora il formato sul quale hai dubbi in realtà è il formato ISO
> "\#yyyy\-mm\-dd\#" e, da quanto ne sò, è compatibile con tutti
> i Database.
a me sembra il formato ODBC canonico senza la parte dell'ora mentre l'ISO
8601 prevede la sintassi yyyy/mm/dd hh:mm:ss
Sia quel che sia adesso so che Access funziona anche con yyyy-mm-dd
:-)
Ciao Giorgio


title: Re: [SQL] Operatore Between...And

text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:4218d2da$0$6311$5fc...@news.tiscali.it...
> a me sembra il formato ODBC canonico senza la parte dell'ora mentre l'ISO
> 8601 prevede la sintassi yyyy/mm/dd hh:mm:ss
>
> Sia quel che sia adesso so che Access funziona anche con yyyy-mm-dd
>
> :-)
>
> Ciao Giorgio
Sinceramente, a meno di malintesi, è la 2° volta che ho conferma del Formato
ISO, una
sul NG di VB da Zanna e l'altra sul Sito di Karl alla Faq 6.8
http://www.donkarl.com/it/
Non saprei in effetti quale sia il nome corretto, ma ti confermo che
funziona.
Buona domenica



title: Re: [SQL] Operatore Between...And

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:4218d5e8$0$6319$5fc...@news.tiscali.it...
> "giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
> messaggio news:4218d2da$0$6311$5fc...@news.tiscali.it...
>
> Sinceramente, a meno di malintesi, è la 2° volta che ho conferma del
Formato
> ISO, una
> sul NG di VB da Zanna e l'altra sul Sito di Karl alla Faq 6.8
>
http://www.donkarl.com/it/
qui menziona il formato con il separatore /
http://www.webmasterpoint.org/asp/pratica/170.asp
http://www.weppos.com/asp/script/script_show.asp?script=24
> Non saprei in effetti quale sia il nome corretto, ma ti confermo che
> funziona.
sul fatto che funzioni mi basta la tua parola :-)
Ciao Giorgio


title: Re: [SQL] Operatore Between...And

author: Karl Donaubauer

text:
ALESSANDRO Baraldi wrote:
> "giorgio rancati ha scritto:
>> a me sembra il formato ODBC canonico senza la parte dell'ora mentre
>> l'ISO 8601 prevede la sintassi yyyy/mm/dd hh:mm:ss
>>
>> Sia quel che sia adesso so che Access funziona anche con yyyy-mm-dd
> ...
> Sinceramente, a meno di malintesi, è la 2° volta che ho conferma del
> Formato ISO, una
> sul NG di VB da Zanna e l'altra sul Sito di Karl alla Faq 6.8
>
http://www.donkarl.com/it/
>
> Non saprei in effetti quale sia il nome corretto, ma ti confermo che
> funziona.
Scrivo "formato ISO" perché questo formato segue le norme
della regola ISO 8601. Vedi p.e.
http://www.w3.org/QA/Tips/iso-date
http://www.cl.cam.ac.uk/~mgk25/iso-time.html
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/biztalks/htm/lat_xmltools_trouble_ebng.asp
O se vuoi comprare l'originale ;-):
http://www.iso.org/iso/en/CatalogueDetailPage.CatalogueDetail?CSNUMBER=40874&ICS1=1&ICS2=140&ICS3=30&showrevision=y&scopelist=CATALOGUE
Io quasi sempre consiglio questo formato perché (in contrario ai
formati nazionali) è univoco, e certo perché abbiamo già piu che
abbastanza influenza americana. ;-)
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it
+info sulla prima Conferenza Italiana per Sviluppatori di Access (CISA1)


title: Domande per gli esperti

author: Vince

text:
1)E' possibile in access creare una password per accedere al db, in modo che
esca tutte le volte che apro il db? Come si fa?
2)E' possibile in access creare un box-message in modo che tutte le volte
che modifico o creo un nuovo record da una maschera mi avvisi della
modifica/creazione e mi chieda se voglio aggiornare o meno il db? (con 2
opzioni scelta "ok" "annulla") Come si fa?
3)E' possibile impostare in access un parametro che mi immetta per default
la prima lettera di ogni campo sempre maiuscola? Come di fa?
Grazie a tutti (mandatemi le E-mail)
--
Posted from IDENT:root@[193.70.61.1]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Domande per gli esperti

author: Sib

text:
""Vince"" <
m...@uninetcom.it
> ha scritto nel messaggio
news:000401c02f96$6f5c6560$5de60497@p0p4l7...
> 1)E' possibile in access creare una password per accedere al db, in modo
che
> esca tutte le volte che apro il db? Come si fa?
si'
> 2)E' possibile in access creare un box-message in modo che tutte le volte
> che modifico o creo un nuovo record da una maschera mi avvisi della
> modifica/creazione e mi chieda se voglio aggiornare o meno il db? (con 2
> opzioni scelta "ok" "annulla") Come si fa?
si'
> 3)E' possibile impostare in access un parametro che mi immetta per default
> la prima lettera di ogni campo sempre maiuscola? Come di fa?
si'
> Grazie a tutti (mandatemi le E-mail)
no
Per i come si rimanda all'help di Access
Sib


title: Creare tabella collegata con SQL

author: Mario

text:
Un saluto a tutti i partecipanti al NG.
Creare una tabella con SQL è semplice "create table miatabella ([miocampo]
text (25)" per una tabella con un campo solo.
Si può specificare l'attributo "collegata" via SQL ?
Grazie e saluti a tutti.
Ciao - Daniele


title: Creare tabella collegata con SQL

author: Alessandro Baraldi

text:
"Mario" <
cogitoe...@libero.it
> wrote in message
news:jRcye.23667$
TR5....@news.edisontel.com

Forse hai le idee poco chiare.
La tabella viene creata sul Server come hai evidenziato tu.
La Tabella collegata non viene creata sul Server, ma viene
Collegata una tabella del Server al Client, quindi devi
solo Importarla oppure Linkarla inserendo nella proprietà
Connect di una Tabella la stringa di connessione.
LA tabella da creare lato Client va creata con il metodo
CreateTableDef assegnandogli un nome, quindi accedendo alla
proprietà Connect dell'Oggetto creato passare la StringConnection.
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Creare tabella collegata con SQL

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:2d6cc6e20ac6f453a7...@mygate.mailgate.org...

Ciao Alex
Ti ringrazio della tua chiara risposta. Non avevo dubbi di questo genere,
chiaramente, ma mi sono espresso male.
Mi interessava sapere se è possibile impostare la proprietà di connessione
di una tabella senza usare l'oggetto Tabledef, ma solamente utilizzando SQL.
Ciao e Grazie ancora.
Daniele


title: Creare tabella collegata con SQL

text:
Mario wrote:
> ...
> Mi interessava sapere se è possibile impostare la proprietà di connessione
> di una tabella senza usare l'oggetto Tabledef, ma solamente utilizzando
> SQL.
No.
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
+ Conferenza Italiana per Sviluppatori di Access (CISA)


title: Creare tabella collegata con SQL

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:3iuqfsF...@individual.net...
> Mario wrote:
> > ...
> > Mi interessava sapere se č possibile impostare la proprietą di
connessione
> > di una tabella senza usare l'oggetto Tabledef, ma solamente utilizzando
> > SQL.
>
> No.
>
Ciao Karl
Grazie per l'estrema chiarezza e la insuperabile sintesi.
Ciao - Daniele


title: Sfondo finestra di Access

author: Maurizio Vicinanza

text:
Salve,
Sapete se č possibile cambiare il colore di fondo della finestra principale
di Access o inserire una immagine di sfondo ?
Ciao.


title: Sfondo finestra di Access

author: ALESSANDRO Baraldi

text:
"Maurizio Vicinanza" <
mav...@virgilio.it
> ha scritto nel messaggio
news:h4yMc.47218$5D1.2...@news4.tin.it...
> Salve,
>
> Sapete se è possibile cambiare il colore di fondo della finestra
principale
> di Access o inserire una immagine di sfondo ?
>
> Ciao.
Si, entrambi, cerca quì:
www.lebans.com
Ciao.
@Alex.


title: Richiesta sito per guida

author: Gerardo Santarpia

text:
Salve ho un piccolo problema, dopo aver imparato ad usare excel con vba, mi
hanno consigliato di imparare access, mi ci sono immesso come autodidatta,
ma trovo problemi con query, tabelle e maschere, vorrei sapere se esiste
qualche sito che mi chiarisce un pò le idee, magari una guida.
Vi ringrazio anticipatamente!


title: Richiesta sito per guida

author: @Arold [       ]

text:
 mi ci sono immesso come autodidatta,
> ma trovo problemi con query, tabelle e maschere, vorrei sapere se esiste
> qualche sito che mi chiarisce un pň le idee, magari una guida.
>
> Vi ringrazio anticipatamente!
>
tasto F1 in access li trovi tutto e molto di piů, oppure i modi migliori
credo siano frequentare questo NG e frequentare il sito comune
www.sitocomune.com
ciao.


title: come filtrare i records di una casella cambinata

text:
buon sera a tutti,
sto sempre qui a chiedere delucidazioni sulle caselle combinate mia
croce e delizia!
Vengo al punto:
E' possibile (e se si come) filtrare gli elementi della casella
combinata più vicini a quello che si sta digitando
nella casella combinata stessa?
Faccio un esempio:
se nella casella combinata cboCliente scrivo Pippo e apro la tendina
visualizzo solo i record che iniziano con Pippo, invece io vorrei che
quando scrivo Pippo si visualizzassero tutti i record che contengono
la parola Pippo quindi Ristorante Pippo, Az.Agricola Pippo, Pippo bar
ecc.
Qualcuno di voi può aiutarmi?
Grazie


author: max

text:
"Elena_Elena" <
elena...@gmail.com
> ha scritto nel messaggio
news:46126a37-938c-464a...@d5g2000yqm.googlegroups.com...
buon sera a tutti,
sto sempre qui a chiedere delucidazioni sulle caselle combinate mia
croce e delizia!
Vengo al punto:
E' possibile (e se si come) filtrare gli elementi della casella
combinata pi� vicini a quello che si sta digitando
nella casella combinata stessa?
Faccio un esempio:
se nella casella combinata cboCliente scrivo Pippo e apro la tendina
visualizzo solo i record che iniziano con Pippo, invece io vorrei che
quando scrivo Pippo si visualizzassero tutti i record che contengono
la parola Pippo quindi Ristorante Pippo, Az.Agricola Pippo, Pippo bar
ecc.
Qualcuno di voi pu� aiutarmi?
Grazie
l'utilizzo della casella combinata non � fatto per quanto io ne sappia con
queste prerogative, potresti per� crearti una casella di riepilogo (o una
casella combinata) nella maschera che popoli con un query derivata da una
casella di testo e cio�
casella di testo non associata
casella di riepilogo con origine tramite una query in cui nel campo di
riferimento inserisci come criterio
like * & forms!tuamaschera!tuacaselladitesto & *
su evento dopoaggiornamento della casella di testo me.casella di
riepilogo.requery.
in questo modo scrivendo pippo nella casella di testo ritroveresti nella tua
casella combinata tutti i record in cui in quel campo � presente pippo
ciao
max


text:
On 18 Nov, 16:44, "max" <
pi...@pippo.it
> wrote:
> "Elena_Elena" <
elenach...@gmail.com
> ha scritto nel messaggionews:46126a37-938c-464a...@d5g2000yqm.googlegroups.com...
> buon sera a tutti,
> sto sempre qui a chiedere delucidazioni sulle caselle combinate mia
> croce e delizia!
>
> Vengo al punto:
> E' possibile (e se si come) filtrare gli elementi della casella
> combinata più vicini a quello che si sta digitando
> nella casella combinata stessa?
>
> Faccio un esempio:
> se nella casella combinata cboCliente scrivo Pippo e apro la tendina
> visualizzo solo i record che iniziano con Pippo, invece io vorrei che
> quando scrivo Pippo si visualizzassero tutti i record che contengono
> la parola Pippo quindi Ristorante Pippo, Az.Agricola Pippo, Pippo bar
> ecc.
>
> Qualcuno di voi può aiutarmi?
> Grazie
>
> l'utilizzo della casella combinata non è fatto per quanto io ne sappia con
> queste prerogative, potresti però crearti una casella di riepilogo (o una
> casella combinata) nella maschera che popoli con un query derivata da una
> casella di testo e cioè
> casella di testo non associata
> casella di riepilogo con origine tramite una query in cui nel campo di
> riferimento inserisci come criterio
> like * & forms!tuamaschera!tuacaselladitesto & *
> su evento dopoaggiornamento della casella di testo me.casella di
> riepilogo.requery.
> in questo modo scrivendo pippo nella casella di testo ritroveresti nella tua
> casella combinata tutti i record in cui in quel campo è presente pippo
> ciao
> max
Funziona! con un passaggio in più rispetto a quello che avrei voluto
fare io, ma chi si accontenta gode
Grazie


title: stampare data in inglese

author: BFS

text:
Ciao a tutti
devo stampare in un report la data
18 gennaio 2012
in questo modo January 18th, 2012
quindi in inglese.

il format mi pare non mi aiuti...esiste la possibilità di formattare la
data estesa in una lingua diversa da quella del sistema?

o mi tocca farmi una funzione di conversione a manina?

ciao
BFS


title: stampare data in inglese

text:

Bel problema.... tu non vuoi il formato inglese, ma la traduzione in
EN...!
Se ti affidi a qualsiasi delle funzioni Data nativa, viene invocato il
sistema op. con i conseguente adattamento al formato impostato, quindi
IT.
Dubito fortemente si possa aggirare il problma...
Penso che la soluzione più semplice sia proprio quella della
Funzione...

Function ConvertIT2EN(DateIn As Date) As String
   Dim m As Integer
   Dim mEn As String

   Dim d As Integer
   Dim dEn As String

   Dim y As Long

   Dim strDateEN As String

   m = Month(DateIn)
   d = Day(DateIn)
   y = Year(DateIn)

   Select Case Right(d, 1)
        Case Is = 1
            dEn = d & "st"
        Case Is = 2
            dEn = d & "nd"
        Case Is = 3
            dEn = d & "rd"
        Case Is > 4
            dEn = d & "th"
    End Select

    Select Case m
        Case Is = 1
            mEn = "January"
        Case Is = 2
            mEn = "February"
        Case Is = 3
            mEn = "March"
        Case Is = 4
            mEn = "April"
        Case Is = 5
            mEn = "May"
        Case Is = 6
            mEn = "June"
        Case Is = 7
            mEn = "July"
        Case Is = 8
            mEn = "August"
        Case Is = 9
            mEn = "September"
        Case Is = 10
            mEn = "October"
        Case Is = 11
            mEn = "November"
        Case Is = 12
            mEn = "December"
    End Select
    strDateEN = mEn & " " & dEn & ", " & y
    ConvertIT2EN = strDateEN
End Function

Ciao
@Alex


title: stampare data in inglese

text:

>              dEn = d&  "st"
>          Case Is = 2
>              dEn = d&  "nd"
>          Case Is = 3
>              dEn = d&  "rd"
>          Case Is>  4
>              dEn = d&  "th"

>      strDateEN = mEn&  " "&  dEn&  ", "&  y
>      ConvertIT2EN = strDateEN
> End Function
>
> Ciao
> @Alex

Infatti...dovevo bypassare le impostazioni del sistema operativo.
grazie mille per avermi pure fatto risparmiare il tempo di scrivermi la
funzione :-)

a buon rendere
BFS


title: stampare data in inglese

text:
...
> Infatti...dovevo bypassare le impostazioni del sistema operativo.
> grazie mille per avermi pure fatto risparmiare il tempo di scrivermi la
> funzione :-)
>
> a buon rendere
> BFS

Fai attenzione che non è perfetta... se passi la Data con l'Anno a 2
CIFRE... è un problema... ma lo sarebbe per qualsiasi funzione Data.

@Alex


title: Gestione identica di più tabelle

author: AntFast

text:
Salve
Ho un programmino tramite il quale vedo, seleziono, stampo, ecc.
Esso � basato su una sola tabella (Tabella1), varie queries e un paio di
reports.
Ora mi si serve introdurre un'altra tabella (Tabella2), perfettamente
identica
nella struttura a Tabella1 e sulla quale fare le medesime operazioni
con le stesse queries e stessi reports.
Quale � secondo voi la strada migliore da seguire?
(Attualmente nelle queries e nei reports � indicato Tabella1.campo1,
Tabella1.campo2, ecc.)
Ha senso fare un rename delle tabelle, all'inizio, in modo tale che compare
sempre il
nome di Tabella1 nelle elaborazioni delle queries e dei reports,
e alla fine rifare un rename per riportarle al loro vero nome ?
Antonio


title: Gestione identica di più tabelle

author: tommaso

text:
Il giorno domenica 9 dicembre 2012 11:00:15 UTC+1, AntFast ha scritto:
> Salve
>
> Ho un programmino tramite il quale vedo, seleziono, stampo, ecc.
>
> Esso è basato su una sola tabella (Tabella1), varie queries e un paio di
>
> reports.
>
> Ora mi si serve introdurre un'altra tabella (Tabella2), perfettamente
>
> identica
>
> nella struttura a Tabella1 e sulla quale fare le medesime operazioni
>
> con le stesse queries e stessi reports.
>
> Quale è secondo voi la strada migliore da seguire?
>
> (Attualmente nelle queries e nei reports è indicato Tabella1.campo1,
>
> Tabella1.campo2, ecc.)
>
> Ha senso fare un rename delle tabelle, all'inizio, in modo tale che compare
>
> sempre il
>
> nome di Tabella1 nelle elaborazioni delle queries e dei reports,
>
> e alla fine rifare un rename per riportarle al loro vero nome ?
>
> Antonio

Al Link di seguito, credo che ci sia la soluzione del tuo quesito.

http://www.accessgroup.it/tabelle/cambiare-origine-tabella-ad-un-form-da-codice.html

Saluti


title: Gestione identica di più tabelle

text:
"tommaso"  ha scritto nel messaggio
news:44a6a7ba-284c-419d...@googlegroups.com...

Ciao Tommaso
Non riesco a leggere il codice... :-(
Antonio


title: Gestione identica di più tabelle

author: Marco Pizzamiglio

text:
AntFast ha scritto:

> Salve
> Ho un programmino tramite il quale vedo, seleziono, stampo, ecc.
> Esso è basato su una sola tabella (Tabella1), varie queries e un paio di
> reports.
> Ora mi si serve introdurre un'altra tabella (Tabella2), perfettamente
> identica
> nella struttura a Tabella1 e sulla quale fare le medesime operazioni
> con le stesse queries e stessi reports.
> Quale è secondo voi la strada migliore da seguire?
> (Attualmente nelle queries e nei reports è indicato Tabella1.campo1,
> Tabella1.campo2, ecc.)
> Ha senso fare un rename delle tabelle, all'inizio, in modo tale che
compare
> sempre il
> nome di Tabella1 nelle elaborazioni delle queries e dei reports,
> e alla fine rifare un rename per riportarle al loro vero nome ?
> Antonio

Se la struttura è identica non ha senso suddividere i dati in più tabelle.
Fai un'unica tabella e aggiungi un campo numerico nuovo per distinguere i
dati che avresti messo nella tabella 1, nella 2, nella 3, .....
Poi sarà semplicissimo usare maschere e report, ti basta un criterio
nell'origine dati o un filtro.
Ciao.
-Marco-

--

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


title: Gestione identica di più tabelle

author: Bruno Campanini

text:
AntFast used his keyboard to write :

> Salve
> Ho un programmino tramite il quale vedo, seleziono, stampo, ecc.
> Esso è basato su una sola tabella (Tabella1), varie queries e un paio di
> reports.
> Ora mi si serve introdurre un'altra tabella (Tabella2), perfettamente
> identica
> nella struttura a Tabella1 e sulla quale fare le medesime operazioni
> con le stesse queries e stessi reports.
> Quale è secondo voi la strada migliore da seguire?
> (Attualmente nelle queries e nei reports è indicato Tabella1.campo1,
> Tabella1.campo2, ecc.)
> Ha senso fare un rename delle tabelle, all'inizio, in modo tale che compare
> sempre il
> nome di Tabella1 nelle elaborazioni delle queries e dei reports,
> e alla fine rifare un rename per riportarle al loro vero nome ?

A parte considerazioni generali sul layout (due tabelle uguali...)
appare più logico, più semplice e più facile cambiare via VBA il
parametro Tabella1 nella stringa SQL della query.

Bruno


title: GetNamespace errore: "il computer server remoto non esiste o non è disponibile"

author: mario rossi

text:
buongiorno a tutti

la prima volta che eseguo le due righe SET funziona tutto perfettamente
la seconda volta restituisce l'errore in oggetto
c'è qualche istruzione di chiusura che non eseguo correttamente e quindi al secondo richiamo da quell'errore?

        Dim oINS As NameSpace
        Dim Folderinbox As MAPIFolder
        Dim olMail As MailItem
        Dim filtered_items As Items

        Set oINS = GetNamespace("MAPI")
        Set Folderinbox = oINS.GetDefaultFolder(olFolderSentMail)

      ....codice prelevo e salvo mail

        Set Folderinbox = Nothing
        Set oINS = Nothing

grazie a tutti.


text:

ho risolto come segue, aggiungendo oINS.Quit prima di Set oINS = Nothing

        Set Folderinbox = Nothing
        oINS.Quit
        Set oINS = Nothing

fonte:
https://support.microsoft.com/it-it/topic/automazione-di-excel-non-riesce-a-seconda-esecuzione-codice-6647c4b4-da5c-ee1f-cc6f-58815d47702d


title: Select TOP per ogni gruppo

author: Die#

text:
Buongiorno,
l'argomento secondo me è già stato +o- posto , ma non riesco in ogni caso a
tirarlo fuori.
Data una tabella tipo :
Impiegato , Livello , Stipendio
come faccio a tirare fuori i primi 5 impiegati, per ogni livello ,con lo
stipendio più alto ?
Quindi i primi 5 impiegati del livello 1 con lo stipendio + alto, poi altri
5 record di impiegati del livello 2 con lo stipendio più alto etc etc ..
Grazie a tutti e scusate per l'eventuale repost.
Diego
--------------------------------
Inviato via
http://usenet.libero.it


title: Select TOP per ogni gruppo

author: oizirbaF

text:
On Mon, 25 Nov 2002 15:19:10 GMT,
as...@asf.it
 (Die#) wrote:
>Buongiorno,
>l'argomento secondo me è già stato +o- posto , ma non riesco in ogni caso a
>tirarlo fuori.
>
>Data una tabella tipo :
>Impiegato , Livello , Stipendio
>
>come faccio a tirare fuori i primi 5 impiegati, per ogni livello ,con lo
>stipendio più alto ?
>
>Quindi i primi 5 impiegati del livello 1 con lo stipendio + alto, poi altri
>5 record di impiegati del livello 2 con lo stipendio più alto etc etc ..
>
>Grazie a tutti e scusate per l'eventuale repost.
>Diego
Così a bruciapelo , senza aver provato e senza averci pensato su
troppo , farei una Union Query sulle singole query salvate col metodo
Select top 5 .
Ciao. Fabrizio.
(Access XP (sp2), Win ME, P4 1Ghz, 320 RAM)


title: Select TOP per ogni gruppo

text:
Il 25 Nov 2002, 16:33, oizirbaF <fabrizio...@SPAMtiscalinet.it> ha
scritto:

--------------------------------
Inviato via
http://usenet.libero.it


title: Select TOP per ogni gruppo

text:


Ho provato è fattibile , faccio un esempio usando NortWind:
1° query ProvaTop1
SELECT TOP 5 Clienti.NomeSocietà, Clienti.Paese
FROM Clienti
WHERE ((Clienti.Paese) Like "usa");
2° query ProvaTop2
SELECT TOP 5 Clienti.NomeSocietà, Clienti.Paese
FROM Clienti
WHERE ((Clienti.Paese) Like "francia");
UNION QUERY
SELECTprovatop1.[NomeSocietà], provatop1.paese
FROM provatop1
UNION SELECT provatop2.[Nomesocietà], provatop2.paese
FROM provatop2;
Se c'è qlc di meglio dire!!



title: Select TOP per ogni gruppo

author: Roberto da casa

text:
"Die#" <
as...@asf.it
> ha scritto nel messaggio
news:212Z177Z101Z19Y...@usenet.libero.it...
> Buongiorno,
> l'argomento secondo me è già stato +o- posto , ma non riesco in ogni caso
a
> tirarlo fuori.
>
> Data una tabella tipo :
> Impiegato , Livello , Stipendio
>
> come faccio a tirare fuori i primi 5 impiegati, per ogni livello ,con lo
> stipendio più alto ?
>
> Quindi i primi 5 impiegati del livello 1 con lo stipendio + alto, poi
altri
> 5 record di impiegati del livello 2 con lo stipendio più alto etc etc ..
>
> Grazie a tutti e scusate per l'eventuale repost.
> Diego
Se i dati sono contenuti in una tabella chiamata Tabella1 nella quale il
campo Livello è di tipo Testo, prova con uan query che abbia il seguente
codice SQL:
SELECT Tabella1.Impiegato, Tabella1.Livello, Tabella1.Stipendio
FROM Tabella1
WHERE (((DCount("*","Tabella1","Livello=" & Chr$(34) & [Livello] & Chr$(34)
& " And Stipendio >=" & [Stipendio])) <= 5))
ORDER BY Tabella1.Livello, Tabella1.Stipendio DESC;
Se invece il campo Livello è di tipo Numerico:
SELECT Tabella1.Impiegato, Tabella1.Livello, Tabella1.Stipendio
FROM Tabella1
WHERE (((DCount("*","Tabella1","Livello=" & [Livello] & " And Stipendio >="
& [Stipendio]))<=5))
ORDER BY Tabella1.Livello, Tabella1.Stipendio DESC;
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Select TOP per ogni gruppo

text:
On Mon, 25 Nov 2002 15:48:30 GMT, "Roberto da casa"
<
r.ma...@libero.it
> wrote:
>SELECT Tabella1.Impiegato, Tabella1.Livello, Tabella1.Stipendio
>FROM Tabella1
>WHERE (((DCount("*","Tabella1","Livello=" & Chr$(34) & [Livello] & Chr$(34)
>& " And Stipendio >=" & [Stipendio])) <= 5))
>ORDER BY Tabella1.Livello, Tabella1.Stipendio DESC;
Magnifico , con le funzioni di aggregazioni sui domini sei un mostro:
complimenti!!!



title: Select TOP per ogni gruppo

text:
Il 25 Nov 2002, 16:48, "Roberto da casa" <
r.ma...@libero.it
> ha scritto:
>
> "Die#" <
as...@asf.it
> ha scritto nel messaggio
> news:212Z177Z101Z19Y...@usenet.libero.it...
> > Buongiorno,
>
> SELECT Tabella1.Impiegato, Tabella1.Livello, Tabella1.Stipendio
> FROM Tabella1
> WHERE (((DCount("*","Tabella1","Livello=" & Chr$(34) & [Livello] &
Chr$(34)
> & " And Stipendio >=" & [Stipendio])) <= 5))
> ORDER BY Tabella1.Livello, Tabella1.Stipendio DESC;
>
> Se invece il campo Livello è di tipo Numerico:
>
> SELECT Tabella1.Impiegato, Tabella1.Livello, Tabella1.Stipendio
> FROM Tabella1
> WHERE (((DCount("*","Tabella1","Livello=" & [Livello] & " And Stipendio
>="
> & [Stipendio]))<=5))
> ORDER BY Tabella1.Livello, Tabella1.Stipendio DESC;
>
> --
> Roberto
Provato. ottimo
grazie a tutti. Diego



title: Blocco records

author: Mavic

text:
Salve.
E' possibile sapere all'apertura di una maschera se il recordset è gia
impegnato in contemporanea da qualche altro utente ?
Grazie.


title: Blocco records

text:
"Mavic" <
assis...@dgeletroinformatica.it
> ha scritto nel messaggio
news:8eBsd.256417$b5.12...@news3.tin.it...

Si utilizzando il BLOCCO RECORDS ed impostando a RECORDS MODIFICATI
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Blocco records

author: Assistenza

text:
ALESSANDRO Baraldi ha scritto:
> Si utilizzando il BLOCCO RECORDS ed impostando a RECORDS MODIFICATI
>
> Ciao
Ciao alex.
In realtà mi serve sapere se un determinato record è bloccato
all'apertura della maschera ed eventualmente da chi.
Ciao.


title: Blocco records

text:
"Assistenza" <
assis...@dgelettroinformatica.it
> ha scritto nel messaggio
news:gOCsd.460907$35.19...@news4.tin.it...

Domanda generica---> risposta generica.
No non è possibile con Access a meno di non realizzarsi una
procedura personalizzata che scrive in una Tabella
RecordEditato(ChiavePrimaria+
UserName), a quel punto pupoi fare quello che vuoi.
Non pensare però che sia banale una gestione di questo tipo se
la vuoi rendere Attiva oltre che passiva(solo Informativa)



title: E' possibile cancellare il codice vba?

text:
ciao a tutti sono nuovo in questo gruppo.
ho un problema con un db di access installato presso un mio cliente,
improvvisamente viene cancellato tutto il codice vba di maschere,
report e moduli, praticamente rimane vuoto.
Secondo voi è possibile una cosa del genere o debbo sospettare che c'è
qualcuno che lo cancella?
grazie


title: E' possibile cancellare il codice vba?

author: IvanDaBologna

text:
ma...@cosmoservice.it
 ha scritto:

sicuramente c'e'  'qualcosa' che lo cancella!
Perchè non imposti una password all'ambiente VBA e stai a vedere se ci
riescono ancora?? ;))
IvanDaBologna
PS
altrimenti puoi impostare tutto il guscio della sicurezza e protezione,
ma è pesante.
Altrimenti crea un MDE e nessuno tocca più nulla!


title: E' possibile cancellare il codice vba?

author: Alessandro Baraldi

text:

Mi pare più una corruzione del DB che una volontaria cancellazione...
ricordo che succedeva se non erro con la versione A2000.
In ogni caso chi distribuisce applicativi fatti con Access non
distribuisce MAI Mdb... ma sempre MDE che non consentono molte
manomissioni.
@Alex


title: Importazione testo

author: Jag

text:
Domanda da ignorante,
qualcuno di voi sa dirmi come faccio ad importare automaticamente il
contenuto di un file HTML in un campo?
Mi spiego: ho un cliente che mi edita il testo in un file HTML e voglio che
Access me lo importi in automatico in un campo.
Grazie


title: Importazione testo

author: Sergio MAZZA

text:
"Jag" <
jag...@freemail.it
> ha scritto nel messaggio
news:8tbsv7$m8mal$1...@ID-39855.news.dfncis.de...

Hai già provato con il Metodo TransferText?
Ciao.


title: Importazione testo

author: Lorenzo Coronati

text:
Scrisse "Jag" <
jag...@freemail.it
>:
>qualcuno di voi sa dirmi come faccio ad importare automaticamente il
>contenuto di un file HTML in un campo?
Open NomeFile For Input As #1
TuaVar = ""
Do While Not EOF(1)
    Input #1, riga
    TuaVar = TuaVar & riga & vbCrLf
Loop
Close #1
Bai
--
Lorenzo Coronati
--
<<Come posso dunque sprotegere il database?
Esiste un crack o qualcosa del genere
che mi faccia accedere ai dati?>>
(Cocco, 17/10/2000)
--


title: [forse OT] altro problema geometrico

author: Tyler Durden

text:
conoscendo i vertici di 2 poligoni è possibile (sempre tramite codice)
capire se uno si trova all'interno dell'altro?
grazie per le eventuali risposte.
___________________________________________
"in fondo anche l'amore è un sovrappensiero..."
m.querc...@sis-ter.it
Togli NOSPAM dall'e-mail per rispondere.


title: [forse OT] altro problema geometrico

author: Sib

text:
"Tyler Durden" <
m.qu...@sis-ter.it
> ha scritto nel messaggio
news:2j4d7t4njckjh70fs...@4ax.com...
> conoscendo i vertici di 2 poligoni è possibile (sempre tramite codice)
> capire se uno si trova all'interno dell'altro?
> grazie per le eventuali risposte.
cut
E' certamente un OT, se risolvi il problema geometrico e' piuttosto
automatico convertire la soluzione in codice.
Devi trovare le condizioni (geometricamente parlando) per cui due policoni
siano l'uno circoscritto dall'altro.
Parti dal presupposto che se conosci i vertici allora conosci tutte le
caratteristiche del poligono.
Sib


title: [forse OT] altro problema geometrico

author: AntoGal

text:
"Tyler Durden" <
m.qu...@sis-ter.it
> scrisse...
> conoscendo i vertici di 2 poligoni č possibile (sempre tramite codice)
> capire se uno si trova all'interno dell'altro?
> grazie per le eventuali risposte.
Forse trovi informazioni utili su NG dove parlano di giochi e grafica 3D.
Questo perchč, per velocizzare il tracciamento di ambienti 3D complessi, č
utile sapere se un oggetto č completamente coperto da un altro, per evitare
di disegnarlo (credo che la tecnica si chiami z-buffer). Se riporti il
concetto in 2D, potrai sapere se un oggetto ne copre un altro sullo stesso
piano (quindi il suo perimetro circoscrive il perimetro dell'altro).
--
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: Collegamento Desktop

author: Paola

text:
Ciao a tutti.
E' possibile fare in modo che con l'installazione di un pacchetto creato con
Developer venga fatto automaticamente un link al desktop del programma
installato.
Ciao e grazie


title: Windows 2000 - XP - Formato carta

author: SavMill

text:
Buongiorno a tutti, scrivo per la prima volta a questo newsgroup per un
problema emerso con i sistemi operativi in oggetto.
Cerco di spiegarmi:
come tutti avrete notato con l'avvento dei predetti sistemi operativi nelle
opzioni della stampante manca il formato "dimensioni personalizzate" che
permettava di impostare un formato di carta diverso da quelli standard, il
problema sorge nel gestire i moduli continui un pò più lunghi del formato A4
e quindi vorrei sapere se qualcuno ha avuto questo problema ed eventualmente
come l'ha risolto.
Grazie
Saverio Milella


title: Windows 2000 - XP - Formato carta

text:
"SavMill" <
saveri...@milella.org
> ha scritto nel messaggio
news:c3s3vi$i0l$1...@lacerta.tiscalinet.it...

Fai una ricerca con google in questo gruppo, l'argomento è già stato
trattato...
Ciao.
--
Sergio MAZZA


title: Windows 2000 - XP - Formato carta

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:jBj8c.119378$O31.5...@news4.tin.it...

Ti ringrazio ma ho trovato solo molti rimandi a PrtDevMode (non e' che sia
proprio agevole)  e pochi esempi frammentari di codice (uso access 2000)
Ciao


title: Windows 2000 - XP - Formato carta

text:
"SavMill" <
saveri...@milella.org
> ha scritto nel messaggio
news:c3snfv$6c4$1...@lacerta.tiscalinet.it...

Io ringrazierei Bill del fatto che l'ha inserita...
Ciao.
--
Sergio MAZZA


title: Windows 2000 - XP - Formato carta

text:
"> > Ti ringrazio ma ho trovato solo molti rimandi a PrtDevMode (non e' che
sia
> > proprio agevole)  e pochi esempi frammentari di codice (uso access 2000)
> >
> > Ciao
> >
>
> Io ringrazierei Bill del fatto che l'ha inserita...
>
> Ciao.
>
> --
> Sergio MAZZA
>
> Ho usato il codice che ti allego e sembra funzionare, ma alla fine mi
rimane il report aperto in modalità struttura
Modulo Imposta pagina
Type str_DEVMODE
    RGB As String * 94
End Type
Type type_DEVMODE
    strNomeDispositivo As String * 16
    intVersioneSpec As Integer
    intVersioneDriver As Integer
    intDimensione As Integer
    intDriverExtra As Integer
    lngCampi As Long
    intOrientamento As Integer
    intDimensFoglio As Integer
    intLunghezzaFoglio As Integer
    intLarghezzaFoglio As Integer
    intScala As Integer
    intCopie As Integer
    intOriginePredef As Integer
    intQualitàStampa As Integer
    intColore As Integer
    intDuplex As Integer
    intRisoluzione As Integer
    intOpzioneTT As Integer
    intFascicola As Integer
    strNomeMaschera As String * 16
    lngTitolo As Long
    lngBit As Long
    lngPW As Long
    lngPH As Long
    lngDFI As Long
    lngDFr As Long
End Type
Sub ImpostaPagina(rptNome As String)
    Dim StringaPer As str_DEVMODE
    Dim DM As type_DEVMODE
    Dim strModalitàExtraPer As String
    Dim rpt As report
    Dim Lungh As Integer
    Dim Largh As Integer
    Dim orient As String
    DoCmd.OpenReport rptNome, acDesign
    Set rpt = Reports(rptNome)
    Lungh = xx
    Largh = xx
    orient = 1
           strModalitàExtraPer = rpt.PrtDevMode
           StringaPer.RGB = strModalitàExtraPer
           LSet DM = StringaPer
            DM.lngCampi = DM.lngCampi Or DM.intDimensFoglio Or
DM.intLunghezzaFoglio _
                Or DM.intLarghezzaFoglio
            DM.intDimensFoglio = 256
            DM.intOrientamento = orient
            DM.intLunghezzaFoglio = Lungh * 256
            DM.intLarghezzaFoglio = Largh * 256
            LSet StringaPer = DM
            Mid(strModalitàExtraPer, 1, 94) = StringaPer.RGB
            rpt.PrtDevMode = strModalitàExtraPer
End Sub
Dalla maschera
Private Sub fattura_Click()
On Error GoTo Err_fattura_Click
    Dim stDocName As String
    ImpostaPagina ("fattura1")
    stDocName = "fattura1"
    DoCmd.OpenReport stDocName, acPreview
Exit_fattura_Click:
    Exit Sub
Err_fattura_Click:
    MsgBox err.Description
    Resume Exit_fattura_Click
End Sub
Ciao
Saverio Milella


title: Windows 2000 - XP - Formato carta

text:
"SavMill" <
saveri...@milella.org
> ha scritto nel messaggio
news:c40kiq$57f$1...@lacerta.tiscalinet.it...

Inserisci: DoCmd.Close acReport, rptNome, acSaveYes prima dell'End Sub della
Sub ImpostaPagina...
Ciao.
--
Sergio MAZZA


title: Windows 2000 - XP - Formato carta

text:
>
>
> Inserisci: DoCmd.Close acReport, rptNome, acSaveYes prima dell'End Sub
della
> Sub ImpostaPagina...
>
> Ciao.
>
> --
> Sergio MAZZA
>
Funge alla perfezione, ho comunque inserito anche un "docmd.echo false" per
evitare il breve passaggio del report in modalità struttura prima
dell'anteprima di stampa.
Ciao e grazie
Saverio Milella
>


title: Windows 2000 - XP - Formato carta

text:
"SavMill" <
saveri...@milella.org
> ha scritto nel messaggio
news:c425nq$vfr$1...@lacerta.tiscalinet.it...

Meglio l'utilizzo di: Application.Echo, il DoCmd, dice l'help, è rimasto per
compatibilità...
Ciao.
--
Sergio MAZZA


title: Requery non funziona!

author: Giacomo Ciani

text:
Salve a tutti,
in una maschera ho una csella di riepilogo e una combo box basata su una
query che prende un parametro di confronto da un campo della maschera
stessa; sia quando ci si sposta di record (il valore del campo di confronto
può cambiare) che quando si aggiunge un nuovo record (deve comparire nella
casella di riepilogo) ho necessità di eseguire un requery su i due controlli
(casella di riepilogo e combo box): ho quindi provato a insreire le stringhe
[nomecasellariepilogo].requery
[nomeccombobox].requery
Sia nell'evento Current che sul'evento AfterUpdate della maschera (form),
sperando che le eseguisse ogni volta che mi sposto su un record diverso, ma
non funziona!
Il bello è che se invece associo le stesse istruzioni all'evento click di un
pulsante e lo premo tutte le volte che cambio record, la cosa funziona
perfettamente...
DOVE SBAGLIO?!
Grazie in anticipo
Giacomo


title: Requery non funziona!

author: Sib dall'ufficio

text:
"Giacomo Ciani" <
giacom...@inwind.it
> ha scritto nel messaggio

In effetti non sbagli.
Il problema sta nel fatto che talvolta l'aggiornamento della casella con il
requery "arriva prima" dell'aggiornamento del filtro che vuoi usare.
Per esempio, se usi l'evento DopoAggiornamento prova a usare l'evento
SuUscita.
Sib


title: [?] Errore durante immissione dati, aiuto.. vi prego...

author: -> Dave <-

text:
Ciao a tutti !!
Sto impazzendo... questa é veramente la volta che butto il pc...
Dunque.. ho creato una maschera collegata a una tabella "clienti". Dentro
questa maschera ho inserito una sottomaschera collegata a un altra maschera
"installatori".
La sottomaschera "installatori" é in formato di visualizzazione a colonne,
cosi' da poter inserire dati.
Le due tabelle collegate alle relative maschere , sono relazionate tra di
loro tramite un campo indice_impianto.
Ora.. quando provo la mia applicazione, inserisco un dato dentro uno dei
campi "clienti" e tutto va bene...$
Ma se provo a introdurre un dato in uno dei campi "installatori"... bum...
appare :    "You tried to assign the Null value to a variable that isn't a
Variant data type"..
GRRRRRR !!!
Le ho provate tutte, i campi NON sono indicizzati, NON sono richiesti, ho
impostato "Permetti campi di lunghezza zero".
NIENTE... non accetta i dati.... grrr
Inoltre, l'help mi consiglia di dichiarare la variabile con DIM... ma quale
variabile ????? non ho inserito nemmeno una linea di codice, ho solo
collegato le tabelle tramite la finestra "Relazioni" e tramite le opzioni
della stessa.
Qualcuno mi sa dire dov'e' l'inghippo ? perché io ci sto sclerando un casino
e non trovo nemmeno un esempio sul manuale (ci sono solo esempi con
sottomaschere del tipo tabellare).
GRAZIE MILLE IN ANTICIPO !!
Dave
--
"The truth is out there"


author: SABINA CAMERIN

text:
"-> Dave <-" <da...@hate.spam> ha scritto nel messaggio
news:8qd6m8$58b$1...@bw107zhb.bluewin.ch...

Tra tutte le informazioni che ci hai dato manca la più importante! Com'è la
relazione che hai impostato tra le due tabelle??? E' forse una relazione
uno-a-uno? Hai attivato integrità referenziali?
Probabilmente dipende tutto dalla relazione.
Fammi sapere.
Ciao.


text:
SABINA CAMERIN <
sabina.cameri...@tin.it
> wrote in message
8qdsil$6kk$1...@nslave1.tin.it...
>
> "-> Dave <-" <da...@hate.spam> ha scritto nel messaggio
> news:8qd6m8$58b$1...@bw107zhb.bluewin.ch...
> > Ciao a tutti !!
> >
> > Dunque.. ho creato una maschera collegata a una tabella "clienti".
Dentro
> > questa maschera ho inserito una sottomaschera collegata a un altra
> maschera
> > "installatori".
> >
[CUT]
> > Ma se provo a introdurre un dato in uno dei campi "installatori"...
bum...
> > appare :    "You tried to assign the Null value to a variable that isn't
a
> > Variant data type"..
> >
[CUT]
> >
> Tra tutte le informazioni che ci hai dato manca la più importante! Com'è
la
> relazione che hai impostato tra le due tabelle??? E' forse una relazione
> uno-a-uno? Hai attivato integrità referenziali?
> Probabilmente dipende tutto dalla relazione.
> Fammi sapere.
> Ciao.
Ciao Sabina, grazie della risposta...
Dunque.. le 2 tabelle sono relazionate in questo modo :
Tabella clienti contiene un ID_Installatore di tipo numerico
Tabella installatore contiene un ID_Installatore di tipo contatore
La relazione é uno-a-molti (un installatore, molti clienti)
Come appunto dicevo.. il problema é quando mi trovo la scheda vuota (una
maschera) dove devo inserire i dati del cliente e dell'installatore, quando
provo a scrivere il nome (dell'install.) appare l'errore.
CIAO E GRAZIE !!!!!!
Dave


author: JBad

text:
In article <8qevgd$jt2$
1...@bw107zhb.bluewin.ch
>, da...@hate.spam says...
> Dunque.. le 2 tabelle sono relazionate in questo modo :
>
> Tabella clienti contiene un ID_Installatore di tipo numerico
> Tabella installatore contiene un ID_Installatore di tipo contatore
>
> La relazione é uno-a-molti (un installatore, molti clienti)
>
> Come appunto dicevo.. il problema é quando mi trovo la scheda vuota (una
> maschera) dove devo inserire i dati del cliente e dell'installatore, quando
> provo a scrivere il nome (dell'install.) appare l'errore.
>
> CIAO E GRAZIE !!!!!!
> Dave
>
Prova a salvare il record della maschera principale (Installatore) quando
entri nella sottomaschera.
Ciao
--
JBad


author: Roberto dal portatile

text:
[CUT]

Scusate l'intrusione.
Con l'ultimo messaggio Dave dichiara che la tabella sul lato uno della
relazione è la tabella Installatori e che la tabella Clienti è la tabella
del lato molti della relazione basata sui campi ID_Installatore.
Se questo è vero, la tabella origine record della maschera principale DEVE
essere quella sul lato uno (ovvero Installatori) e la tabella origine record
della sottomaschera DEVE essere quella sul lato molti (ovvero Clienti).
Sempre Dave, nel suo primo messaggio dice che vuole fare il contrario:
ovvero la tabella Clienti come origine record della maschera principale e la
tabella Installatori come origine record della sottomaschera. Per me questo
è un non senso e pertanto è irrealizzabile (e giustamente Access dà errore).
Non vorrei che Dave nella sua maschera principale abbia bisogno NON di una
sottomaschera ma di una casella combinata tramite la quale scegliere un
installatore.
Esiste un'altra possibilità: il tipo di relazione tra le due tabelle non è
uno-a-molti ma molti-a-molti (un installatore serve più clienti e un cliente
può essere servito da più installatori); se questo fosse vero è evidente che
la relazione tra le due tabelle NON può essere effettuata direttamente
tramite un campo, ma indirettamente tramite una terza tabella.
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: archivio messaggi

author: enzo

text:
non riesco a collegarmi con l'archivio messaggi del sitocomune
mi dice pagina non disponibile
e' cambiato qualcosa ????


title: istruzione non valida all'esterno del blocco type

author: Amodio Piscitelli

text:
salve,

sto cercando di filtrare i dati di una maschera con valori che si trovano all'interno di una tabella.
ho scritto la seguente istruzione ma mi restituisce l'errore in oggetto, non so come andare avanti.

Private Sub Comando249_Click()

rs As Recordset
sql As String
dicmapi As String

dicmapi = "form1"

sql = "SELECT Form1.[Codice Fiscale] From Form1 GROUP BY Form1.[Codice Fiscale];"
Set rs = CurrentDb.OpenRecordset(sql, dbOpenDynaset)

Me.Filter = "[codice fiscale] = rs![codice fiscale]"
Me.FilterOn = True

End Sub


author: Karl Donaubauer

text:
Salve,

Amodio Piscitelli:
> ...

Me.Filter = "[codice fiscale] = '" & rs![codice fiscale] & "'"

> Me.FilterOn = True
>
> End Sub

--
Ciao
Karl
*********
Access Info:
https://AccessForever.org

Access News:
https://youtu.be/cs_mZvaKYeY

Access DevCon:
https://www.donkarl.com/devcon

Access FAQ:
https://www.donkarl.com/it


text:

grazie per la correzione ma l'errore è segnalato su questo gruppo

rs As Recordset
sql As String
dicmapi As String

Saluti


text:
Salve,

> Amodio Piscitelli:
 > ...l'errore è segnalato su questo gruppo
 >
 > rs As Recordset
 > ...

https://www.donkarl.com/it?FAQ7.11

o
https://www.donkarl.com/it?FAQ7.1




text:

Grazie Karl,

non ho risolto l'errore ma sono riuscito ad ottenere il risultato che volevo in questo modo:

Dim source As String

source = "SELECT prev_class.* From prev_class WHERE (((prev_class.[codice fiscale]) In (select [codice fiscale] from form1)));"
Me.RecordSource = source

Saluti


title: da Access a Word Segnalibro e Campo Modulo

author: Renato

text:
saluti a tutti.
di tanto in tanto mi dedico ad access e devo sempre attingere dal vostro
aiuto.

da qualche giorno smanetto per creare modelli di Word da aprire da Access
avendo parecchi campi da inviare a Word
volevo agevolare il lavoro automatizzando le operazioni.

da Access infatti ho creato una tabella dove con una serie di cicli ho
inserito
i nomi dei  campi delle diverse tabelle del Db che mi servono,
inserendo un prefisso diverso per ogni tabella.
cosi mi trovo in una tabella tutti i nomi dei segnalibro che potrebbero
servirmi.

Da una maschera,  invio in un file di Word
il testo del record selezionato con la seguente riga:
wordApp.Selection.TypeText StrSegnalibro ' ...... (StrSegnalibro = la
stringa del mio segnalibro)
ed è ok funziona

il segnalibro con il nome del record selezionato, con la seguente riga:
wordApp.ActiveDocument.Bookmarks.Add StrSegnalibro
ed è ok funziona

un campo modulo con la seguente riga:
wordApp.Selection.FormFields.Add wordApp.Selection.Range,
type:=wdFieldFormTextInput

ma non riesco ad ottenere ciò che voglio, perché quando si aggiunge un campo
modulo in word
questo inserisce in automatico un segnalibro che nomina testo1, testo2
testo3 ecc ecc
inoltre non sò come inserire una stringa nel testo predefinito del campo
modulo

le domanda sono:
come inserire nel testo predefinito del campo modulo una stringa?
come evitare di far inserire i segnalibri in automatico(testo1, testo2
testo3 ecc ecc)

se qualcuno di voi ci ha già smanettato mi aiuti per favore
grazie a tutti!


author: Alessandro Cara

text:

Non ho ben compreso quello che fai e perche' lo fai.
Io parto dal presupposto che una volta definiti i segnalibro all'interno
del file word questi siano "statici" e non necessitano che di
sostituzione con un valore.
Il tutto lo realizzo semplicemente cosi':
Detto oDoc il documento word
Dim oBook
........
set oBook = oDoc.bookmarks("nomesegnalibro")
oBook.Range.Text = "valoresegnalibro"

Ovviamente anche il sottoscritto ha una tabella/collezione con le
associazioni segnalibro<->sorgente valore
--

ac (x=y-1)


text:
"Alessandro Cara" <
alessan...@ay-1anetwork.it
> ha scritto nel messaggio
news:o0uYq.132789$GZ3.1...@tornado.fastwebnet.it...

bene mi spiego meglio.
la mia intenzione era di creare una procedura automatizzata
per la creazione di modelli di testo da usare con il db creato.

per cui si apriva un file di Word e contemporaneamente la maschera
contenente tutti i segnalibro utilizzabili
si crive il testo in word quando serve il segnalibro lo si invia dalla
maschera di access al punto giusto e poi si salva il file in modello di
documento in una cartella specifica che verrà letta da access per l'invio
dati.

solo questo mi piacerebe fare
grazie per l'aiuto


author: Marco Pizzamiglio

text:
Renato ha scritto:

1. apri Word, abilita il registratore di macro, esegui le operazioni che
ti interessano (inserisci il nuovo segnalibro, cambiagli il nome e il
testo predefinito)

2. interrompi la registrazione della macro e vai a vedere il codice
generato (Strumenti->Macro->Visual basic editor), troverai i comandi VBA
corrispondenti alle operazioni che hai fatto con mouse e tastiera.
Saranno da aggiustare ma ti daranno un valido aiuto su come procedere.

Nel tuo caso il nome dei nuovi campi modulo appena immessi sarà sempre
"Testo1" visto che li rinomini man mano che vengono inseriti, quindi puoi
usare la stringa fissa "Testo1" per indicizzare l'insieme FormFields e
modificare le proprietà dei membri.
Sarà una cosa simile:

wordApp.Selection.FormFields("testo1").TextInput.EditType wdRegularText,
"Testo predefinito"

wordApp.Selection.FormFields("testo1").Name = "Nome_segnalibro"

Ciao.
-Marco-

--

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


text:
Renato ha scritto:




text:
"Marco Pizzamiglio" <
marco.pi...@gmail.com
> ha scritto nel messaggio
news:jgucu1$t3h$1...@news.newsland.it...

Grazie appena posso ci smanetto un pò
anche se ad occhio mi sembra proprio quello che cercavo io

grazie dinuovo
Renato


text:

'-------------------------------------------risp
strano comportamento non riesco a capirlo
la riga di comando
wordApp.Selection.FormFields("testo1").Name = "Nome_segnalibro"
o la riga
wordApp.ActiveDocument.Bookmarks.Add "Nome_segnalibro"
se scritte come sopra li accetta, se al posto di: "Nome_segnalibro" metto
una variabile stringa tipo, StrSegnalibro
o nomi di campo tipo Me!Miotxt non funziona
o mi da errore, tipo nel primo caso: Errore  metodo 'Name' dell oggetto
'FormField' non riuscito
dove sbaglio o quale potrebbe essere il problema?

grazie


text:
Renato ha scritto:

[cut]

> strano comportamento non riesco a capirlo
> la riga di comando
> wordApp.Selection.FormFields("testo1").Name = "Nome_segnalibro"
> o la riga
> wordApp.ActiveDocument.Bookmarks.Add "Nome_segnalibro"
> se scritte come sopra li accetta, se al posto di: "Nome_segnalibro" metto
> una variabile stringa tipo, StrSegnalibro
> o nomi di campo tipo Me!Miotxt non funziona
> o mi da errore, tipo nel primo caso: Errore  metodo 'Name' dell oggetto
> 'FormField' non riuscito
> dove sbaglio o quale potrebbe essere il problema?
> grazie

Forse usi dei caratteri non consentiti. Riporto una riga dell'help di word:
"I nomi dei segnalibri devono iniziare con una lettera, possono contenere
dei numeri ma non spazi. Per separare tra loro le parole è possibile
utilizzare il carattere sottolineatura, ad esempio 'Primo_titolo'"
Quindi lettere, numeri e underscore. Niente spazi, punti, trattini, ecc...



text:
"Marco Pizzamiglio" <
marco.pi...@gmail.com
> ha scritto nel messaggio
news:jhibut$6fe$1...@news.newsland.it...

No no.... ho imparato a stare attento ai caratteri ..
poi ho risolto creando una nuova maschera
e copiando pari pari tutto il codice senza cambiare nulla  funziona ...
veramente strano ho due maschere uguali stesso codice stesso file una
funziona ed un'altra no..
misteri di access.....
veramente strano

grazie Marco
Ciao
Renato


title: Query unione

author: Debora

text:
Ho creato una query di unione che mi serve per
fare delle ricerche di dati contenuti in 2 tbl simili.
Il risultato della ricerca viene visualizzata in una casella
di riepilogo.
Il problema č che nella lista dei risultati vorrei che
i dati delle due tabelle fossero in qualke maniera
differenziati, (ad esempio un colore diverso dei caratteri
o qulcsaltro).
E' fattibile?
Debora.


title: Query unione

author: Roberto da casa

text:
"Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
news:spyn9.51621$e31.1...@twister2.libero.it...

Se per la visualizzazione dei risultati usi una casella di riepilogo, non
hai alcuna possibilitą di intervenire sul colore del suo contenuto con una
formattazione condizionale.
Perņ potresti intervenire inserendo nelle due SELECT della query unione un
campo calcolato di nome Asterisco: in una SELECT scriverai:
"*" As Asterisco
e nell'altra invece scriverai:
Null As Asterisco
Se nella tua casella di riepilogo visualizzi anche il campo calcolato
Asterisco, le righe provenienti dalla prima SELECT saranno contrassegnati
con un asterisco.
In alternativa potresti visualizzare i risultati della ricerca, invece che
con una casella di riepilogo, con una maschera con visualizzazione a
Maschere continue: in questo caso potresti cambiare i colori usando la
formattazione condizionale (se usi Access 2000 o Access XP) o effettuare la
formattazione condizionale usando le tecniche che trovi a proposito sul Sito
Comune (link qui sotto): se non ricordo male nella Sezione General dovresti
trovare almeno 4 FAQ che parlano di questo.
> Debora.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Query unione

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:1Syn9.51759$e31.1...@twister2.libero.it...
>
> "Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
> Perň potresti intervenire inserendo nelle due SELECT della query unione un
> campo calcolato di nome Asterisco: in una SELECT scriverai:
>
> "*" As Asterisco
>
> e nell'altra invece scriverai:
>
> Null As Asterisco
>
> Se nella tua casella di riepilogo visualizzi anche il campo calcolato
> Asterisco, le righe provenienti dalla prima SELECT saranno contrassegnati
> con un asterisco.
>
> In alternativa potresti visualizzare i risultati della ricerca, invece che
> con una casella di riepilogo, con una maschera con visualizzazione a
> Maschere continue: in questo caso potresti cambiare i colori usando la
> formattazione condizionale (se usi Access 2000 o Access XP) o effettuare
la
> formattazione condizionale usando le tecniche che trovi a proposito sul
Sito
> Comune (link qui sotto): se non ricordo male nella Sezione General
dovresti
> trovare almeno 4 FAQ che parlano di questo.
>
> > Debora.
Quella dell'asterico mi sembra la soluzione ottimale al
caso mio, quindi devo fare cosi?
SELECT Anagrafica.CodiceDitta, Anagrafica.DataIns, _
Anagrafica.Cognome, Anagrafica.Nome, ect. "*" AS Asterisco
FROM Anagrafica;
UNION SELECT  AnagraficaAltriInt.CodiceDitta, AnagraficaAltriInt.DataIns, _
AnagraficaAltriInt.Cognome, AnagraficaAltriInt.Nome,ect, Null As Asterisco
FROM AnagraficaAltriInt;
Approffitto per farti un'altra domanda inerente la qry unione:
Se 1 delle 2 tabelle ha qualche campo in piů si puň fare
ugualmente l'unione?
Debora.


title: Query unione

text:
"Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
news:fdzn9.51869$e31.1...@twister2.libero.it...
[CUT]
>
> Quella dell'asterico mi sembra la soluzione ottimale al
> caso mio, quindi devo fare cosi?
>
> SELECT Anagrafica.CodiceDitta, Anagrafica.DataIns, _
> Anagrafica.Cognome, Anagrafica.Nome, ect. "*" AS Asterisco
> FROM Anagrafica;
> UNION SELECT  AnagraficaAltriInt.CodiceDitta, AnagraficaAltriInt.DataIns,
_
> AnagraficaAltriInt.Cognome, AnagraficaAltriInt.Nome,ect, Null As Asterisco
> FROM AnagraficaAltriInt;
>
OK, ma devi togliere il punto e virgola dopo FROM Anagrafica
> Approffitto per farti un'altra domanda inerente la qry unione:
> Se 1 delle 2 tabelle ha qualche campo in più si può fare
> ugualmente l'unione?
Non è importante quanti campi hanno le tabelle; l'importante è che le SELECT
abbiano lo stesso numero di campi; se necessario puoi aumentare il numero
dei campi della SELECT che ne ha di meno con campi calcolati di valore Null
o zero (a seconda del tipo).
Ad esempio:
SELECT CodiceDitta, DataIns, Cognome, Nome
FROM Anagrafica
UNION SELECT  CodiceDitta, DataIns, Cognome, Null As Nome
FROM AnagraficaAltriInt;



title: Query unione

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:Xwzn9.50839$Eu.11...@twister1.libero.it...
>
> > Approffitto per farti un'altra domanda inerente la qry unione:
> > Se 1 delle 2 tabelle ha qualche campo in più si può fare
> > ugualmente l'unione?
>
> Non è importante quanti campi hanno le tabelle; l'importante è che le
SELECT
> abbiano lo stesso numero di campi; se necessario puoi aumentare il numero
> dei campi della SELECT che ne ha di meno con campi calcolati di valore
Null
> o zero (a seconda del tipo).
> Ad esempio:
>
> SELECT CodiceDitta, DataIns, Cognome, Nome
> FROM Anagrafica
> UNION SELECT  CodiceDitta, DataIns, Cognome, Null As Nome
> FROM AnagraficaAltriInt;
Ho provato a fare l'unione come mi hai detto, però è sortoun problema, la
qry
era legata a 3 combobox presenti un una msk .
Ora mi ritrovo con questa sql (che funziona)
SELECT [Proprieta].[IDProprieta], [Proprieta].[CodiceDitta],
[Proprieta].[ComuneCensuario], [Proprieta].[Foglio], [Proprieta].[Allegato],
[Proprieta].[Mappale], [Proprieta].[Subal], NULL AS DEFINITIVO,NULL AS LOTTO
FROM Proprieta
UNION SELECT ProprietaPR.IDProprieta,  ProprietaPR.CodiceDitta,
ProprietaPR.ComuneCensuario, ProprietaPR.Foglio, ProprietaPR.Allegato,
ProprietaPR.Mappale, ProprietaPR.Subal, ProprietaPR.definitivo,
ProprietaPR.Lotto
FROM ProprietaPR
Domanda come faccio a far pescare dalle combobox il risultato
dell'unione? prima facevo così:
WHERE ((([Proprieta].[ComuneCensuario]) Like
nz([forms]![cercafoglio]![casellacombinata0],"*")) And
(([Proprieta].[Foglio]) Like
nz([forms]![cercafoglio]![casellacombinata2],"*")) And
(([Proprieta].[Mappale]) Like
nz([forms]![cercafoglio]![casellacombinata4],"*")))
ora come devo fare?
Debora


title: Query unione

text:
"Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
news:FkAn9.51031$Eu.11...@twister1.libero.it...

Prova così:
SELECT IDProprieta, CodiceDitta, ComuneCensuario, Foglio, Allegato, Mappale,
Subal, NULL AS DEFINITIVO,NULL AS LOTTO
FROM Proprieta
WHERE (((ComuneCensuario) Like
nz([forms]![cercafoglio]![casellacombinata0],"*")) And ((Foglio) Like
nz([forms]![cercafoglio]![casellacombinata2],"*")) And ((Mappale) Like
nz([forms]![cercafoglio]![casellacombinata4],"*")))
UNION
SELECT IDProprieta,  CodiceDitta, ComuneCensuario, Foglio, Allegato,
Mappale, Subal, definitivo, Lotto
FROM ProprietaPR
WHERE (((ComuneCensuario) Like
nz([forms]![cercafoglio]![casellacombinata0],"*")) And ((Foglio) Like
nz([forms]![cercafoglio]![casellacombinata2],"*")) And ((Mappale) Like
nz([forms]![cercafoglio]![casellacombinata4],"*")));



author: Luca

text:
...leggi un record e lo salvi in *.txt nella directory "Pippo"...?come?
cioč:
il contenuto del record con
id=1
num-ordine=3201 ( [id]+3200 )
descrizione=Pluto
quantitā=5
Riferimento=500/2001
ecc.....
deve essere salvato nella directory c:/pippo/500-2001
come file con nome "of3201.txt"
come posso fare?
PS Sono mooolto neofita sia su Access che su VB6
--
N.B. Se non ti dispiace, rispondimi anche con una mail
        (togli lo SMAMMA dall'indirizzo)
^___^ molte onorevoli grazie
Ciao Luca :-)


author: AntoGal

text:
"Luca" <cfsy...@tinSMAMMA.it> ha scritto...
> ...leggi un record e lo salvi in *.txt nella directory "Pippo"...?come?
> cioè:
> il contenuto del record con
> id=1
> num-ordine=3201 ( [id]+3200 )
> descrizione=Pluto
> quantità=5
> Riferimento=500/2001
> ecc.....
> deve essere salvato nella directory c:/pippo/500-2001
> come file con nome "of3201.txt"
> come posso fare?
Giusto un esempio, controlla comunque la guida in linea, dove ne troverai
altri.
(controlla la sintassi, sto scrivendo direttamente da O.Express)
Private Sub StampaRecordSuFile()
 Dim NomeFile As String
 NomeFile = "c:\pippo\500-2001\of3201.txt"
 On Error GoTo ErrorCreaFile:
 Dim FileNum As Integer
 FileNum = FreeFile
 Open NomeFile For Output As #FileNum
  Dim rst As Recordset
  Set rst = CurrentDb.OpenRecordset ("TuaQueryoIstruzioneSQL",
dbOpenSnapshot)
  With rst
   If .EOF Then Exit Function
   .MoveFirst
   Do Until .EOF
    Print #FileNum, Nz(!Campo1)
    Print #FileNum, Nz(!Campo2)
    ' ecc.
    .MoveNext
   Loop
   .Close
  End With
 Set rst = Nothing
 Close #FileNum
 Exit Sub
ErrorCreaFile:
 Close #FileNum
 MsgBox "Impossibile creare il file " & NomeFile, vbCritical
End Sub
--
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: ...leggi un record e lo salvi in *.txt nella directory "Pippo"...?come?

text:

...gulp....mi sembra Arabo....
provo a strappolarci un pò sopra, al massimo ti torno a rompere un poco eh?
;-) Grazie 1.000
ciao Luca


title: Problema di Append di una tabledef allegata senza field (con un po' di teoria)

author: Antonio Biso

text:
Questo thread riguarda un argomento diverso, ma risolverebbe il problema del
mio precedente thread titolato Riallegare da codice tabella con nome locale
diverso da quello remoto
Solo che non mi riesce....
Allora, io vorrei, da codice, creare una nuova tabledef, dargli un nome e
dirgli che deve essere allegata, e quindi dargli il path del db remoto e il
nome della tabella a cui deve collegarsi.
Tutto questo si può fare con un unico comando e cioè
set tbl = currentdb.createtabledef(NomeLocale, , NomeRemoto, PathDBRemoto)
ma si può anche settare le proprietà SourceTableName e Connect in un secondo
tempo facendo così
set tbl = currentdb.createtabledef(NomeLocale)
tbl.SourceTableName = NomeRemoto
tbl.connect = PathDBRemoto
Fino a qui non fa una piega, l'help è chiarissimo.
A questo punto però si tratta di andare ad accodare all'insieme tabledefs la
tabella appena creata.
La sintassi sarebbe quindi
currentdb.tabledefs.append tbl
Qui cominciano i problemi in quanto mi da un errore per il fatto che non ho
creato alcun oggetto field per la tabella in questione. In effetti l'help su
CreateTableDef recita:
"Inoltre, non è possibile accodare un oggetto TableDef all'insieme TableDefs
fino a quando non si definisce almeno un oggetto Field per l'oggetto
TableDef."
Ma la maiala deh!!!
Ma se io mi sto connettendo ad una particolare tabella già esistente in un
altro db, perchè cavolo devo dargli i campi?!?! Se li prenderà dalla tabella
remota no?
D'altro canto, smucinando un po' l'help mi trovo questo esempio su
SourceTableName
Sub ConnettiOrigine()
    Dim dbs As Database, tdf As TableDef
    ' Restituisce il riferimento al database corrente.
    Set dbs = CurrentDb
    ' Crea un nuovo oggetto TableDef.
    Set tdf = dbs.CreateTableDef("AutorePDX")
    ' Aggiunge l'autore della tabella Paradox al database C:\PDX\Editori.
    tdf.Connect = "Paradox 4.X;Database=C:\PDX\Editori"
    tdf.SourceTableName = "Autore"
    dbs.TableDefs.Append tdf
    Set dbs = Nothing
End Sub
Questo esempio è preciso quello che voglio fare io, l'unica differenza (e mi
pare strano che sia questa la discriminante) è che sto allegando una tabella
Paradox piuttosto che una access.
Commenti, grazie...
Antonio


text:
Antonio Biso ha scritto:
> ...
>set tbl = currentdb.createtabledef(NomeLocale, , NomeRemoto, PathDBRemoto)
>
> ma si può anche settare le proprietà SourceTableName e Connect in un
> secondo tempo facendo così
>
> set tbl = currentdb.createtabledef(NomeLocale)
> tbl.SourceTableName = NomeRemoto
> tbl.connect = PathDBRemoto
> ...
> currentdb.tabledefs.append tbl
>
> Qui cominciano i problemi in quanto mi da un errore per il fatto che
> non ho creato alcun oggetto field per la tabella in questione...
Se usi il secondo metodo debbe funzionare.
Solo tiene in mente che usi tutta l'espressione Connect. Vuol dire:
tbl.Connect = ";DATABASE=PathDBRemoto"
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


text:
Antonio Biso ha scritto:
> ...
>set tbl = currentdb.createtabledef(NomeLocale, , NomeRemoto, PathDBRemoto)
>
> ma si può anche settare le proprietà SourceTableName e Connect in un
> secondo tempo facendo così
>
> set tbl = currentdb.createtabledef(NomeLocale)
> tbl.SourceTableName = NomeRemoto
> tbl.connect = PathDBRemoto
> ...
> currentdb.tabledefs.append tbl
>
> Qui cominciano i problemi in quanto mi da un errore per il fatto che
> non ho creato alcun oggetto field per la tabella in questione...
Se usi il secondo metodo debbe funzionare.
Solo tieni in mente di usare tutta l'espressione Connect:



title: problema stranissimo con debug

author: kika

text:
ciao a tutti
da due giorni sto combattendo con un problema assurdo con il debug
se io fermo il codice con anche soltanto un punto di interruzione il codice
fa quello che voglio che faccia
se mando il codice e non lo fermo non lo fa piu'
ho spostato il codice in eventi diversi, in sub, in funzioni, in ogni dove
ma il risultato e' sempre lo stesso
a qualcuno e' mai successo qualcosa del genere?????
io non ho parole
grazie e buon lavoro
--------------------------------
Inviato via
http://usenet.libero.it


title: problema stranissimo con debug

author: gianluca

text:
> se mando il codice e non lo fermo non lo fa piu'
prova a mettere un
DoEvents
prima dell'istruzione che interrompevi


title: problema stranissimo con debug

author: Liones

text:
"kika" <
ast...@libero.it
> ha scritto nel messaggio
news:212Z171Z11Z22Y1...@usenet.libero.it...
> ciao a tutti
> da due giorni sto combattendo con un problema assurdo con il debug
> se io fermo il codice con anche soltanto un punto di interruzione il
codice
> fa quello che voglio che faccia
> se mando il codice e non lo fermo non lo fa piu'
> ho spostato il codice in eventi diversi, in sub, in funzioni, in ogni dove
> ma il risultato e' sempre lo stesso
> a qualcuno e' mai successo qualcosa del genere?????
> io non ho parole
quale access ?
se axp hai il primo e secondo  sp ?


title: problema stranissimo con debug

text:
e' access xp senza sp!! ora provo ad applicarli
potrebbe essere quello il problema???
grazie
quale access ?

se axp hai il primo e secondo sp ?
> > da due giorni sto combattendo con un problema assurdo con il debug
> > se io fermo il codice con anche soltanto un punto di interruzione il
> codice
> > fa quello che voglio che faccia
> > se mando il codice e non lo fermo non lo fa piu'
> > ho spostato il codice in eventi diversi, in sub, in funzioni, in ogni
dove
> > ma il risultato e' sempre lo stesso
> > a qualcuno e' mai successo qualcosa del genere?????
> > io non ho parole
--------------------------------
Inviato via
http://usenet.libero.it


title: problema stranissimo con debug

text:
> > > da due giorni sto combattendo con un problema assurdo con il debug
> > > se io fermo il codice con anche soltanto un punto di interruzione il
> > codice
> > > fa quello che voglio che faccia
> > > se mando il codice e non lo fermo non lo fa piu'
> > > ho spostato il codice in eventi diversi, in sub, in funzioni, in ogni
> dove
> > > ma il risultato e' sempre lo stesso
> > > a qualcuno e' mai successo qualcosa del genere?????
> > > io non ho parole
> quale access ?
>
> se axp hai il primo e secondo sp ?
> e' access xp senza sp!! ora provo ad applicarli
> potrebbe essere quello il problema???
il problema è (mooooolto probabilmente) axp (prova a far girare il tutto su
a2000), spera nei sp
ciao


title: problema stranissimo con debug

text:
> > e' access xp senza sp!!
aaaaaagggggggggggggghhhhhhhhhhhhhhhh
nooooooooOOOOOO
potrebbe esplodere il pc
ciao
ps
cerca di quotare (scivi dopo parte del testo precedente)


title: MACRO

author: totobi

text:
Non ho mai realizzato una macro, adesso ne avrei bisogno per
aggiornare il campo CONS che mi serve per effettuare la stampa fattura
immediata.
Ho creato una query che contiene solo il record con il campo CONS a 0.
Lancio la stampa subito dopo l'inserimento fattura e il tutto
funzione.
Adesso in uscita dalla stampa volevo aggiornare il campo CONS
portandolo a 1 ho provato a creare una Macro ma non va.
Spero che qualcuno vogla aiutarmi.
Grazie Toto


title: MACRO

author: esseAemme

text:

mmm
innanzitutto, il campo cons è un campo in una tabella, quindi per
aggiornarlo hai bisogno di una query di aggiornamento , dove il campo
CONS diventa 1.
Quindi, quando fai la stampa la fai tramite macro? Se sì, prima di
lanciare la stampa, puoi lanciare la query di update:
Private Print_click()
dim aggiornaCons as string
aggiornaCons = "nome_query_che_aggiorna_campo_cons_da_0_a_1"
docmd.openquery aggiornacons, acNormal, acquery
esegui routine stampa
Ciao,
Samantha
3824


title: MACRO

text:

Samantha ti ringrazio per avermi risposto, ma io sono proprio alle
prime armi allora ti spego cosa ho fatto
Nella maschera di inserimento fattura, accetto tutti i dati che sono
contenuti in un solo record
In questo record è presente il campo CONS che ha come valore
predefinito 0, mentre tutti gli altri record già stampati hanno valore
1 (li ho chiaramente aggiornati io a mano da tabella).
Tramite un tasto di comado apro il report sulla query che mi sono
creato che seleziona solo i records con 0 in CONS
e stampo la fattura.
A fine stampa sulla maschera del report nell'evento uscita volevo
immettere la Macro che mi aggiornava il campo CONS in modo da non
trovarlo più nella query di selezione al prossimo inserimento fattura.
Spero di essere stato abbastanza chiaro
Ciao aspetto con ansia nuove tue
Grazie Toto


title: Triggers e stored procedure

author: N|N

text:
Come è possibile scrivere triggers e stored procedure in Access??
Se provo a scrivere una stored in sql view la prima cosa che mi dice è che
non può creare la tabella.....possibile che ogni volta che scrivo create
access pensa che io voglia creare una tabella????


title: Triggers e stored procedure

author: Paj

text:
"N|N" <Ni...@Inch.nails> ha scritto nel messaggio
news:ph5K7.126452$sq5.6...@news.infostrada.it...

Nella tua domanda c'e' qualcosa che non quadra !!!!!!!!!!!!!!!
In Access 2000 (per intenderci file MDB) non esistono ne trigger ne view.
Esiste invece in Access 2000 la possibilita' di collegarsi a MSSql tramite i
progetti e in questo caso puoi creare sia trigger che stored procedure.
Per i progetti di Access vedi i post di qualche giorno fa.
Pietro


title: Problema

author: Anselmo Il Viandante

text:
Salve, ho un file excel con delle celle collegate ad altre celle in altre
cartelle  es. foglio2!a1=+foglio1!a1, ma quando modifico la cella origine
di una cartella "TITO" quella collegata non varia a meno che io non la
reinserisca. Se faccio una prova con un nuovo foglio e copia incolla tutto
si ripristina. Inoltre se apro il VBA negli oggetti (Microsoft Excel
Oggetti) ci sono tutti i fogli meno questa cartella, che quindi non può
avere la propietà EnabledCalculation impostata a True. Che cosa è
successo?Credo si tratti di una cavolata ma non riesco a trovare il bandolo.
In opzioni-calcolo è spuntato calcolo automatico. Forse è stata creata con
qualche opzione particolare (non ho creato io il foglio)? Qualcuno può
aiutarm? Grazie
--
                    C i a o ! ! !     M a n u e l
_______________________________
"
[...]
well, there's a secret:
don't expect too
much of Humanity,
[...]
once you accept
this premise
you will be free to
exist
on your own terms
and you will never
know loneliness
and death will be as
nothing.
consider yourself
blessed in the
dark.
."
Charles Bukowsky - a note on the mass-


title: aprire una query da codice.

author: BC

text:
Il quesito potrà sembrare stupido, ma non è la prima volta che scrivo
cose simili ma di questa non "ho la chiave"
Ho una query che esegue un conteggio su di una tbl . Eseguita
manualmente produce un solo record con un solo campo.
Vorrei utilizzare quel valore..

Come faccio?
Ho scritto quanto sotto... ma non ne vuole sapere

Anche perchè tra copia ed incolla non ci capisco più niente...

Spero in un aiuto..
... e pochi pernacchi..
Grazie in anticipo

BC

Dim Dbs As Database
Dim Rst As Recordset

Set Rst = Dbs.OpenRecordset("QryCGiorniTERapiaMaster")
MsgBox "IL TUO NUMERO E' " & Rst.Fields(0)
Rst.Close: Set Rst = Nothing


title: aprire una query da codice.

author: Vladimiro Leone

text:

Dim Rst As dao.Recordset
Set Rst = CurrentDb.OpenRecordset("QryCGiorniTERapiaMaster")
MsgBox "IL TUO NUMERO E' " & Rst!TuoCampo
Rst.Close: Set Rst = Nothing

oppure:
MsgBox "IL TUO NUMERO E' " & DLookup("TuoCampo",
"QryCGiorniTERapiaMaster")

Ciao Vladimiro.


title: aprire una query da codice.

author: Popi - TheBadHabits

text:
Ciao!

Dim Dbs As DAO.Database
Dim Rst As DAO.Recordset

Set Dbs = CurrentDb
Set Rst = Dbs.OpenRecordset("QryCGiorniTERapiaMaster")
MsgBox "IL TUO NUMERO E' " & Rst.Fields("NomeDelCampoRestituito")
Rst.Close
Set Rst = Nothing
Set Dbs = Nothing

In una sola riga (soluzione aborrita da taluni), invece, fai così.

MsgBox "IL TUO NUMERO E' " & DFirst("NomeDelCampoRestituito","QryCGiorniTERapiaMaster")

HTH
Popi


title: aprire una query da codice.

text:
Ho provato con

Dim Rst As dao.Recordset
Set Rst = CurrentDb.OpenRecordset("QryCGiorniTERapiaMaster")
MsgBox "IL TUO NUMERO E' " & Rst!ConteggioDiData_Terapia
Rst.Close: Set Rst = Nothing

la risposta è stata :

errore di run time 3061
parametri insufficienti.Previsto 1

preciso : la query  contiene una subquery : fosse questo?

Grazie ancora

BC


title: aprire una query da codice.

text:

Ciao,
forse è il caso che incolli l'SQL della query.
Vladimiro.


title: aprire una query da codice.

text:
>
> Ciao,
> forse è il caso che incolli l'SQL della query.
> Vladimiro.

questa è la l'SQL della query

SELECT Count(QryContaGiorniTer.ConteggioDiData_Terapia) AS
ConteggioDiConteggioDiData_Terapia
FROM QryContaGiorniTer;

.. e questo quello della sub
SELECT Count(TblTerapia.Data_Terapia) AS ConteggioDiData_Terapia,
TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia
FROM TblTerapia
GROUP BY TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia
HAVING
(((TblTerapia.ID_RelTerapia)=[Forms]![frmReparto]![frmsubEsami].[Form]![ID_RelTerapia]));

..in effetti : c'è una tabella con le terapie eseguite. Ogni terapia un
campo data ...
Conto i giorni in cui viene eseguita la terapia

es:

21/12/2011 aspirina
21/12/2011 aspro
22/12/2011 guttalax gocce

due giorni in tutto..

slauti BC


title: aprire una query da codice.

text:
On 27 Dic, 16:28, BC <
briglia.ces...@tiscali.it
> wrote:
> > Ciao,
> > forse è il caso che incolli l'SQL della query.
> > Vladimiro.
>
> questa è la l'SQL della query
>
> SELECT Count(QryContaGiorniTer.ConteggioDiData_Terapia) AS
> ConteggioDiConteggioDiData_Terapia
> FROM QryContaGiorniTer;
>
> .. e questo quello della sub
> SELECT Count(TblTerapia.Data_Terapia) AS ConteggioDiData_Terapia,
> TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia
> FROM TblTerapia
> GROUP BY TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia
> HAVING
> (((TblTerapia.ID_RelTerapia)=[Forms]![frmReparto]![frmsubEsami].[Form]![ID_RelTerapia]));
>
> ..in effetti : c'è una tabella con le terapie eseguite. Ogni terapia un
> campo data ...
> Conto i giorni in cui viene eseguita la terapia
>
> es:
>
> 21/12/2011 aspirina
> 21/12/2011 aspro
> 22/12/2011 guttalax gocce
>
> due giorni in tutto..
>
> slauti BC

Scusa, ma il nome del campo della query é:
ConteggioDiConteggioDiData_Terapia
e non:
ConteggioDiData_Terapia

o no?

Ciao Vladimiro.


title: aprire una query da codice.

author: Karl Donaubauer

text:
BC wrote:
> ...
> Set Rst = CurrentDb.OpenRecordset("QryCGiorniTERapiaMaster")
> ...
> errore di run time 3061
> parametri insufficienti.Previsto 1
> ...
> questa è la l'SQL della query
>
> SELECT Count(QryContaGiorniTer.ConteggioDiData_Terapia) AS
> ConteggioDiConteggioDiData_Terapia
> FROM QryContaGiorniTer;

Hmm, un Count di un Count sembra un po' strano.

> .. e questo quello della sub
> SELECT Count(TblTerapia.Data_Terapia) AS ConteggioDiData_Terapia,
> TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia
> FROM TblTerapia
> GROUP BY TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia
> HAVING
> (((TblTerapia.ID_RelTerapia)=[Forms]![frmReparto]![frmsubEsami].[Form]![ID_RelTerapia]));
> ...

Sembar che intendi:

SELECT Count(TblTerapia.Data_Terapia) AS ConteggioDiData_Terapia,
TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia
FROM TblTerapia
WHERE
TblTerapia.ID_RelTerapia=[Forms]![frmReparto]![frmsubEsami].[Form]![ID_RelTerapia]))
GROUP BY TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia

Per la causa e cura dell'errore vedi:
http://www.donkarl.com/it?FAQ6.4

Per evitare il problema puoi anche usare:

DCount("*","QryContaGiorniTer")

Vedi anche:
http://www.donkarl.com/it?FAQ6.17

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


title: aprire una query da codice.

text:
>
> Scusa, ma il nome del campo della query é:
> ConteggioDiConteggioDiData_Terapia
> e non:
> ConteggioDiData_Terapia
>
> o no?
>
> Ciao Vladimiro.
>

Hai ragione (è che con i conteggi mi sono impicciato..)

Comunque l'errore viene segnalato alla riga precedente ed è lo stesso..
Saluti

BC


title: aprire una query da codice.

text:

Ma il seguente codice lo stai lanciando da un controllo all'interno
della maschera frmReparto?
Se non è così, è ovvio che ti esca l'errore in quanto la tua query è
con parametri!
Ciao Vladimiro.


title: aprire una query da codice.

text:
>
> Ma il seguente codice lo stai lanciando da un controllo all'interno
> della maschera frmReparto?
> Se non è così, è ovvio che ti esca l'errore in quanto la tua query è
> con parametri!
> Ciao Vladimiro.

No da un'altra maschera, ma il parametro è passato correttamente perchè
se metto
Msgbox [Forms]![frmReparto]![frmsubEsami].[Form]! [ID_RelTerapia]
la risposta è corretta..

Saluti

BC


title: aprire una query da codice.

text:
> Hmm, un Count di un Count sembra un po' strano.
>
>> .. e questo quello della sub
>> SELECT Count(TblTerapia.Data_Terapia) AS ConteggioDiData_Terapia,
>> TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia
>> FROM TblTerapia
>> GROUP BY TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia
>> HAVING
>> (((TblTerapia.ID_RelTerapia)=[Forms]![frmReparto]![frmsubEsami].[Form]![ID_RelTerapia]));
>> ...
>
> Sembar che intendi:
>
> SELECT Count(TblTerapia.Data_Terapia) AS ConteggioDiData_Terapia,
> TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia
> FROM TblTerapia
> WHERE
> TblTerapia.ID_RelTerapia=[Forms]![frmReparto]![frmsubEsami].[Form]![ID_RelTerapia]))
> GROUP BY TblTerapia.Data_Terapia, TblTerapia.ID_RelTerapia
>
> Per la causa e cura dell'errore vedi:
http://www.donkarl.com/it?FAQ6.4

>
> Per evitare il problema puoi anche usare:
>
> DCount("*","QryContaGiorniTer")
>
> Vedi anche:
http://www.donkarl.com/it?FAQ6.17

>

funziona con DCount("*", "QryContaGiorniTer")

Non so se esiste un sistema migliore per contare dei raggruppamenti..
cioè
Data una tbl così
21/12/2011 aspirina
21/12/2011 aspro
22/12/2011 guttalax gocce
23/12/2011 cicuta gtt
23/12/2011 piramidone supp

voglio sapere quanti sono i giorni di terapia
risultato
TRE e non come se facessi un count 5

Grazie ancora dell'aiuto

BC