mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Compatta database

Ciao a tutti,
sulla funzione in oggetto: ho controllato il sito comune, il
tutto è troppo complicato, non riesco tra i 3 esempi specificati a trovare
qual'è la funzione che esegue il compatta database. Vorrei farla eseguire
ogni volta che si apre la maschera iniziale onde evitare di farla fare
manualmente all'utente. Ci sarà un codice dietro a questa funzione
predefinita di Access97 ... mannaggia.
Grazie mille a tutti
Ronny.
--------------------------------
Inviato via 
http://usenet.iol.it

 ha scritto nel messaggio
news:194Z130Z244Z66Y...@usenet.iol.it...

1) Aprire il database o il progetto di Microsoft Access che si desidera
venga compattato automaticamente.
2) Scegliere Opzioni dal menu Strumenti.
3) Fare clic sulla scheda Generale.
4) Selezionare la casella di controllo Compatta alla chiusura.
Nota   La compattazione non viene effettuata se si chiude un database
multiutente (condiviso) mentre altri utenti lo stanno utilizzando.

 ha scritto nel messaggio
news:9p26nk$43r$1...@news.flashnet.it...

una curiosità, vale anche per la versione RUNTIME che tu sappia?
grazie
by
stwe

 ha scritto nel messaggio
news:9p26nk$43r$1...@news.flashnet.it...
| > qual'è la funzione che esegue il compatta database. Vorrei farla
eseguire
| > ogni volta che si apre la maschera iniziale onde evitare di farla fare
| > manualmente all'utente. | >
|
| 1) Aprire il database o il progetto di Microsoft Access che si desidera
| venga compattato automaticamente.
| 2) Scegliere Opzioni dal menu Strumenti.
| 3) Fare clic sulla scheda Generale.
| 4) Selezionare la casella di controllo Compatta alla chiusura.
| Nota   La compattazione non viene effettuata se si chiude un database
| multiutente (condiviso) mentre altri utenti lo stanno utilizzando.
--------------------------|
Ciao Mik Mak...interessava anche me... ma dove diavolo si trova
la casella di controllo " Compatta alla chiusura "  ??????
Ciao......
--
SuperPippo®   [;o))

 ha scritto nel messaggio

Perfetto se stai usando A2000, peccato che nella versione A97 non
esiste!
-- 
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------

 Ronny.
[A97]
Se vuoi automatizzare la compattazione dell'mdb in uso () le uniche
soluzioni sono:
- il mio script in VB che trovi sul SC con le indicazioni, che ti
permette di farlo quando vuoi;
- un file batch (compact.bat):
 
  @ECHO OFF
  "C:\Programmi\Microsoft Office\Office\MSACCESS.EXE" %1 /compact
 
  da eseguire alla chiusura dell'mdb in questo modo:
 
  Sub s_Compatta()
    Shell "C:\Temp\compact.bat " & CurrentDb.Name
    Application.Quit acQuitSaveNone
  End Sub

Newsgroup: it.comp.appl.access
Titolo: database completo di tutte le banche italiane ABI

che voi sappiate è liberamente distribuibile e utilizzabile il database 
completo di tutte le banche italiane con relativi abi e cab? è da chiederlo 
magari all'asscoiazione ABI che le gestisce?
Secondo voi? esiste già in rete? sarà liberamente utilizzabile?
Grazie 

 ha scritto nel messaggio 
news:cpbmt8$27u$1...@lacerta.tiscalinet.it...

Si le tabelle con i codici ABI sono di pubblico dominio. Puoi utilizzarle.
Questo un link interessante:
http://www.tkk.it/tabelle/index.html
Ciao, carlo 

 ha scritto nel messaggio 
news:cpbmt8$27u$1...@lacerta.tiscalinet.it...

Buona sera,
dal sito della Banca d'Italia (
http://www.bancaditalia.it/
), selezionare la 
voce Vigilanza sulle banche, successivamente Intermediari vigilati, Download 
di archivi. Dovrebbero esseredei file *.txt opportunamente compilati per 
poterli importare da access.
Asòciao 

 ha scritto nel messaggio 
news:cpbmt8$27u$1...@lacerta.tiscalinet.it...

Scusatemi nel post precedente mi sono dimenticato di indicare un 
collegamento essenziale. La linea completa è:
http://www.bancaditalia.it/
 ____ FUNZIONI DI VIGILANZA ____ Vigilanza sulle 
banche ____ Intermediari vigilati ____ Download di archivi: banche, gruppi 
bancari, sportelli bancari - aggiornamento al 30 giugno 2004.
Asòciao 

 Asòciao
grazie, sapete se ci sono altri database importanti da includere in un 
gestionale oltre alle banche e ai comuni?
Grazie. 

 Asòciao
lo scaricato ma hai fatto caso che il file da te speicificato contiene tutto 
tranna il nome della banda dettaglio non da poco, magari è in qualche altro 
file da scaricare e sono da unire?
qualcuno a trovalto altro in rete?
Grazie a tutti. 


Ma il link che io ti ho indicato contiene anche il nome della banca...
Cos'ha che non va.
Ciao, Carlo 


non ha il resto ha l'abi e il nome ma non indirizzo filiale di e cab e 
magari se fosse possibile anche codice swift tel e fax ma forse chiedo 
troppo

Newsgroup: it.comp.appl.access
Titolo: maschera con orario attuale sempre in aggiornamento

devo creare una maschera con un campo ce riporta l'ora attuale e che sia
sempre in aggiornamento ogni secondo...
Su google non ho trovato niente a riguardo...
Grazie per l'attenzione
Nicola


oltre che su form load metti il campo anche nell'evento della maschera
"su timer"
Buon venerdi'
MoNica


fai in questo modo:
private sub form_load()
me.timerinterval = 1000
end sub
private sub form_timer()
NomeTuoControllo = time()
end sub
-- 
Ciao
Access 



grazie 1000 a tutti e 2
domani provo...
Nicola
Newsgroup: it.comp.appl.access
Titolo: maschera con due sottomaschere: sottomaschera1 controlla sottomaschera2 .... come fare?

Ciao... ho gia postato qualche mio problema e mi avete aiutato
sempre...confido anche per questo problema.
ho una maschera con 2 caselle combinate che mi permettono di fare un
filtro sui record: cliente, ordini cliente.
la maschera ha due sottomaschere (SM1 e SM2).
la prima (SM1), visualizza il numero e la descrizione dell'ordine ed
ha come origine dati una query legata alla selezione fatta con le
caselle combinate.
la seconda (SM2) DOVREBBE visualizzare i dati di spedizione per
ciascun ordine visualizzato dalla SM1, quando clicco ) sul record che
mi interessa ( nella SM1!).
il problema è che dati da visualizzare nella SM1 e SM2 sono nella
stessa tabella, tabella che ha gia subito il filtro.
il problema mi sembra banale...azz   ho gia filtrato...quando clicco
la SM2 dovrebbe visualizzare i dati del record selezionato.....
Aiuto!
Ciao



ahhh dimenticavo... la SM2 ha come origine dati una query dove,come
condizione, ho messo che l'ordine da var vedere deve essere quello che
c'è in  [form]![maschera principale]![SM1]![ordine] (cioè il controllo
Testo della SM1 che contiene il numero dell'ordine

angelo dannato ha scritto:



Se ho capito bene hai lo stesso problema che ho avuto io (vedi qualche
post precedente)
Io ho fatto cosi:
-La prima sottomaschera contiene dei dati fra cui sicuramente un id.
-Nella maschera principale ti crei un controllo non visibile che ha come
origine l'id della sottomaschera uno
-Colleghi la seconda sottomaschera al controllo nascosto e quindi variando
la prima vengono visualizzati i dati relativi anche nella seconda.
Saluti.
-- 
Raffaele Alberoni
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Testo della SM1 che contiene il numero dell'ordine
Prova ad eseguire un Requery sulla sottomaschera SM2
Ciao
--
Alberto
No alle guerre



ho già provato Requery e Repainobject in tutte le salse, come oggetto
Docmd.  e non
cioè nelle proprietà della SM1, ho impostato il comando requery sia
sull'evento  "corrente" sia sull'evento "click".
quando clicco su un record della SM1 mi aspetterei un requery e
l'aggiornamento dei dati..... invece mi da un errore
"errore di run-time 2388  -  impossibile utilizzare l'azione
ApplicaFiltro su questa finestra"
 
eppure nell'esempio Northwind funziona.....anche se lavorano su
tabelle separate e non su una tabella sola come faccio io.


[cut]

[cut]
e con
Forms![maschera principale]![SM2].Form.Requery
a fronte dell'evento 'su corrente' della SM1
cosa succede?
altrimenti prova a postare l'origine record della SM2

Newsgroup: it.comp.appl.access
Titolo: [OT] Caselle testo protette in Word...

Scusate ma non sapevo dove rivolegermi:
Come faccio a fare delle caselle di testo per l'immissione di testo bloccate
in Word?
Vorrei fare tipo un prestampato nel quale gli utenti possono immettere solo
alcuni dati
(in pratica si tratta di un modulo fax....)
grazie mille e scusate per il disturbo....
--
------- CED L'Abbondanza -------
http://www.labbondanza.it
Email: 
in...@labbondanza.it
(Piombini L./Vigna F./Bondi D.)
--------------------------------------------

 alcuni dati
Ti prepari il tuo prestampato da salvanre come dot (formulario) poi vai a
Strumenti - Proteggi Documento, abiliti la protezione Moduli e metti una
password. Sconsigliabile dimenticarla... Quando vorrai sproteggere il
documento per fare modifiche scommettiamo che la chiede anche a te?
Paolo

Newsgroup: it.comp.appl.access
Titolo: sincronizzazione database

dovrei fare via codice una sincronizzazione tra un database Master.mdb che
si trova su un altro computer in remoto ed uno che è sulla mia macchina e
che si chiama mio.mbd. Come posso fare?
Dall'help in linea viene dato il seguente codice
Sub InternetSynchronizeX()
 Dim dbsTemp As Database
 Set dbsTemp = OpenDatabase("C:\Data\OrdEntry.mdb")
 ' Sincronizza il database locale con la replica sul
 ' server Internet.
 dbsTemp.Synchronize _
  "
www.mycompany.myserver.com
" _
  & "/files/Orders.mdb", _
  dbRepImpExpChanges + dbRepSyncInternet
 dbsTemp.Close
End Sub
ma quando creo una macro che mi esegue questo codice ottengo un messaggio
che mi invita a creare una funzione che mi richiami questa sub.
Spero tanto che qualcuno possa aiutarmi :-(


E tu modifica la sub in function, es.:
'-------------------
 Function InternetSynchronizeX()
  Dim dbsTemp As Database
  Set dbsTemp = OpenDatabase("C:\Data\OrdEntry.mdb")
  ' Sincronizza il database locale con la replica sul
  ' server Internet.
  dbsTemp.Synchronize _
   "
www.mycompany.myserver.com
" _
   & "/files/Orders.mdb", _
   dbRepImpExpChanges + dbRepSyncInternet
  dbsTemp.Close
  InternetSynchronizeX = True
 End Function
'-------------------
e richiamala dalla macro...
Ciao.

Spero tanto che qualcuno possa aiutarmi :-(
l'operazione EseguiCodice delle macro puň eseguire solo funzioni, non
sub.  perché?  boh.  č cosě.
allora i casi sono due: o si fa come ti dice Sergio, e cioč riscrivi
la sub sotto forma di function (praticamente basta scrivere function
al posto di sub nella prima e nell'ultima riga) oppure ti scrivi una
funzione che richiama la sub:
sub pippo(argomenti)
	fai qualcosa
end sub
function pluto
	pippo argomenti
end function
se vuoi far eseguire il codice di pippo con la macro eseguicodice fai
eseguire la function pluto.
--
make it idiot proof and someone will make a better idiot.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
Newsgroup: it.comp.appl.access
Titolo: Form parzialmente di sola lettura

Certo che le domande piů strane mi vengono in mente di mercoledě.
Allora ho una maschera e la sua relativa sottomaschera che oltre alle
solite combo e text ha 2 check che passano valori per il tipo di stampa.
Mi vorrei "proteggere" da involute volute modifiche ai valori del db e la
apro in readonly, e quindi non posso nemmeno toccare i 2 check che invece
mi serve poter toccare.Come posso operare?
grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 mi serve poter toccare.Come posso operare?
Puoi impostare la proprietą Locked dei relativi controlli a True.
Oppure puoi modificare il valore della proprietą Enabled.
Sono due cose diverse, dipende da quello che ti serve di preciso.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution
Newsgroup: it.comp.appl.access
Titolo: lista cantieri in maschere continue???

Ciao a tutti,io ho una maschera continua in cui ho tutta la lista dei miei
cantieri, dopo la chiusura del cantiere (ho immesso un campo "data di
chiusura") vorrei che non venisse piů visualizzato nella maschera ma non
vorrei eliminarlo.......come posso fare???? vorrei che all'apertura della
maschera "m_lista cantieri" non venissero visualizzati i cantieri in cui č
stata immessa la data di chiusura ed inoltre vorrei mettere un pulsante
"tutti" che eliminasse questo ""filtro""........
ho provato con Is Null   o cose varie, ma non ci sono riuscito.
Se potete ed avete voglia di aiutarmi tenete presente che non ne so molto di
DB!!!
Ciao e grazie!!!!

 Ciao e grazie!!!!
Se il campo che contiene la data di chiusura del cantiere è di tipo Data/ora
e si chiama DataDiChiusura, a fronte dell'evento "Su apertura" della tua
maschera genera il seguente codice VBA:
Private Sub Form_Open(Cancel As Integer)
Me.Filter = "IsNull(DataDiChiusura)"
Me.FilterOn = True
End Sub
e a fronte dell'evento "Su clic" del pulsante di comando che ti fa vedere
tutti i record genera la seguente riga di codice VBA:
Me.FilterOn = False
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 wrote in message
PaUw9.107039$RO.27...@twister1.libero.it...

Mille grazie Roberto da casa !!!! anche per la tempestività!!!!!
P.s. hai ragione è ora che imparo........ci sto provando!!!!!
Ciao ed ancora grazie



ti ho già scritto un messaggio di ringraziamento ma ti ringrazio
nuovamente.......però ho una domanda simile........ho una maschera "lista
fatture" e vorrei filtrarla anno per anno,in poche parole vorrei inserire
una casella in cui inserire l'anno corrente e far si che mi vengano quindi
elencate nella maschera lista fatture solo le fatture dell'anno scritto in
quella casella?????
scusa per l'insistenza ma io ci provo poi vedi tu!!!!!!
Ciao ed ancora grazie!!!!

 Ciao ed ancora grazie!!!!
Se il campo che contiene la data delle fatture è di tipo Data/ora e si
chiama DataFattura, a fronte dell'evento "Su apertura" della maschera genera
il seguente codice VBA:
Private Sub Form_Open(Cancel As Integer)
Dim Anno As Variant
Do Until 1 = 2
Anno = InputBox("Digita l'anno nella forma aaaa")
If IsNumeric(Anno) Then
    Exit Do
Else
    MsgBox "Digita l'anno"
End If
Loop
Me.Filter = "Year(DataFattura)=" & Val(Anno)
Me.FilterOn = True
End Sub
--


 wrote in message
hu8x9.109373$RO.28...@twister1.libero.it...

sono sempre io ho provato a fare ciò che mi hai consigliato ma non
funziona!!! mi appare il messaggio "Digita l'anno nella forma aaaa" e poi mi
da un errore.......è giusto che mi appaia questo messaggio?? se è si non si
può evitare? ed utilizzare l'anno che c'è nella "anno corrente"???
un'altra domanda, se su apertura ho già una routine di evento come posso
metterne un'altra (ne ho una anche su caricamento)
ciao ed ancora mille grazie per la pazienza!!

 ciao ed ancora mille grazie per la pazienza!!
--

Newsgroup: it.comp.appl.access
Titolo: help

Cerco di spiegarmi il meglio :
In una sottomaschera ordini ho i segurni dati :
Prodotto prezzo quantita
Vorrei (se è possibile) unire in unico campo che mettero nella maschera
principale i tre campi della sottomaschera.
Es
Prodotto      quantità             prezzo
birra                    2                 15,00
arancia               3                 14,00
vino                     4                  7,50
il campo finale vorrei fosse cosi  :
birra 2 15,00 ;aranciata 3 14,00 ;vino 4 7,50
grazie

 Cerco di spiegarmi il meglio :
Hai iniziato male: prova intanto con un subject più significativo!!!
Antonio

 ha scritto nel messaggio
news:7EXJ9.5770$TC5.1...@twister1.libero.it...


 non capisco io
Allora,
1) Il titolo del messaggio deve anticipare il problema
2) Devi rispondere dopo o in mezzo al quoting, cioč la parte di messaggio
precedente che lasci nella tua risposta
Antonio

 ha scritto nel messaggio
news:4S5K9.7667$TC5.2...@twister1.libero.it...


 > Antonio
Avresti dovuto anche riportare il messaggio originale, visto che così sono
dovuto andare io a ricercarlo, ma vista la buona volontà, per questa volta
passi:
Vorrei (se è possibile) unire in unico campo che mettero nella maschera
principale i tre campi della sottomaschera.
Era:
Prodotto      quantità             prezzo
birra                    2                 15,00
arancia               3                 14,00
vino                     4                  7,50
il campo finale vorrei fosse cosi  :
birra 2 15,00 ;aranciata 3 14,00 ;vino 4 7,50
Il problema qua è che tu vuoi raggruppare insieme tutti i dati di tutti
irecord della sottomaschera.
A me sembra una stupidata!
La sottomaschera ti da proprio la visione di tutto ciò che è correlato dal
lato molti con un record della form principale, perchè devi raggruppare
tutto?
E potrei capire il raggruppo di tutto ciò che riguarda il record corrente
della sottomaschera, ma perchè di tutti?
Comunque, se ti bastasse solo il record corrente, la sintassi è
me.nomecontrollosottomaschera.form.prodotto & " "
me.nomecontrollosottomaschera.form.quantità & " "
me.nomecontrollosottomaschera.form.prezzo
Per prenderli tutti, dovrai fare un ciclo sul recordsetclone della
sottomaschera e da codice crearti la stringa da piazzare alla fine nella
casella di testo della form principale
Antonio

 ha scritto nel messaggio
news:7RkK9.10345$Ou4.3...@twister2.libero.it...


 > me.nomecontrollosottomaschera.form.quantitą & " "


 > > me.nomecontrollosottomaschera.form.quantità & " "


 l'impegno ma credo mi manchino le basi
Ti avevo già detto di leggerti il post di Roberto "Istruzioni per l'uso del
NG"


 ha scritto nel messaggio
news:fliL9.20149$Ou4.6...@twister2.libero.it...

Newsgroup: it.comp.appl.access
Titolo: Id Contatore PK

ciao a tutti
 
cosa significa
Id Contatore PK
 
Grazie 
 
 

Piero presented the following explanation :

PK = Primary Key = Chiave Primaria
Significa che il campo ï¿œ indicizzato, quindi il dato ï¿œ richiesto e non 
sono ammessi duplicati.
 
Bruno
 
 


grazie Bruno 
 
 

 Bruno
 
mentre FK? 
 
 

FK = Foregin Key = Chiave Esterna e fa riferimento a una PK di un'altra tabella
solitamente ammette duplicati
 
per esempio  Tabella Regioni  e  Tabella Provincie
 
Nella tabella regioni avrai
Lombardia con PK = 8
Piemonte  con PK = 4
 
poi nelle provincie avrai
Milano  con PK 12  e  FK 8
Bergamo con PK 19  e  FK 8
Brescia con PK 17  e  FK 8
Torino  con PK 24  e  FK 4
Cuneo   con PK 15  e  FK 4
 

 ha scritto nel messaggio 
news:10702fa9-0758-4ff0...@googlegroups.com...

grazie

Newsgroup: it.comp.appl.access
Titolo: Problema con il comando "gotocontrol"

Se inserisco questa parte di codice:
docmd.gotocontrol "LOCALITA"  mi da il seguente messaggio d'errore: Comando
o azione "VaiAControllo" non disponibile.....dove sta il trucco?
Grazie
Massimo

 ha scritto nel messaggio
news:l2eyc.446265$rM4.18...@news4.tin.it...

Che cos'è "LOCALITA": un campo all'inetrno di una maschera, una variante, un
punto di controllo o che cosa?

 ha scritto nel messaggio
news:L5eyc.32385$G%.15301@tornado.fastwebnet.it...


 ha scritto nel messaggio
news:eleyc.446403$rM4.18...@news4.tin.it...



e allora devi inserire nel codice:
Me.Localita.SetFocus

Ricordo anche di postare DOPO il quoting del messaggio,
come prevedono le regole del ng.
Grazie e ciao,
Massimo
-- 
web: 
www.piubelli.net
Vuoi il mio indirizzo? Togli _cut_ per rispondermi
Newsgroup: it.comp.appl.access
Titolo: Maschera inserimento

Ho un maschera di inserimento delle offerte clienti, come posso fare a
far ripetere l'ulimo cliente inserito ogni volta che creo un nuovo
record ?
Grazie per l'attenzione,
Roberto
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Ammesso e non concesso che abbia capito quale sia il tuo problema, vai sul
Sito Comune e nella Sezione Forms leggi la FAQ di Federico Luciani
intitolata "Ripetere un valore del record precedente in una form".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Ho un maschera di inserimento delle offerte clienti, come posso fare a
far ripetere l'ulimo cliente inserito ogni volta che creo un nuovo
record ?
Ho provato a guardare sul sito comune ma non ho trovato la soluzione
Grazie per l'attenzione,
Roberto


 Roberto
Scusa ma non ho capito se non hai trovato la FAQ oppure se non era quella la
soluzione al tuo problema.


Salve,
il problema è quello di inserire continuamente dei record in una maschera;
mi spiego meglio:
Apro una maschera in modalità inserimento (quindi record vuoto...),
inserisco il record ed alla fine cliccando sul controllo "Salva record"
visualizzo una finestra che mi chiede se salvare il record o meno (questo
avviene perchè ho inserito del codice nella proprietà "prima di aggiornare"
della maschera che mi fa l'undo...);
Una volta accettato di salvare il record vorrei che la maschera
visualizzasse automaticamente un nuovo record vuoto per l'inserimento di un
altro record.
Come fare?
C'è ancora un altro problema...
Quando alla richiesta di salvare il record rispondo negativamente, fa
l'undo, ma il contatore del record mi viene incrementato ugualmente: c'è un
modo per evitarlo così che tutti i record abbiano il campo ID consecutivo?
Grazie :)

 Grazie :)


Newsgroup: it.comp.appl.access
Titolo: Casella di testo: gestire gli a capo

Premesso che non voglio utilizzare il controllo richtext32.ocx, è' possibile
in qualche modo in una casella di testo posizionare il cursore all'inizio
del rigo successivo, premendo il tasto enter ?
Grazie.
Massimo

 ha scritto nel messaggio
news:Opio9.61233$e31.1...@twister2.libero.it...

Vai nelle proprietà della casella di testo, cerca 'Funzione tasto
INVIO' e scegli 'Nuova riga del campo'
--
Matteo Palmieri
Cybercreations - 
www.cybercreations.it


grazie il bello di A97 é che non finisci mai di imparare !

 il bello di A97 é che non finisci mai di imparare !
    :-)))
    E quando hai "finito" ci sono gia' ad aspettarti: A00, A02, ...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.appl.access
Titolo: Controllo password

Ho creato una maschera dove esite una casella Id_richiedente ed una casella
txt_password. Non riesco a capire cosa cè che non funziona, l'errore è
"proprietà o metodo non supportati dall'oggetto". Premetto che impostando un
punto di interruzione riesco a vedere le proprietà di Rs_autenticazione, il
mio recordset, che si valorizza (vedo ad esempio 2 record, l'EOF che è vero
o falso a seconda della pwd che ho digitato in maschera e così via).
Mi sapete aiutare?
Private Sub txt_password_AfterUpdate()
Set Rs_autenticazione = CurrentDb.OpenRecordset("t_richiedente")
    Rs_autenticazione.Execute ("Select t_richiedente AND password WHERE
t_richiedente = me.cod_richiedente AND password = me.txt_password")
    If Rs_autenticazione.EOF = True Then GoTo cannato
    If Rs_autenticazione.EOF = False Then GoTo giusto
cannato:
MsgBox "cannato"
Exit Sub
giusto:
MsgBox "giusto!"

 wrote in message
93fh5u$rfg$1...@stargate1.inet.it...


Ho fatto come dici tu, e dopo aver aggiustato l'SQL (di corsa probabilmente
hai scambiato t_richiedente (nome tabella) con ID_richiedente (nome campo))
MA GRAZIE MILLE LO STESSOOOO. Però vado avanti di una riga ma il controllo
non si completa ugualmente. Si blocca su Set Rs_autenticazione =
CurrentDb.OpenRecordset(strSQL) dicendomi "Parametri insufficienti, previsto
2". Guardo le variabili locali e Rs_autenticazione è vuoto, in strSQL c'è la
query che abbiamo scritto. Qualcuno può fare un ultimo sforzo per cortesia?
Oggi non ce la faccio proprio più...........
Questo è il codice attuale:
Private Sub txt_password_AfterUpdate()
Dim strSQL As String
strSQL = "SELECT ID_richiedente and password FROM t_richiedente WHERE
((ID_richiedente = me.cod_richiedente) AND (password= me.txt_password));"
Set Rs_autenticazione = CurrentDb.OpenRecordset(strSQL)
If Rs_autenticazione.RecordCount = 0 Then
     GoTo cannato
Else
    GoTo giusto
End If
cannato:
MsgBox "cannato"
Exit Sub
giusto:
MsgBox "giusto!"
Exit Sub
End Sub
Antonello, grazie mille comuque!

Chiedo venia! L'SQL l'avevo sbagliato io in origine.................
cmq continuo a non trovare la soluzione.

 
me.cod_richiedente e me.txt_password sono controlli della maschera, 
quindi non puoi passarli in una query in questo modo.
Impostala cosi':
strSQL = "SELECT ID_richiedente and password FROM t_richiedente 
WHERE ((ID_richiedente = " & me.cod_richiedente & ") AND (password='" &  
me.txt_password & "'));"
in modo che quando la vai a eseguire diventa x es. :
SELECT ID_richiedente and password FROM t_richiedente WHERE 
((ID_richiedente = 123) AND (password='pippo'));"
Ciao
-- 
JBad


Se non sbaglio ti manca la dichiarazione dell'oggetto recordset:
'--------------
Private Sub txt_password_AfterUpdate()
Dim Rs_autenticazione as RecordSet
Set Rs_autenticazione = CurrentDb.OpenRecordset("t_richiedente")
...
...
'--------------
Ciao.

RAGAZZI GRAZIE A TUTTI!
adesso funziona e mi sto anche sforzando di ragionare per capire i perchè ed
i percome, questo newsgroup è un tesoro!
grazie mille!
Newsgroup: it.comp.appl.access
Titolo: Ricerca record da maschera

Scusate per le banali richieste ma sono proprio bianco...
Allora su una maschera c'è un campo (data) collegato a tabella in cui se 
digito una data già inserita mi deve ritornare il record relativo anzichè 
inserirne uno nuovo
Tabella: appuntamenti
Campo su maschera: data_app
Grazie, pang.


La ricerca la devi fare tramite un controllo non associato e poi fare 
una findfirst sull'oggetto recordset con il valore di quel controllo.
Il tutto immagino sull'evento afterupdate del controllo non associato.
-- 
ac
y-1=x


Prova ad inserire questo codice , dopo averlo adeguatamente rivisto in base 
ai nomi dei tuoi campi e controlli, nell'evento BeforeUpdate della textbox 
interessata:
Private Sub DataFine_BeforeUpdate(Cancel As Integer)
Dim vData
'tratto dal sito di Karl
If Not IsNull(DLookup("NomeTuoCampoConteneteLaData", "NomeTuaTabella", _
    "NomeTuoCampoConteneteLaData = " & Chr$(34) & 
Me!NomeTuaTextBoxAssociataAlCampoConteneteLaData & Chr$(34))) _
    And Me!NomeTuaTextBoxAssociataAlCampoConteneteLaData <> 
Nz(Me!NomeTuaTextBoxAssociataAlCampoConteneteLaData.OldValue) Then
    vdata = Me.NomeTuaTextBoxAssociataAlCampoConteneteLaData.Text
    DoCmd.FindRecord vdata, acAnywhere, , acSearchAll, , acAll
end if
End Sub
-- 
Ciao
Access 

 interessata:
E se poi vuole cambiare "effettivamente" quella data che succede?
-- 
ac
y-1=x

Newsgroup: it.comp.appl.access
Titolo: De rerum Biso

S'e' sposato proprio ieri ed ora e' in viaggio per il sud america.
(ergo dubito che gli i msg degli utlimi giorni su ICAA siano farina del suo
sacco)
Comunque m'ha giurato che ritorna!
Ragazzi, per intato so' tornato io, bentrovati tutti (tranne i cazzoni che
con le loro flames stanno rovinando il nostro bel NG!:-))
Saluti.
Luciano

 - rimuovi XXX x rispondere    ICQ #8814554
Non mi interessa quello che fa il Congresso, finche' non lo fa nelle
strade e spaventa i cavalli.
		-- Victor Hugo


 io appoggio! :)

  io appoggio! :)
Per appoggiarmelo dovrai passare sul mio cadavere di tre giorni!!!
Antonio

 Comunque m'ha giurato che ritorna!
a) Spione!
b) Tutte le mie amanti possono stare tranquille che ce n'è sempre anche per
loro...
c) Spione!
Antonio

 b) Tutte le mie amanti possono stare tranquille
I loro mariti ancora di piu'!!:-)))
Saluti.
Luciano
(DOC)

 I loro mariti ancora di piu'!!:-)))
Infatti lo sanno tutti che fine ha fatto il sor Tranquillo!
Antonio
Newsgroup: it.comp.appl.access
Titolo: [Link] Standard VBA (VB6)

Salve,
la mia richiesta č molto semplice, gradirei ricevere un link che mi permetta 
di ottenere la documentazione sugli standard da adoperare nella scrittura di 
codice VBA.
Qualcuno di Voi č in grado di passarmi tale link?
Grazie anticipatamente per eventuali segnalazioni.
-- 
MC

 ha scritto nel messaggio
news:df1iq7$7a3$1...@domitilla.aioe.org...

Ciao Mauro,
qui trovi sia convenzioni per l'uso dei nomi sia per scrivere codice
http://www.xoc.net/standards/
qui  le convenzioni Microsoft
http://support.microsoft.com/kb/q110264/
    in italiano ( si fa per dire...)
meglio questo:
http://support.microsoft.com/kb/110264/en-us
Ciao
Cinzia

[cut]
Grazie Cinzia,
materiale davvero interessante!
Buona continuazione,
--
MC

Newsgroup: it.comp.appl.access
Titolo: help di access

a volte mi apre quello di Excel, da oggi invece mi cerca di aprire quello
di FrontPage, che non ho, quindi mi chiede il Cd, ecc. ecc.
Si puo' sistemare?
-- 
Boris: I cattivi, per inciso, sono gli uni e gli altri.

[CUT+
Ciao,
fossi in te reinstallerei access o meglio -> l'intero pacchetto office !
Notte :-)



Un po' drastico...   'giorno!
-- 
www.iaciners.org
The Emperor: [to the Senate] We shall change into the first Galactic Empire
for a safe and secure society.
[Senate fills with enormous applause]
Senator Amidala: [to Bail] This is how liberty dies. With thunderous
applause.

[CUT]
Ciao,
se ti chiede il CD vuol dire che l'installazione non è stata fatta in modo 
completo...mancherà di certo qualcosa!
Che ti costa farlo? ;-)
Buona giornata :-) 

 Che ti costa farlo? ;-)
Il tempo ovviamente, e il fatto che nulla mi dica che una volta fatto il
problema si risolva.
O capisco dov'e' il problema, oppure non vado a tentativi, l'informatica
non e' stregoneria, e non se hai letto, ma mi chiede il CD di frontpage.



Quello che posso dirti è che Access97 ha il suo file di help principale in 
c:\Programmi\Microsoft Office\Office\acmain80.hlp
AccessXP in C:\Programmi\Microsoft Office\Office10\1040\ACMAIN10.CHM
Access 2003 in C:\Programmi\Microsoft Office\OFFICE11\1040\ACMAIN11.CHM
La chiave di registro per i file di help si trova in
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Help
Controlla se i file indicati sono presenti. Per Access 2000 immagino sia la 
stessa cosa che per Access XP.


Sono perfettamente d'accordo con te -> c'è una logica in tutto 
quanto...sinceramente non ho mai visto "bug" in vita mia -> sai spesso le 
"sparo" le risposte!
Basta che cmq fai un'attenta analisi, corredata da qualche ricerca su 
internet e vedrai che ne verrai fuori ! ;-)
Buona serata :-) 

 internet e vedrai che ne verrai fuori ! ;-)
QUESTA e' la ricerca su internet...

 stessa cosa che per Access XP.
grazie mille, sto facendo tante cose insieme, nel frattempo ho visto che il
portatile non si incapriccia con l'help e sto usando quello.
Newsgroup: it.comp.appl.access
Titolo: Non visualizzo campi su casella di riepilogo

Buon pomeriggio Amici,
ho un db di Access 2003 in cui ho una casella di riepilogo che mi
visualizza 3 colonne:
Cognome, Nome, DataDiNascita, tramite la seguente query sull'origine
riga :
SELECT dipendentiattivi.Cognome, dipendentiattivi.Nome,
dipendentiattivi.DataNascita FROM dipendentiAttivi ORDER BY
[cognome];
 Sul mio pc visualizzo i campi regolarmente, mentre su un altro pc
(appena comprato) che ha sempre Access 2003 invece visualizzo soltanto
il campo DataDiNascita, mentre i primi due campi sono vuoti!
Fatto sta che selezionando una riga qualsiasi, visualizzo comunque poi
i dati totali, compreso Nome e Cognome.
Qualcuno ha avuto esperienza in merito per aiutarmi?
Grazie molte del tempo dedicatomi
Leo

 ...
L'SP1 per Office 2003 ha un bug di questo tipo.
Se l'SP è installato installi anche il rispettivo Hotfix.
Il link trovi qui: 
www.donkarl.com/it?FAQ9.1
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 


grazie molte Karl

 ...ha un bug di questo tipo.


 - Mostra testo tra virgolette -
Si infatti, è la SP3.
Comunque, ho risolto il problema con la HotFix da te suggerita.
Grazie ancora Karl.
Newsgroup: it.comp.appl.access
Titolo: cerco office developper edition

Dovre "compilare" l'unico applicativo che ho creato in Access ma non
dispongo della versione develloper di Access 2000  e nemmeno quella per
Access 97, visto l'elevato costo per acquistare il pacchetto completo c'è
qualche anima pia che potrebbe consigliarmi cosa fare?
Sarà possibile trovarne una versione usata a poco prezzo....?

 ha scritto nel messaggio
news:5RMr7.44073$dJ3.3...@news1.tin.it...

Non so se sia regolare la cosa, io dispongo di 0ffice developer 2000 e
ovviamente distribuisco applicazioni, se io ti compilo il tuo database sulla
mia macchina, ti fornisco del mio Runtime2000 e ti "vendo" ( diciamo così )
il tutto , penso che  Tu poi  lo vendi/ concedi  a chi ti pare.
Senti un pò in giro se è regolare.
Ciao max

 > Sarà possibile trovarne una versione usata a poco prezzo....?
Interessa anche a me.
Ho telefonato in Microsoft e mi sono fatto dire come si fa...mi ha detto di
trovarmi una copia del Cd del Developer e poi di richiamarlo..che mi
converte la mia licenza office (non OEM) in office 2000 development...
Il problema rimane che office 2000 development e fuori produzione.....
Chi mi fa una copy del Development'
ciao e grazie

Se è per una copia , non penso che ci sia problema, sono in tutto 8o 9 cd
 comppreso la guida, sql , ecc ecc )  dimmi quali copie vuoi che te le
faccio.
Max

 faccio.
Attento a ciò che scrivi...
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

 ha scritto nel messaggio
news:OPls7.6599$_42.2...@news.infostrada.it...

Forse non te ne sei accorto!, ma questo è "Pirateria" punibile dalle vigenti
leggi.

 ha scritto nel messaggio
news:Esqs7.78831$dJ3.5...@news1.tin.it...

Ho risposto ad una richiesta, se dice che la Ms ha detto questo, io posso
fare una copia, ovviamente senza i codici di installazione che dovrà
utilizzare quelli che fornirà Ms, se non fosse vero quello ha detto Ms,
allora penso che potrebbe essere una maniera di reperire un  cd pirata.., a
questo punto alzo le mani e non dico niente e ritiro la mia offerta sul
copiare qualsiasi CD.
Max

Newsgroup: it.comp.appl.access
Titolo: Eliminazione di spazi superflui

A97
Un saluto a tutti.
In una query ho un'espressione che mi concatena diversi campi, tra cui
alcuni di questi con val. Null (espress: Num1 &" " & Num2 & " " Num3 ecc,).
Quando ci sono campi Null rimane solo lo spazio che, in molti casi - essendo
diversi casi con Null - diventano tanti gli spazi.
Vorrei con un'altra espressione eliminare gli spazi superflui (lasciarne
cioè soltanto uno ogni campo)
Ringrazio in anticipo chiunque vorrà darmi una soluzione
Gabriele

 Gabriele
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: ACCESS 2000 su portatile

Ciao a tutti, ho fatto un pgm con access che funziona velocemente su tutti i
personal sui quali l'ho provato. il problema è che deve girare su un
portatile ed è lentissimo, soprattutto a richiamarmi le anagrafiche clienti
che sono codificate con Outlook 2000.
Qualche suggerimento?
ciao ciao e grazie!
Carla!

 che sono codificate con Outlook 2000.
Devo ammettere di avere notato anch'io una cosa simile, e dire che il mio
portatile ha il doppio delle prestazioni del desktop.
Che sia l'HD che sul portatile va a 4000giri?
Sib

 Che sia l'HD che sul portatile va a 4000giri?
generalmente i portatili sono piů lenti dei desktop, indipendentemente
dall'avere processori teoricamente piů veloci; questo puo dipendere dal
fatto che spesso hanno un bus piů lento (66MHz invece che
100/133/200/266/400MHz) e dal fatto che hanno chipset orientati al basso
consumo piuttosto che alle massime prestazioni.
Per esempio il nuovo chipset via per K7 haumenta le prestazioni del
processore di circa 10%, a parita di tutto il resto, e questo solo perche
hanno ottimizzato l'accesso alla memoria ram del chipset.
Allo stesso modo un chipset ottimizzato per i consumi puň essere meno
efficente in altri aspetti.
E poi, ok, anche lěHD piů lento, ma lemoria piů lenta, le cpu dei portatili
che spesso hanno chache L1 ed L2 piů piccole.....
Max
Newsgroup: it.comp.appl.access
Titolo: problema con workspaces

mi sono scritto una funzione che crea un workspace.
tutto funzica, il ws viene creato e lo trovo fintanto che faccio controlli e
operazioni nella suddetta funzione.
appena la funzione termina, del ws non c'è più traccia, nonostante abbia
fatto l'append a dbengine.workspaces.
io però vorrei che il workspace restasse "visibile" anche al di fuori della
funzione, dato che voglio lasciarci dentro una connessione a sql che uso
molto e che quindi preferisco riutilizzare, piuttosto che continuare a
aprirla e chiuderla, anche per una questione di prestazioni.
mi sapete dare qualche dritta?
il solito F1 non dice altro se non che bisogna eseguire l'append (cosa che
ho fatto), ma a me non funzica...
il codice che uso è questo:
Dim WKSpace As Workspace
'verifico se esiste già il workspace che voglio creare...
If Workspaces.Count > 0 Then
    For Each WKSpace In Workspaces
        If WKSpace.Name = "wksPredefinito" Then
            msgbox "Esiste!"
        End If
    Next WKSpace
End If
Set WKSpace = CreateWorkspace("wksPredefinito", "admin", "", dbUseODBC)
DBEngine.Workspaces.Append WKSpace
qualche dettaglio:
w2k sp3 - a97 sr2
tia
    paolo
--
+-----
| Paolo opg
|
| janickg ( at ) hotmail ( dot ) com
+-----
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.427 / Virus Database: 240 - Release Date: 06/12/2002

 ha scritto nel messaggio
news:4XFL9.24078$TC5.7...@twister1.libero.it...

Un oggetto WorhSpace non è un oggetto permanente o meglio rimane in memoria
fino a che non si esce dalla routine che lo ha generato.
Un trucco potrebbe essere quello di lasciare aperta la routine. Per esempio:
Crea una varabile globale booleana: Global MiaVarabile as Booolean
La tua sub diventa:
Sub pippo()
Dim WKSpace As Workspace
Dim MiaArea As Workspace
If Workspaces.Count > 0 Then
    For Each WKSpace In Workspaces
        If WKSpace.Name = "wksPredefinito" Then
            Exit Sub
        End If
    Next WKSpace
End If
Set WKSpace = CreateWorkspace("wksPredefinito", "admin", "", dbUseODBC)
Workspaces.Append WKSpace
While MiaVariabile = False
DoEvents
Wend
End Sub
Ovviamente chiamerai la sub da un'altro modulo e dopo aver impostato
MiaVariabile a FALSE, così:
MiaVariabile = false
call pippo
Quando avrai fatto tutto quello che ti serve o prima di uscire dal db
imposta MiaVariabile a True.
In questo modo la tua wksPredefinito sarà sempre attiva in memoria.
Ciao, Carlo


grazie dell'idea.
la tento e vedo se funzica!
:-)

Newsgroup: it.comp.appl.access
Titolo: query aggiornamento

volevo sapere se qualcuno sa indicarmi il modo di aggiornare un campo di
una tabella tramite l'inserimento in una maschera di input di un'altra
tabella, cosě da avere due tabelle con un campo uguale.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 tabella, cosě da avere due tabelle con un campo uguale.
Query
recordset via codice
Antonio

 Antonio
Ti ringrazio per la risposta ma vista la mia incapacità, ti chiedo se
possibile di farmi un esempio. Il mio problema è il seguente: io ho due
tabelle che hanno uno stesso campo &#8220;protocollo&#8221; e altri campi
diversi. Per la prima tabella ho una maschera che mi inserisce tramite una
casella il dato protocollo, io vorrei dopo l&#8217;aggiornamento di questa
casella che il dato &#8220;protocollo&#8221; fosse inserito non solo nella
prima tabella ma anche nella seconda tabella ovviamente sempre nel campo
&#8220;protocollo&#8221;. Grazie


 &#8220;protocollo&#8221;. Grazie
Non citi il campo che dovrebbe essere uguale.
Oppure non citi quello dove ci va il nuovo valore (e devono essere due campi
diversi altrimenti come trovi nella seconda tabella lo stesso campo se nella
prima l'hai cambiato?)
Se il controllo nella maschera dove metti il nuovo valore si chiama
tuacasella, il controllo col valore chiave tuachiave, il campo chiave nella
seconda tabella tuocampo e il campo da aggiornare altrocampo, al dopo
aggiornamento farai:
set rst = currentdb.openrecordset("Tua tab",dbopendynaset)
crit = "tuocampo = '" & me.tuachiave & "'"
rst.findfirst crit
rst.edit
rst.fields("altrocampo") = me.tuacasella
rst.update
set rst = nothing
Antonio

Grazie per l'esempio appena posso lo provo.Probabilmente mi sono spiegato
male volevo, tramite una sola maschera con una casella di testo inserire
un dato in due o più tabelle diverse contemporaneamente. Ma essendo alle
prime armi tutti gli sforzi sono stati finora inutili. Grazie


Newsgroup: it.comp.appl.access
Titolo: Report "filtrati"

Salve.
Ho la necessità di stampare un report selezionando solo i dati con un
determinato codice. Come posso fare? C'è anche qualche soluzione
"esportabile" in VB6?
Ciao e grazie 1000. Andrea

 ebbe a scrivere:

Forse mi sfugge qualche aspetto intricato della cosa, ma basterebbe
una query filtrata a modo come origine dati del report, oppure
utilizzare un 
DoCmd.OpenReport "ErReport", WhereCondition:="[ID] = " & Me.ID
Ciao
Basjlico
Newsgroup: it.comp.appl.access
Titolo: File txt in access

Ciao a tutti
Sono in fase di preventivo e non so se accettare il lavoro o no visto che mi
sembra una rogna.
Mi è stato chiesto di costruire delle pagine asp con collegamento ad un
database, fin qui non ci sono problemi, il problema è che il gestionale
della ditta non lavora con un database elazionale, l'unica cosa che riesco
ad avere in fatto di dati è un file in ormato .txt ove all'interno trovo
divisi dal separatore (;) gli otto campi relativi agli articoli (codice,
descrizione, pz, ect...).
Ho visto che con Access c'è la possibilità di importare il file txt avendo
quindi la possibilità di lavorarci sopra, però ogni volta che aggiorno il
database
devo fare questa operazione a mano.
L'azienda vorrebbe aggiornare il database 4 volte al giorno quindi la cosa
diventa pesante.
Io ho la possibilità di avviare nel gestionale una procedura automatica di
creazione del file txt con in conseguente scarico sempre automatico nel
server
web mezzo FTP, esiste la possibilità  di collegare questo file txt al
database
di Access, o quantomeno automatizzare la conversione in un file .mdb; o se
c'è qualche
altra possibilità di risolvere il problema.
Il server Web è un NT .
Grazie in anticipo per gli aiuti.
ciao

 ha scritto nel messaggio
news:tL887.28813$Qf6.2...@news2.tin.it...

Perchè devi fare questa operazione a mano?

 wrote in message
ztK87.32848$Qf6.3...@news2.tin.it...

Newsgroup: it.comp.appl.access
Titolo: Problema importante per me

Ho costruito una maschera che sovrasta una tabella:
il primo campo testo d'inserimento del record riguarda il codice di un
articolo,
vorrei controllare subito se esiste un altro record con lo stesso codice
all'interno della mia tabella.
Ho provato a scrivere una routine VBA attaccata all'evento prima di
aggiornare
ma non funziona, funziona solo attaccata all'evento dopo aggiornamento
però è evidente che mi trova lo stesso record da me creato in quel momento
come potrei fare a farmi trovare il record che ha lo stesso cod articolo
senza dover salvare il
nuovo record ?
Grazie per la risposta
NB Spero di essere stato chiaro

 ha scritto nel messaggio
news:8s75im$6h3$1...@serv1.iunet.it...

Prova ad inviare il codice della tua routine che ci diamo un'occhiata...
Ciao.


Con la funzione DLookUp.
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Gestione DB in rete

Egregi ragazzi,
c'è qualcuno che gentilmente mi può suggerire come gestire un database in
rete, mi spiego: ho creato un tool stand alone (all'interno ci sono tutti
gli oggetti di un database: tabelle, maschere, query, macro, moduli) ed ora
nasce la necessità di gestirlo in rete con accesso da parte di diversi
utenti.
Vi ringrazio in anticipo del vostro prezioso aiuto e vi saluto.
Lna
--------------------------------
Inviato via 
http://usenet.libero.it

 Lna
un doppio click sull'icona xxx.mdb?
Sarebbe cmq il caso di dividerlo BE / FE
--
a.cara
Newsgroup: it.comp.appl.access
Titolo: casella di testo con recordset

in una form ho una casella combinata con i codici di tutte le macchine...In
base alla scelta che faccio sulla casella combinata devo trovare la
scheda(sulla tabella "Macchina") corrispondente e visualizzarla in una
casella di testo....mi sembrava facile...invece indipendentemente dal tipo
di macchina che scelgo la scheda è sempre la stessa in tutti i casi al di
fuori della prima scheda in cui mi visualizza la scheda corretta....nn
riesco a capirne il motivo...
questo è il codice:
Private Sub CasellaCombinata0_AfterUpdate()
Dim dbs As Database
Set dbs = CurrentDb
Dim r As Recordset
Set r = dbs.OpenRecordset("Macchina")
Do
    ' se il codice macchina del record corrisponde al codice
    ' macchina inserito nella casella combinata esci....
    If r.Fields(0) = CasellaCombinata0 Then
        Exit Do
    Else
        r.MoveNext
    End If
Loop Until Not r.EOF
' assegno il codice scheda alla casella
Me!testo101 = r.Fields(1) 'il codice scheda è il 2°campo
r.Close
End Sub
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio
news:62Z110Z72Z86Y1...@usenet.libero.it...

Onestamente mi sembra che la stai facendo troppo complicata: per rosovere il
tuo problema è sufficiente fare in modo che CasellaCombinata0 abbia 2
colonne: quella da visualizzare sulla casella combinata e quella relativa al
dato che vuoi visualizzare nella casella di testo; a questo punto a fronte
dell'evento "Dopo aggiornamento" della casella combinata genera
semplicemente:
Private Sub CasellaCombinata0_AfterUpdate()
Me!testo101 = Me!CasellaCombinata0.Column(1)
End Sub
Per maggiori dettagli leggiti sull'help l'argomento Proprietà Column.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: PROBLEMA SU GESTIONE STAMPA

Salve,
stampo delle etichette su una stampante termica da Access.
Questa  ogni tanto dà problemi.
Ho notato un sensibile miglioramento se mando  alla stampante una
etichetta alla volta e non 100 etichette insieme. Dopo agni stampa
aspetto 2 secondi..
Prima di lanciare la stampa vorrei verificare che la coda di stampa
sia libera, se non è libera aspetto altri due secondi.
Dato il nome di una stampante:
strPrinter = Application.Printer.DeviceName
Come posso vedere se ci sono stampe in corso?
Grazie per l'attenzione.


Ciao,
scusa ma che stampante hai? E che problemi hai ?
Ho lavorato con delle Intermech e con Zebra (a trasferimento termico)
ma non mai avuto problemi del genere.
In particolare una Intermech stampa etichette per barattoli di
inchiostro da stampa ed un lotto di lavorazione può avere anche
300-400 barattoli che stampo in una sola botta.
Credo che sarebbe meglio verificare il problema alla fonte che alla
fine ... Driver di stampa, settaggio della stampante ...
Ciao
Alberto