mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: stampa report in più copie

Dovreě stampare un report in 4 copie e su ognuna di queste, in una casella
di testo fare apparire una descrizione differente, ex
1^ copia = Copia committente
2^ copia = Copia commissionario
3^ copia = Copia per il comune
come posso fare?
Ciao e grazie

 ha scritto nel messaggio
news:ioY77.22609$Qf6.1...@news2.tin.it...

La + semplice:
crearti 4 report quasi uguali (differiscono solo x il controllo contenente
le dizioni descritte) e mandarli in stampa uno dopo l'altro.
Se ne vuoi di + complessi ...
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

"Simone"

Potresti fare cosě: dal bottone di stampa sulla form XYZ lanci una cosa del
genere:
For NCopie=1 to 4
     If NCopie=1 then
             Dicitura="Copia committente"
     Elseif NCopie=2 then
             Dicitura="Copia commissionario"
     Else
     .
     .
     .
     Endif
Next NCopie
Dove Dicitura č una variabile globale (o una casella di testo nascosta sulla
form di stampa).
Alla casella di testo del Report  passi il valore della variabile globale.
Oppure, nel secondo caso, assegni la casella di testo creata sulla maschera.
DicituraReport=Forms!XYZ!Dicitura
Ciao, warp

Newsgroup: it.comp.appl.access
Titolo: Errore access?

Salve a tutti,
avrei da sottoporvi un piccolo quesito.
aprendo Excel appare questa segnalazione:
" Unable To Find Quit On The File Menu. Instant Access Not Enable"
Sulla macchina c'è installato anche Access. Il sistema è Windows 98.
Qualcuno sa dirmi come risolvere l'avviso???
Potete rispondermi a 
tizia...@cashsoftware.it
 
Grazie.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Non vorrei sbagliare, ma a mio avviso la parola Access del messaggio di
errore che ricevi non ha niente a che vedere con MSAccess, ma è
semplicemente la traduzione in inglese della parola accesso.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Roberto



 Grazie.
Mi dispiace, ma non conosco Excel tanto da poterti aiutare.
Hai provato in un NG in cui si parla di Excel?


 Roberto


Newsgroup: it.comp.appl.access
Titolo: Visualizzare 2 dati nella casella combinata

Salve a tutti. Scusate il quesito un po' banale.
Ho una casella combinata associata ad una query, nella quale visualizzo 2
colonne. una volta fatta la scelta del valore, rimane visualizzato solo il
dato della colonna associata e non riesco a vedere il valore accanto a
questo. E' possibile visualizzare entrambi?
Grazie a tutti in anticipo.
Giancarlo

 Giancarlo
Non cosě, come hai fatto tu.
Fa una cosa, nella query aggiungi una terza colonna calcolata in cui
inserisci [Tuo_campo_colonn1]&" "&[Tuo_campo_colonn2]
Poi, nelle casella combinata in "Numero colonne" ci scrivi 3 e nella
"Larghezza colonne" ci scrivi 0;0;5 (sono centimetri, quindi adattala alle
tue esigenze)
Cosě dovrebbe fungere.
Fammi sapere.
-- 
Pablitomf (Maurizio Facciuti)
Lentamente muore chi abbandona un progetto prima di iniziarlo, chi non fa
domande sugli argomenti che non conosce, chi non risponde quando gli
chiedono qualcosa che conosce. (P.Neruda)
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Pablitomf (Maurizio Facciuti)
Giancarlo


Newsgroup: it.comp.appl.access
Titolo: Grafico Excel com oggetto ole ??

Devo inserire un grafico excel all'interno di una maschera access in modo
che mi vada a prendere i dati da una tabella di access.
Ho aperto una nuova maschera in struttura poi...
Menu Inserisci / oggetto / grafico di excel /
nella proprietą TipoOrigineRiga ho inserito "Tabella/Query"
nella proprietą OrigineRiga ho inserito il nome della tabella
Entrando in visualizzazione della maschera perņ, non mi visualizza il
grafico, ma mi dą l'errore: "operazione sull'oggetto OLE non riuscita. E'
possibile che il server OLE non sia registrato. Per registrarlo rieseguire
l'installazione".
A questo punto cosa devo fare ??
Saluti
Andrea


wrote:

controlla che sui riferimenti sia presente microsoft graph
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: Errori nella conversione di macro in vb

Ciao a tutti,
Ho già inviato un messaggio simile ma senza ottenere risposta, forse
l'oggetto descritto non era adatto, ora vi rielenco il problema.
Il problema e semplice ho alcune decine di vecchie macro in un db, vorrei
convertire in visual basic por poterle gestire meglio.
Naturalmente ho utilizzato la funzione incorporata Converti macro della
maschera in visual basic del menu strumenti - macro.
Fatto questo scopro che il codice creato contiene due strani errori.
- Il primo è quello di chiamare tutti gli eventi della maschera in italiano
e non in inglese il che non fa funzionare le routine ( Es.: lui crea
"Maschera_Open" invece per funzionare deve essere "Form_Open" )
- Il secondo è che in tutte le condizioni "If" , "=" etc. va a capo più
volte dividendo il codice in due parti, ovviamente non funzionanti se non
riunendole.
Qualcuno gentilmente sa spiegarmi come evitare questi due inconvenienti che,
anche se facilmente individuabili, su parecchie decine di macro sono
alquanto fastidiosi.
Io uso access 2000 italiano su Windows 2000 italiano.
Grazie e ciao
Andrea
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:217Z133Z224Z69Y...@usenet.libero.it...

Avevo già letto il precedente, ma non credo proprio ci sia Soluzione, se
non di usare la MANINA SANTA e pazienza.
@ALex.

 ha scritto nel messaggio
news:217Z133Z224Z69Y...@usenet.libero.it...

Anch'io ho letto il tuo messaggio precedente e avevo inciampato in quel
problemino; oltre al suggerimento di @Alex puoi controllare nel sito comune
(
www.sitocomune.com
) ci dovrebbe essere una routine che legge il codice nei
moduli. Potrebbe essere un punto di partenza per non screpolare le manine e
lasciare che access faccia il lavoro al posto tuo...
Ciao.
--
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: recordset tra Access 2000 e MySql

Qualcuno sa dirmi perchè questo tipo di istruzioni relative al
recordset non funziona in una applicazione Access 2000 collegata a
tabelle MySql tramite MyODBC? Forse il problema sta nell'Odbc? Grazie
Antonello
Sub creaLista()
Dim db As Database
Dim rs As Recordset
Dim i As Integer
Dim lista(0) As Integer
i = 0
Set db = CurrentDb
Set rs = db.OpenRecordset("anagrafe­")
Do While Not rs.EOF
    lista(i) = rs!codiceFiscaleDip 
    i = i + 1 
Loop 
End Sub

 wrote in message
news:1125652974.5...@g47g2000cwa.googlegroups.com

Io credo che non funzionerebbe in nessun caso....!!!
  Set rs = db.OpenRecordset("anagrafe­")
  Do While Not rs.EOF
      lista(i) = rs!codiceFiscaleDip 
      i = i + 1 
  Loop 
  End Sub
Dove hai messo l'incremento o avanzamento del puntatore
di Record...?
rs.MoveNext intendo.
Saluti
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Alessandro Baraldi ha scritto:

Ovviamente hai ragione, l'ho dimenticato, ma... almeno arrivasse a quel
punto! Mi si ferma prima, proprio dove tento di definire il recordset
(che nel caso in questione è una tabella MySql collegata), come se per
lui fosse una istruzione sconosciuta.
Poichè così non è (a parte eventuali miei errori di sintassi) ho
pensato che sia dovuto proprio al collegamento ODBC con MySql.
Ciao

 Ciao
C'è la possibilità che tu non abbia inserito i riferimenti
di DAO visto che stai usando quelli...?
A2000 infatti di Default usa ADO e se non li togli per
sostituirli con DAO è possibile venga restituito quel
tipo di errore.
Ciao


Alessandro Baraldi ha scritto:

Ok, adesso farò un po' di prove in tal senso, grazie per ora.
Antonello

Newsgroup: it.comp.appl.access
Titolo: risultati di una query scalare

Ciao a tutti!
Ho un problemino..
qualcuno mi puo dire come si gestiscono le query scalari tramite Visual
Basic 6.0?
Io devo fare una query di questo tipo :
select max(campoNumerico) from tabella
nel caso di query normali creavo un comando sql, lo mandavo in esecuzione
e raccoglievo i risultati in un recordset, se però lo faccio con una query
scalare
( e in effetti mi sembra anche sbagliato da un punto di vista puramente
concettuale)
il recordset non mi ritorna nulla (recourdCount = -1)
grazie a tutti!
Vale.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 grazie a tutti!
Certo manca il tuo codice.
Se il tuo enunciato SQL è esattamente come l'esempio ti manca
un alias per poter gestire il risultato. p.e. con DAO circa:
...
Set rs = db.OpenRecordset("select max(campoNumerico) AS Pippo from tabella")
MsgBox rs!pippo
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 + iscriviti alla prima Conferenza
Italiana per Sviluppatori di Access (CISA 1), Arezzo, 4+5/6/2005
Newsgroup: it.comp.appl.access
Titolo: ComboBox "sincronizzate" ...

Ciao a tutti ...
In una form usata con visualizzazione foglio dati ho :
una combo A che mi carica i fornitori
una combo B che mi carica i prodotti "filtrandoli" per fornitore
una txtcox per la descrizione.
Nell'evento AfterUpdate della combo A faccio un requery della
combo B!
Il mio problema č che quando passo al record successivo
e scelgo il nuovo fornitore , "perdo"  il dato della combo B!
Dove sbaglio?
Grazie in anticipo !!!

 e scelgo il nuovo fornitore , "perdo"  il dato della combo B!
Che significa "perdere" il dato?
Antonio

 Grazie in anticipo !!!
Anche se nella tua maschera visualizzi contemporaneamente più record con
fornitori diversi, di fatto nella tua maschera esiste UNA SOLA combo A ed
UNA SOLA combo B e quindi per tutti i record riuscirai a visualizzare solo i
prodotti dell'ultimo fornitore selezionato con la combo A; ma questo mi
sembra logico e normale, visto come è strutturata una maschera con
visualizzazione foglio dati o a maschere continue.
Per risolvere il tuo problema devi dichiararti due codici SQL che userai
dinamicamente come origine riga della combo B; il primo sarà filtrato dalla
combo A (lo stesso che usi ora e lo userai per effetuare la selezione con la
combo B) ed il secondo che NON sarà selezionato da nulla (lo userai per la
visualizzazione dei dati).
A fronte dell'evento "Dopo aggiornamento" della combo A imposterai come
origine riga della combo B il primo codice SQL (quello filtrato dalla combo
A) e farai il requery di combo B.
Invece a fronte dell'evento "Su corrente" della maschera ed a fronte
dell'evento "Dopo aggiornamento" della combo B imposterai il secondo codice
SQL (quello non filtrato) come origine riga della combo B di cui poi farai
il requery.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Stampare report con filtro maschera

Ho un programma dove su una maschera ho la possibilità di filtrare il bene
inventariato e l'anno di arrivo e vedere il risultato con uno o l'altro
filtro o con ambedue.
Vorrei inserire un pulsante che mi stampi il report secondo il risultato
della maschera una volta che ho filtrato il bene e l'anno.
Attualmente detto sistema lo uso con un'altra maschera appositamente per il
report ma vorrei unificare il tutto nella stessa maschera (la prima) di
visione dove il risultato visualizzato lo stampo senza ulteriori passaggi x
altre maschere.
Pensavo nella creazione di una query o tabella temporanea con il risultato e
poi stamparla.
In che modo dovrei mettere il pulsante in modo da non dare fastidio al
filtro
Grazie a chi mi darà una dritta
Valter

 ha scritto nel messaggio 
news:p5kdd.167841$35.81...@news4.tin.it...

io uso questa  funzione per applicare i filtri alla maschera
Function CostruisciFiltro() As String
CostruisciFiltro = ""
If (Forms![bilanciolistato]![CasellaCombinata23] <> "") And 
(IsNull(Forms![bilanciolistato]![CasellaCombinata23]) = False) Then
    CostruisciFiltro = "categoria = 
forms![bilanciolistato]![CasellaCombinata23]"
    filtro = filtro & "  CATEGORIA " & 
Forms![bilanciolistato]![CasellaCombinata23]
End If
If (Forms![bilanciolistato]![dal] <> "") And 
(IsNull(Forms![bilanciolistato]![dal]) = False) Then
    If CostruisciFiltro = "" Then
        CostruisciFiltro = CostruisciFiltro & "[data] >= 
Forms![bilanciolistato]![dal]"
    Else
        CostruisciFiltro = CostruisciFiltro & " and [data] >= 
Forms![bilanciolistato]![dal]"
    End If
    filtro = filtro & "  DAL " & Forms![bilanciolistato]![dal]
End If
If (Forms![bilanciolistato]![AL] <> "") And 
(IsNull(Forms![bilanciolistato]![AL]) = False) Then
    If CostruisciFiltro = "" Then
        CostruisciFiltro = CostruisciFiltro & "[data] <= 
Forms![bilanciolistato]![al]"
    Else
        CostruisciFiltro = CostruisciFiltro & " and [data] <= 
Forms![bilanciolistato]![al]"
    End If
    filtro = filtro & "  AL " & Forms![bilanciolistato]![AL]
End If
End Function
su dopo aggiornamento di ogni filtro metti
    Me.Filter = CostruisciFiltro
    FilterOn = True
e poi quando apro il report lo apro nel seguente modo
    Me.Refresh
    DoCmd.OpenReport "bilancio", acViewPreview, , CostruisciFiltro
Ciao Simba883

 wrote in message
news:p5kdd.167841$
35.81...@news4.tin.it

Visto che da quanto capito la Form è già FILTRATA e mostra 
esattamente i dati da STAMPARE sono
inutili tutti gli accrocchi di codice, hai già tutto a
disposizione:
DoCmd.OpenReport nomereport, acviewpreview, Me.Filter
Ciao
@Alex.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


ottimo, questa non la sapevo vabbè c'è sempre chi ne sa di più..... 

 ha scritto nel messaggio
news:p5kdd.167841$35.81...@news4.tin.it...

Tutto OK vi ringrazio
Valter
Newsgroup: it.comp.appl.access
Titolo: pulsanti di comando

Ciao a tutti si può cambiare il colere ad un pulsante di comando?
Io non ci riesco. Grazie a tutti. Rispondetemi per favore.

 Io non ci riesco. Grazie a tutti. Rispondetemi per favore.
No, non puoi cambiare il colore ad un pulsante di comando, però puoi
inserire nel pulsante una immagine che potrebbe essere costituita da un
fondo pieno del colore che tu preferisci.
Insomma creati un file immagine del colore che vuoi tu e poi inseriscilo nel
pulsante di comando.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: modulo di access funzionante su win95 ma non su win98

Modulo di access che funziona correttamente su win 95, ma non su win 98, non
riesco a capire perchè, forse dll mancanti? qualcuno mi sa dare
suggerimenti?
grazie per l'aiuto cristina.
Function converti$(stringa$)
Dim uscita$
Dim Mid$
Dim n As Integer
uscita$ = ""
For n = 1 To Len(stringa$)
    If Mid$(stringa$, n, 1) <> Chr$(248) Then
        uscita$ = uscita$ + Mid$(stringa$, n, 1)
    Else
        uscita$ = uscita$ + Chr$(176)
    End If
Next n
converti$ = uscita$
End Function

 ha scritto nel messaggio
news:_17o8.31562$S52.1...@news2.tin.it...

Non so come faccia a funzionare su Windows 98 visto che hai definito come
variabile una funzione di Access con la riga:
Dim Mid$
Ciao Roberto - Syd

 wrote in message
news:_17o8.31562$S52.1...@news2.tin.it...

Giura che con Win95 funzionava....!!!
Io ho qualche perplessità, però....!
La variabile Mid$ non può essere utilizzata, in quanto coincide con il
nome di una Funzione Stringa, quindi è una parola riservata...!
Devi cambiare nome alla variabile Mid$---->Medio$ (o quello che vuoi..)
L'alternativa, un pò più brigosa è telefonare a Bill e farti aggiornare
la Dll con la modifica del Nome della funzione Mid$.....!! (Scherzo)
Ciao.
Alessandro.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.appl.access
Titolo: Come si intercettano le azioni .... segue in post

quando si preme uno dei pulsanti in basso a sinistra ( quelli di default di
Access per lo spostamento sui rec) ??? vorrei continuare ad utilizzarli per
comodità ..
Si può intercettare questi passaggi ( per controllarne l'integrità e
l'esattezza dei dati inputati prima dell'effetiva registrazione) . Mi pare
cheun rec viene salvato (se viene modificato) ad un qualsiasi passagio ad
altro rec e
quando viene chiusa la mask , è giusto ??
Ciao e grazie a tutti

 wrote in message
8ck8lc$ltk$1...@ftp-news.csita.unige.it...

Giusto. La pressione dei tasti di navigazione non è direttamente
rilevabile, ma puoi sempre testare l' evento BeforeUpdate ed
eventualmente "cancellarlo" se l' utente non ha fatto certe cosucce...
Bye, Ste
Newsgroup: it.comp.appl.access
Titolo: codice a barre

avrei bisogno di stampare codici a barre su
etichette che mi restituiscano da  da n° 1 a n° 1000
chi puo dirmi dove trovare l'occorrente o come procedere
grazie e buon anno a tutto il NG



procurati un font per i codici a barre e fai una stampa di un campo
che incrementi da 1 a 1000
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: Creare un field specificando decimali, ecc...

Con il codice che segue riesco a creare una tabella ed i relativi campi,
ma rispetto alla creazione manuale non riesco a definire per esempio:
- il formato
- il numero dei decimali
- la maschera di input
- l'etichetta
    Dim dbs As Database, tdf As TableDef, fld As Field
    Set dbs = CurrentDb
    Set tdf = dbs.CreateTableDef("NuovaTabella")   
    Set fld = tdf.CreateField("CodMPNuovo", dbText, 20)
    tdf.Fields.Append fld
    Set fld = tdf.CreateField("QtaMPNuovo", dbDouble)
    fld.DefaultValue = 0
    tdf.Fields.Append fld
    Set fld = tdf.CreateField("DataFineProduzione", dbDate)
    tdf.Fields.Append fld
    dbs.TableDefs.Append tdf
    Set dbs = Nothing
E' possibile fare ciň, e se si c'č qualcuno disposto ad aiutarmi ?
Grazie fin d'ora
--------------------------------------------------------------------
Sergio de Pretis                     E-mail 
depr...@csgen.it
 
Via Meli, 18                         phone / fax : (39) 02 2592400
20127 MILANO -  ITALY                mobile phone: (39) 0335 8381706

 E' possibile fare ciň, e se si c'č qualcuno disposto ad aiutarmi ?
certo che e' possibile :-)
quelle sono proprieta' dell'oggetto field.
per verificarle puoi usare questo codice:
Sub prop()
On Error Resume Next
    Dim dbs As Database
    Dim tdf As TableDef
    Dim fld As Field
    Dim prp As Property
    Dim strRptName As String
    Set dbs = CurrentDb
    Set tdf = dbs.TableDefs("nomeTab")
    Set fld = tdf.Fields("nomeCampo")
    For Each prp In fld.Properties
        Debug.Print 
prp.name
, prp.Value
    Next prp
    Set dbs = Nothing
End Sub
se vuoi modificare il valore di una proprieta' devi far riferimento all'oggetto
Property relativo.
in molti caso l'oggetto non esiste, quindi lo devi creare (vedi help Property).
per modificare una property:
...
fld.properties("DecimalPlaces").value = 2
...
se la proprieta' non esiste (es. Descrizione del campo) l'espressione genera un
errore (3270)
...
fld.properties("Description").value = "Partita IVA"
...
a questo punto ti basta intercettare l'errore, creare la property con un valore
di default e ripetere l'operazione
...
select case err.number
   case 3270
      set prp = fld.createproperty("Description", 10, "default")
      fld.properties.append prp
      resume
   case else
      ...
end select	
Spero di non averti incasinato le idee :-)
-- 
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------

 Federico
Sei stato di una chiarezza cristallina. 
Grazie ancora.
:-) :-) :-) :-) 
--------------------------------------------------------------------
Sergio de Pretis                     E-mail 
de_p...@libero.it

Newsgroup: it.comp.appl.access
Titolo: nominativo doppio su altra tabella

ciao a tutti,
Ho una maschera, collegata a una tabella in cui vengono inseriti dei
nominativi.
Devo fare questo controllo: se il nominativo che sto per inserire è
presente in una tabella, diversa dalla tabella collegata alla maschera
di inserimento (ma presente nel db), deve uscire un messaggio.
Uso la funzione DLookup:
If DLookup("nome_elemento", "altra_tabella", "origine_controllo=" &
Me.origine_controllo) > 0 Then
      MsgBox ("nominativo già presente in altra tabella")
End If
ma non funziona (mentre invece la stessa funziona per controllare i
nominativi doppi sulla tabella collegata alla maschera) .
Qualcuno mi può aiutare?
Grazie
Roberto


Dklooup non conta , quindi il criterio >0 non va bene , conta la
funzione Dcount :
If Not IsNull DLookup("nome_elemento", "altra_tabella",
"origine_controllo=" &
 Me.origine_controllo)    Then
  MsgBox "Esiste già  questo nominativo ",vbOKOnly,"Duplicato!"
  Cancel = True
End If

?"Lolince"  ha scritto nel messaggio 
news:9f9be294-bb7d-42cb...@q2g2000pre.googlegroups.com...


__
Dando per scontato che origine_controllo sia numerico altrimenti il filtro è
"origine_controllo='" &  Me.origine_controllo & "'"
MA

 ...
Come si esprime "non funziona"? Cosa succede?
Prova con:
If Not IsNull(DLookup("nome_elemento", "altra_tabella", _
    "origine_controllo=" & Me!origine_controllo))  Then
      MsgBox ("nominativo già presente in altra tabella")
End If
Se non riesci, copia/incolla il tuo vero codice e scrivi quale
tipo di dati ha il campo che usi nel criterio.
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it

Newsgroup: it.comp.appl.access
Titolo: Aprire file .msg con VBA da Access

Ciao,
sto provando a far aprire ad una routine VBA lanciata da Access un file .msg
(Messaggio mail di Outlook)...
...l'unica strada che si avvicina a quello che voglio fare è quella di
eseguire il comando
Call Shell (c:\...\outlook.exe c:\pippo.msg, 1)
Questo comando mi apre un nuovo mail con allegato il mio file msg...dovrei
pero' aprire il file msg direttamente...
...qualche mente estremamente brillante riesce a darmi la soluzionie?
Grazie...saluto cordialmente.
Massimo


Ci spieghi meglio cosa vuoi fare?
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:62Z94Z28Z127Y1...@usenet.libero.it...



Scrivi DOPO il quoting.
Per il tuo problema usa il collegamento ipertestuale (lo apre con
l'applicazione associata di default a quella estenzione)

Newsgroup: it.comp.appl.access
Titolo: Sincronizzare due maschere (non mi riesce)

Ho creato una maschera (M1) non associata in cui nella parte alta ho dei 
controlli non associatati che mi servono per impostare
i parametri di ricerca, e nel centro una sottomaschera (M2) in 
visualizzazione maschere continue in cui visualizzi i risultati del 
"requery" con i parametri di cui prima.
fin qui nessun problema!
Sto fruttando l'evento "su corrente" della mascera M2 poichč vorrei che nel 
momento in cui io clicco su un record (della maschera in cui visualizzo i 
risultati) mi si apra una maschera collegata (M3)
filtrata al record corrente.
per fare questto ho creato una macro in cui l'apertura della maschera M3 ha 
come condizione WHERE la seguente frase [ID]=Forms!M1!M2!ID
solo che mi si apre la maschera (filtrata) ma senza alcun record. Che 
faccio!!!?
e poi un'ultima cosa.
con questa macro impostata sull'evento corrente, appena eseguo il requery 
per la ricerca, il cursore mi si posizione sul primo record, facendomi 
aprire automaticamente la maschera M3.
Ebbene io questo lo vorrei evitare.
Quello che io voglio ottenere (per capirci) č sfogliare i risultati della 
mia ricerca č poi cliccare sul record che mi interessa per aprire il 
dettaglio di quello stesso record.,
Se c'č un modo piů semplice per ottenere tutto questo ben venga
Grazie anticipatamente come al solito.
Singer 

 Singer
Daniele 

 pulsante mettendolo, appunto, nell'evento doppio clic del controllo
s
si ma cosi non saprò mai come riferirmi al record corrente 

 ha scritto nel messaggio 
news:43c6d6a1$0$1089$4faf...@reader1.news.tin.it...

che significa?
Ciao Singer
non riesco a capire cosa vuoi fare. beh cmq la notte porta consiglio :)
buona notte
Daniele

 ha scritto nel messaggio news:43c6c69c$0$1071$4faf...@reader1.news.tin.it...

Non ho capito che significa "...ho creato una macro..."; comunque se gestisci l'evento "su corrente" della form M2 il codice per 
aprire la form M3 filtrata potrebbe essere:
if not isnull(me!id) then
    docmd.openform "M3",,,"id = " & me!id
endif
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: ancora sui dati colorati

 >     Me.NomeCasella.ForeColor= Numero del colore Es.: 0 (Nero)
Va tutto bene, solo che alla riapertura della maschera i dati riappaiono in
nero. Come si fa per farli rimanere permanentemente nel colore rosso?

 ha scritto nel messaggio
news:9sbugb$7v1$1...@serv1.albacom.net...

Le modifiche falle dopo aver aperto la maschera in formato struttura.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Cosě ho fatto, ma i numeri ritornano in nero all'apertura successiva. :(

 ha scritto nel messaggio
news:9sc9m1$jra$1...@serv1.albacom.net...

E allora penso proprio di non aver capito cosa tu voglia fare.


 ha scritto nel messaggio
news:9sc9m1$jra$1...@serv1.albacom.net...

Probabilmente l'IF non viene eseguito da nessuno, prova ad inserirlo
nell'evento SU CORRENTE
Newsgroup: it.comp.appl.access
Titolo: tabelle collegate

Ciao a tutti, sono alle prese con una strana situazione:
Ho un database suddiviso in due files, uno di dati e uno di interfaccia
utente, devo poter eliminare con un pulsante una colonna di una tabella e di
reinserirla successivamente assumendo un campo contatore per poter numerare
in progressivo.
Ho usato il seguente codice sql su una tabella non collegata e funziona,
mentre se la tabella a cui mi riferisco è collegata ad un altro database mi
dice che non puo svolgere la query, come risolvo questo problema?
DoCmd.RunSQL ("ALTER TABLE [tabella] DROP COLUMN ColonnaDaEliminare;")
DoCmd.RunSQL ("ALTER TABLE [tabella] ADD COLUMN ColonnaDaEliminare
COUNTER;")
Vi ringrazio
Marco


Hai provato a modificare la struttura di una tabella collegata? E' la stessa
cosa, non si puň. Devi aprire il BE.
Prova cosě:
Dim DbEsterno as database
Dim Q as Querydef
Set DbEsterno = Dbengine.opendatabase (Percorso)
DbEsterno.Execute "ALTER TABLE [tabella] DROP COLUMN ColonnaDaEliminare;"
Luca
Newsgroup: it.comp.appl.access
Titolo: Ricerca periodi di assenza [URGENTE]

Ho una tabella in cui sono indicati i periodi di assenza dei miei dipendenti
due campi DAL e AL indicano la data di inizio e fine di un periodo di 
assenza.
Come faccio se volessi visualizzare solo i dipendenti assenti in un 
determinato giorno
Quel giorno dovrebbe essere considerato cioè come interno al periodo di 
assenza!!!
Grazie 

 Grazie
Prova a leggere riguardo l'Operatore Beetwen (Data1 And Data2)
mal che vada c'č sempre l'opzione di confronto:
SELECT * FROM NomeTabella
WHERE TuaData>DataDal AND TuaData<DataAl
Fai attenzione alla Formattazione delle date dal sistema
anglosassone a quello ISO che richiede l'inversione "ddmm"
Saluti
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Modificare tabelle tramite SQL

Ciao a tutti!
Dovrei aggiungere un campo ad una tabella tramite una stringa SQL, ma
non so il tipo esatto. Il campo è di tipo SI/NO.
Se scrivo:
ALTER TABLE <nome tabella> ADD COLUMN <nome campo> BOOLEAN
Access mi dà errore. Se invece scrivo:
ALTER TABLE <nome tabella> ADD COLUMN <nome campo> BIT
mi funziona, ma non è nel formato che cerco (io vorrei il campo con la
casella di spunta)
Qualcuno mi sa aiutare?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 casella di spunta)
Il formato del controllo non viene di JET ma di Access.
Per questo non puoi impostarlo con SQL ma solo con DAO/ADO.
p.e.
Dim db As DAO.Database
Dim tdf As DAO.TableDef
Dim fld As DAO.Field
Dim prp As DAO.Property
Set db = CurrentDb
Set tdf = db.TableDefs("NomeTabella")
tdf.Fields.Append tdf.CreateField("NomeCampo", dbBoolean)
Set fld = tdf.Fields("NomeCampo")
Set prp = fld.CreateProperty("DisplayControl", dbInteger, acCheckBox)
fld.Properties.Append prp
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: Ancora conteggio in report

Ero alle prese con un problema che avevo postato qualche tempo fa (Conteggio
righe in un report news:cbf5v8$cvd$
1...@lacerta.tiscalinet.it
) e che non sono
riuscito (finora) a risolvere. La soluzione di MA, utilizzare Dcount l'avevo
pensata ma il problema č che la query di origine del report ha parecchie
condizioni che avrei dovuto replicare nella Dcount, ma poi soprattutto, ho i
dati lě...
Ricercando in google (l'altra volta mi era sfuggito) ho trovato questo post
(funzione conteggio  news:b5cenv$bk3$
1...@usenet.itgate.net
) in cui Roberto
dava questa soluzione:
 =Conteggio(IIf([CAMPO]="condizione";[CAMPO];Null))
l'ho provata e funziona!!Quindi, un grazie a Roberto per l'aiuto, anche se
indiretto, ma anche una domanda: perché bisogna usare questa strada un pň
astrusa per far funzionare la funzione CONTEGGIO? E' un bug o cosa?Ciao e
GrazieMarcoMac

 GrazieMarcoMac
Non si tratta di bug: ho usato la IIf solo perché non dovevo contare ma
solamente i record che in CAMPO avevano il valore "condizione"; se avessi
dovuto contare tutti i record che non hanno Null in CAMPO, mi sarei limitato
a scrivere:
= Conteggio([CAMPO])
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: query , where da function

vorrei ottenere una sql così
SELECT tabella_autorizzazioni.Matricola,
tabella_autorizzazioni.Matricola_vera
FROM tabella_autorizzazioni
WHERE (((tabella_autorizzazioni.Matricola) In (22,33)));
 
ma in modo dinamico con valori presi da una function
 
cioè:
 
funzione:
Public Function valori_where_per_sql() As Variant
valori_where_per_sql = "In (22,33)"
End Function
 
sql dinamica
SELECT tabella_autorizzazioni.Matricola,
tabella_autorizzazioni.Matricola_vera
FROM tabella_autorizzazioni
WHERE (((tabella_autorizzazioni.Matricola)=valori_where_per_sql()));
 
ma praticamente non mi restituisce nulla perchè interpreta la risposta
della funcion come come stringa
 
esiste una soluzione?
 
ciao a tutti e buona giornata
 

newsmino ha scritto:

scusate il post doppio ma mi diceva che non era partito
 
scusate ancora
 
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.appl.access
Titolo: Copiare determinati record

Ciao a tutti, devo fare una cosa ma sono in alto mare, vi spiego...
Ho una tabella con vari campi, nel campo A ci sono una serie di
chiavi, alcune si ripetono.
Ora, devo copiare tutte le chiavi del campo A che abbiamo un
determinato valore, cambiare questo valore e inserire nella stassa
tabella questi nuovi record.
Es.
nel campo A ho dei valori alfabetici. a,b,c,d,e tutti si ripetono più
volte. Volgio copiare tutti i record che abbiano come valore a,
sostituire a con z e inserire questi nuovi record nella stessa
tabella.
Come si fa? spero di essere stato chiaro.

 ha scritto nel messaggio 
news:febe109a-7b15-4da5...@v39g2000yqm.googlegroups.com...



Es.


se tuatabella ha i campi a b c l'sql della query di accodamento è:
INSERT INTO tuatabella ( a, b, c )
SELECT Replace([a],"a","z") AS Espr1, tuatabella.b, tuatabella.c
FROM tuatabella
WHERE (((tuatabella.a) Like "*" & "a" & "*"));
ciao
max

 ha scritto nel messaggio 
news:febe109a-7b15-4da5...@v39g2000yqm.googlegroups.com...



Es.


----
ma non puoi direttamente cambiare da "a" a "z" sulla tabella? perchè li devi 
copiare?
se ti basta solo cambiare da a-->z ti basta un:
docmd.runsql "update tuatabella set campoA='Z' where campoA='A'"
ciao
BFS

 ha scritto nel messaggio 
news:febe109a-7b15-4da5...@v39g2000yqm.googlegroups.com...



Es.


Con una query di accodamento:
Insert Into NomeTabella (CampoA)
select replace(CampaA, "a","z")
from NomeTabella
Where CampoA = "a"
Adattala con i nomi dei tuoi oggetti.
-- 
Ciao
Geppo 

 ha scritto nel messaggionews:febe109a-7b15-4da5...@v39g2000yqm.googlegroups.com...

Non posso sostituirli direttamente perchè una volta fatte tutte le
operazioni devo avere sia i record a che i record z e porpio un copia
e incolla, quando incollo i record li devo incollare con un'altra
valore..

 ha scritto nel messaggio 
news:3748a5e9-b11f-478f...@p20g2000yqi.googlegroups.com...


ma in quel modo non li sostituisci ma li aggiungi in coda alla stessa 
tabella con il valore nuovo.
-- 
Ciao
Geppo 

 - Mostra testo citato -
Ah ok... però ora la cosa si fa un po più complicata
Al posto dei valori specifici di a e z devo fare una cosa un po meno
rigida.
Cioè l'utente deve poter scegliere da quale valore iniziare la copia e
deve poter assegnarli un nome.
Es. io ho il solito campo A con i valori a,b,c,d
Dopo una richiesta che mi chiede che valore copiare, io posso inserire
il valore da copaire (esempio b), fa la copia, e mi chieda che nome
assegnare ai valori copiati (esempio y) così mi trovo nella tabella i
record con valore b e i nuovi record con valore y

 ha scritto nel messaggio 
news:77a29991-251e-49d0...@g38g2000yqd.googlegroups.com...






partendo dal suggerimento di Geppo...
Insert Into NomeTabella (CampoA)
select replace(CampoA, 
forms!tuamaschera!valoredacambiare,forms!tuamaschera!nuovovalore)
from NomeTabella
Where CampoA = forms!tuamaschera!valoredacambiare
ciao
Max
Newsgroup: it.comp.appl.access
Titolo: compilare database

Public Function compila(dbpath)
Dim db As database
Dim oAcc As Access.Application
Dim ctr
Set oAcc = New Access.Application
Set db = oAcc.DBEngine.OpenDatabase(dbpath)
oAcc.OpenCurrentDatabase dbpath
Set ctr = db.Containers!Modules
MsgBox oAcc.IsCompiled
If oAcc.IsCompiled Then
oAcc.DoCmd.RunCommand acCmdCompileAndSaveAllModules
End If
MsgBox oAcc.IsCompiled
oAcc.CloseCurrentDatabase
End Function
ho fatto questa funzione per compilare un databse esterno ma non me lo
compila
se lancio DoCmd.RunCommand acCmdCompileAndSaveAllModules dal databse
interessato il codice viene compilato
come mai non funziona?
ciao e buon lavoro a tutti
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ciao e buon lavoro a tutti
l'ho modificata così ma non ho risolto lo stesso il problema
Public Function compila(dbpath)
Dim db As database
Dim ctr
Set appAccess = New Access.Application
Set db = appAccess.DBEngine.OpenDatabase(dbpath)
appAccess.OpenCurrentDatabase dbpath
'MsgBox appAccess.IsCompiled
If Not appAccess.IsCompiled Then
 
        Set ctr = db.Containers!Modules
        If ctr.Documents.Count > 0 Then
           appAccess.DoCmd.OpenModule ctr.Documents(0).name
           'MsgBox 9990
        Else
            Set ctr = db.Containers!forms
            appAccess.DoCmd.OpenForm ctr.Documents(0).name
        End If
        appAccess.DoCmd.RunCommand acCmdCompileAndSaveAllModules
        appAccess.DoCmd.Close acModule, ctr.Documents(0).name
        db.Containers.Refresh
        'MsgBox 99991
 End If
'MsgBox appAccess.IsCompiled
appAccess.CloseCurrentDatabase
End Function
probabilmente qualcuno avrà già fatto un aprocedura per compilare un db
esterno
magari può darmi qualche dritta

Newsgroup: it.comp.appl.access
Titolo: OT contro lo spamming

Sapete se esiste qualche software che permette di trascinare le email
indesiderate con il semplice drag & drop per creare la regola anzichč
doverla scrivere completamente in outlook express, chiedo questo perchč le
email indesiderate sono ormai qualche migliaio e sarebbe comodo appunto
poterle trascinare con il  mouse.
Grazie a tutti.

 ha scritto nel messaggio

Sei sicuro che con il pulsante destro non ti dia gia' questa possibilita'?
comunque non so quanto possa servire dato che cambiano continuamente
indirizzo.
Sib

 poterle trascinare con il  mouse.
Puoi sempre bloccare i mittenti con OE.
Ciao.
Newsgroup: it.comp.appl.access
Titolo: collegare immagini

vorrei creare una tabella elenco di film in cui ci sia il titolo, la trama
ed una immagine di tipo pcx della locandina
vorrei evitare di appesantire il mio mdb con la copia di ogni immagine
all'interno di un campo
vorrei se possibile inserire invece il solo collegamento all'immagine stessa
vorrei un suggerimento
grazie sergio

 vorrei se possibile inserire invece il solo collegamento all'immagine stessa
E stato un argomento ampiamente dibattuto un paio di mesi fa, e spesso
recentemente. Troverai numerosi thread con una semplice ricerca. Inoltre guarda
"Programma di esempio per catalogare immagini (*.wmf,*.bmp,*.jpg,*.tif)" nella
sezione General su 
http://www.sitocomune.com
.
Ciao. Claudio.

Newsgroup: it.comp.appl.access
Titolo: Numero caratteri inputbox

E' possibile stabilire il numero massimo di caratteri che si possono
digitare in un inputbox
grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


In modo nativo no, ma si può fare subclassando l'handle dell'ImputBox
che è ricavabile d'con FindWindow("#32770",Titolo).
Non ti consiglio questa strada decisamente complessa rispetto
alla creazione di una Form dedicata nella quale TextBox ti basterebbe
inserire la gestione dell'Evento
Private Costant NCHARMAX as integer=10
Private Sub TuaTextBox_KeyDown(KeyCode As Integer, Shift As Integer)
    If Len(Me.TuaTextBox.Text) > NCHARMAX-1 Then KeyCode = 0
End Sub
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 grazie
Alla chiusura della inputbox verifica la lunghezza della variabile stringa
in cui hai memorizzato la digitazione, e se è maggiore di quella prevista
danne notizia all'utilizzatore e ripeti la inputbox.
In alternativa, invece che una inputbox, apri una tua maschera popup nella
quale imposterai tutti i controlli che ti servono e puoi effettuare la
digitazione con l'ausilio di una maschera di input inpostata per la casella
di testo nella quale digiti i dati.
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------

 ----------------------------------------------------
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Traccia dell'inserimento di una data

Ciao,
ho un piccolo problemino:
Supponiamo che io abbia un record inserito oggi, è possibile fare dei
calcoli per es. fra due mesi? Mi spiego meglio:
ho dei comuni, che spendono/guadagnano un tot soldi per ogni persona.
Tramite alcune query devo far in modo che si ottenga la spesa/guadagno
generica (quella insomma stabilita dal tipo di servizio richiesto), e
anche quella sostenuta dall'inserimento del record fino al momento
della richiesta (es. loro inseriscono un record oggi, e vogliono i
calcoli fra tre mesi).
Per la prima query (spesa generica) non c'è prob, ma per la seconda?
Considerate che deve essere fatta per singolo record ma anche per
tutti i record (i ltotale insomma)
Ciao e grazie

 ha scritto nel messaggio
news:jUzGOYgOCQzLY=s4owWJB...@4ax.com...

Non so se ho capito bene, ma mi sembra che tu debba solo inserire nella
query un criterio nel campo contenente la data del movimento di
entrata/uscita.
Del tipo:
<= [Fino a quale data?]
se desideri tutti i movimenti fino ad una certa data (compresa), o del tipo:
between [A partire dal] and [fino al]
se desideri far scegliere un intervallo di tempo.
--
Ciao
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access

Newsgroup: it.comp.appl.access
Titolo: database su server - condivisione applicazioni access

Ciao a tutti.
Siamo in una situazione di vari pc in rete ed il database su server
centrale.
Ho fatto varie query/report ecc in acces usando tabelle naturalmente
"collegate".
Quando apro la mia applicazione access da un altro pc, questo non può
eseguire le mie query.
Si può risolvere questo problema?
Grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Con l'affermazione: "...vari pc in rete ed il database su server centrale." intendi dire che hai diviso l'applicazione in due mdb
Front-end e Back-end?
Se sě, che errore ti presenta?
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Testo intermittente

E' possibile creare una casella nella quale il testo compaia (e scompaia) ad 
intermittenza? 

 intermittenza?
Si.
Basta renderlo dello stesso colore dello sfondo "adesso si .... adesso
no..."
Su Timer cambia il colore in modo alternato.
If me.Nomecontrollo.Backcolor=vbBlack Then
    me.Nomecontrollo.Backcolor=vbwhite
Else
    me.Nomecontrollo.Backcolor=vbBlack
End if
In modo molto più elegante si potrebbe sfruttare l'oeratore XOR...
Se vuoi un Bianco Nero ad esempio:
Sempre su Timer:
me.Nomecontrollo.Backcolor=me.Nomecontrollo.Backcolor XOR 16777215
Se ti guardi la combinazione Binaria o HEX capisci come funziona.
Se vuoi altri colori allora converti in Binario e maschera le differenze per
ricavare il valore da mettere in XOR
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 scompaia) ad intermittenza?
Postresti creare un Etichetta è usare la proprietà visible con l'evento 
timer in questo modo:
Su evento Load della Form imposti l'intervallo di tempo che trascorre 
nell'intermittenza :
Private sub form_load()
me.timerinterval = 1000      'cioe' un secodo
end sub
private sub form_timer()
TuaEtichetta.visible = not TuaEtichetta.visible
end sub
-- 
Ciao
Access 

 In modo molto piů elegante si potrebbe sfruttare l'oeratore XOR...


 Access
Veramente bruttina come idea... mi pare l'OP non volesse vedere sparire il
controllo ma solo il testo.
Quanto suggerisci(immagino sia in Copertura della Casella) ma non funziona
se la casella ha il Focus in quanto
la label non verrebbe mai visualizzata.


 la label non verrebbe mai visualizzata.
Bhe, hai ragione, ma la mia voleva essere solo un idea, magari usare una 
label invece di una textbox.
E' chiaro che se ha bisogno necessariamente di utilizzare una textbox deve 
seguire le tue indicazioni.
-- 
Ciao
Access

 
due carabinieri in auto, il primo chiede al secondo "guarda se 
funzionano le frecce" e il secondo...
-- 
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
http://boinc.mundayweb.com/one/stats.php?userID=2762


Ciao Alessandro, pensando alle tue indicazioni ho notato che in quel modo 
cambia il colore di sfondo e non quello del testo, allora mi chiedevo non 
sarebbe meglio recuperare il colore delle sfondo e modificare con questo 
quello del testo?
Private Sub form_Timer()
Dim ColoreSfondo
ColoreSfondo = alunno.BackColor
Dim ColorePrimoPiano
ColorePrimoPiano = alunno.ForeColor
Static Colore As Integer
If Colore Then
   NomeTextbox.ForeColor = alunno.NomeTextbox Xor ColoreSfondo
Else
   NomeTextbox.ForeColor = NomeTextbox.ForeColor Xor ColorePrimoPiano
End If
Colore = Not Colore
End Sub
In questo modo, anche se si vuole cambiare colore allo sfondo il colore del 
testo si adegua automaticamente.
Che ne dici?
-- 
Ciao
Access 

 Access
Si hai perfettamente ragione infatti se leggi ho detto una cosa e poi mi è
scappato BackColor...
Ovviamente è corretto ForeColor.

Newsgroup: it.comp.appl.access
Titolo: cambiare di segno

ciao a tutti
 
non riesco a cambiare di segno senza avere errore;
ho provato cosi...
 
strSql = strSql & "-1*(DettaglioFatture.MioSconto), "
 
grazie


risolto; avevo tralasciato As ecc.

Newsgroup: it.comp.appl.access
Titolo: Selezione di record in una casella combinata

Sono un neofita di Access.
Ho messo in una casella combinata (Inz) dei nomi di iniziative appartenenti
ciascuna ad anni diversi. Come faccio a filtrare le iniziative in base
all'anno, che viene selezionato in un'altra casella combinata (f_anno). Ho
avuto in mente questa soluzione, che però non mi porta ad alcun risultato.
La riporto qui di seguito (in VBA):
Private Sub f_anno_Change()
Inz.Requery
'DoCmd.ApplyFilter "Inz" = "f_anno"
End Sub
La soluzione commentata mi riporta un errore, mentre l'altra funziona ma
quando cambio di record, mi rimane selezionato l'anno di f_anno,
appartenente al record precedente e non viene visualizzato quello del record
corrente.
Grazie per l'aiuto, buona giornata!!!
--
Marco Mazzaglia
mazz...@bussola.it
http://www.bussola.it


Per il filtro prova con:
DoCmd.ApplyFilter "[Inz] = '" & me.f_anno & "'"
Per rimuovere il filtro:
Docmd.ShowAllRecords
Ciao.


Ciao Marco,
prova ad aggiungere un requery sull'evento Su Corrente.
Silvio
Newsgroup: it.comp.appl.access
Titolo: OT (forse):  non sbattetevene...

Mi riferisco a quei tali che postano inghippi relativi alle nuove release di
Windows, chiedono aiuto ... e poi spariscono dall'area.
Se avete risolto (o NON avete risolto) determinati problemi con i consigli
che vi sono stati dati, fatecelo sapere: serve a tutti, soprattutto in
questo periodo.
Ad esempio Rino Ferrari: era o non era un problema di riferimenti quello che
affligge la tua applicazione XP sotto Vista?
Saluti.

 Saluti.
@Alex


Mi copro il capo di cenere e segnalo quanto segue:
i miei problemi con vista erano più che altro con alcune schede acquisizione 
video
per gli applicativi Access, non avevo riscontrato problemi, ma non faccio 
testo, sono cosucce semplici...
ho riscontrato problemi di installazione nell'aggiornamento da XP pro, 
mentre quasi nulla da una nuova installazione.
tutto qui, ma sul principio del tuo post hai perfettamente ragione
Ora mi faccio una doccia, per togliermi la cenere chiaro :-)
Fabio


 ha scritto nel messaggio 
news:45df3543$0$3820$5402...@news.sunrise.ch...

Calma raga, quando si cerca di migrare, lo sapete i problemi sono tanti e il 
tempo e quel che e......
il problema precedente rimane se si utilizza una versione precedentemente 
compilata sia versione  MDE ed MDB.
Convertendo il file in versione 2007  il problema rimane ma stranamente se 
si rifà il riferimento a DAO 3.6  sembra che il tutto
ricominci a funzionare mah.....
Altri problemi con il Web componenti di Office xp OWC10.DLL  non trova il 
riferimento.
Non era un componente standard di Office?
Che fine a fatto?
Office 2007 il menu per registrare nuovi componenti(dll.,ocx...) dove e 
finito?
Ciao,
Rino

 Che fine a fatto?
E' stato sostituito da un'altra libreria.
http://technet2.microsoft.com/Office/en-us/library/1dce641e-ba1c-446a-8ff2-2
21769a58ba51033.mspx?mfr=true
Comunque il tuo è un problema di riferimenti: Access XP funziona sotto win
Vista (e pure A'97).
Ciao.