mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Scrittura File di testo

Hello!!!
Mi piacerebbe salvare tutte le modifiche, che faccio all'interno di una
maschera, in un file di testo dove verranno riportate sottoforma di
stringhe SQL (praticamente mi piacerebbe fare un file di logs in formato
SQL di quello che ho fatto).
Grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 -- 
Pochi messaggi indietro e trovi lo stesso problema con le soluzioni...
Ciao.
-- 
Sergio MAZZA

 Ciao.
Ma tu dici il messaggio che ha come oggetto scrivere su un file di testo??
Quello lo so fare...ma vorrei salvare in istruzioni SQL le modifiche che
faccio in una maschera...c'è qualche funzione??
Alex


 Alex
Non c'è una funzione già pronta, comunque si può fare. Te la devi scrivere
sfruttando gli eventi di inserimento/cancellazione/modifica della maschera.
Namor
-- 
namor at inwind punto it


 Namor
:((
-- 


Newsgroup: it.comp.appl.access
Titolo: Aiuto ! Somma di valori con descrizione comune

Salve a tutti !!
Non sono un esperto, devo risolvere un problema...
Ho una maschera con 10 campi, fra cui IMPORTO e DESCRIZIONE.
Devo fare un campo totale in fondo dove mi metta la somma degli importi
di una data descrizione. Per spiegarmi meglio vi faccio un esempio,
somma degli importi di tutte le descrizioni che si chiamano "vite":
DESCRIZIONE | IMPORTO
---------------------------------------
Vite                 |  0,30
Dado               |  0,20
Rondella          |  0,80
Vite                 |  0,25
Albero              |  3,40
Vite = (0,25+0,30) = 0,55
Qualcuno può aiutarmi ??? Grazie !!!

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

Newsgroup: it.comp.appl.access
Titolo: nessun record corrente su chiusura della maschera

Salve!
in dopo aggiornamento di una subform ho:
 
 With Parent!miaSubform.Form
   lngStore = !Id
   .Requery
   .Recordset.FindFirst "Id = " & lngStore
 End With
 
però se chiudo la maschera dopo aver eliminato anche 
l'ultimo record ho l'errore: nessun record corrente,
Mentre se uso il semplice requery non ho errore.
Come posso risolvere?


Ho fatto cosi
Set rst= Parent!miaSubform.Form.RecordsetClone
lngStore = rst!Id
rst.Requery
rst.FindFirst "Id = " & lngStore
rst.Close: Set rst = Nothing

Newsgroup: it.comp.appl.access
Titolo: ##### PUNTINI AIUTO ######

Ciao a tutti! ho un problemino, spero voi mi possiate aiutare.
dovrei inserire in un report un testo composto da una stringa e un prezzo.
sia il testo che la cifra poerò variano a aseconda del record. ho fatto una
semplice somma di una stringa con str([prezzo]), se nonchè str mi toglie la
formattazione del prezzo, mi toglie in pratica i puntini.
per rimettere la L. non è un problema, la metto nella stringa, ma i puntini?
come posso fare?
alf...@libero.it
www.nuoto.it/maurogallo

 come posso fare?
CStr(Format([prezzo], "#,###"))
    Paolo
Newsgroup: it.comp.appl.access
Titolo: risoluzione pdf

ho il seguente problema:
ho ancora accessa97 (tra un pò celebriamo 10 anni di matrimonio), e ho 
bisogno di mettere con sfondo di un report un modulo che ho convertito da 
jpg a pdf. La stampa da acrobat é perfetta. Se lo metto come sfondo del 
report (come oggetto e non immagine perché non supporta tale formato) 
diventa quasi illeggibile. E' possibile questo? E come si può risolvere 
senza cambiare versione? Ho provato a mettere il jpg come sfondo ma é troppo 
pesante e lo elabora in un sacco di tempo.
grazie 

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

 l'elaborazione dell'immagine.
esattamente in cosa consiste? 

 ha scritto nel messaggio 
news:ejhon5$g4i$1...@aioe.server.aioe.org...

Quanto segue è copiato da un allegato alla FAQ di Silvio Savoldi intitolata 
"6.75 Implementare un archivio di immagini." della Sezione General del Sito 
Comune (link qui sotto):
================================
<omissis>
IMPORTANTE: il controllo immagine di Access è predisposto per la 
visualizzazione di bitmap e pochi altri formati secondari (.ico, wmf), tutti 
gli altri (Jpeg, Gif, Tiff, etc.) vengono convertiti in bitmap attraverso i 
relativi filtri di conversione (tra l'altro assenti di default in 
un'installazione Runtime di Access).
Durante la conversione appare una progress bar che oltre a rallentare il 
processo, può causare errori irreversibili (Ndr: il problema non si 
manifesta con A ‘2000 e XP).
E' possibile tuttavia nascondere la barra di processo agendo sul Registro di 
Configurazione: nel caso d’immagine Jpeg, ad esempio, è sufficiente settare 
a "No" la seguente entry:
HKEY_LOCAL_MACHINE\Software\Microsoft\ Shared Tools\Graphics 
Filters\Import\JPEG\Options\ShowProgressDialog
In ogni caso la conversione da Jpeg a Bitmap può richiedere parecchie 
risorse dipendentemente dalla qualità delle immagini (Ndr: oltre certe 
dimensioni la conversione non va proprio a buon fine).
Su PC obsoleti e/o con scarsa dotazione di RAM, oltre a un degrado 
prestazionale, possono verificarsi Crash da esaurimento di risorse GDI.
<omissis>
======================================
Come vedi in questa nota, per migliorare la performance dell'applicaivo, si 
suggerisce sia di eliminare la barra di progressione che di alleggerire le 
dimensioni del file jpg da visualizzare.

Newsgroup: it.comp.appl.access
Titolo: Usare la/e variabile/i passate ad una funzione in un modulo

Salve a tutti.
Sto creando una funzione in un modulo che richiamerò dall'evento clic
di un pulsante su una maschera.
La funzione mi deve rendere invisibile un controllo della maschera.
Allora, se la maschera si chiama "pinco", la funzione all'interno del
modulo sarà:
Function invisibile(controllo as string)
   forms!pinco!CONTROLLO.visible = false
End function
Io chiamerò la funzione dall'evento clic in questo modo:
modulo.visibile(nomecontrollo)
Quello che volevo chiedervi è:
come devo scrivere affinchè il parametro passato mi venga utilizzato
come nome del controllo?
è giusto come ho scritto o visto che CONTROLLO non è il nome del
controllo ma una variabile, devo scrivere diversamente?
é giusto come chiamo la funzione dall'evento clic?

 modulo.visibile(nomecontrollo)



dovrebbe essere così forms!pinco.(controllo).visible=false oppure
forms.pinco.(controllo).visible=false non ricordo bene
ti consiglio cmq di utlizzare una variabile di nome diverso da controllo
per esempio controllo_interessato non si sa mai
ciao
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.appl.access
Titolo: formato valuta nei report con euro

So che l'argomento non č nuovo, ma cercando sul sito comune non ho trovato
il modo di far comparire nei report il simbolo euro al posto di quello della
lira nei controlli con formato valuta.
Devo forse cambiare il formato in numerico e mettere a mano un etichetta con
l'euro?
Ho Office97 ed ho installato la patch per l'euro.
Scusate la banalitą, ma non so come procedere.
Bye
Ilaria

 Ho Office97 ed ho installato la patch per l'euro.
Come già riportato ampiamente negli ultimi 2 mesi in questo NG, devi variare
le impostazioni internazionali di Access.
Oppure nella proprietà Formato dei controlli non usi il tipo Valuta e
inserisci un formato tuo.
Ad esempio: ?   #.##0,00
dove ? è il simbolo dell'euro (ALT + 0128)
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

Ilaria ha scritto:

Devi andare su pannello di controllo, Impostazioni Internazionali e modificare
il simbolo valuta..
Ciao....

 le impostazioni internazionali di Access.
Volevo segnalare una cosa che mi capita quando provo a fare una ricerca sul
sito comune;
dopo aver cliccato sul bottone "Cerca" mi viene chiuso Explorer. Succede
anche a qualcun altro? Io ho anche reinstallato Explorer di recente quindi
la mia installazione non dovrebbe essere compromessa.
Scusate quindi se non ho trovato da sola le informazioni.
Grazie
Ilaria

 anche a qualcun altro?
No, se si leggono le informazioni contenute nella stessa pagina!
-- 
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
----------------------------------

 No, se si leggono le informazioni contenute nella stessa pagina!
Scusa, volevo comunque dire che succede anche disabilitando la VM.
Bye
Ilaria

 Ilaria
Non mi risultano altri casi, sicura di aver disabilitato il
'Compilatore Java JIT'?

Newsgroup: it.comp.appl.access
Titolo: Filtro Select con virgola mobile

Ciao a tutti.
Ieri mi sono beccato del CATTIVO perchè ho richiesto aiuto a 3 frequentatori
via email. Scusate tanto, non sapevo che i Ng fossero così rigidi. (Nessuno
ha risposto, uno di loro si è abb. incazzato ...).
Vorrei riproporre la questione con la soluzione. Tanto perchè non è che io
rompa le scatole alla gente per il gusto di farlo! Sarà capitato anche a voi
di avere cose urgenti e di non poter stare ad aspettare il Ng ...
Original Message:
    1) Select * from [Tabella] where Quantità > " & Temp
    Tutte le volte che Temp assume un valore con la virgola da errore: come
lo devo formattare ??
Soluzione:
    Un amico mi ha dato la soluzione ed in cambio ha preteso due casse di
arance!
    Io ovviamente ve la do "a gratis" !
    Select * from [Tabella] where Quantità > " & Str(Temp)
Ciao
Luca

 ha risposto, uno di loro si č abb. incazzato ...).
La colpa č anche di Federico Luciani che da un po' di tempo non invia il
messaggio con le regole del NG.
:-P))
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

 messaggio con le regole del NG.
Chiedo scusa: non mi ero accorto che aveva provveduto oggi stesso.


Newsgroup: it.comp.appl.access
Titolo: Connessione ad Oracle

Ciao a tutti.
Ho un problema che mi assilla.
Tempo fa in azienda avevo realizzato un db in access che si andava a
connettere con un db Oracle (ver 7.3).
La connessione l'avevo fatta collegando le tabelle che mi interessavano.
Fin qui nessun problema.
Ora, per soppravvenute modifiche della "procedura", lo devo rifare da capo
ma non volevo collegargli le tabelle, questo perché il collegamento m'ha
sempre creato un sacco di casini che, fino ad oggi, sono comunque riuscito a
tamponare.
Volevo quindi accedervi utilizzando i comandi Opendatabase e Openrecordset.
Il mio problema è che ho fornito al comando Opendatabase tutti i parametri
della stringa di connessione ODBC ma, nel momento in cui mi collego,
continua a comparire l'interfaccia di ODBC che mi chiede il DSN da
utilizzare.
Ho indicato TUTTI i parametri che conosco, ma proprio non se ne vuole
andare...
Volevo sapere se ad altri erano successo lo stesso ed eventualmente come si
potrebbe risolvere la cosa.
Grazie in anticipo
Ciao
Dario da PD

connettere con un db Oracle (ver 7.3).
[cut]
Quali problemi hai tamponato? Mi piacerebbe comunque conoscerli. Grazie.
I metodi da Te indicati eseguono comunque il collegamento (link) alle
tabelle di Oracle nello stesso modo utilizzato in precedenza.
Comunque il parametro che manca è DSN=TuoNomeDSN;
es.                tdf.Connect = "ODBC;DSN=TuoNomeDSN;DB=NomeDB;SRVR=" &
Getserver() & _
                            ";UID=" & Getuser() & ";PWD=" & Getpassword()
se non funziona controlla come è stata creata la tua fonte dati
(eventualmente toglila da User e mettila in System)
Ciao, Cesare

                             ";UID=" & Getuser() & ";PWD=" & Getpassword()
Da pollo penso di aver indicato SERVER anziché SRVR.
Proverò.
Grazie Cesare
Ciao
Dario da PD
Newsgroup: it.comp.appl.access
Titolo: Trasformare un apostrofo

Accidenti, sapete indicarmi dove trovare una tabella con i codici ASCII
delle lettere e simboli? In un campo devo eseguire un controllo ed eliminare
gli apostrofi eventualmente presenti, sostituendoli con uno spazio...
--
'--------------------------------------------------------
'Saludos
'--------------------------------------------------------


Start  > esegui > charmap
ovvio se è installato la mappa caratteri di windows, se no la installi ed
esegui
ciao

 gli apostrofi eventualmente presenti, sostituendoli con uno spazio...
for i = 1 to 255
  debug.print i & "-" & "asc(i)
next i
Antonio

Newsgroup: it.comp.appl.access
Titolo: inserimento link immagine in db

devo creare un archivio in cui ad ogni record corrisponda una sua 
immagine. al posto di inserire l'immagine direttamente nel db avevo 
intenzione di creare una directory in cui avere tutte le foto e di 
inserire un campo nella tabella del mio archivio in cui inserire il path 
della foto. effettuando diverse ricerche con google ho trovato diversi 
aiuti, ma non sono molto esperto di access e quindi non sapevo dove 
mettere le mani.
a questo punto è sorto un problemi:
- nella maschera per l'inserimento dei dati come faccio a creare un 
campo (tipo quello sfoglia) in cui posso selezionare il file e quindi 
averne nel campo la relativa path?
vi ringrazio tantissimo

"iblinku" <NOSPAMv...@genie.itNOSPAM> ha scritto nel messaggio 
news:4413d915$0$36923$4faf...@reader3.news.tin.it...

Su 
www.sitocomune.com
 trovi diversi aiuti sull'argomento; (come implementare 
un archivio di immagini).
Anche una ricerca su questo ng darà dei risultati.
Ciao, Carlo 

 


"iblinku" <NOSPAMv...@genie.itNOSPAM> ha scritto nel messaggio 
news:4413d915$0$36923$4faf...@reader3.news.tin.it...

Ciao iblinku
puoi prendere spunto dall'esempio che trovi sul sito
di Alex Baraldi, sez forms faq 1.45 Gestione Immagini.
http://www.mantuanet.it/alessandro.baraldi/
Daniele

 


> Daniele
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 
ho dato un'occhiata al db e devo dire che è un'ottimo esempio di 
partenza, però mi ritrovo con parecchie lacune di access visto che non 
l'ho mai usato.
ho modificato diverse cose ed ora nella form con l'immagine ho inserito 
altre 3 caselle di testo. i campi inseriti in queste 3 caselle devono 
essere inseriti all'interno di un'altra tabella che ho creato. il prob è 
che non so come fare a far memorizzare il tutto.
mi sapresti dare una mano?
ti ringrazio

 essere inseriti all'interno di un'altra tabella che ho creato.
fai una query della tabella e la usi come origine record della maschera.
spero di aver capito......
Daniele
Newsgroup: it.comp.appl.access
Titolo: Comando imposta valore

Ciao a tutti:
Mi serve un "aiutino", e' possibile co il comado imposta valore (set
value) da una macro agganciare un valore selezionato da una casella di
riepilogo ad'un criterio di una query?
Mi spiego se in una imposto un controllo casella di riepilogo per una
tabella con valori da A a Z, li scorro, scelgo la Q e automaticamente la
Q diventa il criterio per una query di selezione su un'altra tabella che
poi mi va a creare una sottoscheda.
Spero di essere stato un minimo comprensibile.
P.S. Mi serve che 'sta cosa funzioni anche in Access 2.0
Grazie assai.
Eugenio

Q diventa il criterio per una query di selezione su un'altra tabella che
Euge', mi dici che la usi a fa' na macro in questo caso?
apri la query in modo struttura e tramite il comando genera (il
pulsante con i tre puntini) generi, appunto, nella casella criterio
del campo in base al quale vuoi filtrare, un "richiamo" alla casella
di riepilogo.
verra' fuori qualcosa tipo forms!Nomemaschera!nomecasella.
--------------------------------------------------
ATTENZIONE!
it.comp.database.access diventera' it.comp.appl.access!
cercalo tra i nuovi ng e linkalo!
-----------------------------------
rimuovere NOSPAM. per mandare email
-----------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
Newsgroup: it.comp.appl.access
Titolo: Rendere exe un database

So già che il mio è un sogno irrealizzabile, ma ci provo lo stesso: come da
oggetto è possibile rendere eseguibile un database in modo tra l'altro di
non rendere visibile il codice e altre chicche che solo un exe può?
Ciao e grazie
Carlo


leggi il faqqone su 
sitocomune.com
Saluti.
Emanuele.

 ha scritto nel messaggio
news:uwfA9.2570$Yw.1...@news2.tin.it...

Se il tuo problema è SOLO quello di non rendere visibile il codice, creati
il file MDE del tuo database e distribuisci quello.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Grazie per la risposta.
Cmq io volevo sapere se era possibile renderlo eseguibile perchè per esempio
non ci sarebbe bisogno di installare access nei pc???

 non ci sarebbe bisogno di installare access nei pc???
E' possibile con un apposita versione Runtime disponibile col pacchetto
Office Developer.

Ok ok , ma è possibile o no renderlo eseguibile in totale?
lasciando perdere i vantaggi, svantaggi.
Si può fare? Facciamo finta che sia una curiosità ;)
Grazie cmq Tiziano

 Si può fare? Facciamo finta che sia una curiosità ;)
Se fosse possibile creare un .EXE da Access, allocherebbe almeno cinquanta
MB per la più piccola cazzatina: cosa diavolo te ne faresti?
Diciamo che il Runtime è la "Virtual Machine" necessaria per far girare un
.MDE (che in effetti è un file contenente codice P-compilato).
Qualcosa di simile a Java di Sun: un Runtime esegue files meta.compilati
aventi estensione .class.
Così è chiaro?
Ciao, Tiziano


Chiarissimo. Grazie tantissimo :)
Carlo

 Carlo
Ti è andata bene perché in questo NG sono TROPPO gentili.
La tua domanda viene fatta ogni tre giorni e non ti sei preso la briga di
andare a dare un'occhiata alle FAQ o ai post precedenti.
Ciao



ma non ti avevo chiesto di leggere il faqqone su 
sitocomune.com
?
Saluti.
Emanuele.

 Emanuele.
Non sapevo dell'esistenza di queste faq, mi dispiace sono un newbbone !!!
Grazie per l'aiuto...mi darą da fare adesso ;)

Newsgroup: it.comp.appl.access
Titolo: Disabilitare invio da tastiera su report

Ho un report aperto in preview. Vorrei disabilitare gli eventi che si
verificano alla pressione di determinati tasti ,o combinazioni di tasti (es.
F1, ctr + O, ecc.). Se non ho visto male nei report non č previsto l'evento
"Su tasto giů" e, per questo, non so come fare. Avete qualche dritta da
darmi?
Grazie.
Spartaco

 Spartaco
Ciao
RoDAgo
Newsgroup: it.comp.appl.access
Titolo: Leggere tabella con ADO

Salve 
ho creato una maschera con all'interno un controllo chiamato "nome"
con il codice sotto apro la tabella e vorrei visulizzare nel mio campo il
valore della tabella che si chiama "nome"
dopo averla aperta ho scritto:
 
Me.nome = 
cosa devo mettere per visualizzare nella maschera il valore del campo nome?
 
grazie
Ciao
Giorgio
 
 
Dim conn As ADODB.Connection
Dim rst As ADODB.Recordset
 
' Riga per individuazione errori ed invio a routine di gestione
On Error GoTo Procedura_Errore
 
'Crea l'oggetto di connessione
Set conn = CurrentProject.Connection
 
'Crea un nuovo Recordset
Set rst = New ADODB.Recordset
 
' Apre la tabella o la query
rst.Open "Tabella1", conn
 
' Messaggio per confermare connessione
MsgBox "Connesso via " & conn.Provider & _
        " OLE DB Provider!", vbInformation
 
' Legge i recordset
Do Until rst.EOF
 
Me.nome = ?????cosa devo inserire ????
 
 
' esegue una operazione
rst.MoveNext
Loop
 
' Chiusure
rst.Close
Set rst = Nothing
 
Proc_Exit:
    Exit Sub
 
Procedura_Errore:
    MsgBox Err.Description, vbCritical
    Resume Proc_Exit
 
End Sub
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 


La sintessi è questa: Rst![Nome]
Ma devi riempire una maschera continua? Se fai un loop e il tuo recordset contiene 100 records, con quello che hai scritto riempi il controllo 'Nome' 100 volte e lasci visualizzato solo l'ultimo risultato....
Altra cosa: se stai lavorando con mdb o accdb non vale davvero la pena usare ADO, anzi è deleterio....
Newsgroup: it.comp.appl.access
Titolo: Conversione Macro in VB

Chiedo aiuto : Ho creato una maschera (accesso) dove in un controllo
testo(non associato) avviene il controllo della password . Poi su evento
dopo aggiornamento o alla pressione di un pulsante si mandava in
esecuzione una macro.Ora invece nasce l'esigenza che alla pressione di un
pulsante vengano eseguite le stesse operazioni che fa la macro ma in vb.
Sapreste aiutarmi nella conversione?? 
Condizione: [User]="ciccio"  
Azione    : Apri Maschera Posta con Condizione where
((([Lookup_IDDestinatario].[Username]="ciccio"
Condizione: [User]="ciccio"
impostavalore:  Forms!Posta!Aiuto!Facile= 19
Riesegui query
Arresta Macro
Saluti Marco
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Evidenzia la tua macro nella finestra database, e  poi Strumenti => Macro =>
Converti macro in Visual Basic.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Da form a report

Scusate ma sono disperato!!!!!
Devo creare un report la cui origine dati sia il recordsetclone di un
form!!!!!! Come faccio?????

 ha scritto nel messaggio
news:Y4U58.7983$om6.2...@news1.tin.it...


 form!!!!!! Come faccio?????
Se nella form non applichi filtri con filter, basta che passi alla
recordsource del report la recordsource della form
Antonio

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

 Me.Filter = Forms!NomeMaschera.Filter
Interessante questa...
Antonio
Newsgroup: it.comp.appl.access
Titolo: Verificare l'esistenza di un particolare file in c:\windows\system

Sapete come posso verificare se un tale file esiste all'interno della
cartella c:\windows\system, per esempio il file pippo.key ? grazie.

 cartella c:\windows\system, per esempio il file pippo.key ? grazie.
Prova con
if dir("C:\Windows\System\pippo.key")="" then
    msgbox "Non c'è"
else
    msgbox "Trovato"
end if
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


Normalmente uso in vba   dir (Consiglio lettura guida in linea F1) che trovo
flessibile.
se il percorso non trovato restituisce una stringa vuota.
Codice
-
Private Sub Commando_Click()
Dim MyFileN as string
MyFileN="c:\windows\system\pippo.key"
    If DirMyFileN= "" Then
        MsgBox "No"
    Else
        MsgBox "Si"
    End If
End Sub
-                          8-)
Ciao

 ha scritto nel messaggio
news:mcqs7.78792$dJ3.5...@news1.tin.it...

Sei sicuro che funzioni?


 > MyFileN="c:\windows\system\pippo.key"
[CUT]
e se la mia directory di sistema non fosse windows ma winzoz? ;-)
Ti suggerisco di provare l'help alla voce Getspecialfolder e qualche cosa
del tipo
    Dim fs, d
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set d = fs.Getspecialfolder(0)
seguito da quello che ti serve
ciao
--
Claudio Tregambe

 
http://www.sitocomune.com
Chiedo scusa postato il codice senza provare ecco come lo appena provato
avevo dimenticato le parentesi.
Per mia comodità lo testato con un file .txt.
Private Sub Comando0_Click()
Dim MyFileN As Variant
MyFileN = "c:\windows\system\pippo.txt"
    If Dir(MyFileN) = "" Then
        MsgBox "Pippo.txt=No"
    Else
        MsgBox "Pippo.txt=Si"
    End If
End Sub

 cartella c:\windows\system, per esempio il file pippo.key ? grazie.
Sul come verificare l'esistenza ti hanno gia' risposto, ma stai
attento al sistema operativo:
in WNT e W2000 la directory di sistema e' generalmente:
C:\Winnt\System32.
In generale non puoi sapere quale e' tale directory, quindi ti
consiglio di utilizzare la seguente funzione che restituisce il path
completo di tale dir.
Private Const MAX_PATH As Integer = 255
Private Declare Function apiGetSystemDirectory& Lib "kernel32" _
        Alias "GetSystemDirectoryA" _
        (ByVal lpBuffer As String, ByVal nSize As Long)
Function fReturnSysDir()
Dim strSysDirName As String
Dim lngX As Long
    strSysDirName = String$(MAX_PATH, 0)
    lngX = apiGetSystemDirectory(strSysDirName, MAX_PATH)
    If lngX <> 0 Then
        fReturnSysDir = Left$(strSysDirName, lngX)
    Else
        fReturnSysDir = ""
    End If
End Function
Esempio:
- W98 -> C:\Windows\System
- WNT -> C:\WinNT\System32
-- 
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
----------------------------------
Newsgroup: it.comp.appl.access
Titolo: Requery in sottomaschera

Ciao a tutti, rieccomi a rompere... ho il seguente problema e non riesco a
risolvere anche consultando 
sitocomune.com
:
Ho una maschera dove ci sono due combobox: combo1 e combo2, nella combo1
seleziono la categoria e nella combo2 mi vengono visualizzati gli articoli
relativi a quella categoria; il tutto grazie all'evento RieseguiQuery
della combo1 e ad una query della combo2. Funziona tutto.
Quando la maschera su descritta la inserisco come sottomaschera nella
principale esce il problema, quando clicco sulla combo1 e seleziono la
catagoria sull'evento RieseguiQuery (della macro) mi esce un'errore che mi
dice "Impossibile utilizzare l'azione Applicafiltro su questa maschera" e
mi consiglia di utilizzare il metodo SelezionaOggetto... ma ho provato
anche questo e nulla!! Spero di essere stato chiaro... grzie cmq ;-)
Enzo.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Enzo.
Da codice punta al controllo specificando
tuamaschera!tuasottomaschera!tuocontrollo e esegui un requery.
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

MA wrote:



Ti ringrazio MAssimiliano, ci proverò (anche se ci mettero' un po' :-))


Enzo.
probabilmente sbagli il nome della combo su cui fare il requery devi
specificare che è nella sottomaschera...
Saluti.
Emanuele.

Newsgroup: it.comp.appl.access
Titolo: etichetta report

Buonpomeriggio, forse la domanda sarà banale.
Come si orienta una etichetta di un report a 90° ?? con lettura dal basso
verso l'alto e le lettere sono verso destra.
Grazie
Marco
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Marco
Guarda su 
www.lebans.com
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: calendario giuliano e access

Salve a tutti, sono nuovo di questo newsgroup e vorrei un aiuto se 
possibile: ho un database access con una tabella in cui è stato importato un 
dato in formato testo corrispondente ad una data in formato giuliano. Ora io 
devo convertire questa data in formato attuale data in tutti i record di 
questa tabella. Sapete dirmi come posso fare? tra l'altro ho cercato su 
internet e ho letto che il calendario giuliano è formato da 6 caratteri, 
mentre questo è formato da 7 caratteri...
Mi date qualche idea?
Grazie, Max 


www.sitocomumne.com
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:  
www.donkarl.com/it

 
www.sitocomumne.com
ho guardato... ma l'unica cosa che ho trovato è
      6.184 Convertire una data giuliana in una data di tipo Data/ora
      però come ho scritto prima dice che sono 6 caratteri, mentre invece io 
li ho di 7....
:-(

Newsgroup: it.comp.appl.access
Titolo: importazione foglio excel

Salve a tutti
ho un problema....
devo automatizzare l' importazione di un foglio di excel in access.
La situazione è questa:
ho un database con tre tabelle
ho un file di excel con tre zone diverse nello stesso foglio alle quali ho
dato un nome
le tre zone hanno intestazione uguale ai nomi dei campi delle tre tabelle
con una relazione 1 a 1 tre le tabelle e le zone del foglio di excel.
A mano l' importazione funziona.....
ma la devo automatizzare...attraverso una macro o qualcosa di simile.
Si puo' fare....come?
Grazie in anticipo per l'aiuto
Ciao
Raffaele

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

 wrote in message 
news:dr3hvc$jr7$1...@carabinieri.cs.interbusiness.it...

DoCmd.TransferSpreadsheet acImport, _
                           SpreadsheetType:=acSpreadsheetTypeExcel9, _
                           TableName:="AnyAccessTable", _
                           FileName:="C:\AnyDir\AnyExcelFile.xls", _
                           Range:="AnyExcelRange", _
                           HasFieldNames:=True
AnyExcelRange dovrà comprendere le tre colonne di Excel, incluse
le tre intestazioni uguali ai noni dei campi della tabella Access.
Ciao
Bruno
Newsgroup: it.comp.appl.access
Titolo: Sottomaschera ,riferimento a controllo

Ciao a Tutti
E' possibile fare riferimento ad un controllo di una sottomaschera, facendo
apparire sulla maschera principale un etichetta?
Mi spiego: ho una maschera principale [pippo] che contiene una
sottomaschera[pluto], impostata a no visibile, che ha come origine oggetto
una maschera [paperino]con i campi [qui],[quo] (non č un cartone animato
Disney).Vorrei fare apparire una etichetta sulla maschera principale,e
visibile la sottomaschera, se il controllo [quo] della sottomaschera
contiene dei dati.
Ho provato a mettere su corrente della maschera principale un procedura :
If Forms![pippo]![pluto].Form![quo] < > "" then
etichetta.visible = true
else
ecc..
Tutto procede bene quando mi sposto tra record (con pulsanti che ho
creato),ma quando cerco di aggiungere un nuovo record mi appare il
messaggio:
Errore di run-time 2427 "nessun valore nell'espressione immessa".
Ho provato anche mettendo_________Form!Len[quo] > 0 Then
Allora si che non mi considera per niente.
Grazie
Ciao Franco

 Allora si che non mi considera per niente.
credo che sia il solito problema legato ai Null
prova:
If ("" & Forms![pippo]![pluto].Form![quo]) < > "" then
personalmente continuo a preferire
me!pluto.form!quo
--
a.cara

 wrote in message
3DB8603A...@blunet.it...

Grazie, ho provato, ma stesso risultato.
Franco

 > If ("" & Forms![pippo]![pluto].Form![quo]) < > "" then
sulla stessa istruzione (a parte la parentesi mancante)? 
se non ti costa troppo puoi, per favore, postare tutto il codice
delle funzioni che stanno sul bottone di spostamento record e di
current?
--
a.cara

>(che mi crea anche una numerazione crescente)
Private Sub CmdNuovo_Click()
TxtTitolo.SetFocus
Dim Mynum As Integer
DoCmd.GoToRecord , , acLast
Mynum = TxtCassetta + 1
DoCmd.GoToRecord , , acNewRec
TxtDataarchiviazione = Date
TxtCassetta.Value = Mynum
CmdAnnulla.Enabled = True
CmdAggiorna.Enabled = True
MascNote.Visible = False
SubMascImprestata.Visible = False
CmdSuccessivo.Enabled = False
CmdUltimo.Enabled = False
CmdPrimo.Enabled = False
CmdRicerca.Enabled = False
CmdStampa.Enabled = False
CmdPrecedente.Enabled = False
TxtTitolo.SetFocus
CmdNuovo.Enabled = False
End Sub

 :
Scusate dimenticavo i saluti
Ciao
Franco
Newsgroup: it.comp.appl.access
Titolo: Problema complesso

Oggi approfitto una seconda volta della vostra pazienza...
Io ho le seguenti tabelle:
. tabella persone (con un segno di spunta per distinguere tra fisiche e
giuridiche),
. tabella numeri di telefono, dove ci sono solo i numeri, a campo unico (il
campo è chiave primaria)
. tabella di collegamento persone_telefoni
. tabella contenente i tabulati telefonici ed in particolare i campi
telefono chiamante e telefono chiamato
.tabella contenente la denominazione del singolo affare
tabella di collegamento persone_affari
Bene il problema è questo: io dovrei stampare un report in cui di ogni
singola persona mi vengano individuate le relazioni telefoniche distinte per
affare e, per ciascun affare, distinte per persona fisica, persona giuridica
e telefoni di cui non sia ancora noto l'intestatario. Esemplificando,
dovrebbe uscire una roba del genere: Rossi Emilio: per l'affare "VERDI" ha
chiamato Bianchi Giorgio (elenco persone fisiche chiamate), la società
SERENISSIMA (elenco delle perone giuridiche chiamate) e lo 0328456789
(elenco dei numeri di telefono chiamati e non ancora associati ad un
soggetto) ed ha ricevuto telefonate da Martini sergio (elenco delle persone
fisiche chiamanti), dalla SAIEP (elenco delle persone giuridiche chiamanti)
e dallo 045678934 (elenco dei numeri non associati dai quali è stato
chiamato). Poi, contenendo la tabella tabulati anche la durata in secondi
delle singole conversazioni, per ogni soggetto chiamante o chiamato preso in
considerazione dovrei riuscire a visualizzare il tempo totale delle
chiamate.
So che è come avervi chiesto la luna, ma per me è importante ed è un
rompicapo inestricabile.
Grazie mille anticipatamente


Probabilmente dovresti  collegare im modo "diretto" le persone con i
telefoni. La tabella di collegamento ... a che ti serve ? se la tuatabella
delle persone ha un campo id_persona di tipo contatore , allora colleghi i
numeri a quella persona con l'id_persona. Per il resto sono normalissime
query che generano dei report. Nulla di particolare, solo stai attento alla
esatta creazione dei collegamenti tra tabelle . di solito , e questo i Guri
del ng lo sanno, si perde più tempo nella stesura dell'architettura del Db
che nella successiva fase di filtratura dei records. Tornando al tuo
problema, prova a costruire delle query con le autocomposizioni, secondo me
non dovresti avere grossi problemi, nel caso , risposta al NG. In pratica la
query te la sei già costruita da solo facendoti la domanda! Ciao Ciao .Luca.

Anzitutto grazie per la risposta
La tabella di collegamento serve perchè vi sono dei casi in cui il telefono
è intestato ad una persona ma in uso ad un'altra ed occorre tenere distinti
questi due dati....


Newsgroup: it.comp.appl.access
Titolo: Casella combinata

Come è possibile aggiungere in una casella combinata l'opzione che
visualizza tutti i valori, (tra quelli predefiniti).
Ciao
Benedetto

 wrote in message
news:k3Q9a.184443$
ZE.55...@twister2.libero.it

Devi usare una UNION ..... SELECT, ma trovi un esempio
chiarissimo sul sito comune.
www.sitocomune.com
@Alex.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.appl.access
Titolo: Appuntamenti

Ho queste tabelle...
- Tabella MEDICI   ( ID - Nominativo - Specializzazione)
- Tabella Pazienti ( ID - Nominativo - ecc. ecc. )
- Tabelle Prestazioni ( ID - TipoPrestzione - )
- Tabella Prenotazioni ( ID - IDPaziente - IDPrestazione -
DataPrenotazione)
Devo fare in modo che le prenotazioni vadano a saturare la giornata di
prenotazione per quel tipo di prestazione, in una maschera inserisco
tutti le informazioni necessarie, pero' vorrei poter vedere le
disponibilità dei vari medici. Chi sa darmi qualche dritta, magari è
qualcosa servita a qualcun'altro.
Grazie in anticipo...
Mauro

 ha scritto nel messaggio
news:KcAob.390046$R32.12...@news2.tin.it...

Strano mi sembra di averla già letta questa!
Cmq il ragionamento è questo : devi assegnare ad ogni prestazione
un massimo numero di prenotazioni al giorno quindi ogni volta che carichi
una
prestazione devi prima contarti il numero di prenotazioni già esistenti.
Esempio
Nella tblPrestazioni uno dei campi sarà NumeroMassimo
IDPrestazione     1
TipoPrestazione Ortopedia
NumMax           5
Quando selezioni un paziente per assegnargli una visita estrai dalla
tblPrenotazioni  l'IDPrestazione e ti fai un RecordCount
Segue una traccia l'ho fatta a braccio ma è un inizio!!!!
SunRex
dim strSQLPrestazioni as String
dim strSQLPrenotazioni as String
dim intNumMax As Integer
dim intPrestazioniAssegnate as Integer
strSQLPrestazioni ="SELECT NumMax FROM tblPrestazioni WHERE IDPrestazioni =
l'ID della prestazione scelta"
set rsPrestazioni = db.OpenRecordset(strSQLPrestazioni)
intNumMax = rsPrestazioni.Fields("NumMax")
strSQLPrenotazioni =="SELECT IDPrestazione FROM tblPrenotazioni WHERE
IDPrestazioni = l'ID della prestazione And Data =la data del giorno
selezionato"
set rsPrenotazioni=db.OpenRecordset("strSQLPrenotazioni")
If rsPrenotazioni.BOF And rsPrenotazioni.EOF Then
procedura di inserimento visita
Else
rsPrenotazioni.MoveFirst
rsPrenotazioni.MoveLast
intNumMax= rsPrenotazioni.RecordCount
If intPrestazioniAssegnate >= 5 Then
   MsgBox" Impossibile prenotare il numero delle visite a disposizione per
la prestazione scelta è completo",vbInformation
    Exit Sub
Else
    procedura di assegnazione
etc etc
Newsgroup: it.comp.appl.access
Titolo: Query: mettere in OR i criteri di due campi?

Ciao,
la tina si sta chiedendo:
ho una query. voglio che mi selezioni i record che soddisfino il criterio
del campo 1 OR del campo 2 (insomma, in almeno uno dei due!)
come pu� fare la tina?
ha un'altra strada? (non suggeritemi di andare sotto un lampione eh)
grazie
ciao
La Tina
Uso access 2003
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Uso access 2003
La Tina può studiare il linguaggio SQL nelle sue BASI più BASILARI ed
arrivare al Costrutto corretto...
SELECT *
FROM T1
WHERE
     Campo1='AAA'
         OR
     Campo2=55
Saluti
@Alex

 ...
Se lavori nella visualizzazione struttura delle query guarda bene
che sotto la riga "Criteri:" c'è un altro "Oppure:" che esiste proprio
per questo caso.
Vuol dire: inseri il criterio per il primo campo nella righa "Criteri:"
e il criterio per il secondo campo nella riga "Oppure:". Già nella
vis. struttura ci sono 9 righe per criteri OR e con SQL si puo usare
molto in più.
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 

 @Alex
La Tina non è un'informatica, La Tina si è avvicinata ad access per
semplificarsi la vita e si sta riuscendo ma non ha molto tempo per
studiare SQL, ne conosce l'esistenza e promette che se mai avrà tempo lo
farà...
esiste un manuale dedicato ad SQL per Le Tine? (for dummies...)
La Tina ringrazia


 molto in più.
La tina sentiva che quacosa di simile doveve esistere ma data l'ora non
capiva neanche più come si chiamava!
Grazie a tutti!!!!


 Uso access 2003
La Tina ha cominciato a studiare Access a squola e non riesce a fare i
compiti?
Ciao.
-Marco-


 Uso access 2003
La Tina ha cominciato a studiare Access a squola e non riesce a fare i
compiti?
Ciao.
-Marco-
-- 


Newsgroup: it.comp.appl.access
Titolo: forecolor casella combinata

Ciao a tutti.....
volevo chiedervi come posso far cambiare il colore del testo di un record 
della mia casella combinata....con un doppio click
Grazie a tutti
Ciao Luca 

La ComboBox o Casella Combinata non supporta questa formattazione.
Ciao
@Alex


Grazie Alessandro......:-(
Newsgroup: it.comp.appl.access
Titolo: Calcolo per il "fuori 90"

Buongiorno a tutti
questo il mio problemino:
Ho la necessità da un numero iniziale superiore a 90 di ottenere il numero
relativo inferiore a 90.
Mi spiego:
Ho il numero 156.......viene sottratto il 90 e quindi il numero che ottengo
è 66. (Se fosse 141 il mio numero sarebbe 51 etc etc etc).
Sino a qui molto semplice da calcolare ma quando il numero è per esempio
12.248 ???
Mi potreste spiegare un sistema per il calcolo ?
Grazie
Luigi

 ha scritto nel messaggio
news:jkcIa.103566$lK4.2...@twister1.libero.it...

tuonumero - (90*int(tuonumero/90))
se ho capito giusto
AEOM

"All Eyez On me" <in...@FUCK-LAMERbfsistemi.com> ha scritto nel messaggio
news:iFcIa.110487$pR3.2...@news1.tin.it...

Tutto questo è molto bello, ma quello che chiede lui mi pare sia il classico
concetto algebrico (algebra universitaria) di modulo, quello delle
congruenze.
Basterebbe applicare la funzione MOD che da il resto della divisione di un
numero per un altro.
Che mi pare sia quello che vuole lui...
Antonio

 ha scritto nel messaggio

NumeroMinore90 = TuoNumero Mod 90
Sib

"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:isdIa.110619$pR3.2...@news1.tin.it...

Grazie a tutti e 3
Luigi
Newsgroup: it.comp.appl.access
Titolo: Elimina arrotondamento

come posso eliminare l'arrotondamento da questa query:
ImportCredit: IIf(nz([ImportoCredito]);([ImportoCredito]);0)
visto che gli importi inferiori a 0,50 non me li riporta?
Grazie 

Antonio ha scritto:

Vedi:
www.donkarl.com/it?FAQ2.1
 
--
sv
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

mi da 0 e ovviamente questo sfalsa il saldo. 

Antonio ha scritto:

Fai un esempio per capire meglio il tuo problema.


saldi.
Ho provato ad inserire "Abs" all'inzio della query, ma non cambia nulla.

Antonio ha scritto:

Imposta nella tua tabella il campo "ImportoCredito" --> Precisione
doppia--Standard-->Cifre decimali=2
Poi nella tua query nella propriet� del campo "ImportCredit", imposta
Standard --> Cifre decimali 2.


ma non cambia nulla 

Antonio ha scritto:
[cut]

Posta un esempio con i numeri. Fai capire cosa trovi in "ImportoCredito" e
cosa vorresti che fosse in "ImportCredit" della tua query.


interferenze dovute ai campi della maschera EstrattoConto.
Ovviamente � inutile dirti che nella tabella risulta il movimento di 0,48 
euro 

Antonio ha scritto:

 Quindi il problema � nella maschera. Controlla bene le impostazioni della
tua casella "ImportoCredito" nella maschera. Anche l� deve essere
Standard-- cifre decimali=2


 ha scritto nel messaggio 
news:h2l87u$prt$1...@news.newsland.it...

Assolutamente no, ti ho anche detto che seppure eseguo solo la query senza 
richiamare la maschera "estrattoconto"  mi restitutisce 0 anzicch� 0,48 
questo proprio per escludere eventuali


Antonio ha scritto:

Nella tua query, in visualizzazione struttura, nella griglia dei campi,
come hai impostato la propriet� del campo che ti restituisce un valore
errato? La propriet� la trovi facendo click con il pulsante destro del
mouse sul campo.


Standard - 2 decimali 

Ciao "Antonio" <asda> ha scritto nel messaggio 
news:4a4e51c1$0$18929$4faf...@reader2.news.tin.it...
---cut---
prova cosi:
IIf([ImportoCredito] is not null;([ImportoCredito]);0)
-- 
Ciao
Geppo 

"Geppo" <c...@tin.it.invalid> ha scritto nel messaggio 
news:yeu3m.31185$1s6....@twister2.libero.it...

Ciao Geppo, potevi farti vivo un po prima! Funziona
Grazie 

Mauro ha scritto:

Escludevo a priori che tu avessi valori nulli in un campo numerico.
Il predefinito � sempre 0.
Tra l'altro parlavi di Conti Correnti.


 Tra l'altro parlavi di Conti Correnti.
non credo sia un problema di valori nulli, ma della funzione Nz che 
restituisce solo la parte intera del numero pertanto false in caso di 0,46.
-- 
Ciao
Geppo 

Geppo ha scritto:


La funzione NZ resituisce 0 o una stringa a lunghezza 0 se il valore �
numerico o testo. Nella finestra immediata Nz(0.48) mi restituisce 0,48.


 sv
E' partito il post senza completarlo..
Si intende NZ applicato a valori Null..


 Si intende NZ applicato a valori Null..
-- 
Ciao
Geppo
Newsgroup: it.comp.appl.access
Titolo: record modificati

ciao
c'e' un modo per sapere quali sono i record nuovi o modificati senza
utilizzare un campo specifico che mi indica lo stato del record?
grazie

Sirius Black ha scritto:

Prova a cercare sulla guida in linea "Dirty" e vedi se fa al caso tuo.
Namor
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.appl.access
Titolo: ME!LIMITE RECORD

Non capisco assolutamente l'utilizzo della parole chiave Me............che
senso ha specificare che la form dove sto operando e' quella attuale quando
omettendo il Me! sarebbe essa stessa x default?
(scusate forse non ho capito bene il suo utilizzo)
Inoltre vorrei chiedervi se esiste un metodo semplice x limitare il numero
massimo di record che un utente puo' inserire
Grazie a tutti...........ciao

 massimo di record che un utente puo' inserire
Non esiste, devi fare il controllo da codice.
Sib

Newsgroup: it.comp.appl.access
Titolo: casella non associata e ricerca

ho una casella non associata per la ricerca del cognome nel cui codice
dopo aggiornamento ho la seguente formula:
Private Sub CasellaCombinata68_AfterUpdate()
       Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[contatore] = '" & Me![CasellaCombinata68] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
mentre nell'origine riga ho:
SELECT Contatti.Cognome, Contatti.Nome, Contatti.Societą,
contatti.contatore FROM Contatti WHERE (((Contatti.Cognome)<>"")) ORDER BY
Contatti.Cognome; 
colonna associata 4
il tutto mi funziona bene ma vorrei che comparisse il messaggio "elemento
non trovato" se nella ricerca del cognome che inserisco non esiste nessun
cognome uguale a quello digitato. (tipo il cannocchiale "trova" dei
comandi preimpostati)
se si puo, come fare!   
obbligato!
luigi
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
con
If rs.Nomatch Then
    MsgBox "elemento non trovato"
Else
    Me.Bookmark = rs.Bookmark
End If
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

Karl Donaubauer ha scritto:



non va bene in parte, e cioč compare il messaggio solo se inserisco uno
spazio bianco, ma se inserisco un testo non in elenco compare solo il
messaggio microsoft "il testo immesso non corrisponde ad una voce
dell'elenco - selezionare una voce dell'elenco oppure immettere del testo
che corrisponda ad una delle voci elencate"
altre soluzioni?


 End If
contatore si perche è un campo a dati unici , se mettevo cognome, e vi era
nell'archivio più di un cognome, qualsiasi di esso che selezionavo, mi
andava sempre sul primo della lista.
per questo motivo faccio la ricerca sul cognome ma la ricerca si aggancia
al contatore (dati unici).


 altre soluzioni?
Per me non è chiaro cosa vuoi.
Se vuoi permettere valori non in elenco devi cambiare le intestazioni
della casella. La prima colonna deve contenere il testo di ricerca
e dev'essere la colonna associata.
Se non vuoi permettere valori non in elenco (com'è adesso) devi
gestire l'evento Non In Elenco della casella circa così:
Response = acDataErrContinue
MsgBox "elemento non trovato"
'eventualmente anche
' Me!TuaCombo.Undo

Newsgroup: it.comp.appl.access
Titolo: Re: Coloraz record se campo assume un valore o l'altro

>Hai scelto la condizione falsa dalle 3. Questo che ti serve non
è "l'espressione è" ma "ll valore del campo è" o simile nella
versione italiana di Access.
Grazie effettivamente scegliendo la conzione 'il valore del campo è compreso
tra' "Palermo" e "Palermo" il campo si colora come gli ho indicato io, ma
vorrei anche colorare tutto il recordo (riga) in corrispondenza dello stesso
campo.
Come posso fare ?
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio 
news:213Z140Z17Z105Y...@usenet.libero.it...

Con il pulsante "copia formato" viene copiata anche la formattazione 
condizionale.
Ciao
Salvatore 


          Ti ringranzio Salvatore, ma la formattazione condizionale sugli altri campi
dello stesso record non ha per condizione tra' "Palermo" e "Palermo". Quindi
mi funziona ancora su un campo solo e non su tutto il record.
Come possa fare ?


 > > Grazie effettivamente scegliendo la conzione 'il valore del campo è
