mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: AZZERARE CONTATORE TABELLA ACCESS

Qualke buona anima mi puņ spiegare come azzerare l'ID di una tabella? Quel
campo lo uso per darmi la progressione per protocollare la corrispondenza
ed ora ho la necessitą che riprenda da 1!
Ciao e buona serata a tutti!
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


dal menu Strumenti -- > Utilità database --> Compatta e ripristina Database
questa procedura riporta al Minimo valore tutti i contatori. Se non esistono 
records, in una tabella, il contatore viene Azzerato.
Se esistono records, il contatore riparte dal minimo numero successivo al 
massimo presente in tabella.
-- 
... spero di esserti stato d'aiuto,
       \|/\|/\|/
       (@ --)
---o00-(_)-00o----- Ivan


Ciao Angrin
usare l'ID di una tabella per la numerazione progressiva non è la cosa 
migliore,
anzi sarebbe da evitare. cerca con google che trovi molto materiale per 
numerare
progressivamente la corrispondenza, e nel sito comune la faq:
6.17 numerazione progressiva per fatture e altro.
per riportare a zero la tabella devi eliminare tutti i record e compattare 
il db.
Daniele

Newsgroup: it.comp.appl.access
Titolo: Import tabella

Come posso importare una tabella da codice ?
Es. Devo Importare nel database corrente
Path = C:\MioDB\Campo.mdb
Tabella = Cognomi

 ha scritto nel messaggio
news:ipnJ9.1059$ab2....@news1.tin.it...

Questo č il codice:
DoCmd.TransferDatabase acImport, "Microsoft Access", "C:\MioDB\Campo.mdb",
acTable, "Cognomi", "Cognomi", False
Ciao
Old-Jack

 ha scritto nel messaggio
news:SLnJ9.521$TC5....@twister1.libero.it...


Newsgroup: it.comp.appl.access
Titolo: formato numerico maledetto

Ho un problema a personalizzare o trovare il formato numerico adatto
al mio caso .
Ecco il fatto :
ho questi numeri :
12500
12000,25411
14000,02
Se scelgo il formato STANDARD con cifre decimali AUTOM ecco cosa
succede
12.500,00
12.500,25
14.000,02
Io voglio ottenere:
12.500
12.000,25411
14.000,02
Quale formato personalizzato devo impostare ?

 wrote in message
39C0F1CF...@libero.it...



Se adoperi #.###,##### ottieni:
12.500,
12.000,25411
14.000,02
che non è proprio quello che vuoi tu, però ci si avvicina molto
Roberto

 Quale formato personalizzato devo impostare ?
  nessun altro consiglio??????
Newsgroup: it.comp.appl.access
Titolo: Stampare su piu' colonne stile Word

Salve!
vorrei stampare 2 campi di una tabella 
Cognome e Telefono
poiche' questi non occupano tutta la larghezza del foglio, vorrei
continuare a stampare creando + colonne
stile
pagina 1
a   f  m
b  g  n
c  h  o
d  i   p
e  l   q
pagina 2
r
s
t
dove le varie lettere sono record di una anagrafica
come e' possibile?
Grazie anticipatamente
PFM
--
To reply please remove from e-mail 'xyz'- Per rispondere togliere 'xyz' dall'indirizzo e-mail.

 --
Se non ho capito male ti basta File-ImpostaPagina-NumeroColonne....

 ha scritto nel messaggio
news:3bcb0605...@news.interbusiness.it...

Apri il report e scegli dal menů: file - imposta pagina - colonne...
Ciao.

Apri il report e scegli dal menů: file - imposta pagina - colonne...
Grazie, ma NON sono riuscito.
Ho settato 2 colonne e noto che ho molto spazio libero, ma in
anteprima non viene visualizzatala seconda colonna
Saluti


 PFM
Se non sbaglio (non ci ho mai provato) devi inserire i controlli
affiancandoli proprio come vuoi stampare le colonne...
Ciao.

Newsgroup: it.comp.appl.access
Titolo: Dato vuoto con il tab

Salve in una maschera, voglio che alcuni campi non siano vuoti; ho
impostato la proprieta' del controllo  (is not null, non so se va bene
anche per le date) solo che se vado avanti con il tab non mi da errore.
Come posso ovviare?
Devo fare un test se e' null il valore a proposito come devo
confrontare in base al tipo
cioe'
if data is not null (e' corretto?)
if numero is not null (e' corretto?)
if stringa is not null (e' corretto?)
Non so se sono stato chiaro
Rosario Ciotola
rcio...@gmail.com

 ha scritto nel messaggio 
news:1150753748....@g10g2000cwb.googlegroups.com...

Gestisci l'evento "prima di aggiornare" della form inserendoci il codice che 
verifica la correttezza dei dati inseriti:
es.
Private Sub Form_BeforeUpdate(Cancel As Integer)
if isnull(me!nomeControllo) then
    msgbox "Il campo: " & me!nomeControllo.caption & " non può essere 
vuoto.",vbcritical+vbokonly
    me!nomeControllo.setfocus
    cancel = true
end if
End Sub
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Ricercare record tramite 3 combobox

Vorrei cercare di rintracciare un record utilizzando tre cbbox per
specificare i criteri, in un DB anagrafico
attualmente uso una sola cbbox associata ad una query che mi visualizza in
ordine alfabetico, su tre colonne, cognome, quindi il nome (se identico) e
la data di nascita.
Però così facendo potrei avere centinaia di rossi mario, e cmq dovrei
scorrere l'elenco partenda da rossi adamo, in quanto, digitando "rossi" la
cbbox mi posiziona solo sul "rossi" e poi devo scorrere l'elenco fino a
mario.
Usando 3 cbbox: nella primo scrivo rossi e quindi mi si posiziona su
"rossi", nella seconda scrivo "mario" quindi mi si posiziona sul primo dei
"rossi mario" e poi dalla terza seleziono manualmente la data di nascita che
mi interessa.
Questo sulla carta....m in pratica come le realizzo le tre cbbox a cascata?
Oppure come potrei risolvere il problema?
Grazie
Andrea

 ha scritto nel messaggio 
news:dM2Rf.30986$A83.8...@twister1.libero.it...

sul sito comune
www.sitocomune.com
esiste una soluzione al tuo quesito.
direi gli esempi 3.72  e 3.73 (circa)
io però proverei a risolvere il problema con un'altro approccio. Normalmente 
le anagrafiche hanno nome e cognome diviso (e questo è bene!), ma tu puoi 
unirli (solo in una query) proprio per effettuare le ricerche da una casella 
combinata.
Creati una query con due colonne, una con l'id del record ed una che sia 
l'unione dei due campi Cognome + Nome.
qualcosa del tipo
SELECT ID,  [cogNome] & " " & [nome] AS NomeComp
FROM TuaTabellaAnagrafica;
(naturalmente devi indicare nomi relativi alla tua tabella e tuoi campi).
a questo punto durante la ricerca puoi digitare di seguito ROSSI M .... e ti 
trovi posizionato sul primo ROSSI MARIO.
se nella query componi anche la data di nascita ( o qualsiasi altro campo, 
magari su una colonna diversa) allora l'utente può scegliere tra i vari 
MARIO ...
-- 
... spero di esserti stato d'aiuto, facci sapere
       \|/\|/\|/
       (@ @)
---o00-(_)-00o----- Ivan

 ha scritto nel messaggio 
news:dM2Rf.30986$A83.8...@twister1.libero.it...

Oltre al suggerimento di Ivan da casa, puoi controllare l'evento "dopo 
aggiornamento" della casella combinata creandoti il filtro e applicandolo; 
quindi nell'evento ci scriverai:
'---
me.filteron = false
if me.filter <> "" then
    me.filter = me.filter & " And nome = " chr$(34) & me!cbNome & chr$(34)
else
    me.filter = "nome = " chr$(34) & me!cbNome & chr$(34)
end if
me.filteron = true
'---
Ciao.
-- 
Sergio MAZZA 

Ottimo il suggerimento di unificare i campi in uno. Funziona a perfezione.
Grazie anche a Sergio
Andrea
Newsgroup: it.comp.appl.access
Titolo: errorre di confronto fra campi calcolati

buongiorno!! ho un grosso problema su un DB gestione corrispettivi (soldini
?), ho la funzione che confronta due campi calcolati e se sono diversi mi
blocca l'inserimento degli incassi nel libro dei corrispettivi, certe volte
funziona poi inspiegabilmente con certi importi anche se i valori delle due
caselle sono uguali la funzione mi blocca; ho provato anche l'operatore <>
con lo stesso risultato, mi sono appoggiato a due variabili al posto dei
campi ma niente, sapete da che cosa può dipendere?
grazie david
    If ((cTotCon + cTotPOS) = Me.mTotale) = False Then
        MsgBox ""
        Me.mTotVersato.SetFocus
        Verifica = False
        Exit Function
    End If

 ha scritto nel messaggio
news:cnkj25$q47$1...@fata.cs.interbusiness.it...

Prova con Me!mTotale
mayerlink


Non funziona! P.P.
(1323.88=1323.88)=false
Solo con i miei euro le cose sono uguali!
Per calcolare delle somme in euro in codice č meglio usare le variabili
currency o single? E che formato devo configurare nei controlli per inserire
i dati?
Sono sull'orlo del suicidio!
David

Newsgroup: it.comp.appl.access
Titolo: Dropdown casella combinata su apertura maschera

Buonasera Gruppo
Avrei bisogno di far "Aprire" una combobox su una form quando questa viene aperta,in modo da visualizzare immediatamente come è popolata la combobox ed effettuare una selezione.
Su evento apertura maschera ho impostato il seguente codice:
Me.cboX.setfocus
Me.cboX.dropdown
 
La combobox si apre e si richiude immediatamente senza lasciar selezionare nulla.
 
Con lo stesso codice se lo utilizzo su evento click di un pulsante funziona alla perfezione.
 
C'è qualche problema di incompatibilità tra dropdown e l'evento openform o mi sfugge qualcosa?
 
Grazie


probabile che hai altro codice che fa perdere il focus alla casella
 
BFS


probabilmente c'è qualche altro evento che si attiva dopo openform che ti chiude la combobox.
imposta un timerinterval di 500 e in form_timer mettici il tuo codice seguito da me.timerinterval = 0
dovrebbe andare

Newsgroup: it.comp.appl.access
Titolo: su click di una casella di testo selezionare tutto il contenuto

un operatore mi ha fatto notare che quando usa il tasto TAB per passare da un campo a un altro di una form tutto il contenuto si seleziona e quindi l'operatore può già scrivere il nuovo testo 
 
mentre
 
se clicca con il mouse all'interno del campo si posiziona il cursore all'interno del testo contenuto e deve fare canc o backspace per eliminare il testo e poi scrivere il testo nuovo
 
è possibile selezionare tutto il testo anche con il click del mouse?


risolto su click del campo ho messo
 
Me!Data.SelStart = 0
Me!Data.SelLength = Len(Me!Data.Text)


qualcuno mi sa dire perchè non va con la combobox?
Newsgroup: it.comp.appl.access
Titolo: Store procedure in Access

E' vero che Access non supporta le Store Procedure?


I progetti di Access 2000 (.adp) le supportano.
Fabio

 wrote in message
49mh9.2644$j15....@twister2.libero.it...

Si tratta di SQL Server però


E allora? Con i progetti di Access puoi accedere a un database sia di MSDE
che di SQL Server e quindi alle varie Tabelle, Viste, Store Procedure.
Fabio

 wrote in message
%1Ah9.4180$Hc7....@twister1.libero.it...

Volevo dire che confermi che un mdb non supporta le SP,io per Access intendo
mdb.
Cmq grazie mille,mi occorreva una conferma
GR
Newsgroup: it.comp.appl.access
Titolo: Filtrare valori vuoti

Salve a tutti! ho un problema e spero di essere abbastanza chiaro nello
spiegarmi. Ho bisogno di filtrare dei dati all' apertura di una
maschera secondo due condizioni : se il campo STATO risulta "CHIUSO" e
se il campo DATA INVIO è vuoto.
mi potete dare una mano? Grazie.

 wrote in message 
news:1166401567....@80g2000cwy.googlegroups.com...

Se esegui il comando da un Command Button ovvero
per mezzo di altro evento esterno:
DoCmd.OpenForm "FormName", , , "[STATO] = 'CHIUSO'
                                                And [DATA INVIO] Is Null"
oppure:
in On Load della scheda:
DoCmd.ApplyFilter, "[STATO] = 'CHIUSO'
                         And [DATA INVIO] Is Null"
Bruno

Newsgroup: it.comp.appl.access
Titolo: selezionare un pezzo di stringa compresa fra 2 cancelletti

in...@pippo.it#mailto:in...@pippo.it#
vorrei avere in una sottostringa solo mailto:
in...@pippo.it
mi sapete aiutare?
Grazie,

 ha scritto nel messaggio
news:chkv04$k33$1...@lacerta.tiscalinet.it...

Ciao Simba883
prova questa funzione
Public Function Estrai(buf As String)
    Dim i As Integer
    Dim j As Integer
    Estrai = buf
    If Len(buf) > 0 Then
            i = InStr(buf, "#")
            If i > 0 Then
                j = InStr(i + 1, buf, "#")
                If j = 0 Then j = Len(buf) + 1
                Estrai = Mid(buf, i + 1, j - i - 1)
            End If
    End If
End Function
Saluti
Cinzia

 >
se invece volessi la parte iniziale fino al primo carattere # č piu
semplice?

 ha scritto nel messaggio
news:chl1r4$m6l$1...@lacerta.tiscalinet.it...

Appena  un po',
diventerebbe cosě:
Public Function Estrai2(buf As String)
    Dim i As Integer
    Estrai = buf
    If Len(buf) > 0 Then
            i = InStr(buf, "#")
            If i > 0 Then
                 Estrai = Mid(buf, i -1)
            End If
    End If
End Function
Cinzia

 Cinzia
PS:
Se sei assolutamente sicuro che nel campo in questione il # c'č sempre puoi
anche mettere direttamente nella query o nell'origine controllo
Mid([Campo]; instr([Campo]; "#") -1)
Cinzia

 vorrei avere in una sottostringa solo
mailto:
in...@pippo.it
Poveraccio, ora l'account 
pippo.it
 si ritroverà
pieno di spam!!!!
Evita gli indirizzi in chiaro.
;-P
MAssimiliano

 ha scritto nel messaggio news:chkv04$k33$1...@lacerta.tiscalinet.it...

Se Access 200x = Funzione Split (vedi help).
Se Access 97 = sito comune - funzioni Token e nToken...
Ciao.
-- 
Sergio MAZZA

 MAssimiliano
pensavo fosse abbastanza generico invece mi sa che esiste, è stato un
errore.

 vorrei avere in una sottostringa solo mailto:
in...@pippo.it
Presumendo che ci possano essere altri caratteri dopo l'ultimo cancelletto:
newstringa = Mid(stringa, InStr(1, stringa, "#") + 1, InStrRev(stringa,
"#") - InStr(1, stringa, "#") - 1)
Saluti.
Luciano
Newsgroup: it.comp.appl.access
Titolo: Aggiornare controlli maschera principale con controlli sottomaschera

Buongiorno a tutti.
come da oggetto ho questo problema:
controllo "TotImp" in maschera principale è il risultato di un calcolo in sottomaschera. Nella sottomaschera sull'evento dopo aggiornamento di una casella combinata ho il seguente codice:
 
Private Sub CmbArt_AfterUpdate()
.
.
.
.
Forms![F_InsOrdini]![TotImp] = Me.totaleimponibile
' a questo rigo ho provato con i vari REFRESH RECALC sia sulla maschera che sul controllo senza risultato
.
.
.
.
End Sub
 
Purtroppo nella maschera principale il controllo TotImp resta inesorabilmente uguale a 0, mentre il controllo della sottomaschera è stato valorizzato.
Perchè non si aggiorna il controllo della maschera principale?  Dove sbaglio?
 
Grazie per l'aiuto
 
Alfio

 
 
Proprio nessuno può indicarmi l'errore?
 

 Perchï¿œ non si aggiorna il controllo della maschera principale?  Dove sbaglio?
 
- Quale versione di Access usi con quale SP?
- Qual'ï¿œ "il calcolo" che succede nella sottomaschera? Fatto con quale 
metodo? Espressione, codice?
- Prova cosa ti dï¿œ
 
Msgbox Me!totaleimponibile
 
nella riga prima del tentativo di assegnarlo alla maschera pricipale.
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
Access Lobby: 
http://www.AccessDevelopers.org
 


Chiedo scusa se mi "infilo" ma vedo che Alfio non risponde... approfitto 
della gentilezza di Karl.
Ho lo stesso problema, credo e provo a rispondere io sperando di essere 
utile anche a Alfio.
- Access 2007
- Nella sottomaschera i dati da sommare sono originati da una espressione.
- Nel pié di pagina della sottomaschera ho un controllo con 
l'espressione =SOMMA([NomeCampoda sommare*) che viene regolarmente 
valorizzata.
- Devo assegnare questo valore su un controllo della maschera principale 
che però è associato a un campo della Tabella master
E qui sta l'impiccio...
Se infatti inserisco un secondo controllo NON associato, e nel codice 
innescato da un AfterUpdate() scrivo come origine dati
"=[NomeSottomaschera]![NomeControllo]" tutto va bene.
Inoltre se inserisco un   MsgBox XX ottengo 0, nel monitor il controllo 
del Totale è vuoto e solo quando chiudo il MsgBox appare il calcolo 
della Somma desiderata.
Spero di essre stato chiaro olre che prolisso...
Se mi potessi aiutare credo che il problema non sia solo mio.
GRAZIE!!!
Newsgroup: it.comp.appl.access
Titolo: elenco messaggi di errore

Qualcuno puo' aiutarmi per trovare l'elenco di tutti i messaggi e codici
di errore che sono generati dalle istruzioni SQL?
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 di errore che sono generati dalle istruzioni SQL?
Quel qualcuno e' l'help in linea
Sib
--
qualita.assicurazione su 
www.cerrinet.it
Il newsgroup sulla Qualita'

Newsgroup: it.comp.appl.access
Titolo: Campi calcolati su report

Ciao a tutti
perdonate la pessima esposizione che segue:
in un report in cui il corpo si ripete più volte perchè i record sono
raggruppati secondo un campo data in trimestri, ho un campo calcolato che
somma dei valori che ci sono in ogni trimestre. Ho bisogno di sommare a loro
volta questi campi calcolati, in pie di pagina, ma se imposto l'origine di
questo campo calcolato a =somma(campo_calcolato_in_corpo_report) non riesco
a ottenere la somma.
Dove sbaglio
Grazie
Ilario

 questo campo calcolato a =somma(campo_calcolato_in_corpo_report) non
riesco
supponendo che il campo calcolato abbia come origine: campo1+campo2*campo3
prova a mettere nel campo di pieè pagina =somma(campo1+campo2*campo3)

Newsgroup: it.comp.appl.access
Titolo: Query di aggiornamento, è possibile?

Ciao a tutti,
volevo chiedere se sapevate il modo per eseguire in una unica query la
duplicazione di alcune righe di una tabella ed allo stesso tempo la
sostituzione dei valori di un campo delle righe aggiunte.
Esempio:
Tabella prima della esecuzione della query:
num        tipo        q.tà        prezzo
1        mela        120        1euro
1        pera        130        0,5euro
2        kiwi        100        0,8euro
3        banane    50         1,3euro
dopo l'esecuzione della query la tabella dovrà essere:
num        tipo        q.tà        prezzo
1        mela        120        1euro
1        pera        130        0,5euro
2        kiwi        100        0,8euro
3        banane    50         1,3euro
4        mela        120        1euro
4        pera        130        0,5euro
quindi esegue una duplicazione della due prime righe per intero ed allo
stesso tempo cambia il campo n° da 1 a 4 solo nelle nuove righe aggiunte
(p.esempio con il seguente criterio SELECT * FROM nometabella WHERE num =
1).
Ciao e grazie a tutti.
Enzo

 ha scritto nel messaggio
news:t2xUa.205771$lK4.5...@twister1.libero.it...

Ciao Enzo
Ti serve una query di accodamento.
Mettiamo il caso che la tua tabella si chiama frutta, allora .....
--------------------------------------------------------
INSERT INTO frutta ( Tipo, Qta, Prezzo, Num )
SELECT
     Tipo,
      Qta,
      Prezzo,
      (SELECT MAX(Num) FROM Frutta)+1 AS Nr
FROM Frutta
WHERE Frutta.Num=1
-----------------------------------------------------
Ciao Giorgio
Newsgroup: it.comp.appl.access
Titolo: Passare da Access 97 a Access 2000

Salve a tutti,
    Lavoro in VB6 ed ho un database in access 97 e vorrei passare ad Access
2000. Cosa comporta il passaggio da Access 97 a Access 2000 o 2003 per
quanto riguarda la gestione database? Si hanno dei miglioramenti? E per
qaunto riuguarda il codice VB6, sono necessarie grosse modifiche?
Grazie.
Alberto

 ha scritto nel messaggio
news:41fd06a9$0$6310$5fc...@news.tiscali.it...

Da quanto capisco usi Access come Database, di conseguenza usi JET.
Non farai più riferimento a DAO 3.51 ma a DAO3.6
Se usi ADO(sconsigliato per inutili ritardi di conversione nativi di JET
sarà OLEDB)
Del resto non devi fare nessuna modifica.
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:41fd121e$0$32354$5fc...@news.tiscali.it...

Ciao e grazie per aver risposto,
    un'ultima domanda (anzi tre  :))) ): le librerie per dao 3.6 e relativo
database access 2000 sono liberamente distribuibili?
Access 2000 è piu' gestibile e sicuro di 97? Quali sono i miglioramenti?
Alberto

 Alberto
Non č piů sicuro, un database come JET non č sicuro di Default.
Usandolo come BE solamente non hai una differenza sostanziale se nonl'uso
di ADO ed altre piccole migliorie che trovi sul sito MS.
Le differenze sostanziali si hanno nella parte FE, ovvero la strutturazione
del prodotto per l'accesso alla parte graica d'interfaccia.
Ciao
-- 
@Alex (Alessandro Baraldi)



Ciao,
potresti essere un po' piu' chiaro? Cosa sono le sigle BE, FE?
Possiedo il pacchetto di sviluppo Visual Studio 6.0 completo quindi posso
distribuire il mio applicativo e relative dll di dao 3.6?
Grazie.
Alberto

 Alberto
FE=Interfaccia Uomo Macchina che per Access è
   costituita dalle Maschere/Queries/Report/Moduli
BE=Base Dati(Solo le Tabelle)
Avendo VS puoi distribuire il Runtime di Access, quindi
tutto quanto serve al PC nel quale metti la base dati
per girare.
Quello che è vietato dall'EULA se non ricordo male è la
distribuzione separata di Libreire o parti di librerie, 
ma non credo sia il tuo caso.
Il Runtime di Access comprende tutte le DLL che servono.
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.appl.access
Titolo: recupero password db

Problemino:
Ho un mdb fatto un pò di tempo fa nel quale ho impostato una psw di accesso.
Il problema è che non ricordo la psw. Esiste un modo per aggirare
l'ostacolo?
Grazie
Saluti a Tutti
Fabrizio
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

fabrizio...@libero.it
 (fabrizio vignali) wrote:

Cerca con google. Ci sono programmi a pochi euro che ti danno una
mano.


Ok. Trovati Grazie

Newsgroup: it.comp.appl.access
Titolo: record successivo in sottomaschera

Buongiorno a tutti.
In una form di inserimento fattura, ho una casella di riepilogo che mi mostra le righe inserite e la sottomaschera di inserimento righe.
Ogni volta che salvo l'inserimento o la modifica di un record della sottomaschera, il focus si sposta su primo record della stessa, mentre io vorrei spostarmi su quello successivo se c'è.
Ho messo il seguente codice ma non cambia la situazione:
DoCmd.RunCommand acCmdSaveRecord
DoCmd.GoToRecord , , acNext
Forms!frmfatture.Elenco232.Requery
Forms!frmfatture!Riepilogoiva.Requery
Perchè invece si posiziona sul primo record?
Grazie.
Giuseppe


E' normale, il REQUERY, come dice la parola stessa, riesegue la QUERY e siccome non sa dove tu ti trovavi, riporta al 1°...!
Se vuoi rimanga dove ti trovavi, prima memorizzi l'ID o la PK che dir si voglia e poi sposti il Bookmark con FindFirst...
 
@Alex


Ciao Alex, grazie per il tuo intervento.
Ho cercato di utilizzare la faq 4.5 di Karl.
Ho messo su evento corrente della sottomaschera
Dim lngStore As Long
 
lngStore = Me!ID
 
 
mentre su evento click di un pulsante della stessa sottomaschera
'riduce lo sfarfallio dello schermo
Me.Painting = False
 
'Me.Requery
Me.Recordset.FindFirst "Id = " & lngStore
 
Me.Painting = True
 
ma ritorna sempre al primo record.
Cosa ho sbagliato?
Giuseppe


Hai verificato che così come stai facendo la variabile [lngStore] sia correttamente valorizzata...? Nel senso prima del Requery, [lngStore] vale il Campo ID che hai attivato...? nel momento in cui premi il Button rimane valorizzata giusta...?
 
 
@Alex


Alex scusa l'ignoranza.
Premetto, e lo dovevo fare prima, che la sottomaschera non è di tipo continua, ma mi mostra il record selezionato dalla casella di riepilogo.
Con il terzo record valorizzato nella sottomaschera, sono entrato in Vba e ho provato a posizionare il mouse su [lngStore] sia su 
lngStore = Me![num riga] (evento corrente della sottomaschera) che su
Me.Recordset.FindFirst "[num riga] = " & lngStore (evento cliclk su pulsante salva)
ma lngStore non mi visualizza alcun valore.
Il requery lo faccio fare alla casella di riepilogo non alla sottomaschera. 
Come altro posso controllare che la variabile abbia memorizzato il numero di Id (nel mio caso [num riga])??
Grazie.
Giuseppe


Convieni che se [lngStore] non è valorizzato il tutto non può funzionare...?
 
Devi capire perchè non viene valorizzato, oppure cancellato... o aggiornato con un valore non coerente...
 
Purtroppo devi farla tu questa analisi...
 
@Alex
Newsgroup: it.comp.appl.access
Titolo: Problemi di ordinamento

Ciao a tutti
Ho realizzaro un database per il personale di una caserma ,
la tabella interessata quindi contiene i sequenti record:
gradi, cognome, nome, codice fiscale, indirizzo, ecc.
Devo ordinare la sequente tabella in ordine di gradi e cognome. Tenete
presente che la chiave primaria e costituita dal codice fiscale.
Generale ,Colonnello, Tenete non sono certamente odinati in ordine
crescente.
Quindi non li posso ordinare in ordine alfabetico
COME POSSO RISOLVERE QUESTO DILEMMA
by Francesco

 ha scritto nel messaggio
news:jZNnc.170441$hc5.7...@news3.tin.it...

Puoi usare questo sistema bruttino
---------------
ORDER BY
Switch([Grado]="Generale",1,[Grado]="Colonnello",2,[Grado]="Tenente",3),
                    [Cognome]
---------------
o meglio ancora crei una tabella Gradi con le colonne Grado e Ordinamento
poi la metti in Join con la tua anagrafica e ordini per il campo ordinamento
e poi per il campo Cognome.
Ciao Giorgio

 ha scritto nel
messaggio news:c7oarl$gud$1...@lacerta.tiscalinet.it...

Solo per aggiungere che il primo metodo non è bruttino, ma è un metodo
piuttosto valido per fare quello
Antonio

Newsgroup: it.comp.appl.access
Titolo: Vorrei seguire un corso su Access

in zona alta Lombardia, sapreste suggerirmene qualcuno? Grazie
--
Saluti
NSantini

 ha scritto nel messaggio
news:9v32to$vqa$1...@nreada.inwind.it...


Newsgroup: it.comp.appl.access
Titolo: Allega File

Ciao a tutti,
Ho necessità inserire in una maschera la possibilità di caricare dei file 
come allegati, non dovendoli spedire via mail basterebbe poter scegliere il 
percorso del relativo file che risiede su un file server condiviso, ma la 
cosa migliore sarebbe poter caricare i file in uno spazio e mantenere 
l'indice con il relativo record.
Spero di essere stato chiaro e grazie ancora a tutti.
Paolo 

 ha scritto nel messaggio 
news:y1hHh.50498$aF5....@tornado.fastwebnet.it...

Con queste istruzioni puoi iniziare ad esaminare quello che ti va bene e 
quello che necessita di ulteriori approfondimenti.
    Dim fd As FileDialog
    Set fd = Application.FileDialog(msoFileDialogFilePicker)
    Dim fo As Variant
    Set fo = CreateObject("Scripting.FileSystemObject")
    fd.AllowMultiSelect = False
    fd.Title = "Titolo da dare alla finestra"
    If fd.Show = False Then GoTo nonèstatosceltonessunfile
    Dim Suffisso As String
    Suffisso = ""
    If Len(fd.SelectedItems.Item(1)) >= 4 Then _
            Suffisso = LCase(Right$(fd.SelectedItems.Item(1), 4))
    If Suffisso <> ".xls" Then GoTo nonèunfoglioelettronico
    Me.FoglioElettronico = LCase(fd.SelectedItems.Item(1))
e così via...
Ciao
Antonio
Newsgroup: it.comp.appl.access
Titolo: controllo delle immissioni

Ciao a tutti.
Ho una tabella cognomi, nomi, ecc.
Ho realizzato una maschera per l'immissione dei dati, bla bla,...
Adesso voglio aggiungere una funzionalità all'immissione dei dati. Voglio
che quando viene digitato un cognome già presente vengano visualizzati i
record con quel cognome in modo che l'operatore che sta immettendo i dati si
accorga dell'eventuale presenza del record che sta inserendo.
A tal fine ho fatto un'altra maschera (tipo tabulare) e alla casella di
testo associata a cognome ho scritto questo codice (vado a memoria)
Private Sub cognome_After_Update()
    DoCmd.OpenForm "frm_anagrafica_elenco",,"cognome = '" & cognome "'"
End Sub
Funziona ma è abbastanza brutto. Innanzitutto la form mi viene aperta sempre
anche quando quello digitato non è un cognome presente (in questo caso la
maschera è ovviamente vuota). Un altro problema è quello che nel caso
l'operatore decida di abbandonare l'immisione dei dati perché si è reso
conto che il record è già immesso, ha comunque già creato un nuovo record
con il campo cognome riempito.
 Spero di essermi spiegato.
Thanx
giaconet


Sei stato utilissimo. Mi spieghi anche un'altra cosa? Ho letto nella guida
in linea che DoMenuItem è stato lasciato solo per compatibilità, e quindi di
usare RunCommand. Ma è la stessa cosa (a parte la sintassi)?
Thanx
giaconet

 ha scritto nel messaggio
news:9cgtvt$ds73f$1...@ID-71483.news.dfncis.de...

Si, è la stessa cosa.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: outloock -- access

Esiste un sistema per collegarmi tramite access ai dati dell''agenda di
outlook....
Mi piacerebbe da access avere tutti i dati (basterebbe indirizzo email e
nome) impostati in agenda, senza dover da agenda esportare il file in txt ed
importarmelo in tabella access.
Un collegamento diretto...aggiorno rubrica ed in access ho tabella con tutti
gli indirizzi presenti....
Ringrazio in anticipo per le preziose indicazioni
Paolo

 ha scritto nel messaggio
news:a8enfg$6g9$1...@serv1.iunet.it...


si anche in windows 98 lo fa, access 2000, chissá quante volte ho collegato
tabelle e mai avevo visto file di tipo outlook.
Ti ringrazio molto!!

 ha scritto nel messaggio
news:a8f9re$238$1...@serv1.iunet.it...

Newsgroup: it.comp.appl.access
Titolo: Selezione Sottomaschera da Casella Combinata

Ciao a tutto il NG,
come detto nell' oggetto dovrei richiamare una sottomaschera attraverso una
selezione in una casella combinata.
Come fare?
Ciao Tiziano

 ha scritto nel messaggio
news:NGwV6.3266$Ea.1...@news.infostrada.it...

sull'evento 'Su Modifica' della casella combinata scrivi:
if Me.<nome casella combinata>.Value = <valore della casella combinata>
        Then <nome sottomaschera>.SetFocus
--
Leo

 ha scritto nel messaggio
news:NGwV6.3266$Ea.1...@news.infostrada.it...

sull'evento 'Su Modifica' della casella combinata scrivi:
If Me.<nome casella combinata>.Value = <valore della casella combinata> Then
    <nome sottomaschera>.SetFocus
EndIf
Oltre a .SetFocus può servirti impostare .Enable = True
 a seconda di come hai impostato le stottomaschere
--
Leo





Ciao,
grazie, però sono un vero neofita di DB, spero che funzioni.
se volessi
impostare l'evento .Enable dove devo inserirlo?
Grazie Tiziano
--------------------------------
Inviato via 
http://usenet.iol.it
 

 ha scritto nel messaggio
news:140Z105Z117Z234...@usenet.iol.it...


    <nome sottomaschera>.Enable = True
    <nome sottomaschera>.SetFocus
End If
Ciao
Leo

Newsgroup: it.comp.appl.access
Titolo: che formato devo usare?

ho una txt box con un tempo per documento diciamo 01.07.00  in un'altra
ho il numero dei documenti es 1000
 se in un ulteriore txt box eseguo il prodotto delle due txt box come
devo settare il formato numero affinché mi scriva le ore impiegate?
con ora estesa non segna più di 24 ore, o meglio segna una data e poi le
ore ma sempre e comunque inferiore alle 24....
vi ringrazio tutti per l'aiuto

 ha scritto nel messaggio
news:3B0D4C9C...@inwind.it...

Se ti sta bene avere il risultato anziché in ore.minuti in ore e frazioni di
ora (100,5 anziché 100.30), moltiplica il risultato che hai ora per 24 e dai
al controllo il formato Numero generico o Fisso.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

grazie 1000
in attesa di altre dritte :-)
adotterņ il tuo metodo
ciao
Newsgroup: it.comp.appl.access
Titolo: Recordset

Ciao. Come si fa a puntare a una riga di un recordset? se il recordset e'
una "tabella virtuale" (da : faqqone) non dovrebbe essere difficile puntare
a una riga il cui valore di riferimento lo si trova in un controllo di una
maschera , giusto? Una cosa del tipo :
dim rec as recordset
set rec = miodatabase.openrecordset"miorecordset"
rec.movelast
 E POI ???
poi gli dovrei dire : spostati fino alla riga il cui valore e' nella
casellataldeitali della maschera , e scrivi quel valore da un'altra parte
....
Per il momento mi servirebbe un consiglio / sintassi corretta su come dirgli
di puntare a un certo valore , in pratica non so se usare e come usare le
funzioni Filter o ... aiuto.
Luca.

casellataldeitali della maschera , e scrivi quel valore da un'altra parte
Tu però c'avresti da darti una bella studiata all'help sui recordset e ai
loro metodi e proprietà e a tutti quei begli esempi che ti farebbero capire
un sacco di cose.
Dopo aver aperto il recordset con parametro dbopendynaset (importante in
questo caso per il metodo che andremo ad usare) dovremo usare appunto il
metodo findfirst che consiste nel saltare al primo record del recordset che
verifica certe condizioni.
La sintassi del criterio di selezione è una stringa con il nome del campo
senza quadre, operatore logico e valore (circondato da apici se stringa)ed
eventualmente si possono concatenare più ricerche su più campi mediante AND
o OR.
Nel tuo caso sarà:
Criterio = "CampoTalDeiTali = '" & forms("TuaMaschera").controlloTaldeiTali
& "'"
A questo punto tu farai
rec.findfirst Criterio
e ti troverai come per magilla sul record che verifica quella condizione
(sta a te far sì che quella sia un criterio univoco).
Antonio
Newsgroup: it.comp.appl.access
Titolo: Msgbox se numero già presente.

Salve a tutti.
Situazione:
maschera "msk_Partecipanti" con origine dati
in tabella "tbl_Partecipanti".
Controllo numerico (TextBox) a immissione libera da parte dell'utente
[Numero_T],
diverso dal contatore [ID_P] ma importante e con duplicati non ammessi.
Se si immette un numero già presente, quando si chiude la maschera una volta
inseriti tutti i dati o si cerca di passare al nuovo record, appare il msg
che avvisa
dell'errore <L'apporto modifiche non è riuscito...etc etc...Modificare i
dati nel
campo o nei campi che contengono valori duplicati oppure...etc etc>.
Ora, vorrei che all'inserimento del dato numerico nel controllo, il
programma
facesse un confronto con i dati già presenti e, in caso, mi segnalasse la
duplicazione
del dato, annullando l'immissione.
Ho provato con un "On error goto miaFunzione" nell'evento
AfterUpdate, ma nisba.
Spero di essere stato chiaro.
Grazie dell'attenzione e buona giornata a tutti.
---- --- ---
         Gio

"gio_sgj" <ilnic...@NOSPAM.tiotnupoohay> ha scritto nel messaggio
news:gewla.89685$Jg1.2...@news1.tin.it...

Se la tabella che contiene i dati si chiama Tabella1.
Se il campo in essa contenuto associato alla casella di testo Numero_T è di
tipo numerico ed anche lui si chiama Numero_T.
A fronte dell'evento "Prima di aggiornare" del controllo Numero_T genera il
seguente codice VBA:
Private Sub Numero_T_BeforeUpdate(Cancel As Integer)
If DCount("*", "Tabella1", _
"Numero_T=" & Me!Numero_T) <> 0 Then
    MsgBox Me!Numero_T & " già esiste"
    Cancel = True
    Me!Numero_T.Undo
End If
End Sub
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: report gia' fatto e opione ordina in modo crescente

Ho creato un report con l'autocomposizione e l'ho aggiustato come volevo...
dopo un po' mi sono accorto che il campo [data] e' ordinato in modo
*decrescente*... e io lo vorrei in modo *crescente*... spero ci sia un modo
per cambiare questa impostazione senza dover rifare il report. Si puň fare?
Grazie ancora.

 Grazie ancora.
Tra i vari pulsanti in visualizzazione struttura
c'è anche ordinamento:
vedi c'è un simbolo del genere
" (= " in realtà le righe sono 4
MAssimiliano

 ha scritto nel messaggio
news:5aNGc.13100$%l2....@news.edisontel.com...

Grazie, questo l'ho trovato!
Newsgroup: it.comp.appl.access
Titolo: Doppio filtro

Ho una maschera con sottomaschera in foglio dati. Sulla maschera ho una 
combo ed una casella di controllo in base alle quali voglio filtrare la 
sottomaschera.
La casella di controllo deve filtrare mano mano che si digita, quindi filtro 
sulla proprietà text.
La combo invece deve filtrare su afterupdate.
Ho due problemi, quando faccio l'aggiornamento della combo, il requery della 
sottomaschera si perde un eventuale precendete filtro della casella di 
controllo perchè è sul text e non sul value.
Inoltre, il filtro sulla casella di controllo deve funzionare sia sul value 
che sul text.
Spero di essermi spiegato...

Valery From The Mountain ha scritto:

E' un po' vago.....come fai il filtro della combo? Io creerei la stringa SQL e imposterei il recordsource della sottomaschera sulla stringa filtrata...(perchè devi fare un requery? Prima crei la stringa, poi fai il requery per rinfrescare la visualizzazione. Se la maschera è basata su una query è normale che te la ripresenti...)
Per la casella di controllo o usi il recordsetclone sull'eventro keypress, o usi l'anteprima tasti e prima filtri e poi fai apparire il testo nella casella, che diventa praticamente una specie di etichetta non attiva, nel senso che non ci scrivi proprio dentro, è la maschera che, dopo aver eseguito il filtro, riempie la casella. Niente text, niente value.
Altrimenti, usi un tasto (tipo F2) per crearti un pop up dove scrivi il filtro e alla pressione di INVIO, chiudi e crei l'SQL per il recordsource
Non so se nulla di quello che ho detto potrà esserti utile....forse ho capito male...
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it

"Valery From The Mountain" wrote in message
news:485ffab3$0$41655$
4faf...@reader4.news.tin.it
:

Ciao Valery.
Forse invece che "Casella di controllo" (CheckBox) intendevi scrivere 
"Casella di testo" (TextBox)? In tal caso, la Casella di testo e` 
associata a un Campo della Maschera principale? La Casella combinata 
(ComboBox) e` associata a un Campo della Maschera principale?
--
Ciao!
Maurizio Borrelli [Microsoft MVP Office System]
http://www.riolab.org/

Newsgroup: it.comp.appl.access
Titolo: Controllo IBAN

Il modulo per il controllo del codice IBAN pubblicato nel Sito Comune 5.63 
secondo me presenta un errore:
in questa riga di codice
If Mid(pstrIBan, 4, 2) > "96" Then
al posto di 4 va messo 3 in quanto il codice di controllo č a pos. 3 e 4 
come riportato nei commenti qualche riga di codice piů indietro.
Chiedo conferma agli altri.
-- 
Ciao, Sandrobi


Dipende se usi lo spazio....
Questo sarebbe al quarto: IT 52  H  03174 ...
Ciao, Carlo 


Non so se sia corretta la soluzione, però posso confermare che quella riga 
di codice è sbagliata: un cliente infatti mi ha fatto notare che la verifica 
dava esito negativo per un codice Iban corretto e la riga "interessata" era 
proprio quella.
Ciao
--
Nina 

Ritiro quello che ho detto.
E' sbagliato!
Ciao, Carlo 

 Ciao, Carlo
Grazie della conferma.
Qualcuno provvederà a corre la pagina e relativo mdb allegato.
Ciao, Sandrobi
Newsgroup: it.comp.appl.access
Titolo: Dlookup ERRATO

Gentili A97
in una casella di testo
vorrei fare collegare un campo di tabella con il dlookup che filtri in base a due opzioni il CODICE CORSO ed il CAPITOLO DI SPESA...
dove sbaglio?
 
=DLookUp("[Totale_Voce]";"Costi_Capitoli";"[Id_Corso_Righe]=[MiaCasella]&[Id_Capitolo_Spesa=[Capitolo_Spesa]")
 
 
 
GRAZIE


Commetti molti errori...
 
1) Per Concatenare + criteri servono gli Operatori BOOLEANI AND/OR/ecc... e tu lo hai omesso
2) La sintassi deve distinguere i Campi dai Controlli... e tu hai messo tutto in un unico calderone... ma devi pensare che le stringhe qualcuno le Interpreta e deve risolverle... e questo è il Motore del VBA o di JET.
Quindi se non gli spieghi bene cosa fare... non capisce.  
 
=DLookUp("[Totale_Voce]";"Costi_Capitoli";"[Id_Corso_Righe]=" & [MiaCasella] & " AND [Id_Capitolo_Spesa]=" & [Capitolo_Spesa])
 
@Alex

GRAZIE ,,,

Newsgroup: it.comp.appl.access
Titolo: ricerca dlookup al contrario

ciao a tutti,
uso la funzione dlookup per cercare un valore all'interno di una
tabella, esso però mi restituisce univocamente il primo record che
rispecchia il criterio di ricerca
Io ho bisogno di un metodo che faccia la stessa cosa partendo però dal
fondo
Avete qualche idea ?
Grazie in anticipo


Credo che tu debba usare un Recordset aperto con una SQL dedicata che
ti ordina i Records al contrario, a quel punto usi TOP 1
Es:
SELECT TOP1 * FROM T1
WHERE Campo1=5
ORDER BY CampoX Desc
@Alex


grazie infinite
Newsgroup: it.comp.appl.access
Titolo: Ti aiuto a risparmiare...

Ciao, non sono uno spammatore, cerco solo il mio e il tuo guadagno; come?
1)Vai a 
www.spedia.net
;
2)Registrati (ci vogliono al massimo 4 minuti)
3)Durante la registrazione ti sarà richiesto un numero (sponsor number); a
quel punto dovrai scrivere 791556 (poi ti spiego il perchè); se non
inserisci un numero o ne inserisci uno sbagliato la tua iscrizione non sarà
accettata;
4)Scaricare il banner;
5)Navigare, navigare, navigare...
Ora ti spiego tutto: la Spedia è una società che, tramite il banner (cioè
quella striscia alta 2 cm e larga quanto lo schermo) fa pubblicità a varie
aziende (in generale tutte aziende legate a Internet), più questo banner è
presente sul tuo schermo più guadagni; sì perchè la Spedia guadagna da
queste ditte che chiedono la pubblicità e di conseguenza anche noi
guadagniamo leggendola. Per sapere se stiamo realmente guadagnando dobbiamo
vedere il punto esclamativo che si troverà sulla barra delle applicazioni
una volta richiamato il banner: se è verde guadagneremo, se è rosso no; per
far si che sia sempre verde dovremo restare sempre all'interno di Internet
Explorer e soprattutto far muovere la connessione (cioè inviare o ricevere
dati); più navigheremo più guadagneremo, ripagandoci la spesa della bolletta
(e ci avanzerà qualcosa). Il numero dello sponsor serve a registrarti a
carico di un altro utente già registrato; sì perchè l'utente sul quale ti
sei registrato ricevera una quota dei tuoi punti e quindi più persone si
iscrivono su di un numero e più il proprietario guadagnerà; naturalmente
dopo la registrazione anche voi avrete il vostro numero e come se non
bastasse vi arriverà una e-mail con tutti i dati (user id, password e
numero). Il guadagno si baserà sui punti che totalizzerai, più saranno e più
alto sarà il tuo guadagno; un segreto per guadagnare punti consiste nel
giocare ai giochi (davvero semplici) che Spedia ci mette a disposizione...
Credo di aver detto tutto e ricorda il numero 791556 altrimenti non potrai
iscriverti....

Ciao, non sono uno spammatore,
No, sei un coglione
-- 
Ciao,
Giovanni

Newsgroup: it.comp.appl.access
Titolo: ricerca tra date

 
          Ciao a tutti,
ho un problema: ho una tabella dipendenti nella quale ho varie informazioni
tra le quali il periodo lavorativo (data inizio e data fine), ho la
necessità di cercare tutti coloro che stanno lavoranto in data odierna. Come
faccio a dirgli questo nella query o select?
Grazie infinite!
Francesco
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Prova con:
Select * From dipendenti Where [data inizio] => date() And [data fine] <= date();
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Maschera Continua - Domanda

Ho una sottomaschera continua di immissione dati con i seguenti controlli:
Descrizione,IDArticolo,etc...
Il funzionamento è semplice; praticamente inserisco i valori nel primo
record, poi inserisco i valori del secondo record e cosi
via..(Funzionamento normale).
E' possibile che alla riapertura della maschera i record(in questo caso 1°
e 2°)non possano essere + modificati e posso solo inserire dati a partire
dal 3 record?
Esempio: inserisco dati 1° record
         inserisco dati 2° record
 
   chiudo la maschera
   riapro la maschera
allora 1° e 2° record impossibile da modificare
   3° record inserisco dati
   4° record inserisco dati
 
   chiudo e riapro la maschera
 
   1°, 2°,3°,4° record sola lettura
5 , etc... inserimento dati e cosi via
 
Saluti Marco
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 5 , etc... inserimento dati e cosi via
    Che valore hai assegnato alla proprieta':
        Consenti modifiche
della maschera?
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

 --------
Infatti, Colpa dell'influenza. Sono uno scemo!
Sei stato molto + veloce di me! Volevo annullare questa mia domanda
stupida, ma mi hai fregato sul tempo. 
Ciao Maurizio


Newsgroup: it.comp.appl.access
Titolo: stampare CODICI A BARRE

come faccio a stampare i codici a barre con access?
ho bisogno di moduli aggiuntivi? librerie? dove li trovo?
grazie


Che tipo di codice a barra devi stampare ?



per alcuni codici è sufficiente un font, leggi nei thread precedenti
cercando codici a barre è un argomento ampiamente trattato
Saluti.
Emanuele.


Se ti serve stampare dei codici formato EAN13 so per certo che bastano le
font dei caratteri perchè li stampo anch'io. Penso che sia la stessa cosa
anche per altri tipi di codice.
Ciao, Nicola.
Newsgroup: it.comp.appl.access
Titolo: Ancora immagini jpg

Ciao,
dopo non pochi problemi, superati anche grazie al vostro aiuto, sono
arrivato alla stampa dell'immagini.
Ho creato un report e il pulsante per l'apertura di esso dalla maschera. Fin
qui tutto bene.
Il problema e' sorto quando ho fatto l'anteprima del report, in quanto
l'immagine non ha piu' le dimensioni originali.
Ho impostato il controllo immagine su ritaglia e le immagini sono
memorizzate in un campo ipertestuale.
Non è che nella conversione da jpg a bmp, Access cambia anche le dimensioni?
Come posso fare per stampare l'immagine con le dimensioni originali?
Grazie per l'aiuto.Ciao.
Stefano.
--
~~~~~~~~~~~~~~~~~~~~~~~~~
   Per rispondere in E-Mail togli AT.

 Stefano.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ---------------------------------------------
Grazie e ciao, Stefano.

 Grazie e ciao, Stefano.


 filtro necessario ad Access a visualizzare un file Blob.
Non è quella funzione di cui parla S.Bettini in una faq del sito comune?
Ha la particolarita' di archiviare in dati come un "grumo di dati".
Pensavo che forse in quel modo le jpg rimanessero delle dimensioni
originali.
Grazie e ciao, Stefano.

 filtro necessario ad Access a visualizzare un file Blob.
blob = binary large object (ole di access)
clob = character large object (i memo di access)
--
a.cara

uguale all'originale.
Il controllo immagine standard di Access non č granchč.
Al limite prova su evento formattazione della sezione (o apertura Report, dipende)
Me!Immagine.Height = Me!Immagine.ImageHeight
Me!Immagine.Width = Me!Immagine.ImageWidth
Ciao.

 Me!Immagine.Width = Me!Immagine.ImageWidth
Forse non ho capito come funziona!
Immagine a sinistra dell'= č quella che ho nel report.
E a destra anche?
Booo.
Mi puoi dare una spiegazione?
Grazie e ciao,
Stefano.

Grazie e ciao,
Mah, diciamo che si cerca di assegnare alla cornice contenente l'immagine le dimensioni reali
dell'immagine stessa.
Ciao.
Newsgroup: it.comp.appl.access
Titolo: Rinominare le etichette dei pulsanti di comando

Avendo una maschera con una serie di pulsanti (supponiamo 12, per esempio)
chiamati comando0, comando1,...comando12, vorrei rinominare le loro
etichette con un ciclo for next, prendendo i valori dal campo di una
tabella.
Potete darmi una mano?
Grazie, Salvatore

 Grazie, Salvatore
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


La tabella č costituita da due campi: il primo č un campo contatore (ID), il
secondo contiene il testo da associare al pulsante.
Ciao,e auguri di pronta guarigione
Salvatore

 Ciao,e auguri di pronta guarigione
Grazie!!


 Roberto
La scelta va fatta con qualunque ordine, per esempio in ordine cronologico
di immissione. Quindi il primo record dà l'etichetta al pulsante 1, il
secondo al pulsante 2 e così via. Infatti, una volta rinominati i pulsanti,
per l'evento farò riferimento all'etichetta del pulsante stesso.
Saluti
Salvatore

 Salvatore
Se la tabella si chiama Tabella1 ed ha una struttura simile a questa:
ID                  Contatore e chiave primaria
Descrizione    Testo
Se i pulsanti di comando sono 12 (chiamati Comando0, Comando1 ...
Comando11).
Se sei d'accordo ad usare i primi 12 record di Tabella1.
A fronte dell'evento "Su apertura" della maschera che contiene i dodici
pulsanti di comando genera il seguente codice VBA, che fa riferimento alle
librerie DAO:
Private Sub Form_Open(Cancel As Integer)
Dim rst As Recordset
Dim Conta As Integer
If DCount("*", "Tabella1") < 12 Then Exit Sub
Set rst = CurrentDb.OpenRecordset("Tabella1")
rst.MoveFirst
For Conta = 0 To 11
    Me("Comando" & Trim(Conta)).Caption = rst!Descrizione
    rst.MoveNext
Next Conta
Set rst = Nothing
End Sub


 ha scritto nel messaggio
news:tW6B8.8562$5k4.2...@twister2.libero.it...

Come sempre, grazie
Ciao
Salvatore