mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Installare Runtime Access + db

Per Access 97 / 2000 / 2002.
Con il Runtime per Access 97 / 2000 / 2002 esiste un modo per creare un
pacchetto autoinstallante con il quale guidare la stessa installazione, ad
esempio: in C:\
Grazie .. Bruno

 ha scritto nel messaggio
news:HJ_Cb.92110$AX1.3...@news1.tin.it...

Certo. E' una delle peculiarità del programma.
Ciao
Salvatore

 ha scritto nel messaggio
news:bri32u$l6i$1...@lacerta.tiscalinet.it...

-----
Ciao Salvatore,
fammi capire, il database creato devo copiarlo in una cartella
successivamente all'installazione del Runtime o si procede diversamente?
Riciao e grazie
                        Bruno

 ha scritto nel messaggio
news:ja2Db.210303$hV.81...@news2.tin.it...

Se usi la versione developer, fa tutto lui quandro lo crei.
stefano (kabisa)

Newsgroup: it.comp.appl.access
Titolo: Access XP si chiude inaspettatamente...

Buongiorno a tutti,
sto facendo un programma con delle query particolarmente lunghe e quando le 
creo e le salvo come origine dati di una maschera Access non salva la 
maschera ed esce senza dir nulla.
Succede anche a voi?
Allego un esempio di query cosě mi dite se č davvero troppo lunga e ci sono 
dei limiti nella lunghezza.
Grazie e saluti a tutti, Manu
SELECT tabAffitti.affitto_id, UCase([tabAppartamenti].
[appartamento_indirizzo]) & " - " & [tabAppartamenti].[appartamento_cap] & 
" " & UCase([tabAppartamenti].[appartamento_citta]) & " " & UCase
([tabAppartamenti].[appartamento_provincia]) & " - SUB.: " & 
[tabAppartamenti].[appartamento_subalterno] & " - P.: " & UCase
([tabAppartamenti].[appartamento_piano]) AS appartamento_riferimento, 
tabClienti.cliente_nome_visualizzato, Max
(tabAffittiPagamenti.affitto_pagamento_data) AS affitto_pagamento_data_max
FROM ((tabAppartamenti INNER JOIN tabAffitti ON 
tabAppartamenti.appartamento_id = tabAffitti.affitto_appartamento_id) INNER 
JOIN tabClienti ON tabAffitti.affitto_inquilino_id = tabClienti.cliente_id) 
LEFT JOIN tabAffittiPagamenti ON tabAffitti.affitto_id = 
tabAffittiPagamenti.affitto_pagamento_affitto_id
GROUP BY tabAffitti.affitto_id, UCase([tabAppartamenti].
[appartamento_indirizzo]) & " - " & [tabAppartamenti].[appartamento_cap] & 
" " & UCase([tabAppartamenti].[appartamento_citta]) & " " & UCase
([tabAppartamenti].[appartamento_provincia]) & " - SUB.: " & 
[tabAppartamenti].[appartamento_subalterno] & " - P.: " & UCase
([tabAppartamenti].[appartamento_piano]), 
tabClienti.cliente_nome_visualizzato, 
tabAffitti.affitto_data_fine_contratto
HAVING (((tabAffitti.affitto_data_fine_contratto)<Date()))
ORDER BY tabClienti.cliente_nome_visualizzato;

"Manu"

Funziona nel query builder?
Il problema si verifica anche se reimporti tutto in un nuovo .mdb?
Ciao, Pixel
Newsgroup: it.comp.appl.access
Titolo: evitare doppio inserimento tramite controllo partita iva e/o codice  fiscale

Salve a tutti.
Prendendo spunto dalla lettura di altri post ho adottato nella mia
maschera di inserimento anagrafica su evento prima di aggiornare dei
campi "partitaIva" e "codfisc" il controllo se già esiste in un'altra
anagrafica con gli stessi valori.
Il codice relativo a partita iva (campo numerico) funziona ed è
questo:
If Not IsNull(DLookup("partitaiva", "tblAnagrafica", _
    "partitaiva = " & Chr$(34) & Me!partitaiva & Chr$(34))) _
    And Me!partitaiva <> Nz(Me!partitaiva.OldValue) Then
  MsgBox Me!partitaiva & " Già esiste.", vbOKOnly, "Duplicato!"
  Cancel = True
quello relativo a codfisc (campo testo) invece mi dice erroneamente
che il codice fiscale è già presente anche quando invece non lo è, e
il codice inserito è questo.
If Not IsNull(DLookup("Codfisc", "tblAnagrafica", _
"codfisc = " & Chr$(34) & Me!Codfisc & Chr$(34))) _
   And Me!Codfisc <> Nz(Me!Codfisc.OldValue) Then
  MsgBox Me!codfisc & " Già esiste.", vbOKOnly, "Duplicato!"
  Cancel = True
End If
Cosa dovrei cambiare?
Ciao.
Giuseppe.

 ha scritto nel messaggio 
news:810d54a9-e19c-4a34...@m73g2000hsh.googlegroups.com...




Se mettessi in tabella duplicati non ammessi per il campo?
Il prolema sarebbe già risolto...
Per quanto riguarda il codice io lo scriverei in un altro modo...anche 
perchè non mi convince la condizione Me!Codfisc <> Nz(Me!Codfisc.OldValue), 
non sono sicuro del valore che restituisce Codfisc.OldValue, potresti 
provare così...
If IsNull(DLookup("Codfisc", "tblAnagrafica", _
"codfisc = '" & Me!Codfisc & "'")) _
   or Me!Codfisc = Nz(Me!Codfisc.OldValue) Then
exit sub
else
  MsgBox Me!codfisc & " Già esiste.", vbOKOnly, "Duplicato!"
  Cancel = True
End If
Ciao
-- 
Roberto da Parma 

 ha scritto nel messaggionews:810d54a9-e19c-4a34...@m73g2000hsh.googlegroups.com...

Scusa Roberto non funziona, credo pechè il nome del campo si chiama
codfisc, mentre l'origine "codice fiscale".
Dove devo cambiare codfisc con [codice fiscale]?
Grazie.
Giuseppe.

 Giuseppe.
-- 
Ciao
geppo 


Preciso. Come al solito inappunta.
Grazie Geppo.
Ciao. Giuseppe.
Newsgroup: it.comp.appl.access
Titolo: Come creare un nuovo GRUPPO in Outlook Express ???

Allura, per spedire il solito allegato di invito o promozionale alla solita 
sfilza di clienti ero solito fare una procedura che ciclasse fra i 
nominativi richiesti ed inviasse tante e-mail quanti erano i nominativi 
scelti
Funziona tutto pero e' prego come una lumaca, el me pias brisa
Il recente post di Pablitomf su Outlook mi ha stimolato una curiosita' che 
ora vorrei 'evadere'
In sostanza vorrei spedire un'email ad una lista di 1000 clienti, piuttosto 
che mille email ognuna ad un destinatario diverso
Quindi la mie domande sono:
- commo se fa a greare un GRUPPO su Outlook Espresso ?
- commo se fa ad informare l'Outlukko del fatto che il destinatario non e' 
un'indirizzo ma un GRUPPO ?
Ovviamente il tutto rigorosamente da codige vba
Ciao e grazie
RobertoA

RobertoA ha scritto:

Ma non fai prima invece del gruppo a ciclare solo tra i contatti, separarli con ';' e metterli nel CCn? Cos� puoi anche cambiarli alla bisogna......
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it


Si, farei prima
Ma questo lo so fare
Volevo imparare a creare un gruppo, che non so ancora fare
Ciao
RobertoA

 ha scritto nel messaggio 
news:4a1e8d19$1...@newsgate.x-privat.org...

Ma il gruppo lo vuoi creare in Outlook??
In quel caso devi aggiungere i riferimenti ed usare le librerie...ma...
1. te lo sconsiglio per il fine che vuoi raggiungere
2. 1000 indirizzi in un gruppo e inviare � una pratica che non andr� a buon 
fine e rischi di essere visto come "spammers"
3. non capisco il senso nell'iterazione con access...in quanto db... il 
gruppo lo dovresti creare in AC che c'entra Outlook?
4. molto meglio e andr� sicuramente a buon fine il ciclare il singolo 
indirizzo
Ciao
-- 
Roberto da Parma

Newsgroup: it.comp.appl.access
Titolo: Assegnare un valore a CurrentUser()

Ciao a tutti,
Vi chiedo cortesemente se avete una soluzione rapida ed indolore per
assegnare
un valore alla funzione CurrentUser().
Ho creato due data base, uno per l'accesso ai dati tramite alcuni filtri
legati all'utente.
Il secondo per l'amministrazione. Vorrei smplicemente replicare il
primo, ma restituire a CurrentUser() un valore proveniente da una
casella combinata.
Grazie mille.

Perchè nessuno mi risponde?


 Perchè nessuno mi risponde?
Perchè non scrivi DOPO il quoting!!!
Antonio
Newsgroup: it.comp.appl.access
Titolo: foglio dati secondario

http://support.microsoft.com/?id=275085
http://www.microsoft.com/office/previous/xp/columns/column05.asp
Ciao a tutto il NG!
Sono incappato oggi su articoli MS circa bugs presenti in A00 e succ
riguardo l'impostazione default ad "Automatico" della proprietà "Nome
foglio dati secondario" delle tabelle.
Questa impostazione in strutture BE-FE porta ad una notevole perdita di
prestazioni che si corregge impostando la stessa proprietà a "Nessuno"
su ogni tabella collegata nel FE.
Sottolineo che la proprietà impostata sulla tabella collegata nel FE
non modifica la stessa proprietà sulla tabella presente nel BE.
Spero possa servire a chi come me non ne era al corrente; invito invece
chi fosse a conoscenza di altre anomalie a condividerle con tutti.
Buona giornata, Beppe.

 ha scritto nel messaggio 
news:1164875742.4...@80g2000cwy.googlegroups.com...
http://support.microsoft.com/?id=275085
http://www.microsoft.com/office/previous/xp/columns/column05.asp


Buona giornata, Beppe.
[risposta]
Ciao e grazie.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: facile per esperti ...grazie

devo sommare il risultato di 2 campi in un terzo campo in una query..grazie
--------------------------------
Inviato via 
http://usenet.iol.it

devo sommare il risultato di 2 campi in un terzo campo in una query..grazie
Campo1 + campo2.
Certo, e' da esperti....:-)
Saluti.
Luciano

 ha scritto nel messaggio
news:ab3bkd$epltk$1...@ID-86073.news.dfncis.de...

Infatti l'hai chiesto a me e poi l'hai postato come tua risposta, bravo
plagiario...
Antonio

Newsgroup: it.comp.appl.access
Titolo: Intestazione Report

Ciao amici del NG, vengo a Voi con un nuovo quesito.
Premetto che:
Ho la tabella "Tb_Soci "
con i campi "Data Adesione" , "Cognome" ed altri che non elenco. Ne deriva
la query "Q_Soci" che con il criterio (impostato sul campo Data Adesione)
Between [Inserisci la data inizio periodo] and [Inserisci la data fine
periodo]
ottengo tutti i nuovi soci del periodo in questione.
Chiedo:
come fare affinchè i due valori, cioò la data di inizio periodo e la data di
fine periodo (immettendo i valori in una form) mi appaiano (magari in due
controlli) nell'intestazione del mioreport.
Grazie a quanti parteciperanno.
CF

 ha scritto nel messaggio
news:4Skp9.14149$%M1.3...@twister2.libero.it...

argomento già affrontato in precedenti post del 25/8/2002 e del 24/9/2002
entrambi si occupano di variabili nei report e quindi come trasferire i
valori dei parametri nel report.

Newsgroup: it.comp.appl.access
Titolo: ricerca spazio

Che sintassi si usa per trovare uno spazio nella stringa ?
In un campo testo campo1 cerco tutto quello che sta a destra del terzo 
spazio partendo da sinistra.
grazie 


Come non hai rivelato la tua versione di Access decido che hai la
più nuova. Allora p.e. in una query puoi usare un'espressione come:
Left([campo1];InStr(Replace([campo1];" ";"_";1;2);" ")-1)
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
+ Conferenza Italiana per Sviluppatori di Access (CISA) 

 a destra...partendo da sinistra
sarebbe
Mid([campo1];InStr(Replace([campo1];" ";"_";1;2);" ")+1)

Newsgroup: it.comp.appl.access
Titolo: Protezione a livello utente togliendo l'amministratore

E' possibile proteggere un database sfruttando la "Protezione a livello
utente" eliminando l'utente Amministratore (in modo da escludere qualsiasi
accesso a chiunque)?
Grazie

 accesso a chiunque)?
Non è possibile di eliminare l'utente Amministratore.
Puoi solo togliere i suoi diritti. Vedi punto 9 su
http://support.microsoft.com/support/Access/Content/SECFAQ.asp
-- 
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 ha scritto nel messaggio
news:bttqi8$c0t$1...@atlantis.cu.mi.it...

Solitamente si genera un utente con le concessioni di Amministratore
e si declassa l'Amministratore, pichè non si può eliminare....!
Ciao.
@Alex.

Newsgroup: it.comp.appl.access
Titolo: sincronizzare due FE

mi spiego
2 pc 2 FE
1 BE su un terzo pc senza operatore
per fare in modo che se un dato viene scritto da un FE l'altro lo visualizzi
subito,
quale è l'impostazione da modificare per far si che l'altro FE, che è sulla
solita maschera
possa vedere subito il dato modificato?
timeout connessione? DDE? ODBC?
Grazie
Nik

 Nik
Perche timeout connessione ?
DDE ? , se usi comandi DDE...
ODBC ? , fai uso di connessioni ODBC ?
Ci si potrebbe arrivare per esclusione ;-)
Prova a vedere per Intervallo Aggiornamenti (sec)
Non so che versione di Access usi, in ogni caso:
Sturmenti->Opzioni->Avanzate
Per ogni voce pigiando il pulsantino con il punto
interrogativo e riportandolo sull'argomento di questa
maschera di setup dovrebbe visualizzarti il significato\uso.
--
lorenzo
Newsgroup: it.comp.appl.access
Titolo: cambiare colore in report in base a valore campo

ho la necessità di cambiare colore ad un campo in base al valore dello
stesso.
Ho letto sul newsgroup del metodo me.qualcosa.forecolor con una routine
di questo tipo nell'evento "Su formattazione" del corpo del report:
Private Sub Detail0_Format(Cancel As Integer, FormatCount As Integer)
Select Case Me.mrepap
    Case "EST"
    Me.mrepap.ForeColor = 100
    Case Else
    Me.mrepap.ForeColor = 50
End Select
End Sub
quando tento di compilare mi restituisce:" impossibile trovare il metodo
o il membro dei dati", riferendosi al metodo forecolor.
Cosa sbaglio nella sintassi?
La versione che uso è Microsoft Access 97 completo, MDAC 2.6
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

NESSUNO MI RISPONDE PLEASE!!!!!!


 ha scritto nel messaggio
news:e1cdbf0534f48095908...@mygate.mailgate.org...

Innanzitutto in un report (come in una maschera) non ci sono i campi Che
sono invece contenuti nelle tabelle o nelle queries.
Se il controllo che si trova nella sezione Corpo e che deve cambiare colore
a seconda del suo valore si chiama mrepap, prova con:
Private Sub Corpo_Format(Cancel As Integer, FormatCount As Integer)
If Me!mrepap = "EST" Then
    Me!mrepap.ForeColor = 100
Else
    Me!mrepap.ForeColor = 50
End If
End Sub
Attento però, che i colori 100 e 50 sono molto simili, non vorrei che non
noti la differenza; perché non provi con 255 (rosso) e 0 (nero).
Comunque non capisco a fronte di quale evento stai lavorando: dovrebbe
comunque essere
Private Sub Corpo_Format...
e non
Private Sub Detail0_Format...
Cosa è Detail0 ?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

quando metto il metodo Me!mrepap.Forecolor mi dą "Proprietą o metodo non
supportati dall'oggetto"


 stesso.


 ---------------------------------------------


 ---------------------------------------------


 > stesso.
mi dispiace ma questo è excel...



La formattazione condizionale esiste anche per Accees 2000 ed Access XP; non
esiste invece per Access 97 e versioni precedenti.
--


 nell'evento "su formattazione" del corpo del report.
Io uso Access 97 in italiano ed il nome predefinito che Access usa quando
vado a generare un  codice VBA a fronte dell'evento "Su formattazione" della
sezione corpo del report è apunto Corpo.
Ti confermo che in A97 ciò che ti serve si può fare generando il seguente
codice VBA a fronte dell'evento "Su formattazione" della sezione Corpo del
report:
Private Sub Corpo_Format(Cancel As Integer, FormatCount As Integer)
If Me!mrepap = "EST" Then
    Me!mrepap.ForeColor = 255
Else
    Me!mrepap.ForeColor = 0
End If
End Sub
Non riesco ad ipotizzare il motivo per il quale a te le cose vanno così.
--

Newsgroup: it.comp.appl.access
Titolo: aggiornamento del db

buongiorno a tutti
per aggiornare il mio db su un altro pc quello del cliente
attualmente faccio così
creo un db Trasfer su floppy dove ci metto gli aggiornamenti
(query,maschere ecc.ecc.)
dopo con copia e incolla aggiorno il db del cliente.
esistono altre procedure piu' eleganti ?
ciao gianni.



da codice importi gli oggetti dal db aggiornamento...
Saluti.
Emanuele.

 ha scritto nel messaggio
news:3e1e5...@news.dada.it...

Molto conveniente è l'aver diviso il database in BE e FE: tutte le tabelle
in un db e tutto il resto in un altro db.
Se ciò è stato fatto ti è sufficiente copare il FE con le modifiche e
sostituire il "vecchio".
Se questa non è la situazione la vedo brutta perchè il db che ha il cliente
"non può sapere" quali modifiche farai, a meno di aver creato una complessa
gestione degli oggetti.
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: filtrare record che hanno un certo campo che si ripete più di una volta

ho un elenco record con
 
numero    nome      cognome
1               mario     rossi
1               mario     rossi
2               stefano  bianchi
3               paolo     rossi
 
 
dovrei filtrare solo i record con numero che appare pi� di una volta
quindi il recordset filtrato restituir�
1  mario rossi
1 mario rossi
 
in quanto il numero 1 � l'unico ad apparire pi� volte.
 
 
grazie. 
 

Query raggruppata con CONTEGIO su CAMPO da CONTARE(nel tuo caso sarà Nome+Cognome) visto che non hai un ID UNIVOCO, cosa assurda..., quindi metti un CRITERIO >1
 
@Alex

@Alex
 
l'id univoco c'� ed � idallievo quindi conteggio quello grazie.

Newsgroup: it.comp.appl.access
Titolo: Query con somme parziali

Devo creare un grafico che contenga delle somme parziali perciò ho bisogno
di una query che faccia questo calcolo:
NOME   VAL    SOMMA PARZIALE
Pippo       10                    10
Pluto        30                    40
Pinco       10                    50
Nel grafico andrà inserito sull'asse delle X il nome e su quello delle Y la
somma parziale.
Sapete darmi una risposta in merito?
PS i campi nome e val sono in una tabella che chiamerò ARCHIVIO.
Grazie.

 ha scritto nel messaggio
news:3a246...@news.dada.it...

Devi prima stabilire una chiave univoca in base alla quale ordinare le righe
della query.
Se per te va bene ordinare in base al campo NOME, il codice SQL della query
potrebbe essere:
SELECT ARCHIVIO.NOME, ARCHIVIO.VAL, DSum("VAL","Query1","NOME <=" & Chr$(34)
& [NOME] & Chr$(34)) AS [SOMMA PARZIALE]
FROM ARCHIVIO
ORDER BY ARCHIVIO.NOME;
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Aprire una maschera filtrando il record di partenza

Voglio aprire una maschera filtrando il record interessato e ho quindi scritto questo:
Sulla maschera di partenza "M_TrasportiDaFatturareRegistrati" ho inserito su doppio click del campo IDOrdine il seguente comando:
 
Private Sub IDOrdine_DblClick(Cancel As Integer)
DoCmd.OpenForm "M_InputBolle", , , , , , "M_TrasportiDaFatturareRegistrati"
End Sub
 
Sull'evento su_apertura della maschera "M_InputBolle" ho inserito questo codice:
 
Private Sub Form_Open(Cancel As Integer)
Me.OpenArgs = "M_TrasportiDaFatturareRegistrati" 
Me.Filter = Forms!M_TrasportiDaFatturareRegistrati.Form.Filter
Me.FilterOn = True
End Sub
 
ma non mi filtra il record in questione di partenza. Il record di partenza lo vorrei filtrare da IDOrdine
Cosa mi manca?
 
Grazie.
 
Andrea

Se la maschera di "Partenza" ha già il Filtro ed è valorizzato per i dati che ti servono ... basta scrivere questo:
 
Private Sub IDOrdine_DblClick(Cancel As Integer)
   DoCmd.OpenForm "M_InputBolle", , ,Forms!M_TrasportiDaFatturareRegistrati.Filter
End Sub 
 
Chiaramente se questo codice risiede in [M_TrasportiDaFatturareRegistrati]
Private Sub IDOrdine_DblClick(Cancel As Integer)
   DoCmd.OpenForm "M_InputBolle", , ,Me.Filter
End Sub 
 
 
Il tuo codice è errato in quanto non riconosce il parametro... che peraltro Forzi nonostante lo passi come Args... insomma fai una bella confusione.
 
Eventualmente, ma non usarlo:
Private Sub IDOrdine_DblClick(Cancel As Integer)
   DoCmd.OpenForm "M_InputBolle", , , , , , "M_TrasportiDaFatturareRegistrati"
End Sub 
 
Private Sub Form_Open(Cancel As Integer)
   Me.Filter = Forms(Me.OpenArgs).Filter
   Me.FilterOn = True
End Sub 
 
 
@Alex


La maschera di "partenza" è una maschera continua ed è basata su una query.
Non ho filtri attivi. 
Ho fatto come mi hai detto, ma mi fa vedere tutti i record, non mi filtra il record al quale ho fatto doppio-click.
 
Andrea


Sto provando e riprovando, e mi sto chiedendo perchè non mi filtra il record con questo comando?
Private Sub IDSubOrdine_DblClick(Cancel As Integer)
DoCmd.OpenForm "M_InputBolle", , , Me.IDSubOrdine = Forms!M_TrasportiDaFatturareRegistrati.IDSubOrdine
End Sub
 
Ho controllato mettendo il punto rosso sul codice e mi fa vedere che il numero dell' IDSubOrdine viene memorizzato (posizionandomi col cursore sopra al codice mi mostra il fumetto "Me.IDSubOrdine = 729"), però quando faccio proseguire, mi apre la maschera senza filtrare nulla, mi apre la maschera sul primo record di 140 (è una maschera a vista singola). Perchèèeeee? 
 
Porta pazienza @Alex, non sono un programmatore, ma ho tanta passione!
 
Andrea

 ...
 
Se ti capisco bene, vuoi
 
DoCmd.OpenForm "M_InputBolle", , , "IDSubOrdine = " & _
     Forms!M_TrasportiDaFatturareRegistrati!IDSubOrdine
 
o se il codice si trova nella maschera 
"M_TrasportiDaFatturareRegistrati" basta
 
DoCmd.OpenForm "M_InputBolle", , , "IDSubOrdine = " & Me!IDSubOrdine
 
-- 
Ciao
Karl
*********
http://AccessDevCon.com
 
Access FAQ: 
http://donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: Maschera di ricerca di Windows

Salve a tutti,
devo permettere all'utente di selezionare un file da aprire che può aver
salvato in qualsiasi posizione
Volevo creare un pulsante che permette di aprire la maschera "APRI" di
Windows, ma non riesco a trovare riferimenti.
Mi sapete aiutare ???
GRazie antiipatamente per i post
Marco

 ha scritto nel messaggio
news:DnMFa.81166$Ny5.2...@twister2.libero.it...

Sul SitoComune c'è quello che cerchi.
www.sitocomune.com
@Alex.

 ha scritto nel messaggio
news:5QMFa.81284$Ny5.2...@twister2.libero.it...

Sul SitoComune c'è un articolo intitolato "Ricerca di un file sul
disco" che utilizza la proprietà FIleSearch
A  me interessa invece richiamare proprio la finestra di dialogo di Windows,
quella (per intenderci) che appare ogni volta che si clicca su APRI da
Access, Word o Excel

 ha scritto nel messaggio
news:51NFa.81791$lK4.2...@twister1.libero.it...

Usa un l'ocx comdlg32.ocx (Microsoft Common Dialog) che puoi inserire in una
maschera ma che puoi usare solo se hai installato la versione developer di
Office o VB o C++, ecc.
E' anche possibile usare le API ma che con WXP sembrano non funzionare.
Ciao, Carlo


Sul SitoComune c'è anche l'esempio che ti ho suggerito nella sezione
MODULI ed esattamente:
Usare le API di Windows in MSAccess - Parte I: le Common Dialog.
con anche un bel file di esempio.
Se però usi XP segui quanto ti ha giustamente suggerito Carlo, anche
se da me con XP funziona tutto..........!!
@Alex.

 ha scritto nel messaggio
news:51NFa.81791$lK4.2...@twister1.libero.it...

Non hai cercato bene.
Vai sul Sito Comune e nella Sezione General leggi la FAQ di Stefano Bettini
intitolata "Richiamare la finestra di dialogo per la selezione di un file".
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Query di eliminazione duplicati.

Ho una tabella contenente diversi campi tra cui un CodSede che può
contenere dati duplicati; un codice può comparire due volte, un altro
tre volte o anche più. Indipendentemente dal contenuto degli altri
campi, vorrei che di ogni codice ne rimanesse uno solo, cioè eliminare
un record qualsiasi fra i due che hanno lo stesso codice, due record
se le occorrenze sono tre, e via dicendo.
Pensavo di usare il valore di un altro campo, che ha sicuramente
valori diversi, ma non so come procedere.
Dopo aver inutilmente cercato l'apriscatole, qualcuno ha un po' di
"pappa pronta"?
Grazie a tutti
Riccardo Baldinotti

 ha scritto nel messaggio 
news:d6e6d046-965c-4de8...@l12g2000vby.googlegroups.com...

c'era mi pare qualcosa sul sito comune
io però per fare al volo faccio sempre cosi
 
copio la tabella origine
la svuoto
metto in chiave i campi che rendono duplicati i record
accodo dalla vecchia tabella alla nuova
 
scarta lui i duplicati e ne lascia uno
 
Antonio
 
 

 ha scritto nel messaggionews:d6e6d046-965c-4de8...@l12g2000vby.googlegroups.com...

Ganzo!
Riccardo Baldinotti

 ...
 
Se supponiamo che i nomi segreti della tabella e del
"altro campo" sarebbero "Tabella1" e "Id", puoi usare
una query di eliminazione come questa:
 
DELETE *
FROM Tabella1 AS T1
WHERE Id <>
 (SELECT Min(Id) FROM Tabella1 WHERE CodSede = T1.CodSede)
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 Access FAQ:  
http://www.donkarl.com/it
 
 
Grazie. Proprio non ci arrivato.
Riccardo Baldinotti
Newsgroup: it.comp.appl.access
Titolo: [x tutti] Riassunto EURO conversione

Ciao a tutti
è un po tardi, ma devo convertire un archivio da lire ad EURO ....
Ho letto nell'archivio dei suggerimenti, ma non ho trovato la soluzione
al mio problema:
1. quali sono le regole che si devono adottare per convertire una cifra
in EURO?
    10.000 ---> 5.164569  --> 5.16
  ...ovvero:
1) troncamento alla 3^ cifra decimale;
2) arrotondamento della seconda cifra decimale in base alla terza
sulla base di 4 = arrotonda.difetto e 5 =arrotonda.eccesso;
3) ad esempio 1,344 si arrotonda 1,34 e 1,345 si arrotonda 1,45.
2. la funzione per ottenere la conversione lire-euro?
In access 2k c'è la funzione per convertire lire in euro, ma non ho
capito come funziona
3. i troncamenti sono un altro grosso problema ... perchè i conti non
tornano!!!
... in altre parole io vorrei creare una funzione che:
- converta lire in euro con il criterio commerciale, ma che mi salvi nel
database i valori alla seconda cifra decimale, perchè altrimenti le
somme mi sballano
- un formato di visualizzazione per i campi in euro che:
se positivo € 10.00
se negativo -€ 10.00 in rosso
se zero non mi mostra nulla
Aiutatemi per favore, so che l'avete già fatto ...... mi allegate la
funzioncina?
Grazie in anticipo
Marcello
mch...@yahoo.com
, se mi date la risposta anche per e-mail, oltre che
sul NG., Grazie per la cortesia.
p.s. mettete la risposta a questa mail nella sezione FAQ del Sito Comune
p.s.2 nel Sito comune la ricerca sull'archivio del messaggi è limitata a
maggio 2001 .... e si potrebbe aggiungere un modo per seguire un thread,
una volta che l'argomento d'interesse è stato trovato.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

una volta che l'argomento d'interesse è stato trovato.
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: evitare stampa diretta

ciao,
ho inserito questo codice in un pulsante cmdPippo in una form.
Questo permette la stampa del record corrente mediante un report
 DoCmd.OpenReport "PLCorrente", , , "Protocollo = " & Chr$(34) & 
Me!Protocollo & Chr$(34)
Il problema è che cliccandoci sopra mi stampa direttamente il report mentre 
vorrei vedere l'anteprima e vedere io se stamparlo o no...
Come posso fare per gestire questa cosa? 

"uhu" <u...@uhu.uh> ha scritto nel messaggio 
news:is0433$k3l$1...@speranza.aioe.org...

vai nell'help del comando openreport e spulciati per bene i parametri 
possibili
Antonio 

 possibili
ciao
grazie in effetti hai ragione. ho cercato e ho modificato così:
 DoCmd.OpenReport "PLCorrente", acViewPreview, , "Protocollo = " & Chr$(34) 
& Me!Protocollo & Chr$(34)
il problema è che il command ora mi ignora proprio il comando, allora ho 
provato così
 DoCmd.OpenReport "PLCorrente", acViewPreview, "", "Protocollo = " & 
Chr$(34) & Me!Protocollo & Chr$(34)
ma anche qui senza risultato.
Allora ho provato a fare un esempio automatico di apertura report in 
anteprima e mi ha messo
acPreview al posto di acViewPreview.
Ho provato anche così ma non mi fa l'anteprima... come mai?
Grazie 1000 a chi mi risponderà
uhu

"uhu" <u...@uhu.uh> ha scritto nel messaggio 
news:is0729$sfa$1...@speranza.aioe.org...

ma che access hai?
cmq la sintassi è
docmd.OpenReport "nome", acViewPreview, , "prot = '" & prot & "'"
prova con l'apice senza il chr34
Antonio 

 prova con l'apice senza il chr34
ciao
ho Access 2000.
riguardo alla sintassi senza anteprima la parte della condizione andava e mi 
stampava correttamente il record corrente anche con il Chr$(34), credo 
quindi che quella parte sia giusta ma allora perchč non mi fa l'anteprima?
Comunque ho provato come hai detto tu e non va, poi ho provato cosě
DoCmd.OpenReport "PLCorrente", acViewPreview, , "Protocollo = " & "'" & 
Me!Protocollo & "'"
e anche cosě
DoCmd.OpenReport "PLCorrente", acViewPreview, , "Protocollo = '" & 
Me!Protocollo & "'"
ma mi clicca a vuoto, come se non avesse codice all'interno...
Qualcosa mi dice che c'č qualcosa che non va ho anche provato a compattare 
il database ma niente...
uhu


ciao
cancellato pulsante e ricreato uno nuovo, tutto funziona correttamente con 
questo codice
DoCmd.OpenReport "PLCorrente", acViewPreview, , "Protocollo = " & Chr$(34) & 
Me!Protocollo & Chr$(34)
Grazie 1000
uhu 

"uhu" <u...@uhu.uh> ha scritto nel messaggio 
news:is0dkq$epe$1...@speranza.aioe.org...

secondo me avevi perso il riferimento alla procedura evento o avevi cambiato 
nome al pulsante dopo aver creato il suo codice
Antonio 

 Come posso fare per gestire questa cosa?
prova cosě:
DoCmd.OpenReport "PLCorrente", AcPreview , , "Protocollo = " & Chr$(34) &
Me!Protocollo & Chr$(34)
ciao
Daniele 

 ha scritto nel messaggio 
news:is0e5g$g9s$1...@speranza.aioe.org...

scusate non vedevo i vostri post....
Daniele
Newsgroup: it.comp.appl.access
Titolo: apertura PDF

Buon Giorno
Access 97
con questa routine:
ret = Shell("rundll32.exe url.dll,FileProtocolHandler " &
"\\Server\Dsc328\Scanner328\Utente001\" & Me.Id_Fornitore & ".pdf")
DoCmd.Maximize
 apro un documento PDF corrispondente all' ID Fornitore...
Bene
funziona ma il file aperto mi rimane sotto nella barra di windows non viene
'esploso' a video come posso fare????
Grazie
Ciao

LUIGI C. ha scritto:

La funzione Shell supporta il parametro che ti consente di definire la
modalità di esecuzione del Processo lanciato...!
Questo lo dice il visualizzatore Oggetti, ed io ci credo:
Function Shell(PathName, [WindowStyle As VbAppWinStyle =
vbMinimizedFocus]) As Double
Significa che il parametro di Default, in caso non venga passato nulla,
è che il processo
venga eseguito in modalità Minimizzata.
Vedi nel visualizzatore oggetti le possibili costanti da passare per
ottenere quello che vuoi.
@Alex

Newsgroup: it.comp.appl.access
Titolo: inviare un Fax da access - chiarimenti

Vi chiedo:
ogni modem 56k quando si installa aggiunge la stampante fax in stampanti?
come posso da access inviare un documento selezionando da codice il Fax
presente in stampanti di windows
grazie a tutti.



vedi su sitocomune gli esempi per scegliere le stampanti, sono da
modificare, ma è un ottimo punto di partenza
Saluti.
Emanuele.

 ha scritto nel
messaggio news:as3oeu$u1f$1...@lacerta.tiscalinet.it...

no non tutti i programmi ad esempio io uso win fax e quello lo agggiunge.
devi selezionare dalla struttura del report imposta pagina e stampante
specifica e poi selezionare la stampante in questo caso il fax.
il problema sorge se vuoi che access ti imposti anche il numero in
automatico.

 ha scritto nel
messaggio news:as3oeu$u1f$1...@lacerta.tiscalinet.it...

Per inviare un fax da Access vai sul Sito Comune (link qui sotto) e nella
Sezione General leggi la FAQ di Giorgio Valsangiacomo intitolata "Inviare
Fax da MSAccess". Se hai determinati tipi di software per l'invio di fax
(MSFax o WinFax), puņ risolvere il tuo problema.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Help

Ciao a tutti,
avrei un problema di formula in query.
Come fare ad avere il seguente risultato?
Stanziamento iniziale                        Pagamento effettuati
Stanziamento finale
10.000.000                                        2.000.000
8.000.000 (= stanziamento iniziale-pagamento effettuato)
  8.000.000 (stanz fin rec preced)       1.000.000
7.000.000

 ha scritto nel
messaggio news:1cZt6.3801$lT1....@news2.tin.it...

Apri la struttura della tua query; nella riga "Campo:" di una colonna vuota
scrivi:
StanziamentoFinale: [Stanziamento iniziale] - [Pagamento effettuato]
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Grazie Roberto, quello che midici va bene per il primo record; e per
isuccessivi?

 ha scritto nel
messaggio news:7M%t6.62249$yl2.5...@news1.tin.it...

Scusami ma non avevo letto attentamente il tuo esempio.
Ipotizziamo che la tabella sulla quale vuoi basare la tua query si chiami
Tabella1 e che abbia una struttura simile a questa:
IdTabella                     Contatore e chiave primaria
NrSpesa                      Numerico
DataMovimento           Data/ora
TipoMovimento           Numerico
ImportoMovimento      Numerico
Ipotizziamo che NrSpesa contenga il numero del progetto, quindi tutti i
record (stanziamento o pagamento) di uno stesso progetto avranno lo stesso
valore in tale campo.
TipoMovimento avrą il valore 1 se ImportoMovimento č uno stanziamento e il
valore 2 se invece č un pagamento.
Se vengono soddisfatti i presupposti di cui sopra, creati una query,
chiamala Query1 (attenzione, č necessario che si chiami Query1 perché il
tutto funzioni) e fai in modo che abbia il seguente codice SQL:
SELECT Tabella1.NrSpesa, Tabella1.DataMovimento,
[NrSpesa]*10000000000000+Year([DataMovimento])*1000000000+Month([DataMovimen
to])*10000000+Day([DataMovimento])*100000+[IdTabella] AS CHIAVE,
IIf([TipoMovimento]=2,[SituazioneFinale]+[Pagamento],0) AS
SituazioneIniziale, IIf([TipoMovimento]=2,[ImportoMovimento],0) AS
Pagamento, nz(DSum("[ImportoMovimento]","Tabella1","NrSpesa= " & [NrSpesa] &
"  And [TipoMovimento]= 1"),0)-DSum("[Pagamento]","Query1","NrSpesa=" &
[NrSpesa] & " And CHIAVE<=" & [CHIAVE]) AS SituazioneFinale
FROM Tabella1
WHERE (((Tabella1.TipoMovimento)=2))
ORDER BY
[NrSpesa]*10000000000000+Year([DataMovimento])*1000000000+Month([DataMovimen
to])*10000000+Day([DataMovimento])*100000+[IdTabella];
Prova e facci sapere.


 Grande, Roberto pare che funzioni devo adesso applicare l'es. al caso
pratico.
Un grande grazie e a risentirci su questa NG che è eccezionale.
Ti saluto Vito.
Newsgroup: it.comp.appl.access
Titolo: Font Terminal e Access XP

Ciao a tutti,
nel migrare un'applicazione ad access XP da 97 mi è emerso un problema nel
suddetto font (so benissimo che piuttosto è meglio usare la formattazione
condizionale, ma nell'applicazione è abbondantemente utilizzata e non mi
andava di riscrivere tutto).
Il problema è che il font non viene gestito la Û come carattere, ovvero me
lo scrive così com'è.
Ho cercato di capire dove fosse il problema (che nella versione 2003 tra
l'altro è risolto)
Idee o suggerimenti?
Grazie mille a tutti.
Ciao,
Massimo
-- 
web: 
www.piubelli.net
Ciò che oggi è facoltativo domani sarà necessario.
Perchè non prepararci per tempo al futuro?
Vuoi il mio indirizzo? Togli _cut_ per rispondermi

 Massimo
Uè Massimo...
è da un pò che non ci si sente...
Cmq, se ti può sollevare, in un progetto con MA, abbiamo rinunciato alla
cosa... la Û non ne vuole sapere.
Ma x quel sito?
Fammi sapere.
Ciao
-- 
Pablitomf (Maurizio Facciuti)
“Quando non ti eserciti ricorda che qualcuno in qualche posto si sta
allenando e, quando lo incontrerai, ti batterà”.
Ed Macauley 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 lo scrive così com'è.
Hai provato:
http://www.mvps.org/access/forms/frm0055.htm
Saluti

 Ciao


 Saluti


Newsgroup: it.comp.appl.access
Titolo: In Access 97 non funziona .

 Ciao.
Ho creato un DB in Access 2000. Però ora ho la necessità di convertirlo per
Access 97 : ho un problema.
Il codice di questa funzione in VB, che con Access 2000 non mi dava
problemi, non funziona con ACCESS 97. Mi dice che non trova la libreria (per
dbOpenTable).
Come posso fare ?
Il codice è il seguente :
Dim Flag As Boolean
 Set RecClienti = CurrentDb.OpenRecordset("clienti", , dbOpenTable)
RecClienti.MoveFirst
Flag = False
 Do While Not RecClienti.EOF
   If (RecClienti!IdCliente = Me.IdCliente) Then
     Flag = True
     Exit Do
   End If
   RecClienti.MoveNext
 Loop
RecClienti.Close
Grazie.

...
È non per dbOpenTable ma per OpenRecordset.
Apri un modulo, menu strumenti/riferimenti (o simile in italiano).
Per A97 sono necessario:
Visual Basic for Applications
Microsoft Access 8.0 Object Library
Microsoft DAO 3.5 Object Library
Probabilmente ti manca il riferimento a DAO.
Un altra cosa è che il tuo dbOpenTable si trova a un luogo falso.
Dopo la seconda comma debb'esssere il parametro Option non il tipo.
Non da un errore perché dbOpenTable é solo una "maschera" per la
costante 1 e 1 qui significa dbDenyWrite.
--> ...("clienti", dbOpenTable)
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 wrote in message
a3f6g1$17ccqv$1...@ID-46617.news.dfncis.de...


 Come posso fare ?
È ancora un problema dei riferimenti anche se non vede niente.
Puoi creare una nuova mdb e poi importare tutti oggetti dalla vecchia.
In un file nuovo normalmente i riferimenti standard sono ok.
Dopo una conversione non è sempre il caso perché A00 usa
altre versione dei dll.

Newsgroup: it.comp.appl.access
Titolo: modificare un valore visualizzato in menu a tendina

ho un menu a tendina che visualizza i valori
001/04
002/04
003/04
ecc...
avrei l'esigenza di visualizzare solo
001
002
003
ma su scelta del valore devo ricercare 001/04 quindi ho messo 2 colonne nel 
menu a tendina
la prima colonna dei valori con /04 larghezza a zero l'altra larghezza 2 cm 
nell'origine riga o messo
select fatture.fattura, left(fatture.fattura,4) from fatture order by 
datafattura desc
ma non funziona mi sapete dire cosa sbaglio? 

 ma non funziona mi sapete dire cosa sbaglio?
risolto andava bene cosi non so cosa ho sbagliato prima che non andava
grazie lo stesso.

Newsgroup: it.comp.appl.access
Titolo: valori e somme.

Tramite il calcolo di un ciclo con un numero indefinito di ripetizioni
ottengo un valore numerico che vorrei memorizzare in una variabile,
chiamiamola "x".
Al termine del calcolo vorrei poter effettuare la somma di tutti i valori di
"x" ottenuti.
Come posso procedere ?
Forse in un controllo inserire volta per volta il valore della variabile "x"
e quindi sommarla ? vorrei poterlo fare senza aggiungere ulteriori
controlli, se possibile.
Grazie anticipatamente

 controlli, se possibile.
    Non *dovrebbero* servire, ma la parola che usi, "controlli", e' un po'
ambigua...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


I valori escono da un controllo activex microsoft (microsoft Mappoint 2002
control) che in base al percorso richiesto, volendo, da la possibilità di
ottenere la distanza kilometrica tra due punti cartografici.
La varibile è appunto la distanza kilometrica.
Chiedo scusa se non mi sono spiegato prima


 > "Maurizio Borrelli" news:ap0ejj$q0v6c$
1...@ID-52090.news.dfncis.de
:

    Passo. Per mia incapacita' di comprendere cosa ti serve.


 "x" ottenuti.
x = MiaFunzioneCheFaUnSaccoDiCicli
x = x + MiaFunzioneCheFaUnSaccoDiCicli
x = x + MiaFunzioneCheFaUnSaccoDiCicli
.
.
?
Se, come penso e spero, questo non è quello che chiedi, prova a spiegare meglio il
problema, magari con un esempio del tuo codice attuale.
Ciao. Claudio.

"Claudio" <cld@NOSPAM&COsupereva.it> ha scritto nel messaggio
news:0JQs9.14840$aL4.4...@news1.tin.it...

Avere il prosciutto sopra gli occhi è una mia prerogativa, per fortuna
occasionale !
Grazie Claudio !

Newsgroup: it.comp.appl.access
Titolo: dubbio n.3

Dalla maschera ditta - Tabella ditta, ho la necessità di reperire  un record
presente in un'altra maschera (maschera visite-tabella visite  queryvisite).
La maschera visite ha per origine dati la queryvisite (relazione uno a molti
tabelle ditta e visite)
Come posso fare?
Grazie
Stefano


Fai una maschera di tipo Maschera/Sottomaschera e le unisci con la chiave
della tabella ditta usando le proprietà della sottomaschera Campi Master e
Campi figli.
Ciao Roberto - Syd

 ha scritto nel messaggio
news:RYRB8.22059$US3.5...@twister1.libero.it...
Subject poco significativo n. 3
Antonio
Newsgroup: it.comp.appl.access
Titolo: Mashera di selezione multipla... etc.

vediamo se riesco a spiegarmi...
il problema si avvicina molto all'argomento del
"Sito Comune" "come si puň filtrare un report
in base alla selezione multipla..etc. etc...
ho creato Mask1 con la casella di selezione
multipla.. basata su tabella "II_Parte"...
e fin qui tutto ok...la maschera mi mostra
una lista di codici, 171 per l'esattezza...
ed un campo Link...
questo campo Link č ripetuto in un'altra
tabella "I_Parte" ove vi sono dei sottocodici
con relative spiegazioni di questi...
ebbene a me servirebbe portare in un Report...
selezionando nella casella multipla uno o piů
codici anche i relativi sottocodici presenti
nella tabella I_parte...
č possibile farlo ???
Ciao...

 Ciao...
a me sembra  che sia il lancio di un report filtrato che ha 
come origine II_Parte e I_parte in join 
con (where) II_PArte.Link = I_parte.link
--
a.cara 
Togli qualcosa dall'email

 con (where) II_PArte.Link = I_parte.link
--------------
scusa Alessandro... non sono pratico di Access come te...
cosa intendi dire che potrei fare anche a meno della Maschera
di selezione multipla dei codici ???
se così ho già una query per la ricerca del codice...(uno solo)
solo che vorrei avere la possibilità di selezionare uno o
più codici...per stamparli su report...
mi puoi fare nel caso qualche esempio ???
Grazie..

 mi puoi fare nel caso qualche esempio ???
sulla query che hai per stampare un solo codice togli la richiesta relativa al
codice e poi procedi come ho descritto sopra


 relativa al codice e poi procedi come ho descritto sopra
---------------------------
per la query Ok... ho tolto il Like...!!
ma poi che faccio ??
se con la maschera seleziono 2 codici dove vanno a finire ??
come dal sito comune dovrei aggiungere un bottone che mi
fa vedere l'anteprima report ma credo mi faccia poi vedere solo
quelli che ho selezionato e non i sottocodici di tab I_parte...
beh.. cmq francamente penso sia un pò complesso per me..
Ciao
Newsgroup: it.comp.appl.access
Titolo: filtro query in base a controllo maschera

Buongiorno atutti,ho una query che vorrei filtrare in base al valore di
un controllo non associato di una maschera.
Mi spiego: il campo della query è un campo testo che può avere i
seguenti valori
lettera - numero1 esempio W-100, A-234 ecc.ecc.
numero1 - numero2 esempio 100-1000, 1000-100, 123-456 ecc. ecc.
Io vorrei poter basare la mia query in base ad un filtro definio da un
controllo non associato in cui posso scrivere ciò che voglio per
ricercare in base al solo valore di numero1
Esempio se ho tre record:
W-100
100-1000
1000-100
e se io nel mio controllo della maschera scrivo 100
vorrei ricevere come record filtrati solo I-100 e 100-1000 cioè nel caso
in cui ci sia una lettera, ciò che sta a destra del trattino, nel caso
in cui ci siano due numeri, cioò che sta a sinistra del trattino
Spero di esser stato sufficientemente chiaro .... grazie
Antonio
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Antonio
Se il campo di tipo testo in questione si chiama TuoCampo.
Se la maschera si chiama Maschera1.
Se la casella di testo non associata dove digiti il parametro di ricerca si
chiama MioNumero.
Nella tua query inserisci il seguente campo calcolato:
numero1: IIf(Not IsNumeric(Left([TuoCampo]; 1)); Mid([TuoCampo];
InStr([TuoCampo]; "-") + 1); Left([TuoCampo]; InStr([TuoCampo]; "-") - 1))
e nei criteri di questo campo calcolato scrivi:
[Forms]![Maschera1]![MioNumero]
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 [Forms]![Maschera1]![MioNumero]
Ciao Reoberto e grazie mille ! Nel frattempo perň mi sono cambiati i
dati
ed oltre a
w-100
100-1000
1000-100
č possibile avere anche il semplice numero, ad esempio 100. Nel qual
caso
come potrei modificare il criterio ? Non riesco infatti a capire perchč
hai scritto +1 e -1 anche se
sto studiando il tuo codice.
Grazie mille


 Antonio

Newsgroup: it.comp.appl.access
Titolo: FileCount in Cartella

Function FilesInFolder(folderspec) As Long
   Dim objFSO As Object
   Dim objFolder As Object
      Set objFSO = CreateObject("Scripting.FileSystemObject")
      Set objFolder = objFSO.GetFolder(folderspec)
      FilesInFolder = objFolder.Count
      Set objFolder = Nothing
      Set objFSO = Nothing
End Function
Presumo debba funzionare, ma non supporta il metodo Count.
Mi manca qualche Riferimento...?
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:ch2bn3$mmc$1...@lacerta.tiscalinet.it...

Ciao Alessandro,
includendo ScriptingRuntimes nei riferimenti vedrai che l'oggetto Folder non
supporta il metodo Count, il che è anche giusto, cosa dovrebbe contare i
files le cartelle o entrambe?  Per sapere il Numero dei Files contenuti
nella cartella puoi ricavarlo scrivendo objFolder.Files.Count.
Saluti
Cinzia

 Cinzia
OPS...!
Non ho assolutamente visto l'errore e davo per scontato fosse
corretto.
Grazie Cinzia.

Newsgroup: it.comp.appl.access
Titolo: Problema con recordset ADO e filtraggio date

Brevemente: uso ADP/SQL Server, ho una maschera continua dove carico il
contenuto di una tabella (qualche centinaio di righe) e poi lo filtro
localmente.
Per filtrarlo imposto la proprietà "filter" del recordset ADO
Me.SubMaskContatti.Form.Recordset.Filter = "((DataScadenza >= #06/11/2002#)
AND (DataScadenza <= #06/30/2003#))
Il filtraggio delle date usa il formato   mm/dd/yyyy   (quindi filtro le
date dal 6 giugno 2002 al 30 giugno 2003)
Il problema è che capitano cose assurde; Se ad esempio imposto il filtro
sopra capita che:
* VEDO tutti i record giusti,
* NON posso selelezionarne la maggior parte
E' come se capitasse che l'engine che filtra i record usa le date
mm/dd/yyyy   mentre l'engine che decide se posso selezionare o meno quei
record usasse le date   dd/mm/yyyy
Col filtro impostato sopra vedo TUTTE le scadenze giuste, ma posso
selezionare SOLO quelle con data >= 6 NOVEMBRE(11) 2002
mentre se imposto
Me.SubMaskContatti.Form.Recordset.Filter = "((DataScadenza >= #06/10/2002#)
AND (DataScadenza <= #06/30/2003#))
vedo tute le scadenze dal 10 giugno 2002 al 30 giugno 2003; ma posso
selezionar SOLO quelle con data >= 6 OTTOBRE(10) 2002
Ed io come cavolo faccio?
Odio i formati delle date...
Grazie, Max

> Ed io come cavolo faccio?
Come al solito, aggiro il problema :-)
Leggendo l'help dell'ADO ho avuto un'idea illuminante:
 Invece di fae un confronto tra date, che ADO non riesce a gestire bene,
faccio un confronto tra numeri.
Prendo le date e le converto nel numero di giorni trascorsi dal 1/1/1900,
quindi sul client lo calcolo con
datediff("d","1/1/1900",DataDaFiltrare)
e sul server lo calcolo con
DATEDIFF(day, '1/1/1900', CampoContenenteLaDataDaFiltrare)
Cosě ogni data mi diventa un banalissimo valore int/long e posso
confrontarlo come mi pare e piace, e funziona tutto benissimo.
Cavoli che pensata :-)))))))))))))))))))))
Ciao a tutti, Max