title: filtro con campo data

author: mcc

text:
     Altro problema: ho una maschera con tre caselle di riepilogo per la ricerca
dei records - tutto questo funziona. Il problema č che oltre ai campi scelti
devo fare la ricerca anche su un un campo presente nella tabella "nome campo
FINE" (campo data gg/mm/aaaa").
Es. devo cercare i record che hanno nella casella di riepilogo1 il contenuto
"PIPPO", nella casella di riepilogo2 il contenuto "PLUTO" e il campo FINE=""
(blank)
Vi indico il comando:
******************************
Private Sub Ricerca_Click()
Dim str_ricerca As String, conta As Integer

     For conta = 1 To 3
       If Me("Filter" & conta) <> "" Then
         str_ricerca = str_ricerca & "[" & Me("Filter" & conta).Tag & "] " & " = " &
Chr(34) & Me("Filter" & conta) & Chr(34) & " And "
       End If
     Next
     If str_ricerca <> "" Then
        str_ricerca = left(str_ricerca, (Len(str_ricerca) - 5))
        DoCmd.OpenForm "Pianificazione", acNormal, , str_ricerca
        Forms![Piani].Filter = str_ricerca
        Forms![Piani].FilterOn = True
     End If
End Sub
***************************
Dove e cosa devo inserire il campo FINE per effettuare la ricerca?
Grazie come sempre del vostro prezioso aiuto.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: filtro con campo data

author: Roberto da casa

text:
"mcc" <
c.me...@libero.it
> ha scritto nel messaggio
news:213Z215Z167Z15Y...@usenet.libero.it...
>      Altro problema: ho una maschera con tre caselle di riepilogo per la
ricerca
> dei records - tutto questo funziona. Il problema è che oltre ai campi

Quanto hai scritto va bene solo nel caso che tutti e tre i controlli FilterX
contengano un valore di tipo Testo: se uno dei tre non è di tipo testo, ma
numerico o data/ora, non puoi più usare il ciclo For ... Next, ma dovrei
effettuare tre confronti distinti, la sintassi di ognuno dei quali terrà
conto del tipo dei dati dei termini di paragone.
Comunque, per usare una data in una stringa SQL come è quella du filtro, vai
sul Sito Comune (link qui sotto) e nella Sezione Queries leggi la FAQ di
Federico Luciani intitolata "Problemi con le date nelle stringhe SQL".
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Problema con utilizzo file .chm

author: RinoŽ

text:
Utilizzando la funzione  "Interfacciare i file help con le forms."
di   Calogero Di Lorenzo  eseguendo la funzione
mi viene restituito un errore  "Impossibile trovare il file"
anche provando ad impostare un percorso assoluto
 Shell ("Start" & "C:\Programmi\Miacartella\Guida.chm")
ma l'errore persiste.
Quale possibile soluzione?


title: Problema con utilizzo file .chm

author: Gaspare

text:
"RinoŽ" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:Jew4e.1175941$35.43...@news4.tin.it...

Ciao,
verifica che esiste il file Guida.chm e quindi il suo  path e prova ad
utilizzare la funzione ShellExecute...
Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal
hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal
lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long)
As Long
Private Sub pulsante_click()
ShellExecute Me.hWnd, "open", "Guida.chm", "", "C:\Programmi\Miacartella", 5
End Sub


title: Problema con utilizzo file .chm

author: Roberto Spinella Esteban

text:
Io ho trovato tempo fà questo problema con Windows XP, mentre con i
precedenti Windows era tutto OK.
Prova a vedere se lanciancdo da ESEGUI il comando è tutto OK, potrebbe
mancare il comando START.
"Gaspare" <
in...@studioieducation.com
> ha scritto nel messaggio
news:7WA4e.1178004$35.43...@news4.tin.it...
>
> "Rino®" <
rinof...@virgilio.it
> ha scritto nel messaggio



title: Problema con utilizzo file .chm

text:
"Gaspare" <
in...@studioieducation.com
> ha scritto nel messaggio
news:7WA4e.1178004$35.43...@news4.tin.it...

Funziona ma per applicare la tua Function ?
Ciao
RinoŽ


title: Problema con utilizzo file .chm

text:
"RinoŽ" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:BmD4e.1179025$35.43...@news4.tin.it...

------------------------------------------------------
All'interno di un modulo:
Public  Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA"
 (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String,
 ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd
 As Long) As Long
--------------------------------------------------------
All'interno dell'evento click di un pulsante posizionato su una maschera
ShellExecute Me.hWnd, "open", "Guida.chm", "", "C:\Programmi\Miacartella", 5
------------------------------------------------------------------------------------


title: Problema con utilizzo file .chm

text:
CUT
>>>
>>> Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA"
>>> (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As
>>> String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal
>>> nShowCmd As Long) As Long
>>>
>>> Private Sub pulsante_click()
>>>
>>> ShellExecute Me.hWnd, "open", "Guida.chm", "",
>>> "C:\Programmi\Miacartella", 5
>>>
>>>
>>> End Sub
>> Funziona ma per applicare la tua Function ?
>> Ciao
>> RinoŽ
>>
> ------------------------------------------------------
> All'interno di un modulo:
> Public  Declare Function ShellExecute Lib "shell32.dll" Alias
> "ShellExecuteA"
> (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String,
> ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd
> As Long) As Long
> --------------------------------------------------------
> All'interno dell'evento click di un pulsante posizionato su una maschera
> ShellExecute Me.hWnd, "open", "Guida.chm", "", "C:\Programmi\Miacartella",
> 5
> ------------------------------------------------------------------------------------
>
Ciao Gaspare non mi riferivo alla soluzione ultima da te propostami,
poiché tale e gia stata collaudata come da mio post precedente,
nel quale comunicavo l'esito positivo , ma alla funzione sul sito comune
per poter gestire l' help per ogni singolo oggetto Form.
Quindi come applicare la tua ultima soluzione a quella del sito comune?
Ciao
RinoŽ


title: Problema con utilizzo file .chm

text:
"Rino®" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:dpL4e.1179966$35.43...@news4.tin.it...
> CUT
>>>>
>>>> Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA"
>>>> (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As
>>>> String, ByVal lpParameters As String, ByVal lpDirectory As String,
>>>> ByVal nShowCmd As Long) As Long
>>>>
>>>> Private Sub pulsante_click()
>>>>
>>>> ShellExecute Me.hWnd, "open", "Guida.chm", "",
>>>> "C:\Programmi\Miacartella", 5
>>>>
>>>>
>>>> End Sub
>>> Funziona ma per applicare la tua Function ?
>>> Ciao
>>> Rino®
>>>
>> ------------------------------------------------------
>> All'interno di un modulo:
>> Public  Declare Function ShellExecute Lib "shell32.dll" Alias
>> "ShellExecuteA"
>> (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String,
>> ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd
>> As Long) As Long
>> --------------------------------------------------------
>> All'interno dell'evento click di un pulsante posizionato su una maschera
>> ShellExecute Me.hWnd, "open", "Guida.chm", "",
>> "C:\Programmi\Miacartella", 5
>> ------------------------------------------------------------------------------------
>>
> Ciao Gaspare non mi riferivo alla soluzione ultima da te propostami,
> poiché tale e gia stata collaudata come da mio post precedente,
> nel quale comunicavo l'esito positivo , ma alla funzione sul sito comune
> per poter gestire l' help per ogni singolo oggetto Form.
> Quindi come applicare la tua ultima soluzione a quella del sito comune?
> Ciao
> Rino®
>
Con ShellExecute è necessario l'handle della finestra attiva quindi si
dovrebbero ricavare questi valori, passarli come parametri etc...non penso
sia il caso di continuare su questa strada (sin tal senso...)....sarebbe
auspicabile adottare un'altra strategia (funzione etc...)
Gaspare


title: Aiuto Codici a Barre

author: Carlo

text:
Vorrei sapere come si fa in un report a stampare un codice a barre del tipo:
interleaved 2 di 5 con 12 numeri, di cui l'ultimo calcolato come ceck-digit.
Io non so da che parte iniziare!!
Grazie


title: Aiuto Codici a Barre

author: Daguez

text:
"Carlo" <
ze...@tread.it
> ha scritto nel messaggio
news:8ljqbm$18g$1...@nslave1.tin.it...
> Vorrei sapere come si fa in un report a stampare un codice a barre del
tipo:
> interleaved 2 di 5 con 12 numeri, di cui l'ultimo calcolato come
ceck-digit.
credo che in rete ci siano vari font per i codici a barre, fai una ricerca.
ciao
alberto


title: Aiuto Codici a Barre

author: Dario Fantoni

text:
"Carlo" <
ze...@tread.it
> ha scritto nel messaggio
news:8ljqbm$18g$1...@nslave1.tin.it...
> Vorrei sapere come si fa in un report a stampare un codice a barre del
tipo:
> interleaved 2 di 5 con 12 numeri, di cui l'ultimo calcolato come
ceck-digit.
> Io non so da che parte iniziare!!
> Grazie
>
>
>
Dovresti scriverti una piccola libreria che converta graficamente il tuo
codice... in alcuni siti trovi anche i sorgenti.... e poi metti una
picturebox nel report... et voilà il gioco è fatto....
non è complicato come sembra...
Se vuoi saperne di più chiedi ancora
Ciao
Dario


title: CARATTERI BARCODE

author: Marco

text:
Salve a tutti ho un ultimo prolema con i barcode, stampo dei codici a barre
"code39" o "ean13" ecc... il problema è che quando li leggo con una pistola
e nel codice sono presenti simboli come per esempio "-" ";" "." "'" ":" "/"
ecc.. il lettore me li legge ma li converte in altri simboli diversi. Quindi
mi chiedo, esiste un set di caratteri ammessi? è il mio lettore che non
funziona? Sto sbagliando qualcosa? (P.S. qualsiasi codice a barre con
simboli anche quelli delle scatole comprate nei supermercati me li legge
sbagliati)
Ringrazio anticipatamente
Saluti
Marco
--------------------------------
Inviato via
http://usenet.libero.it


title: CARATTERI BARCODE

author: George

text:
"Marco" <
rei...@libero.it
> ha scritto nel messaggio
news:81Z72Z109Z166Y1...@usenet.libero.it...
> Salve a tutti ho un ultimo prolema con i barcode, stampo dei codici a
barre
> "code39" o "ean13" ecc... il problema è che quando li leggo con una
pistola
> e nel codice sono presenti simboli come per esempio "-" ";" "." "'" ":"
"/"
> ecc.. il lettore me li legge ma li converte in altri simboli diversi.
Quindi
> mi chiedo, esiste un set di caratteri ammessi? è il mio lettore che non
> funziona? Sto sbagliando qualcosa? (P.S. qualsiasi codice a barre con
> simboli anche quelli delle scatole comprate nei supermercati me li legge
> sbagliati)
> Ringrazio anticipatamente
> Saluti
> Marco
>
E' un OT che avresti dovuto specificare nel subject.
E' altamente probabile che il lettore debba essere opportunamente
programmato...
Vedi il SUO libretto di istruzioni.


title: CARATTERI BARCODE

text:
Il 03 Giu 2003, 17:04, "George" <
giorgio.ben...@libero.it
> ha
scritto:

Purtroppo non ha libretti di istruzioni e scusa la mia ignoranza ma non so
cosa sia un OT me lo spieghi? grazie



title: CARATTERI BARCODE

text:

Con OT (Off Topic) s indicano i tread con argomento non attinente al gruppo
in cui si sta postando.
Nello specifico tu inserisci in it.comp.appl.access un messaggio che con
access non ha niente a che fare.
Quindi, per facilitare la lettura a che degli OT non ne vuol sapere (come
me), avresti potuto indicare nel soggetto che il tuo messaggio è di questo
tipo.
Anche la scelta del soggetto è alquanto triste: prima inserisci un mex che
si riferisce alla stampa del code 39 da access, poi, con lo stesso soggetto
una richiesta di aiuto per la configurazione di un lettore barcode. Più
precisamente io avrei indicato il titolo come: [OT] Problemi con la lettura
dei barcode.
Scusa ma fa parte della Netiquette.............
Comunque sia, trovati il manuale, magari sul sito del produttore: ma come
fai a pensare di usare correttamente una cosa che non conosci?


title: CARATTERI BARCODE

text:
Il 03 Giu 2003, 17:39, "George" <
giorgio.ben...@libero.it
> ha

Ok grazie della lezione ho recepito il messaggio, mi scuso per l'errore ora
che lo so non lo farò piu. Cercherò il manuale grazie ancora
ciao ciao



title: Outlook Express <-> Access

author: Marco Garutti

text:
Ciao a tutti.
Vorrei poter caricare da access 97 la rublica di Outlook Express.
Qualcuno sa indicarmi codice con esempi per l'interfacciamento Access
/Outlook Express ?
Grazie in anticipo.
Marco Garutti
EDP Manager TECNOFORM S.p.A.


title: Outlook Express <-> Access

author: Xymox

text:
"Marco Garutti" <
marco....@tecnoform.com
> ha scritto

La cosa m'interessa pure a me, seguirņ il 3ad.
Per ora ho fatto solo il contrario, da Access esporto in un file di testo
che poi importo in OE:
Public Sub ExpFile()
'
'Esporto la lista in un File di testo che ha come estensione .txt
'Per importare la lista in Outlook Express bisogna --> File - Importa -
Altra Rubrica
'poi selezionare la path --> File di testo ... --> txt --> e cambiare il
mapping (Nome e Cognome)-(Posta Elettronica)
'
Dim db As Database, objRs As Recordset, sSql As String, vPathDest As String
Set db = CurrentDb
Set objRs = db.OpenRecordset("Q_Ric_sql")
vPathDest = "C:\temp"
Open vPathDest & "\" & "Email" & ".txt" For Output As #1
Do Until objRs.EOF
  Print #1, objRs!Persona; ";"; objRs!EMail
  objRs.MoveNext
Loop
Close #1
objRs.Close
Set objRs = Nothing
End Sub
--
bye marco s.
www.marcosanti.it


title: Outlook Express <-> Access

text:
Ricevo questa risposta da un altro newsgroup:
Not with Outlook Express.
OE does not expose its Objects for automation so you cannot get Access to
"talk" to OE.
--
HTH
Van T. Dinh
MVP (Access)
Credo non si possa fare, a questo punto.
Come tengo le rubriche dei miei utenti sempre allineate ? Senza usare
Exchange ....
Marco.
----------------------------------------------------------------------------
-------
"Xymox" <
marcosanti...@people.it
> ha scritto nel messaggio
news:c0djtr$15vm1g$1...@ID-122915.news.uni-berlin.de...



title: formattazione di una casella di testo

text:
In una maschera di immissione dati ho una casella di testo che consente di inserire un valore in formato testo.
Questa casella ha formato "TT"+numero di sei o sette cifre. (è un numero progressivo che nel tempo ha superato il milione).

Devo realizzare una cella già precompilata con "TT......" e che mi consenta appunto di poter inserire sei o sette cifre con un minimo di controllo.
Ho impostato così le proprietà:

formato ---->   "TT*******"
valore predefinito  ----->   "TT"

pensavo cosi facendo di riuscire a selezionare i dati da inserire ma non mi riconosce il formato e non mi consente pertanto di realizzare quanto mi serve.

Qualcuno ha cortesemente voglia di darmi un aiuto ?
grazie infinite.


title: formattazione di una casella di testo

author: Akery

text:

"TT"0000000

Akery


title: formattazione di una casella di testo

text:

Grazie infinite Akery.


title: copia db e problema con spazi

author: guggenheim

text:
Ho un piccolo problema
Ho creato una maschera dove nel camp a_path digito il percorso dove creare
un nuovo db
Se il percorso non contiene spazi funziona se invece contiene spazi non
funziona
Consigli?
Grazie
Gugge
_______________________________________
Dim stringa1 As String
Dim stringa2 As String
Dim result As Integer
Dim X As String
X = Me.a_path
a = Me.a_path
da = Me.da_path
If Not Dir(X) = "" Then
 MsgBox "Archivio  già esistente !", vbCritical, "Crea"
Exit Sub
Else
    stringa1 = "copy " & da & " " & a & ""
        If SysVersions32() = "windows NT" Then
        stringa2 = "cmd /c " & "" & stringa1 & ""
        Shell stringa2, vbHide
        ElseIf SysVersions32() = "Windows 95" Then
        stringa2 = "
command.com
 /c " & "" & stringa1 & ""
        Shell stringa2, vbHide
        End If
   End If
Dim jj As Integer
    For jj = 1 To 1000
        DoEvents     Next
'controllo esistenza file
If Not Dir(X) = "" Then
MsgBox "Creazione effettuata", vbInformation + vbOKOnly, "Crea"


title: copia db e problema con spazi

author: Carlo Costarella

text:
"guggenheim" <
gugge...@iol.it
> ha scritto nel messaggio
news:f3mfm6$cbh$1...@fata.cs.interbusiness.it...

Devi racchiudere il percorso tra virgolette:
stringa1 = "copy " & """" & da & " " & a & """"
Controlla se va bene.
Ciao, Carlo


title: copia db e problema con spazi

text:
> Devi racchiudere il percorso tra virgolette:
> stringa1 = "copy " & """" & da & " " & a & """"
> Controlla se va bene.
>
> Ciao, Carlo
>
_________________________________
Ciao Carlo
Non funziona
    stringa1 = "copy " & """" da & " " & a & """"
sia a che da possono contenere degli spazi
forse è questo il problema?
Grazie
Gu


title: copia db e problema con spazi

text:
"guggenheim" <
gugge...@iol.it
> ha scritto nel messaggio
news:f3miau$efu$1...@fata.cs.interbusiness.it...

_______________
oppure c'è da cambiare stringa2?



title: copia db e problema con spazi

text:
la stringa corretta è



title: copia db e problema con spazi

text:
"guggenheim" <
gugge...@iol.it
> ha scritto nel messaggio
news:f3mmsg$bm4$1...@carabinieri.cs.interbusiness.it...
> la stringa corretta è
>
> stringa1 = "copy """ & da & """ """ & a & """
Perfetto!
Ciao, Carlo


title: Magazzino in access

author: Perugiaweb

text:
Devo sviluppare un semplicissimo magazzino in access, dato che sono molto
inesperto, qualcuno di voi ha un piccolo magazzino (carico/scarico
prodotti), già pronto da modificare per le mie esigenze.
GRAZIE


title: Magazzino in access

text:
Perugiaweb ha scritto:

Hai provato a vedere i modelli di access? quando apri access scegli
"progetti, pagine e creazioni guidate", oppure Start/tutti i
programmi/apri documento office/scheda database, forse ci trovi
qualcosa che fa al caso tuo.
Comunque, il mio modesto consiglio è quello di provare a crearti da
solo ciò che ti serve piuttosto di adattare qualcosa di già
esistente....


title: [OT] ciao a tutti, ma che minch(bip) è successo?

author: Zef

text:
Anzi tutto ciao a tutti ed anche se in ritardo buon millennio!!
appartengo alla categoria "segata" dalla tin per
secondo loro, mancanza dei dati fiscali
cmq mi hanno bloccato l'indirizzo per oltre un mese!!!
rientrato in possesso delle mie facoltà non ho più trovato
it.comp.database.access!!!
è stato definitivamente eliminato?
questo lo ha sostituito completamente?
(guardando il sito comune sembrerebbe di sì)
purtroppo in questo periodo ho pochissimo tempo
ma ho ricominciato almeno a leggere i mex
un saluto a tutti quei gran simpaticoni di questo ng
ciao ciao, Zef


author: RoDAgo

text:
Zef scrisse...
> Anzi tutto ciao a tutti ed anche se in ritardo buon millennio!!
Ciao Zef, come và?
Un consiglio, ritratta subito sta storia del *buon millennio*, potresti
attivare un'altro thread kilometrico sull'argomento!
> appartengo alla categoria "segata" dalla tin per
> secondo loro, mancanza dei dati fiscali
Bah, io li manderai immediatamente a quel paese!!
> cmq mi hanno bloccato l'indirizzo per oltre un mese!!!
> rientrato in possesso delle mie facoltà non ho più trovato
> it.comp.database.access!!!
> è stato definitivamente eliminato?
> questo lo ha sostituito completamente?
> (guardando il sito comune sembrerebbe di sì)
E' proprio da molto che manchi!
ICAA è nato a fine novembre e da allora ICDA è cominciato a sparire dai
vari server.
Purtroppo nostro malgrado ci stiamo trasformando in ICAAri (cmq *Forever
ICDAri* nel cuore).
> purtroppo in questo periodo ho pochissimo tempo
> ma ho ricominciato almeno a leggere i mex
>
> un saluto a tutti quei gran simpaticoni di questo ng
Un salutone anche a tè!
> ciao ciao, Zef
Ciao RoDAgo


author: Micio

text:
>Anzi tutto ciao a tutti ed anche se in ritardo buon millennio!!
>...
>ciao ciao, Zef
come sarebbe buon millennio? E' questo il vero
"Millennium Bug"... è il fatto che tutti si ostinano
a credere alla pubblicità e agli albergatori che
hanno venduto un sacco di viaggi e di notti di
Capodanno del Millennio!
Non è il nuovo Millennio questo... è il buon vecchio
Millennio che è al suo ultimo anno... festeggeremo
il Vero Nuovo Millennio solo al 31/12 di quest'anno!
Micio


author: Antonio Biso

text:
Zef ha scritto nel messaggio <86skna$kh$
1...@nslave2.tin.it
>...
>Anzi tutto ciao a tutti ed anche se in ritardo buon millennio!!
Sei in anticipo di 11 mesi veramente...
Antonio


title: Strummenti-AVVIO

author: link

text:
Vi chiedo un grande Aiuto
Dopo aver fatto un grosso lavoro (di progettazione e inserimento dati ) ho
combinato un pasticcio: dalla finestra di dialogo ottenuta da
Strumenti-Avvio ho eliminato tutti i menu (ho tolto tutti i visti) e non ho
la possibilità di fare cambiamenti perché non posso più accedere alla
finestra database
È possibile ritornare indietro?


title: Strummenti-AVVIO

text:
"link" <
li...@libero.it
> ha scritto nel messaggio
news:L9_a9.113913$n04.2...@twister2.libero.it...

Avvia il DB con il tasto Shift premuto.
Dal menù Finestra scegli Scopri e poi database.
Ciao, Carlo


title: Strummenti-AVVIO

author: Catja Moeller

text:


Crea un database vuoto e importa tutti gli oggetti da quello vecchio.


title: Strummenti-AVVIO

author: Slim

text:
"link" <
li...@libero.it
> ha scritto nel messaggio
news:L9_a9.113913$n04.2...@twister2.libero.it...

Impare, durante la progettazione, a fare delle copie continue di
Backup!!!!!!
Usa comunque in apertura il tasto SHIFT
Saluti
SLIM


title: pulsante nuova maschera apre maschera maximizzata

author: NSantini

text:
non sono nuovo di Access ma è la prima volta che mi approccio a Access 2010.
Il problema è che volendo creare una nuova maschera, partendo da modalità struttura, si apre una maschera che occupa lo spazio disponibile ed è priva dei pulsanti Minimizza e Massimizza. Come fare ad aprire una maschera che poi mi ridimensionerò a mio piacere?
Grazie e buon Natale a tutti voi
NSantini


text:

Aggiorno aggiungendo dettagli. Un db creato con Access 2003 e trasferito in Access 2010 continua ad aprire le maschere alla dimensione che avevo creato io. E non solo, se desidero creare una nuova maschera in modalità struttura, mi apre una maschera tradizionale con barra del titolo e i tre pulsanti: Minimizza, Maximizza e Chiudi. Mentre un db nativo di Access 2010 la stessa operazione mi apre una maschera che occupa lo spazio libero a schermo e senza i pulsanti Minimizza e Maximizza, solo il Pulsante Chiudi. Come posso ovviare? Grazie
NSantini


author: Karl Donaubauer

text:
Salve,

Nsantini ha scritto:
> Il giorno venerdì 25 dicembre 2015 22:15:10 UTC+1, NSantini ha scritto:
>> non sono nuovo di Access ma è la prima volta che mi approccio a Access 2010.
>> Il problema è che volendo creare una nuova maschera, partendo da modalità struttura, si apre una maschera che occupa lo spazio disponibile ed è priva dei pulsanti Minimizza e Massimizza. Come fare ad aprire una maschera che poi mi ridimensionerò a mio piacere?
>
> Aggiorno aggiungendo dettagli. Un db creato con Access 2003 e trasferito in Access 2010 continua ad aprire le maschere alla dimensione che avevo creato io. E non solo, se desidero creare una nuova maschera in modalità struttura, mi apre una maschera tradizionale con barra del titolo e i tre pulsanti: Minimizza, Maximizza e Chiudi. Mentre un db nativo di Access 2010 la stessa operazione mi apre una maschera che occupa lo spazio libero a schermo e senza i pulsanti Minimizza e Maximizza, solo il Pulsante Chiudi. Come posso ovviare?

Ribbon:
File - Opzioni - Database corrente - Opzioni applicazione - Opzioni
finestra del documento

Cambia la spunta da "Documenti a schede" a "Finestre sovrapposte".

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


title: Casella di testo

author: NewHold

text:
Ciao,
Domanda :
Ho 3 campi 'Codice' , 'Descrizione' e 'Particolare' di cui io conosco già i
valori di Codice e Descrizione e non Particolare.
Quando inserisco  in casella 'Codice'  AA vorrei che in casella
'Descrizione' risulti il testo TARGHETTA così si evita di riscrivere tutte
le volte.
Esempio:
Codice   Descrizione    Particolare
AA     =    TARGHETTA
BB      =    PUNTE
CC     =     RIGA
DD     =     LISTA
Dovrei inserire circa 1000 'Particolari'
Grazie


title: Casella di testo

author: Setec Astronomy

text:
"NewHold" <
new...@virgilio.it
> ha scritto nel messaggio
news:e9XB8.15951$CN3.5...@news2.tin.it...
> Ciao,
> Domanda :
> Ho 3 campi 'Codice' , 'Descrizione' e 'Particolare' di cui io conosco già
i
> valori di Codice e Descrizione e non Particolare.
> Quando inserisco  in casella 'Codice'  AA vorrei che in casella
> 'Descrizione' risulti il testo TARGHETTA così si evita di riscrivere tutte
> le volte.
> Esempio:
> Codice   Descrizione    Particolare
> AA     =    TARGHETTA
> BB      =    PUNTE
> CC     =     RIGA
> DD     =     LISTA
Usa una tabella con l'elenco Codice e Descrizione
Sull'evento uscita di Codice utilizza una funzione di LookUp per recuperare
il valore della  descrizione dalla suddetta tabella ed inserirlo in
Descrizione.
Saluti.
> Dovrei inserire circa 1000 'Particolari'
Cioè?
> Grazie


title: Casella di testo

text:
"Setec Astronomy" <
se...@freemail.it
> ha scritto nel messaggio
news:tiXB8.23952$5k4.5...@twister2.libero.it...
> "NewHold" <
new...@virgilio.it
> ha scritto nel messaggio
> news:e9XB8.15951$CN3.5...@news2.tin.it...
> > Ciao,
> > Domanda :
> > Ho 3 campi 'Codice' , 'Descrizione' e 'Particolare' di cui io conosco
già
> i
> > valori di Codice e Descrizione e non Particolare.
> > Quando inserisco  in casella 'Codice'  AA vorrei che in casella
> > 'Descrizione' risulti il testo TARGHETTA così si evita di riscrivere
tutte
> > le volte.
> > Esempio:
> > Codice   Descrizione    Particolare
> > AA     =    TARGHETTA
> > BB      =    PUNTE
> > CC     =     RIGA
> > DD     =     LISTA
>
> Usa una tabella con l'elenco Codice e Descrizione
> Sull'evento uscita di Codice utilizza una funzione di LookUp per
recuperare
> il valore della  descrizione dalla suddetta tabella ed inserirlo in
Miglioriamo la tua soluzione. Infatti, anche se in questo caso la Dlookup
non peserebbe più di tanto, in generale è una query che quindi potrebbe
rallentare l'elaborazione.
E' meglio fare così:
combobox con query sulla tabella che hai proposto e che recupera i due
campi. Se non si vuole visualizzare la descrizione si può mettere lunghezza
colonne (che devono essere 2) 2 cm ; 0 cm
Sul dopo aggiornamento della combo basta scrivere nella casella di testo
combo.column(1)
senza dover rieseguire una query...
Antonio


title: Casella di testo

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:U94C8.26121$US3.5...@twister1.libero.it...
[cut]
> > Usa una tabella con l'elenco Codice e Descrizione
> > Sull'evento uscita di Codice utilizza una funzione di LookUp per
> recuperare
> > il valore della  descrizione dalla suddetta tabella ed inserirlo in
>
> Miglioriamo la tua soluzione. Infatti, anche se in questo caso la Dlookup
> non peserebbe più di tanto, in generale è una query che quindi potrebbe
> rallentare l'elaborazione.
> E' meglio fare così:
> combobox con query sulla tabella che hai proposto e che recupera i due
> campi. Se non si vuole visualizzare la descrizione si può mettere
lunghezza
> colonne (che devono essere 2) 2 cm ; 0 cm
> Sul dopo aggiornamento della combo basta scrivere nella casella di testo
> combo.column(1)
> senza dover rieseguire una query...
Il problema di questa soluzione è che ogni volta che viene aperta la
maschera su cui risiede la combo box devono essere caricati 1000 record di 2
campi ciascuno nella combo. Se poi da un'altra maschera vuole modificare i
valori contenuti nella tabella Codice e Descrizione allora si deve
aggiornare la combo.
A mio parere meglio eseguire una funzione di lookup più che caricare1000
record in una combo.
> Antonio


title: Casella di testo

text:
"Setec Astronomy" <
se...@freemail.it
> ha scritto nel messaggio
news:Dm4C8.26181$US3.5...@twister1.libero.it...
> "Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
> news:U94C8.26121$US3.5...@twister1.libero.it...
> [cut]
> > > Usa una tabella con l'elenco Codice e Descrizione
> > > Sull'evento uscita di Codice utilizza una funzione di LookUp per
> > recuperare
> > > il valore della  descrizione dalla suddetta tabella ed inserirlo in
> >
> > Miglioriamo la tua soluzione. Infatti, anche se in questo caso la
Dlookup
> > non peserebbe piů di tanto, in generale č una query che quindi potrebbe
> > rallentare l'elaborazione.
> > E' meglio fare cosě:
> > combobox con query sulla tabella che hai proposto e che recupera i due
> > campi. Se non si vuole visualizzare la descrizione si puň mettere
> lunghezza
> > colonne (che devono essere 2) 2 cm ; 0 cm
> > Sul dopo aggiornamento della combo basta scrivere nella casella di testo
> > combo.column(1)
> > senza dover rieseguire una query...
>
> Il problema di questa soluzione č che ogni volta che viene aperta la
> maschera su cui risiede la combo box devono essere caricati 1000 record di
2
> campi ciascuno nella combo. Se poi da un'altra maschera vuole modificare i
> valori contenuti nella tabella Codice e Descrizione allora si deve
> aggiornare la combo.
> A mio parere meglio eseguire una funzione di lookup piů che caricare1000
> record in una combo.
Non tiriamo fuori innumerevoli varianti sul tema.
Maschera di inserimento, con sessioni di inserimento dati a ripetizione. La
maschera viene aperta una volta sola (UNA), quindi UN solo caricamento di
combo. Ad ogni nuovo record non bisogna fare nessuna lookup, quindi
concettualmente, in questa situazione molto classica e comune, la combo č
molto piů performante!!!
Antonio


title: Casella di testo

text:
Grazie , davvero.
mi potreste fare un esempio.
Quale differenza tra Combo e DlookUp ?
"NewHold" <
new...@virgilio.it
> ha scritto nel messaggio
news:e9XB8.15951$CN3.5...@news2.tin.it...



title: Doppio click in un elemento di un listbox!

author: tranky

text:
Ho un altro problema, come si imposta l'evento doppio click su un elemento
di un listbox??
grazie a tutti!!
ciao ciao!


text:
"tranky" <
NOS...@GRAZIEPREGO.IT
> ha scritto nel messaggio
news:risde.848937$b5.37...@news3.tin.it...

La casella di riepilogo listbox ha gią un evento doppio click.
Per usare questo evento devi scrivere del codice su questo evento.
Per esempio se hai una listbox che si chiama "ElencoContatti" la cui colonna
associata contiene l'IDContatto e su doppio click vuoi aprire la
corrispondente maschera "Contatti", scriverai:
Private Sub ElencoContatti_DblClick(Cancel As Integer)
    dim stLinkCriteria as strimg
    stLinkCriteria = "[IDContatto]=" & Me![ElencoContatti]
    DoCmd.OpenForm "Contatti", , , stLinkCriteria
End Sub
Ciao, Carlo


title: Come misurare prestazioni del codice ?

author: RobertoA

text:
...senza infarcirlo di misurazioni timer lungo il percorso che si desidera
monitorare?
Insomma, se per il completamento di una procedura vengono richiesti 10
secondi, come fare per sapere dove sono andati quei secondi, nel senso in
quale parte del codice sono stati spesi?
Ciao e grazie
RobertoA


title: Come misurare prestazioni del codice ?

author: Franchi Flavio S.r.l.

text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:4abf...@newsgate.x-privat.org...

Una Piccola idea:
Dichiarazione Variabile Public
Public TempoCodice as variant
Vai a leggere in una tabella questo valore
se a zero non fa niente
se a uno inizia il calcolo in modo da non apiciare i punti di codice
All'inizio del codice:
  If TempoCodice Then TempoCodice = Time
Durante elaborazione metti i controlli
  If TempoCodice Then MsgBox (Time() - TempoCodice)
Ciao
Graziano


title: Come misurare prestazioni del codice ?

text:
>> ...senza infarcirlo di misurazioni timer lungo il percorso che si
>> desidera monitorare?
>> Insomma, se per il completamento di una procedura vengono richiesti 10
>> secondi, come fare per sapere dove sono andati quei secondi, nel senso in
>> quale parte del codice sono stati spesi?
>> Ciao e grazie
>> RobertoA
>
> Una Piccola idea:
> Dichiarazione Variabile Public
> Public TempoCodice as variant
> Vai a leggere in una tabella questo valore
> se a zero non fa niente
> se a uno inizia il calcolo in modo da non apiciare i punti di codice
> All'inizio del codice:
>  If TempoCodice Then TempoCodice = Time
> Durante elaborazione metti i controlli
>  If TempoCodice Then MsgBox (Time() - TempoCodice)
E' appunto l'infarcimento con cose tipo ".. If TempoCodice Then MsgBox
(Time() - TempoCodice)
.."  che vorrei evitare
Volevo sapere se c'e' qualcosa che "da esterno" e quindi senza modificare il
codice esistente che potesse essere usato per misurare le prestazoni del
flusso istruzioni
Ciao e grazie
RobertoA


title: Come misurare prestazioni del codice ?

text:
La misurazione è relativa... ma 9 volte su 10 i tempi dipendono dalle
ottimizzazioni delle Query...
Quindi se già analizzi le Query sui loro piani di esecuzione dovresti
capire se sono ottimizzate o meno..., da li poi nel caso in cui il
processo inpighi troppi secondi sei in grado di capire come
migliorare, e se è possibile...
In tutti gli altri casi, misurare prestazioni di un SW è una parola
grossa, e non esiste un aggeggio che butti il tuo SW e lui ti dice
come funziona... spesso è meglio il cronometro...
@Alex


title: autocompleatamento combobox

author: Akery

text:
Buongiorno a tutti,
come da oggetto vorrei che una combobox mi suggerisse quali nomi scegliere a
partire da una parte di essi, mi spiego meglio:
nella cbo ho una lista di nomi i quali vengono fuori automaticamente se
comincio con la lettera iniziale ad esempio premo "c" e si autocompleta con
cane premo la seconda lettera "o" e mi compare colombo etc. Vorrei fare in
modo che lo stesso automatismo funzionasse con una parte del nome ad esempio
premo "e" e mi appare cane.
Ho provato ad usare il criterio nell'origine riga like "*" &
forms!maschera1!testo0 & "*" che mi da qualche risultato ma non autocompleta
la cbo.
Per migliorare il risultato ho provato ad aggiungere su aggiorna il requery
della cbo ma non è servito a nulla.
Consigli su come realizzare l'autocompletamento
Grazie
Akery

---
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus


title: autocompleatamento combobox

text:
per chi fosse interessato ho trovato la soluzione qui

http://www.tek-tips.com/faqs.cfm?fid=6295

Akery

"Akery"  ha scritto nel messaggio news:n2v6mf$vo3$1...@speranza.aioe.org...



title: eseguire una funzione

author: maestro

text:
buongiorno, da access ho creato il seguente modulo:
Public Function compatta()
Dim strPath As String
   strPath = "c:\windows\system32\wscript.exe " &
"C:\statistiche\Compact.vbs " & Chr$(34) & CurrentDb.Name & Chr$(34)
   Call Shell(strPath, vbNormalFocus)
End Function
come faccio ad  eseguirlo con una macro??


title: eseguire una funzione

author: 'Roccia' Max

text:
On 2 Ago, 14:29, maestro <
m_avvent...@yahoo.it
> wrote:
> Public Function compatta()
> come faccio ad  eseguirlo con una macro??
Nella macro metti l'azione eseguicodice, e come argomento passi
compatta()
cia'
Max


title: eseguire una funzione

text:
'Roccia' Max ha scritto:

e quello che faccio ma mmi segnala che:
è impossibile trovare il nome di funzione immesso nell'espressione


title: eseguire una funzione

text:
maestro ha scritto:

risolto: avevo assegnato al modulo lo stesso nome della funzione. Quindi
è stato sufficient erinominar eil modulo e il gioco è fatto grazie comunque.


title: eseguire una funzione

author: Access

text:
Ciao maestro,
"maestro" <
m_avv...@yahoo.it
> ha scritto nel messaggio
news:f8sltn$j8d$1...@tdi.cu.mi.it...

la funziona l'hai messa in un modulo?
--
Ciao
Access


title: E' possibile creare nuove istanze di una maschera ma in modo  parametrico ?

text:
Osservate :
Dim FormAgain As New Form_NomeMaschera
With FormAgain
    .Visible = True
    DoCmd.MoveSize 2000, 2000
End With
----------------------------------------------------------------------
Ok, tutto bene.
Ma mi servirebbe poter fare una cosa "simile" a :
x = "mia maschera"
Dim FormAgain As New Form_(x)
Cioe', mi servirebbe poter istanziare di nuovo in modo parametrico.
Altrimenti sono costretto a dover cambiare il testo della funzione
in *ogni* maschera che la usa.
Oppure a fare un terribile select case, che pero' dovrei cambiare
ad ogni aggiunta di una nuova maschera !
Improponibile.
Grazie molte (in ogni caso).


author: Carlo Costarella

text:
"radicale.002" <
radica...@gmail.com
> ha scritto nel messaggio
news:a84ab0cf-4122-4c71...@g19g2000yqc.googlegroups.com...

Qualcosa del genere?
Qui apro una maschera per mezzo di una variabile testo (dunque posso usare
qualsiasi nome maschera) e poi attibuisco al controllo "Controllore" un
valore:
Public Sub AproMaschera()
Dim f As String
f = "NomeMaschera"
DoCmd.OpenForm f
Forms.Item(f)!Controllore = "Evviva"
End Sub
Ciao, Carlo


text:
Oltre al suggerimento di Carlo, vedi se questo Demo ti può aiutare...
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=269
 @Alex


text:
On 4 Giu, 20:27, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "radicale.002" <
radicale....@gmail.com
> ha scritto nel messaggionews:a84ab0cf-4122-4c71...@g19g2000yqc.googlegroups.com...

Scusami Carlo, sei sempre gentile, ma sono un po' lento
a capire ... :-(
Ma come fai tu non mi si apre un "clone" della maschera
detta (ad esempio) X, perche' per aprire un clone occorre
l' istruzione :
Dim FormAgain As New Form_X
Oppure si ?
... Abbi pazienza.


text:
"radicale.002" <
radica...@gmail.com
> ha scritto nel messaggio
news:4e81a970-f069-4ee1...@q12g2000yqj.googlegroups.com...



Oppure si ?
... Abbi pazienza.
--------------------------------------
Giusto. L'esempio era per farti capire come usare una variabile stringa per
usare più o diversi nomi di maschera o immettere un valore in un controllo.
Per il clone avevi già scritto tu.
Comunque questo codice apre un clone:
In un modulo pubblico
Public NumIstanza As Integer
Public xPos As Integer
Public yPos As Integer
Nel modulo della maschera
Option Compare Database
Option Explicit
Dim frmNewForm As Form 'Questa variabile va dichiarata qui a livello di
modulo di classe della maschera
'per evitare di usare visible = true
Private Sub TuoNomePulsanteSullaMaschera_Click()
    Set frmNewForm = New Form_NomeMaschera
    frmNewForm.SetFocus
    NumIstanza = NumIstanza + 1
    frmNewForm.Caption = "Nome della maschera (" & NumIstanza & ")"
End Sub
Private Sub Form_Close()
    xPos = 300
    yPos = 300
    NumIstanza = 0
End Sub
Private Sub Form_Open(Cancel As Integer)
    DoCmd.MoveSize xPos, yPos
    'aggiunge 300 a xPos e yPos per la successiva istanza
    xPos = xPos + 300
    yPos = yPos + 300
End Sub
Questa è il classico modo per aprire più cloni della stessa maschera.


text:
On 5 Giu, 18:30, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> Questa è il classico modo per aprire più cloni della stessa maschera.
Si ... Tutto perfetto, ma non ci capiamo. Sto chiedendo una cosa
diversa. :-)
Il problema e' in questa istruzione :
dim Mio_Clone as new Form_MascheraOriginale
Dove "MascheraOriginale" e' il nome della maschera
da clonare.
Ora attenzione, per favore.
Facciamo finta di voler costruire una funzione che
ha in input il nome di una maschera da clonare
e in output la maschera clone :
function CLONA ( dim Nome as string) as form
...
...
end function
Affermo :
Non e' possibile costruire questa funzione, perche'
all' interno deve esserci l' istruzione
dim Mio_Clone as new Form_MascheraOriginale
che dopo la parola chiave "NEW" non ammette
parametri.
A meno che all' interno della funz. si scriva una
banalita' del genere :
select case Nome
     case "Pippo" : dim clone as new form_pippo
     case "Pluto" :  dim clone as new form_pluto
   ...
   ...
end select
Improponibile.
Si puo' uscire in qualche modo da questa limitazione ?


author: Alessandro Cara

text:
radicale.002 ha scritto:

Usa un form contenitore con una submask
Chiami sempre il form contenitore e cambi dinamicamente i sourceobject
del subform
--
ac


text:
On 5 Giu, 19:51, Alessandro Cara <
alessandro.c...@ay-1anetwork.it
>
wrote:
> Usa un form contenitore con una submask
> Chiami sempre il form contenitore e cambi dinamicamente i sourceobject
> del subform
Si,
ma cambiare dinamicamente i source object implica aver da
qualche parte un select case ... Quindi a che pro' ? Ho solo
spostato il problema, ma non l' ho risolto.
A meno che (probabile !) non abbia capito un tubo di quello che
m' hai scritto ... :-)


text:
radicale.002 ha scritto:

Da qualche parte i nomi da assegnare devi pure averli.
Non so e non conosco la logica della tua applicazione ma ti dico come
ragiona la mia.
Io ho un menu' che reperisce i dati da una tabella sulla quale c'e'
scritto quale maschera aprire con che modalita' e con quali parametri e
che nome assegnare all'istanza.
(Un po' piu' "avanti" di quello che fa il Pannello Menu' di Northwind).
La mia "general" function, quindi, non fa altro che fare una new sempre
dello stesso formato e poi, prelevando dalla collezione dei parametri,
passa la stringa per caricare il nome form e il nome istanza.
L'informatica e' fatta da una cosa che entra e dopo una macinatina da
una uscita e la cosa in ingresso da qualche parte deve pur esserci.
La tua select case da qualche parte devi pure farla usa la variabile di
confronto della case e passala alla apposita gestione
P.S. Normalmente io non uso faccette perche', per me, sono di "default".
--
ac


text:
On 6 Giu, 15:57, Alessandro Cara <
alessandro.c...@ay-1anetwork.it
>
wrote:
> La mia "general" function, quindi, non fa altro che fare una new sempre
> dello stesso formato e poi, prelevando dalla collezione dei parametri,
> passa la stringa per caricare il nome form e il nome istanza.
> L'informatica e' fatta da una cosa che entra e dopo una macinatina da
> una uscita e la cosa in ingresso da qualche parte deve pur esserci.
> La tua select case da qualche parte devi pure farla usa la variabile di
> confronto della case e passala alla apposita gestione
Si,
ma anche cosi' non riesci ad aprirti un clone di una certa maschera
in modo del tutto parametrico, perche' da qualche parte nel programma
ad un certo momento dovrai scrivere l' istruzione :
dim MioClone as new form_Anagrafica
Ora, il NomeMaschera non puo' essere una variabile.
Devi scrivere proprio form_Anagrafica e non per esempio
form_(X) dove X = "Anagrafica".-
Cioe', anche se tu metti in una tabella i nomi delle maschere
(diciamo nel campo "nome") non puoi scrivere :
dim MioClone as new form_(nome) o qualcosa del genere.
Voglio dire ...
Osserva la differenza che c'e' tra questo codice :
In un modulo : X = "Anagrafica"
e poi da qualche altra parte :
docmd.openform X
E questa :
dim Clone as new form_Anagrafica
Come la parametrizzi questa ?
Mi spiego ?


text:
radicale.002 ha scritto:
> On 6 Giu, 15:57, Alessandro Cara <
alessandro.c...@ay-1anetwork.it
>
> wrote:
>
>> La mia "general" function, quindi, non fa altro che fare una new sempre
>> dello stesso formato e poi, prelevando dalla collezione dei parametri,
>> passa la stringa per caricare il nome form e il nome istanza.
>> L'informatica e' fatta da una cosa che entra e dopo una macinatina da
>> una uscita e la cosa in ingresso da qualche parte deve pur esserci.
>> La tua select case da qualche parte devi pure farla usa la variabile di
>> confronto della case e passala alla apposita gestione
>
> Si,
> ma anche cosi' non riesci ad aprirti un clone di una certa maschera
> in modo del tutto parametrico, perche' da qualche parte nel programma
> ad un certo momento dovrai scrivere l' istruzione :
> dim MioClone as new form_Anagrafica
>
> Ora, il NomeMaschera non puo' essere una variabile.
> Devi scrivere proprio form_Anagrafica e non per esempio
> form_(X) dove X = "Anagrafica".-
e dalli.
NO!Quello che scrivi e' vero, proprio per questo motivo ho suggerito il
form contenitore
la new e' sempre sul form contenitore (il [Form_Pannello Dati] che hai
visto l'altra volta).
il form da caricare come submask puo', invece, essere messo in una
varabile stringa. L'operazione di modifica del sourceobject del subform
la faccio sulla open del form contenitore.Open che viene eseguita a
seguito della new e preleva i parametri da un mio oggetto pubblico.
Ciononostante la cosa diventa poi un po' "tricky" perche' la
sottomaschera, quando si tratta di istanze della stessa origine, ha
bisogno di modifiche dinamiche alla sorgente dati, unica ragione per cui
si creano piu' istanze dello stesso form.
>
> Cioe', anche se tu metti in una tabella i nomi delle maschere
> (diciamo nel campo "nome") non puoi scrivere :
> dim MioClone as new form_(nome) o qualcosa del genere.
>
> Voglio dire ...
> Osserva la differenza che c'e' tra questo codice :
>
> In un modulo : X = "Anagrafica"
> e poi da qualche altra parte :
> docmd.openform X
>
> E questa :
> dim Clone as new form_Anagrafica
> Come la parametrizzi questa ?
> Mi spiego ?
Avevo compreso il tuo problema. E' stato il mio problema qualche anno
fa. Sono intervenuto proprio perche', come si suol dire, sapevo dove
cadeva l'asino.
--
ac


text:
On 7 Giu, 13:55, Alessandro Cara <
alessandro.c...@ay-1anetwork.it
>
wrote:
> Avevo compreso il tuo problema. E' stato il mio problema qualche anno
> fa. Sono intervenuto proprio perche', come si suol dire, sapevo dove
> cadeva l'asino.
Ops ... Scusa tanto, hai ragione. Ad un certo punto, sara' stata la
stanchezza, non c' ho capito piu' niente.


title: [Accessgroup] Mp3Player e Auguri...

author: Pablitomf

text:
Nell'augurarvi a nome di Accessgroup un felice e sereno Natale , nonchè un
grandiosissimo 2008,
vi giro on-line l'ultimo agg all'mp3 player...
Aggiunte :
Gestione degli effetti audio...
da provare! ;-)
http://www.accessgroup.it/HomeArgomenti.asp?ID=222&Oggetto2=MP3_Player
AUGURISSSSIMI
--
---
Ciao
Pablitomf (Maurizio Facciuti)
Web Master
www.accessgroup.it


title: Esiste un file?

author: Graziano

text:
Buongiorno!!!
Come faccio a vedere se un file esiste utilizzando del codice?
Grazie.
--
Rag. Caforio Graziano
Engineering Software
Via G.ppe Pietroforte, 25
70021 Acquaviva (BA)
FAX 06/23315456
gcaf...@formanet.it
gcaf...@tiscalinet.it
ICQ#29620328


title: Esiste un file?

author: Sergio MAZZA

text:
"Graziano" <
gcaf...@formanet.it
> ha scritto nel messaggio
news:8ggch1$ihr$1...@fe2.cs.interbusiness.it...

C'è la funzione Dir():
es.
If Dir("pippo.doc") = "" Then
    MsgBox "file non trovato."
End If
Ciao.


title: Stampare non su stampante predefinita ...

author: Xymox

text:
Ho fatto un pò di ricerca "preventiva" con google ma non ho trovato la
soluzione.
Ho aanche scaricato dal sitocomune stampanti.zip, molto interessante lo
userò sicuramente, ma non risolve completamente il mio problema.
Io vorrei forzare una stampa su una determinata stampante, che non è quella
predefinita.
Lo vorrei fare da codice perchè premendo un altro pulsante la stessa andrà
su quella predefinita, insomma non posso neppure forzarla da
"Vis.Struttura"+"Imposta Pagina".
In vb questo riesco a farlo, ma credo di avere capito che non è possibile
farlo da Access.
Ditemi che non ho capito niente ! :-)
--
ciao MarcoS
www.marcosanti.it


author: Roberto da casa

text:
"Xymox" <
guarda...@libero.it
> ha scritto nel messaggio
news:bakk52$oc6a$1...@ID-122915.news.dfncis.de...

Se devi stampare solo un report su una stampante che non è quella
predefinita, a mio avviso devi:
1) Memorizzarti l'attuale stampante predefinita usando la funzione
GetDefaultPrinter che trovi nel modulo Printers dell'esempio Stampanti.zip
che hai scaricato dal Sito Comune.
2) Impostare la tua stampante come predefinita usando la funzione
SetDefaultPrinter che trovi nel modulo Printers dell'esempio Stampanti.zip
che hai scaricato dal Sito Comune.
3) Lanciare il report.
4) Reimpostare come predefinita la stampante che lo era inizialmente e per
fare questo puoi usare la funzione ResetDefaultPrinter che trovi nel modulo
Printers dell'esempio Stampanti.zip che hai scaricato dal Sito Comune.
C'è solo un piccolo problema: la funzione SetDefaultPrinter che è pubblicata
su Sito Comune non è valida per tutte le versioni di Windows e/o per tutte
le versioni di Access, ti consiglio di sostituirla con questa:
Public Sub SetDefaultPrinter(s As String)
'imposta la stampante passata come argomento a predefinita
On Error GoTo Esci
Dim WshNetwork As Object
If IsNull(s) Or s = "" Then Exit Sub
Set WshNetwork = CreateObject("WScript.Network")
WshNetwork.SetDefaultPrinter (s)
Set WshNetwork = Nothing
DoEvents
Esci:
End Sub
In alternativa puoi modificare la proprietà PrtDevMode: ma io l'ho sempre
trovata una proprietà mal documentata e quindi difficile da usare.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:wBlza.25188$lK4.7...@twister1.libero.it...
> Se devi stampare solo un report su una stampante che non è quella
> predefinita, a mio avviso devi:
> 1) Memorizzarti l'attuale stampante predefinita usando la funzione
> GetDefaultPrinter che trovi nel modulo Printers dell'esempio Stampanti.zip
> che hai scaricato dal Sito Comune.
> 2) Impostare la tua stampante come predefinita usando la funzione
> SetDefaultPrinter che trovi nel modulo Printers dell'esempio Stampanti.zip
> che hai scaricato dal Sito Comune.
> 3) Lanciare il report.
> 4) Reimpostare come predefinita la stampante che lo era inizialmente e per
> fare questo puoi usare la funzione ResetDefaultPrinter che trovi nel
modulo
> Printers dell'esempio Stampanti.zip che hai scaricato dal Sito Comune.
Stò proprio seguendo questa strada.
L'unico punto su cui ho qualche indecisione è il 3.
Cioè stò pensando di passare alla scheda che si trova in Stampanti.zip il
nome del Report, così da poterla usare per più applicazioni.
Questo comporta la selezione manuale della stampante mediante questa scheda.
Hai un'idea migliore ?
> C'è solo un piccolo problema: la funzione SetDefaultPrinter che è
pubblicata
> su Sito Comune non è valida per tutte le versioni di Windows e/o per tutte
> le versioni di Access, ti consiglio di sostituirla con questa:
>
> Public Sub SetDefaultPrinter(s As String)
> 'imposta la stampante passata come argomento a predefinita
> On Error GoTo Esci
> Dim WshNetwork As Object
> If IsNull(s) Or s = "" Then Exit Sub
> Set WshNetwork = CreateObject("WScript.Network")
> WshNetwork.SetDefaultPrinter (s)
> Set WshNetwork = Nothing
> DoEvents
> Esci:
> End Sub
Io stò usando la funzione SetDefaultPrinter che si trova nel modulo di
Stampanti.zip e funziona correttamente.
Ho provato a sostituirla con quella che mi hai passato tu, non funziona ...
stò lavorando con win2000+A97 vers. Developer
Questa è quella che mi funziona:
'imposta la stampante passata come argomento a predefinita
On Error GoTo Esci
Dim x As Long
If IsNull(s) Or s = "" Then Exit Sub
x = WriteProfileString("windows", "device", vbNullString)
DoEvents
x = WriteProfileString("windows", "device", s)
DoEvents
Esci:
> In alternativa puoi modificare la proprietà PrtDevMode: ma io l'ho sempre
> trovata una proprietà mal documentata e quindi difficile da usare.
grazie Roberto per i suggerimenti :-)
--
ciao MarcoS
www.marcosanti.it


text:
"Xymox" <
guarda...@libero.it
> ha scritto nel messaggio
news:bakq9u$n2bm$1...@ID-122915.news.dfncis.de...

Se devi dare la possibilità all'utente finale di scegliere la stampante da
usare per la stampa di un report chiamato MioReport, un'alternativa a quanto
ti ho suggerito potrebbe essere quella, invece di usare il metodo
OpenReport, di usare i metodi SelectObject (vedi help) e RunCommand (vedi
help), ovvero:
    DoCmd.SelectObject acReport, "MioReport", True
    DoCmd.RunCommand acCmdPrint
Così facendo, prima di effettuare la stampa, Access apre la finestra di
dialogo di stampa dalla quale, fra l'altro, puoi selezionare la stampante da
usare per quel report: la stampante selezionata non modifica l'impostazione
della stampamte predefinita.

Non so che dirti: a me con Windows Me ed Access 97 funziona; più volte in
questo NG ci si è lamentati che quella funzione del Sito Comune fa i
capricci con Win2000 e WinXP; comunque è inutile fare filosofia: squadra che
vince non si cambia e funzione che funziona non si modifica. ;-)
>
> > In alternativa puoi modificare la proprietà PrtDevMode: ma io l'ho
sempre
> > trovata una proprietà mal documentata e quindi difficile da usare.
>
> grazie Roberto per i suggerimenti :-)
> --
> ciao MarcoS
--



text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto
> Se devi dare la possibilità all'utente finale di scegliere la stampante da
> usare per la stampa di un report chiamato MioReport, un'alternativa a
quanto
> ti ho suggerito potrebbe essere quella, invece di usare il metodo
> OpenReport, di usare i metodi SelectObject (vedi help) e RunCommand (vedi
> help), ovvero:
>
>     DoCmd.SelectObject acReport, "MioReport", True
>     DoCmd.RunCommand acCmdPrint
>
> Così facendo, prima di effettuare la stampa, Access apre la finestra di
> dialogo di stampa dalla quale, fra l'altro, puoi selezionare la stampante
da
> usare per quel report: la stampante selezionata non modifica
l'impostazione
> della stampamte predefinita.
E' un ottima alternativa, peccato che non mi funzioni.
Seleziono la stampante, effettivamente la stampa arriva alla stampante
selezionata, il problema è che non arriva "MioReport" ma la scheda da cui la
lancio, cioè quella a video.
Es. da MioForm lancio MioReport su stampante HP2, bene arriva su HP2
MioForm.
grazie
Marco s.


text:
"Xymox" <
guarda...@libero.it
> ha scritto nel messaggio
news:bav81n$40l75$1...@ID-122915.news.dfncis.de...

Se avviene questo significa che NON hai selezionato il report da stampare
con la DoCmd.SelectObject , che vuol dire che o non hai eseguito il metodo
SelectObject oppure lo hai eseguito indicando un nome di report inesistente.
Con
DoCmd.RunCommand acCmdPrint
viene stampato l'oggetto che è in quel momento attivo e se non riesci a
selezionare correttamente il report da eseguire con la DoCmd.SelectObject
l'oggetto attivo risulta essere proprio MioForm che è la maschera
all'interno della quale stai operando, e quello ti viene giustamente
stampato.
Prova a postare tutto il codice VBA che usi per stampare il report.



text:
CUT
>
> E' un ottima alternativa, peccato che non mi funzioni.
> Seleziono la stampante, effettivamente la stampa arriva alla stampante
> selezionata, il problema è che non arriva "MioReport" ma la scheda da cui
la
> lancio, cioè quella a video.
> Es. da MioForm lancio MioReport su stampante HP2, bene arriva su HP2
> MioForm.
> grazie
> Marco s.
>
Una soluzione da abbinare al codice che già usi.
Imposti via codice la stampante predefinita...come già fai,
usa il pulsante nella maschera per aprire il report in anteprima
DoCmd.OpenReport "TuoReport", acPreview
poi nel report scrivi:
Private Sub Report_Activate()
DoCmd.PrintOut acPrintAll, 1, 1, acMedium, 1, True
DoEvents
DoCmd.Close acReport, Me.Name
Doevents
End Sub
Leggi nella guida "PrintOut" per le opzioni e la stampa "da" pagina "a"
pagina.
Questo stamperà il report dalla maschera sulla stampante predefinita.
Unica limitazione è quella che se vuoi visualizzare e basta il report, non
sarà possibile.
Per aggirare questo problema potresti realizzare un secondo report, identico
al primo, da utilizzare solo per la stampa.
Prova e facci sapere.
Ciao, Carlo


text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto
> Se avviene questo significa che NON hai selezionato il report da stampare
> con la DoCmd.SelectObject , che vuol dire che o non hai eseguito il metodo
> SelectObject oppure lo hai eseguito indicando un nome di report
inesistente.
> Con
>
> DoCmd.RunCommand acCmdPrint
>
> viene stampato l'oggetto che è in quel momento attivo e se non riesci a
> selezionare correttamente il report da eseguire con la DoCmd.SelectObject
> l'oggetto attivo risulta essere proprio MioForm che è la maschera
> all'interno della quale stai operando, e quello ti viene giustamente
> stampato.
>
> Prova a postare tutto il codice VBA che usi per stampare il report.
eccolo:
DoCmd.SelectObject acReport, "R_Mag_Off", True
DoCmd.RunCommand acCmdPrint
ti assicuro che il report R_Mag_Off esiste.
ciao e grazie
marco s.


text:
"Xymox" <
guarda...@libero.it
> ha scritto nel messaggio
news:bavcje$3v6hp$1...@ID-122915.news.dfncis.de...

Non saprei proprio cosa dirti: io lo uso regolarmente e a me Access stampa
il report e non la maschera.
Per scrupolo, prima di risponderti, ho fatto il copia/incoola del tuo codice
nell'evento "Su clic" di un pulsante di comando, ho cambiato il nome del
report e tale report mi è stato regolarmente stampato.
Mi dispiace.



text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto
> Non saprei proprio cosa dirti: io lo uso regolarmente e a me Access stampa
> il report e non la maschera.
> Per scrupolo, prima di risponderti, ho fatto il copia/incoola del tuo
codice
> nell'evento "Su clic" di un pulsante di comando, ho cambiato il nome del
> report e tale report mi č stato regolarmente stampato.
> Mi dispiace.
Se prima chiudo la maschera da cui la lancio funziona :-) :
On Error GoTo CmdPDF_ERR
DoCmd.Close acForm, "S_Mag_SelPrint"
DoCmd.SelectObject acReport, "R_Mag_Off", True
DoCmd.RunCommand acCmdPrint
CmdPDF_ERR:
Exit Sub
Devo intercettare l'errore perchč se faccio annulla dalla maschera di
"seleziona stampanti" mi genera un errore, capita anche a Te ?
p.s. La maschera da cui lancio la stampa e di tipo:
Popup = Sě
A scelta obbligatoria = Sě
Che non sia questo il motivo per cui la devo chiudere ?
ciao
marco s.


text:
"Xymox" <
guarda...@libero.it
> ha scritto nel messaggio
news:bavepe$42ukb$1...@ID-122915.news.dfncis.de...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto
>
> > Non saprei proprio cosa dirti: io lo uso regolarmente e a me Access
stampa
> > il report e non la maschera.
> > Per scrupolo, prima di risponderti, ho fatto il copia/incoola del tuo
> codice
> > nell'evento "Su clic" di un pulsante di comando, ho cambiato il nome del
> > report e tale report mi è stato regolarmente stampato.
> > Mi dispiace.
>
> Se prima chiudo la maschera da cui la lancio funziona :-) :
> On Error GoTo CmdPDF_ERR
> DoCmd.Close acForm, "S_Mag_SelPrint"
> DoCmd.SelectObject acReport, "R_Mag_Off", True
> DoCmd.RunCommand acCmdPrint
> CmdPDF_ERR:
> Exit Sub
>
> Devo intercettare l'errore perchè se faccio annulla dalla maschera di
> "seleziona stampanti" mi genera un errore, capita anche a Te ?
Si: la generazione dell'errore 2501 in quel caso è normale e serve appunto a
segnalare che è stata annullata la stampa da parte dell'utente finale.
> p.s. La maschera da cui lancio la stampa e di tipo:
> Popup = Sì
> A scelta obbligatoria = Sì
> Che non sia questo il motivo per cui la devo chiudere ?
Certamente il problema è questo; infatti una maschera popup a scelta
obbligatoria resta SEMPRE attiva sino a quando non viene chiusa: quindi o
usi una maschera NON popup e NON a scelta obbligatoria oppure, come hai
fatto tu, la chiudi prima di comandare la stampa, in caso contrario il
report non diventerà mai attivo e con DoCmd.RunCommand acCmdPrint, come ti
ho detto nel mio messaggio precedente, non potrai che stampare la maschera
popup e non il report, non avendo quest'ultimo diventare attivo.
> ciao
> marco s.



title: Restituzione di tutti i valori in una Query

text:
Ho creato una query con un criterio relativo ad un campo di una
tabella aperta (Forms![Maschera]![Campo]) e fin qui la query filtra i dati
inseriti nel campo, ma se voglio visualizzare tutti i dati della query,
lasciando il campo in bianco come devo fare?
Se lascio il campo in bianco la Query è altrettanto in bianco.
Grazie di cuore


text:
<
ves...@libero.it
> ha scritto nel messaggio
news:yAFP5.46636$BF.16...@news.infostrada.it...

Nei criteri scrivi:
Like [Forms]![Maschera]![Campo] & "*"
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: Consentire un massimo di tre spazi in casella di testo

author: diego

text:
Buon giorno a tutti
il problema sorge quasi spontaneo quando si decide di non consentire
spazi nelle caselle di testo dove andra' immesso il cognome per evitare
paranoie nella ricerca perche' magari uno lo digita senza, con uno o
piu' spazi.
ora il problema non si pone se il cognome e' un unica parola ma se il
cognome e' composto da due o piu' parole?
non c'e' una maniera per consentire un massimo di tre spazi sulla
casella di testo?
Per evitare gli spazi ed inserire i caratteri tutti maiuscoli sia a
video che a stampa uso la funzione
UCase(Replace(Me.TxtCognome, " ", ""))
per ottenere, invece, quanto descritto sopra mi veniva in mente
qualcosa del tipo
Private Sub TxtCognome_AfterUpdate()
if me.TxtCognome.Format=UCase(Me.TxtCognome@ & me.txtCognome) Or
   me.TxtCognome.Format=UCase(Me.TxtCognome@ & @me.txtCognome) Or
   me.TxtCognome.Format=UCase(Me.TxtCognome@ & @me.txtCognome&
@me.txtCognome) then
me.TxtCognome=UCase(me.TxtCognome
else
UCase(Replace(Me.TxtCognome, " ", ""))
end if
end sub
ma non ne vuole sapere di funzionare
nemmeno sostituendo il carattere @ con " "
potete dirmi dove sbaglio e se c'e' maniera di fare cio'?
Grazie a tutti
Saluti
Diego


text:
diego ha scritto:

pero' a dire il vero mi sembra una cazzata, e se uno sbagliasse a
digitare che so' Brambilla con Bram billa perche' magari gli scappa un
colpo di barra spaziatrice??....mmmm... mi sa che e' un posto stupido,
scusate ma non credo ci siano soluzioni, l'errore umano e' sempre in
agguato!!!


author: Paolo Dal Bosco

text:
"diego" <
diegoci...@hotmail.com
> ha scritto nel messaggio
news:1155555433....@m73g2000cwd.googlegroups.com...

Se ti puע andar bene:
supponendo che la casella testo si chiami COGNONE,
prima di aggiornare inserirei questo codice:
Private Sub Cognome_BeforeUpdate(Cancel As Integer)
If IsNull(Me.Cognome) Then
Exit Sub
End If
    Dim Msg, Style, Response
    If Not CognomeValido(Me.Cognome) Then
        Msg = Me.Cognome.Value & vbCrLf & vbCrLf & "Il COGNOME non sembra
valido. " & vbCrLf & "Usarlo ugualmente?"
        Style = vbYesNo + vbQuestion + vbDefaultButton2
        Response = MsgBox(Msg, Style, "Controllo COGNOME")
        If Response = vbNo Then DoCmd.CancelEvent
    End If
End Sub
ed il modulo relativo:
Public Function CognomeValido(strTextToCheck As String) As Boolean
On Error GoTo ProcErr
    Dim lngPos As Long
    Dim lngCnt As Long
    Dim strCharToCheck As String
    Dim Count As Integer
    Dim Numeric As Integer
    Count = 0
    Numeric = 0
    ' Caratteri Numerici Non accettati
    For lngCnt = 1 To Len(strTextToCheck)
        strCharToCheck = LCase(Mid(strTextToCheck, lngCnt, 1))
        lngPos = InStr(1, "abcdefghijklmnopqrstuvwxyz'אטילעש",
strCharToCheck, vbTextCompare)
        If IsNumeric(strCharToCheck) Then Numeric = 1
    Next
    If Numeric = 1 Then CognomeValido = False: Exit Function
        ' Numero di SPAZI
         For lngCnt = 1 To Len(strTextToCheck)
        strCharToCheck = LCase(Mid(strTextToCheck, lngCnt, 1))
        If strCharToCheck = Chr(32) Then Count = Count + 1
        [Forms]![Maschera1]![b] = Count
    Next
    If Count <= 3 Then CognomeValido = True: Exit Function
ProcExit:
    Exit Function
ProcErr:
    Resume ProcExit
End Function
Sarebbe perע da aggiungere anche il controllo di caratteri strani come il +
o -....
Ciao
Paolo


author: Alessandro Baraldi

text:
diego ha scritto:

Non è che stai facendo un giro assurdo semplicemente per evitare che
il carattere Spazio
sia non digitabile ....???
Questa funzione inserita nell'evento KeyPress fà in modo che i
caratteri ammessi siano solo LETTERE......
Se la modifichi, ed è molto semplice, vedrai che ti eviti tutto quel
popò di codice che
in ogni caso è fallace di suo....!
Public Function CkDgtWord(KeyAscii As Integer) As Integer
'Verifica se il TASTO PREMUTO è una lettera
'Va inserita nell'EVENTO KEY_PRESS
'65-90(Maiuscole) 97-122(Minuscole)
   CkDgtWord = 30
   If ((KeyAscii >= 65 And KeyAscii <= 90) Or (KeyAscii >= 97 And
KeyAscii <= 122)) Then CkDgtWord = KeyAscii
   Select Case KeyAscii
      Case vbKeyBack, vbKeyTab, vbKeyClear, vbKeyReturn, vbKeyShift
         CkDgtWord = KeyAscii
      Case vbKeyEscape, vbKeySpace, vbKeyDelete, vbKeyNumlock
         CkDgtWord = KeyAscii
   End Select
End Function
Saluti
@Alex


title: query per piu maschere

text:
ciao,
ho una query sempre uguale che però deve mettere in esecuzione su più
maschere (non contemporaneamente)
ho maschera1
e maschera2
per andare a prendere i dati della query nella casella combinata, che
ha lo stesso nome devo fare 2 query con [forms]![maschera1]!
[casellacombinata1]
[forms]![maschera2]![casellacombinata1]
è possibile fare un unica query nella quale viene detto
maschera attiva![casellacombinata1] di modo che non debba fare tante
query uguali e solo con un nome maschera diverso?
grazie
Francesco


title: query per piu maschere

author: Karl Donaubauer

text:
fran...@compiuter.info
 wrote:
> ...

Di solito si usa VBA, cioè una funzione che controlla quale maschera
è aperta e poi restituisce il valore per il criterio. In alternativa puoi
anche provare questa espressione come criterio (in 1 righa):
Eval("Forms!" & Choose(SysCmd(10;2;"maschera1")+1;"maschera2";
"maschera1") & "!casellacombinata1")
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: query per piu maschere

text:
On 28 Giu, 11:42, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:

> Access FAQ:
www.donkarl.com/it-
 Nascondi testo citato
>
> - Mostra testo citato
con VBA ho salvato il nome della maschera,
penso che sia corretto fare così
Dim TEST As Form
Set TEST = Screen.ActiveForm
adesso però come faccio a dire alla query di andare a ricercare su
test!casellacombinata ??
quando mi apre la nuova maschera se anche gli dico di caricare i dati
da test![casellacombinata1] mi dice impossibile trovare test
come faccio??


title: query per piu maschere

text:
fran...@compiuter.info
 wrote:
> Karl Donaubauer wrote:
>>> ...
>>> ho una query sempre uguale che però deve mettere in esecuzione
>>> su più maschere (non contemporaneamente)
>>
>>> ho maschera1
>>> e maschera2
>>
>>> per andare a prendere i dati della query nella casella combinata, che
>>> ha lo stesso nome devo fare 2 query con [forms]![maschera1]!
>>> [casellacombinata1]
>>> [forms]![maschera2]![casellacombinata1]
>>
>>> è possibile fare un unica query nella quale viene detto
>>
>>> maschera attiva![casellacombinata1] di modo che non debba fare tante
>>> query uguali e solo con un nome maschera diverso?
>>
>> Di solito si usa VBA, cioè una funzione che controlla quale maschera
>> è aperta e poi restituisce il valore per il criterio. In alternativa puoi
>> anche provare questa espressione come criterio (in 1 righa):
>>
>> Eval("Forms!" & Choose(SysCmd(10;2;"maschera1")+1;"maschera2";
>> "maschera1") & "!casellacombinata1")
> ...
> con VBA ho salvato il nome della maschera,
> ...
> Dim TEST As Form
> Set TEST = Screen.ActiveForm
>
> adesso però come faccio a dire alla query di andare a ricercare su
> test!casellacombinata ??
>
> quando mi apre la nuova maschera se anche gli dico di caricare i dati
> da test![casellacombinata1] mi dice impossibile trovare test
>
> come faccio??
Come già scritto una funzione restituisce il criterio, p.e.
Function fctCriterio() As Long
If CurrentProject.AllForms("maschera1").IsLoaded Then
    fctCriterio = Forms!maschera1!casellacombinata1
ElseIf CurrentProject.AllForms("maschera2").IsLoaded Then
    fctCriterio = Forms!maschera2!casellacombinata1
End If
End Function
Poi nella query come criterio basta: fctCriterio()
Non hai scritto il tipo del campo col criterio. L'esempio
è per Long. Per un tipo diverso devi cambiare il tipo
nella dicchiarazione della funzione.



title: query per piu maschere

text:
On 28 Giu, 19:57, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:

> Access FAQ:
www.donkarl.com/it-
 Nascondi testo citato
>
> - Mostra testo citato
MA XKE' sono così ignorante in materia,
ho creato il codice, ho messo come routine evento su corrente e ho
fatto così
Private Sub Form_Current()
Function fctCriterio() As Long
If CurrentProject.AllForms("MARE COMPLETI").IsLoaded Then
    fctCriterio = Forms![MARE COMPLETI]!CasellaCombinata16
ElseIf CurrentProject.AllForms("MARE GROUPAGES").IsLoaded Then
    fctCriterio = Forms![MARE GROUPAGES]!CasellaCombinata16
ElseIf CurrentProject.AllForms("CAMION COMPLETI").IsLoaded Then
    fctCriterio = Forms![CAMION COMPLETI]!CasellaCombinata16
ElseIf CurrentProject.AllForms("CAMION GROUPAGES").IsLoaded Then
    fctCriterio = Forms![CAMION GROUPAGES]!CasellaCombinata16
End If
End Function
End Sub
poi nella query sql, che dovrebbe eseguire appena dopo se ho capito
bene gli ho detto di fare questo
SELECT [FORNITORE].[FORNITORE], [FORNITORE].[EMAIL], [FORNITORE].
[CONTATTO1], [FORNITORE].[FAX], [FORNITORE].[NOTE], [FORNITORE].[TEL],
[SETTORE].[fornitore]
FROM SETTORE INNER JOIN FORNITORE ON [SETTORE].[fornitore]=[FORNITORE].
[FORNITORE];
WHERE ((([SETTORE].[fornitore])=fctCriterio()));
quando faccio aprire la maschera, mi dice che la funzione non è
definita.. precisamente funzione"fctcriterio" non definita
nell'espressione
io non so più che fare.. ho provato un po, ma non ho  capito dove sta
l'errore


title: query per piu maschere

text:
fran...@compiuter.info
 wrote:
> ...
> ho creato il codice, ho messo come routine evento su corrente e ho
> fatto cosě
>
> Private Sub Form_Current()
>
> Function fctCriterio() As Long
>
> If CurrentProject.AllForms("MARE COMPLETI").IsLoaded Then
>     fctCriterio = Forms![MARE COMPLETI]!CasellaCombinata16
> ElseIf CurrentProject.AllForms("MARE GROUPAGES").IsLoaded Then
>     fctCriterio = Forms![MARE GROUPAGES]!CasellaCombinata16
> ElseIf CurrentProject.AllForms("CAMION COMPLETI").IsLoaded Then
>     fctCriterio = Forms![CAMION COMPLETI]!CasellaCombinata16
> ElseIf CurrentProject.AllForms("CAMION GROUPAGES").IsLoaded Then
>     fctCriterio = Forms![CAMION GROUPAGES]!CasellaCombinata16
>
> End If
>
> End Function
>
> End Sub
>
> poi nella query sql, che dovrebbe eseguire appena dopo se ho capito
> bene gli ho detto di fare questo
>
> SELECT [FORNITORE].[FORNITORE], [FORNITORE].[EMAIL], [FORNITORE].
> [CONTATTO1], [FORNITORE].[FAX], [FORNITORE].[NOTE], [FORNITORE].[TEL],
> [SETTORE].[fornitore]
> FROM SETTORE INNER JOIN FORNITORE ON [SETTORE].[fornitore]=[FORNITORE].
> [FORNITORE];
> WHERE ((([SETTORE].[fornitore])=fctCriterio()));
>
> quando faccio aprire la maschera, mi dice che la funzione non č
> definita.. precisamente funzione"fctcriterio" non definita
> nell'espressione
>
> io non so piů che fare.. ho provato un po, ma non ho  capito dove sta
> l'errore
- Nella finestra database crea un nuovo modulo.
- Taglia la funzione, cioč tutto da
Function fctCriterio() As Long
a
End Function
e copia il testo nel nuovo modulo.
- Salva il modulo.
Questa funzione che si trova in un modulo standard puoi usare
in una query.



title: query per piu maschere

text:
On 29 Giu, 22:58, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:
>
france...@compiuter.info
 wrote:
> > ...
> > ho creato il codice, ho messo come routine evento su corrente e ho
> > fatto così
>
> > Private Sub Form_Current()
>
> > Function fctCriterio() As Long
>
> > If CurrentProject.AllForms("MARE COMPLETI").IsLoaded Then
> >     fctCriterio = Forms![MARE COMPLETI]!CasellaCombinata16
> > ElseIf CurrentProject.AllForms("MARE GROUPAGES").IsLoaded Then
> >     fctCriterio = Forms![MARE GROUPAGES]!CasellaCombinata16
> > ElseIf CurrentProject.AllForms("CAMION COMPLETI").IsLoaded Then
> >     fctCriterio = Forms![CAMION COMPLETI]!CasellaCombinata16
> > ElseIf CurrentProject.AllForms("CAMION GROUPAGES").IsLoaded Then
> >     fctCriterio = Forms![CAMION GROUPAGES]!CasellaCombinata16
>
> > End If
>
> > End Function
>
> > End Sub
>
> > poi nella query sql, che dovrebbe eseguire appena dopo se ho capito
> > bene gli ho detto di fare questo
>
> > SELECT [FORNITORE].[FORNITORE], [FORNITORE].[EMAIL], [FORNITORE].
> > [CONTATTO1], [FORNITORE].[FAX], [FORNITORE].[NOTE], [FORNITORE].[TEL],
> > [SETTORE].[fornitore]
> > FROM SETTORE INNER JOIN FORNITORE ON [SETTORE].[fornitore]=[FORNITORE].
> > [FORNITORE];
> > WHERE ((([SETTORE].[fornitore])=fctCriterio()));
>
> > quando faccio aprire la maschera, mi dice che la funzione non è
> > definita.. precisamente funzione"fctcriterio" non definita
> > nell'espressione
>
> > io non so più che fare.. ho provato un po, ma non ho  capito dove sta
> > l'errore
>
> - Nella finestra database crea un nuovo modulo.
> - Taglia la funzione, cioè tutto da
>
> Function fctCriterio() As Long
> a
> End Function
>
> e copia il testo nel nuovo modulo.
> - Salva il modulo.
>
> Questa funzione che si trova in un modulo standard puoi usare
> in una query.
>
> --
> HTH
> Karl
> *********
> Access FAQ:
www.donkarl.com/it-
 Nascondi testo citato
>
> - Mostra testo citato
grazie..
ok.. sono riuscito a far eseguire la funzione dalla query,
però mi da errore, me la manda in debug alla riga
    fctCriterio = [Forms]![MARE COMPLETI]![CasellaCombinata16]
sia che uso le parentesi che non le uso.
le funzione è sempre questa
Function fctCriterio() As Long
If CurrentProject.AllForms("MARE COMPLETI").IsLoaded Then
    fctCriterio = [Forms]![MARE COMPLETI]![CasellaCombinata16]
ElseIf CurrentProject.AllForms("MARE GROUPAGES").IsLoaded Then
    fctCriterio = Forms![MARE GROUPAGES]!CasellaCombinata16
ElseIf CurrentProject.AllForms("CAMION COMPLETI").IsLoaded Then
    fctCriterio = Forms![CAMION COMPLETI]!CasellaCombinata16
ElseIf CurrentProject.AllForms("CAMION GROUPAGES").IsLoaded Then
    fctCriterio = Forms![CAMION GROUPAGES]!CasellaCombinata16
End If
End Function
che errore c'è? devo dichiarare la funzione in altro modo?


title: query per piu maschere

text:

> > Access FAQ:
www.donkarl.com/it-Nascondi
 testo citato
>
> > - Mostra testo citato
>
> grazie..
>
> ok.. sono riuscito a far eseguire la funzione dalla query,
>
> però mi da errore, me la manda in debug alla riga
>
>     fctCriterio = [Forms]![MARE COMPLETI]![CasellaCombinata16]
>
> sia che uso le parentesi che non le uso.
>
> le funzione è sempre questa
>
> Function fctCriterio() As Long
>
> If CurrentProject.AllForms("MARE COMPLETI").IsLoaded Then
>     fctCriterio = [Forms]![MARE COMPLETI]![CasellaCombinata16]
> ElseIf CurrentProject.AllForms("MARE GROUPAGES").IsLoaded Then
>     fctCriterio = Forms![MARE GROUPAGES]!CasellaCombinata16
> ElseIf CurrentProject.AllForms("CAMION COMPLETI").IsLoaded Then
>     fctCriterio = Forms![CAMION COMPLETI]!CasellaCombinata16
> ElseIf CurrentProject.AllForms("CAMION GROUPAGES").IsLoaded Then
>     fctCriterio = Forms![CAMION GROUPAGES]!CasellaCombinata16
>
> End If
>
> End Function
>
> che errore c'è? devo dichiarare la funzione in altro modo?- Nascondi testo citato
>
> - Mostra testo citato
ho risolto!!
ho fatto la funzione come string e adesso funziona!!
grazie mille..
sei sempre gentilissimo!!


title: Re: prelevare dati da query

text:
On 29 Mag, 16:35, ugo conte <
ugo.cont...@gmail.com
> wrote:
> On 29 Mag, 12:05, ugo conte <
ugo.cont...@gmail.com
> wrote:
>
> > ciao a tutti
>
> > ho creato la seguente query2:
> > sql:
> > SELECT TbDettaglio_Fattura.IDTESTATAFATTURA,
> > TbDettaglio_Fattura.IDDETTAGLIOFATTURA, TbDescrizione.Categoria,
> > TbDescrizione.Descrizione
> > FROM TbDescrizione INNER JOIN TbDettaglio_Fattura ON
> > TbDescrizione.IdDescrizione = TbDettaglio_Fattura.IDDESCRIZIONE
> > ORDER BY TbDettaglio_Fattura.IDTESTATAFATTURA DESC ,
> > TbDettaglio_Fattura.IDDETTAGLIOFATTURA DESC;
>
> > visto che a me serve la categoria dell'ulitmo record di ogni
> > recordset,
> > ho inserito nel dettaglio fattura una casella di testo con la
> > formula:
>
> > =DLookUp("descrizione";"Query2";"IDtestataFATTURA")
> > per verificarne l'evento.
>
> > ma non sono riuscito a trovare la giusta corrispondenza.
> > Dove sto sbagliando?
> > Grazie
>
> ho fatto un piccolo passo;
> questa è l'espressione corretta:
> =DLookUp("[Categoria]";"[Query2]";"[IdDettaglioFattura]=" &
> [IdDettaglioFattura]).
>
> l'ho converita in:
> blnFlag = Nz(DLookup("[Categoria]", "Query2", _
>        "[IdDettaglioFattura]= " & Me!IdDettaglioFattura))
>
> per inserirla in VB, ma ho l'errore 3075, errore di sintassi operatore
> mancante
> "[IdDettaglioFattura]= "; forse perchè IdDettaglioFattura nella query
> ha un'ordinamneto Decrescente?
>
> Grazie dell'aiuto
No.
La differenza in VBA è che il ; viene sostituito dalla ,.... e mi pare
tu abbia scritto corretto, ma l'assurdo, e mi pare di avertelo già
detto è
che la funzione non restituisce un Boolean...!!!
Mi sembri un pò come "Marcello"... pochissa  voglia di aprire la guida
e studiare...!
Fai sempre domande molto, troppo banali, proprio tipiche di chi non
legge l'HELP.
Alla fine la gente si stufa di sentire sempre banalità... e rischi che
nessuno ti risponda...!
@Alex


title: Re: prelevare dati da query

author: Marcello

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:21c38676-82f2-4e7f...@a10g2000vbz.googlegroups.com...




@Alex
non credo di averti mai scelto per dare risposte alle mie domande,
visto che mi hai tirato in causa.
Anzi ti avevo chiesto di non rispondermi più.
E questo vale ancora.


title: Re: prelevare dati da query

text:
...
> non credo di averti mai scelto per dare risposte alle mie domande,
> visto che mi hai tirato in causa.
> Anzi ti avevo chiesto di non rispondermi più.
> E questo vale ancora.
Marcello ciao.
Siamo liberi di dire quello che ci pare non credi...!
Se Silvio è libero di denunciare i Giudici davanti ad OBAMA credi che
io sia intimidito dall'esprimere
quello che penso... magari sul tuo conto...? GIAMMAI.
Nel bene o nel male io continuerò... e tu ci farai l'abitudine...!
oppure sei libero di incazzarti... a me proprio importa come quella
che ha generato pinocchio...!
E questo vale sempre..!!!
@Alex


title: Re: prelevare dati da query

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:18907e25-7c11-407c...@c26g2000vbq.googlegroups.com...



sei infantile,
ma questo lo sa già da solo.
cmq fai pure
per quello che m'importa.


title: Re: prelevare dati da query

author: Antonio Biso

text:
"Marcello" <
j...@tiscali.it
> ha scritto nel messaggio
news:4de31e65$0$38646$4faf...@reader1.news.tin.it...

Non è infantile, semplicemente esprime liberamente il suo diritto di
democrazia all'interno di un NG non moderato, nei limiti imposti dal
manifesto e dalla netiquette
Antonio


title: Re: prelevare dati da query

text:
...
> sei infantile,
si può essere...!
Come sai le visioni delle cose cambiano a seconda dell'angolo di
visuale.
L'infantilità è anche quell'atteggiamento di chiedere cose banali in
modo banale senza comprendere che le basi tecniche servono in modo
nilaterale per comprendere, e sentirsi offesi se
questo aspetto viene fatto notare.
Io poi ci marcio molto... ma che vuoi farci... mi diverto con
veramente poco.
> ma questo lo sa già da solo.
> cmq fai pure
Non hai bisogno di confermarlo, questo è un MUST.
> per quello che m'importa.
Anche quì sei libero... ed anche questo è un MUST, io non mi permetto
di contestarlo anzi lo supporto.
Mi raccomando studia e non fare sempre domande alla "coda di cane"...
@Alex


title: Re: prelevare dati da query

author: CIDI

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:18907e25-7c11-407c...@c26g2000vbq.googlegroups.com...
...
> non credo di averti mai scelto per dare risposte alle mie domande,
> visto che mi hai tirato in causa.
> Anzi ti avevo chiesto di non rispondermi più.
> E questo vale ancora.
dillo a Obama!!!
:DD
ciao Marcello
non devi prendertela....anzi...
sapessi quante "parolazze" dice, ancora, a me
dopo quasi un decennio che ci conosciamo...;-)
naturalmente lo fa a fin di bene...
pensa ad "insegnare" a pescare e non a regalare il pesce.
credo sia conveniente leggere questa favoletta :
http://mindshake.org/il-mio-nome-e-nessuno-luccellino-la-vacca-il-cojote/
Marcello ciao.
Siamo liberi di dire quello che ci pare non credi...!
Se Silvio è libero di denunciare i Giudici davanti ad OBAMA credi che
io sia intimidito dall'esprimere
quello che penso... magari sul tuo conto...? GIAMMAI.
Nel bene o nel male io continuerò... e tu ci farai l'abitudine...!
oppure sei libero di incazzarti... a me proprio importa come quella
che ha generato pinocchio...!
E questo vale sempre..!!!
in secula seculorum....:D
ciao Alex
siamo allegri oggi... *__*
Daniele


title: Re: prelevare dati da query

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:11ba9bba-d474-4889...@c41g2000yqm.googlegroups.com...
...
> sei infantile,
Mi raccomando studia e non fare sempre domande alla "coda di cane"...
@Alex
non era pene di segugio?
P.S.
Oh, ma tu che sei ammanicato:
ma il tuo premier oggi è andato in romania a caccia di selvaggina fresca?
Antonio


title: Re: prelevare dati da query

text:
On 30 Mag, 14:47, "Antonio Biso" <
ab...@libero.it
> wrote:
> "@Alex" <
ik2...@libero.it
> ha scritto nel messaggionews:11ba9bba-d474-4889...@c41g2000yqm.googlegroups.com...
> ...
>
> > sei infantile,
>
> Mi raccomando studia e non fare sempre domande alla "coda di cane"...
>
> @Alex
>
> non era pene di segugio?
Penso che possano essere equivalenti... il mio termine è meno
diretto... anche perchè la coda fa le curve, mentre quello del Segugio
è DIRITTO..!!!
> P.S.
> Oh, ma tu che sei ammanicato:
> ma il tuo premier oggi è andato in romania a caccia di selvaggina fresca?
Antò fai attenzione perchè se ha preso il 50% dei voti, e
assolutamente non il mio sei di certo colpevole dell'altro... quindi
sei tu ad essere ammanicato, ma in una braga...!!
Fai attenzione che se cambia cacciagione anche un bel ragazzone come
te è a rischio caccia... e quello non sbaglia un colpo.
;-)
> Antonio
@Alex


title: Re: prelevare dati da query

text:
....
> :DD
>
> ciao Marcello
> non devi prendertela....anzi...
> sapessi quante "parolazze" dice, ancora, a me
> dopo quasi un decennio che ci conosciamo...;-)
> naturalmente lo fa a fin di bene...
> pensa ad "insegnare" a pescare e non a regalare il pesce.
....
> Daniele
Daniele, ma dici che tu ancora le meriti le "parolazze"... ? Tra poco
sei tu che mi insegni ad usare Access, tu e Biso ovviamente... io
ancora qualche periodo di non utilizzo e non mi ricordo nemmeno
come si usa l'autocomposizione.
Meno male però che so leggere la guida in linea e l'help... così mi
evito di chiedere aiuto a te ed a Biso... non si sa mai che mi
trattiate male...!
Ciao RAGAZZO... ehehehehe ragazzo... seeee... na' volta... ! Ormai sei
più vecchio di prima... ragazzo...! pfui
;-)
@Alex


title: Re: prelevare dati da query

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:8e488a14-ed79-401f...@dr5g2000vbb.googlegroups.com...
On 30 Mag, 14:47, "Antonio Biso" <
ab...@libero.it
> wrote:
> "@Alex" <
ik2...@libero.it
> ha scritto nel
> messaggionews:11ba9bba-d474-4889...@c41g2000yqm.googlegroups.com...
> ...
Antò fai attenzione perchè se ha preso il 50% dei voti, e
assolutamente non il mio sei di certo colpevole dell'altro...
IO sono colpevole dell'altro 50% ??!?!?
mi sa che sbagli persona, quello è il tuo premier, mica il mio...
Antonio


title: Re: prelevare dati da query

text:
On 30 Mag, 15:18, "Antonio Biso" <
ab...@libero.it
> wrote:
> "@Alex" <
ik2...@libero.it
> ha scritto nel messaggionews:8e488a14-ed79-401f...@dr5g2000vbb.googlegroups.com...
> On 30 Mag, 14:47, "Antonio Biso" <
ab...@libero.it
> wrote:> "@Alex" <
ik2...@libero.it
> ha scritto nel
> > messaggionews:11ba9bba-d474-4889...@c41g2000yqm.googlegroups.com...
> > ...
>
> Antò fai attenzione perchè se ha preso il 50% dei voti, e
> assolutamente non il mio sei di certo colpevole dell'altro...
>
> IO sono colpevole dell'altro 50% ??!?!?
>
> mi sa che sbagli persona, quello è il tuo premier, mica il mio...
Manco per sogno... sarà Daniele che ha dato anche il tuo voto allora,
perchè il mio non è di certo in discussione.
Io i nani da giardino di gesso mi divertivo a romperli...!
> Antonio
@Alex


title: Re: prelevare dati da query

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:73dce596-d0f3-4ced...@l14g2000pro.googlegroups.com...



> Antonio
io li romperei pure adesso
Antonio


title: Re: prelevare dati da query

text:
....
> Manco per sogno... sarà Daniele che ha dato anche il tuo voto allora,
> perchè il mio non è di certo in discussione.
>
> Io i nani da giardino di gesso mi divertivo a romperli...!
>
> > Antonio
>
> io li romperei pure adesso
>
> Antonio
Beh qualche cosa è successo e penso si siano rotti... quasi
tutti...!!!
@Alex


title: Re: prelevare dati da query

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:73dce596-d0f3-4ced...@l14g2000pro.googlegroups.com...
On 30 Mag, 15:18, "Antonio Biso" <
ab...@libero.it
> wrote:
> "@Alex" <
ik2...@libero.it
> ha scritto nel
> messaggionews:8e488a14-ed79-401f...@dr5g2000vbb.googlegroups.com...
> On 30 Mag, 14:47, "Antonio Biso" <
ab...@libero.it
> wrote:> "@Alex"
> <
ik2...@libero.it
> ha scritto nel
> > messaggionews:11ba9bba-d474-4889...@c41g2000yqm.googlegroups.com...
> > ...
>
> Antò fai attenzione perchè se ha preso il 50% dei voti, e
> assolutamente non il mio sei di certo colpevole dell'altro...
>
> IO sono colpevole dell'altro 50% ??!?!?
>
> mi sa che sbagli persona, quello è il tuo premier, mica il mio...
mi sa che sbagliate entrambi....
quello è il NOSTRO. speriamo ancora per poco.
Manco per sogno... sarà Daniele che ha dato anche il tuo voto allora,
ahahahahahah..... LOL.....ROTFL....
che sia sbocciata la "Primavera d'Italia" oggi?.... :D
Daniele


title: Re: prelevare dati da query

text:
...
> ahahahahahah..... LOL.....ROTFL....
>
> che sia sbocciata la "Primavera d'Italia" oggi?.... :D
>
> Daniele
Ma chi può dirlo... sono certo che diranno che non hanno perso...!!!
Ahahahahahahahah
Ma Ugo Conte è proprio sparito... chissà se ci avevo visto lungo...!!!
@Alex


title: Re: prelevare dati da query

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:0d4d6be0-cf9e-4b3a...@p23g2000vbl.googlegroups.com...
...
> ahahahahahah..... LOL.....ROTFL....
>
> che sia sbocciata la "Primavera d'Italia" oggi?.... :D
>
> Daniele
Ma chi puň dirlo... sono certo che diranno che non hanno perso...!!!
beh stavolta non possono dire di aver "pareggiato" come la volta scorsa
:DD
Ma Ugo Conte č proprio sparito... chissŕ se ci avevo visto lungo...!!!
spero di no ;-)
Daniele


title: Re: prelevare dati da query

text:
...
> Ma Ugo Conte è proprio sparito... chissà se ci avevo visto lungo...!!!
>
> spero di no ;-)
A pensar male si fa certamente peccato ma ci si prende spesso...
> Daniele
@Alex


title: Re: prelevare dati da query

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:ee5f399b-648f-4b4f...@u26g2000vby.googlegroups.com...


> Daniele
@Alex
ma vuoi dire che... ugo...
Antonio


title: Re: prelevare dati da query

text:
On 31 Mag, 09:18, "Antonio Biso" <
ab...@libero.it
> wrote:
> "@Alex" <
ik2...@libero.it
> ha scritto nel messaggionews:ee5f399b-648f-4b4f...@u26g2000vby.googlegroups.com...
> ...
>
> > Ma Ugo Conte è proprio sparito... chissà se ci avevo visto lungo...!!!
>
> > spero di no ;-)
>
> A pensar male si fa certamente peccato ma ci si prende spesso...
>
> > Daniele
>
> @Alex
>
> ma vuoi dire che... ugo...
>
> Antonio
Ma... non sò... però... le cose in comune sono troppe... e le assenze
postume strane...!
@Alex


title: Re: prelevare dati da query

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:37acd723-6e85-44d1...@f11g2000vbx.googlegroups.com...


@Alex
Dici che il coniglietto continua a mendicare aiuti alle sue incompetenze
sotto false spoglie visto il suo becero comportamento pregresso?
che tristezza...
Antonio


title: Re: prelevare dati da query

text:
...
> Dici che il coniglietto continua a mendicare aiuti alle sue incompetenze
> sotto false spoglie visto il suo becero comportamento pregresso?
> che tristezza...
>
> Antonio
Che bello vorrai dire... altrimenti io che faccio...? Mi tocca
prendermela con te, ma la cosa mi spaventa un pochetto...
;-)
@Alex


title: Re: prelevare dati da query

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:dff8d12d-2f69-4b01...@r35g2000prj.googlegroups.com...

ti suggerisco alecara
Antonio


title: Re: prelevare dati da query

author: Popi - TheBadHabits

text:
On 31 Mag, 16:23, "Antonio Biso" <
ab...@libero.it
> wrote:
> "@Alex" <
ik2...@libero.it
> ha scritto nel messaggionews:dff8d12d-2f69-4b01...@r35g2000prj.googlegroups.com...
>
> > ...
> >> Dici che il coniglietto continua a mendicare aiuti alle sue incompetenze
> >> sotto false spoglie visto il suo becero comportamento pregresso?
> >> che tristezza...
>
> >> Antonio
>
> > Che bello vorrai dire... altrimenti io che faccio...? Mi tocca
> > prendermela con te, ma la cosa mi spaventa un pochetto...
>
> > ;-)
>
> ti suggerisco alecara
State bravini voi due: alcuni dei suoi discorsi facevano troppo il
paio con quelli del mio capo :(((
Questa, ad esempio, e' la meno "chicca" ...
=================
Driin
Ciao, dimmi ...
Ho messo tutti i campi degli ordini (a fornitori, ndr) testo 255
cosi' (le colleghe, ndr) possono scrivere quello che vogliono, ma la
descrizione e' memo cosi' possono metterci *davvero* di tutto, ma come
faccio a metterla in relazione con la tabella delle descrizioni?
E' memo anche quel campo li',  ma non mi funziona ... sai perche'?
=================
Popi


title: Re: prelevare dati da query

text:
"Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggio
news:a7b3045e-a580-46ee...@f31g2000pri.googlegroups.com...

mi passi qualche riferimento alle colleghe?
Antonio


title: Re: prelevare dati da query

text:
...
> > Che bello vorrai dire... altrimenti io che faccio...? Mi tocca
> > prendermela con te, ma la cosa mi spaventa un pochetto...
>
> > ;-)
>
> ti suggerisco alecara
Lui è un Sig.re... ha pure i baffi e la folta chioma canuta... non
posso per principio.
> Antonio
@Alex


title: Re: prelevare dati da query

text:

Pe fa che'.
De che state a parla', anzi su che state a perde tempo.
--
ac (x=y-1)


title: Re: prelevare dati da query

text:
"Alessandro Cara" <
alessan...@ay-1anetwork.it
> ha scritto nel messaggio
news:vc8Fp.29584$GZ3....@tornado.fastwebnet.it...

niente, parlavamo del tuo amichetto, quello simpatico, che si è riciclato in
qualche modo...
Antonio


title: Re: prelevare dati da query

text:

No. Se intendi radicale e' troppo "stubborn". Non lo farebbe mai e poi
malgrado tutto e' uno che talvolta fa l'asino ma si incarta su cose
spesso non banali. Se la mira era su un paio di post che ho visto in
giro "il mio amichetto" quelle se le beve, non verrebbe certamente a
disturbare la locale "intellighenzia" con quelle facezie.
--
ac (x=y-1)


title: Re: prelevare dati da query

text:
.
> niente, parlavamo del tuo amichetto, quello simpatico, che si riciclato in
> qualche modo...
>
> Antonio
no no ... non è Radicale il mio dubbio... tutt'altro... ma non
importa...
@Alex


title: Re: prelevare dati da query

text:
"Alessandro Cara" <
alessan...@ay-1anetwork.it
> ha scritto nel messaggio
news:r49Fp.29627$GZ3....@tornado.fastwebnet.it...

uhm...
va bene
vai allora... E STANALO !!!
Antonio


title: Re: prelevare dati da query

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:e78f687f-ea4b-4b41...@c26g2000vbq.googlegroups.com...


@Alex
aaaahhhhhhhhhh
ho capitoooooooooooooooooo
...
Antonio


title: Re: prelevare dati da query

text:
On 31 Mag, 17:19, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggionews:a7b3045e-a580-46ee...@f31g2000pri.googlegroups.com...

> mi passi qualche riferimento alle colleghe?
Cavallo goloso!!!
Controlla la posta ;)
Popi


title: Re: prelevare dati da query

text:

Stavo pensando "Argh!!!" ma poi ho riletto: menzioni i baffi ma non la
barba, allora forse sono ancora l'unico "Gandalf" :D
Popi


title: Re: prelevare dati da query

text:

Lui ha il PIZZO... ben pagato... un pò come Dartagnan...
@Alex


title: Re: prelevare dati da query

text:
On 31 Mag, 18:55, Alessandro Cara <
alessandro.c...@ay-1anetwork.it
>
wrote:
> Il 31/05/2011 18.06, Antonio Biso ha scritto:
>
>
>
> > "Alessandro Cara"<
alessandro.c...@ay-1anetwork.it
>  ha scritto nel messaggio

Ciao neh!
Condivido la valutazione, ma ... e se fosse stato preso dalla "scimmia
del troll"? ;)
Popi


title: Re: prelevare dati da query

text:
"ugo conte" <
ugo.c...@gmail.com
> ha scritto nel messaggio
news:e28b427f-c27d-4dc2...@g24g2000vbz.googlegroups.com...
On 1 Giu, 08:52, Popi - TheBadHabits <
rlu...@yahoo.com
> wrote:
ciao a tutti
mi fa piacere di avervi dato argomento di discussione ma devo
deludervi.
Io posso dedicare pochissimo tempo ad Access e Vb.
So di essere una frana ma č pochissimo che ho iniziato.
Perň come noi principianti dobbiamo imparare ad usare l'help di
Access,
uno di voi, (senza fare nomi) dovrebbe utilizzare l'help della buona
educazione.
Saluti a tutti.
non si puň lanciare il sasso e nascondere la mano...
Antonio


title: Re: prelevare dati da query

text:
Il 02/06/2011 16.28, ugo conte ha scritto:
[cut]
> ciao a tutti
>
> mi fa piacere di avervi dato argomento di discussione ma devo
> deludervi.
> Io posso dedicare pochissimo tempo ad Access e Vb.
> So di essere una frana ma č pochissimo che ho iniziato.
>
> Perň come noi principianti dobbiamo imparare ad usare l'help di
> Access,
> uno di voi, (senza fare nomi) dovrebbe utilizzare l'help della buona
> educazione.
>
Mi auguro di non essere il riferimento della tua esortazione, se lo
fossi mi scuso, non era mia intenzione.
E comunque gli Help, come rilevi, certe volte possono far danno ;-{)
> Saluti a tutti.
Saluti
--
ac (x=y-1)


title: Re: prelevare dati da query

text:
"ugo conte" <
ugo.c...@gmail.com
> ha scritto nel messaggio
news:8c936952-d827-4367...@l6g2000vbn.googlegroups.com...
On 2 Giu, 16:39, "Antonio Biso" <
ab...@libero.it
> wrote:
> "ugo conte" <
ugo.cont...@gmail.com
> ha scritto nel
> messaggionews:e28b427f-c27d-4dc2...@g24g2000vbz.googlegroups.com...

quando mai.
ma non era riferito a te
l'avrei scritto comunque
se qualcosa non ti č andata giů sarebbe opportuno che lo esprimessi
liberamente e chiaramente
imho
Antonio


title: Re: prelevare dati da query

text:
"Alessandro Cara" <
alessan...@ay-1anetwork.it
> ha scritto nel messaggio
news:qCNFp.30423$GZ3....@tornado.fastwebnet.it...
> Il 02/06/2011 16.28, ugo conte ha scritto:
> [cut]
>
> Mi auguro di non essere il riferimento della tua esortazione, se lo fossi
> mi scuso, non era mia intenzione.
San cara
però adesso confessa: ascolti Radio Maria... :-PPP
Antonio


title: Re: prelevare dati da query

text:
Il 02/06/2011 18.26, Antonio Biso ha scritto:
> "Alessandro Cara"<
alessan...@ay-1anetwork.it
>  ha scritto nel messaggio
> news:qCNFp.30423$GZ3....@tornado.fastwebnet.it...
>> Il 02/06/2011 16.28, ugo conte ha scritto:
>> [cut]
>>
>
>> Mi auguro di non essere il riferimento della tua esortazione, se lo fossi
>> mi scuso, non era mia intenzione.
>
> San cara
Anto' fa caldo, e rispondere e' fatica
>
> però adesso confessa: ascolti Radio Maria... :-PPP
no Pisa Pia
Nel frattempo, visto che non hai un beneamato da fare (cosi' appare),
invece, il sottoscritto ha ricominciato a scrivere qualche puttanata.
Ti pongo un quesito data questa struttura (file sequenziale):
[Fanerogame]
	[.Cucurbitacee]
		[.Ecballium]
			[.Ecballium Elaterium]
				NomeVolgare=Cocomero Asinino
	[....Asteracee]
		alias=composite
		[.Bellis]
			[.Bellis Perennis]
				NomeVolgare=Margheritina,Pratolina

		[...Aster]
			[.Aster Tripolim]
				NomeVolgare=Astro marino
[Crittogame]
..........
come la scriveresti dovendo avere questo risultato
Fanerogame.Cucurbitace.Ecballium.Ecballium Elaterium.NomeVolgare =
Cocomero Asinino
Fanerogame.Asteracee.Alias=composite
Fanerogame.Asteracee.Bellis.Bellis Perennis.NomeVolgare = Pratolina
Fanerogame.Asteracee.Aster.Aster Tripolim.NomeVolgare=Astro marino
Crittogame...blabla bla
i.e [senza punto -> nuova chiave
     [un punto -> aggiunge a chiave precedente
     [piu punti -> risale gerarchia per un numero di punti - 1
     chiave=valore -> dettaglio finale
     # ->Note da mettere dove capitano
non sono soddisfatto di come la ho risolta (una quarantina di istruzioni)
--
ac (x=y-1)


title: Re: prelevare dati da query

text:
"ugo conte" <
ugo.c...@gmail.com
> ha scritto nel messaggio
news:b7bf825b-f922-43ba...@e35g2000yqc.googlegroups.com...
> On 2 Giu, 18:26, "Antonio Biso" <
ab...@libero.it
> wrote:
>> "Alessandro Cara" <
alessandro.c...@ay-1anetwork.it
> ha scritto nel
>> messaggionews:qCNFp.30423$GZ3....@tornado.fastwebnet.it...
>>
>> > Il 02/06/2011 16.28, ugo conte ha scritto:
>> > [cut]
>>
>> > Mi auguro di non essere il riferimento della tua esortazione, se lo
>> > fossi
>> > mi scuso, non era mia intenzione.
>>
>> San cara
>>
>> per adesso confessa: ascolti Radio Maria... :-PPP
>>
>> Antonio
>
> grazie del tuo interessamento, veramente gentile,
> ma non amo le polemiche.
> Lo preferisco e poi
> Sono io che ho bisogno.
beh, di solito chi ha bisogno non detta anche le condizioni
soprattutto dopo aver nascosto la mano...
Antonio


title: Re: prelevare dati da query

text:
"Alessandro Cara" <
alessan...@ay-1anetwork.it
> ha scritto nel messaggio
news:myPFp.30452$GZ3....@tornado.fastwebnet.it...

però un po' di radio maria per sentirti apposto ogni tanto la senti dai...
per il tuo quesito se non fornisci la struttura dati di partenza e quella di
arrivo come ti rispondo?
Antonio


title: Re: prelevare dati da query

text:
Il 02/06/2011 19.58, Antonio Biso ha scritto:
> "Alessandro Cara"<
alessan...@ay-1anetwork.it
>  ha scritto nel messaggio
[cut] ....taglio di quello richiesto....
> però un po' di radio maria per sentirti apposto ogni tanto la senti dai...
>
> per il tuo quesito se non fornisci la struttura dati di partenza e quella di
> arrivo come ti rispondo?
Leggi l'Help (il post in questo caso) c'e' sia lo input che lo output e
financo le specifiche in chiaro. Questo tra un radio maria e l'altro.
--
ac (x=y-1)


title: Re: prelevare dati da query

text:
"Alessandro Cara" <
alessan...@ay-1anetwork.it
> ha scritto nel messaggio
news:NNQFp.30471$GZ3....@tornado.fastwebnet.it...

c'è solo la regola di trasformazione ma non dici questi dati dove si trovano
tutti in una tabella? quanti campi sono? un campo e c'è tutto uno sopra
l'altro?
e per la destinazione?
questo non c'è...
ora dovrai confessarti...
Antonio