title: Impostazione OrderBy - errore 2101

author: Maurizio

text:
Salve a tutti.
Nell'evento su Apertura di un SottoReport, sto cercando di impostare la
proprietà OrderBy in funzione del Report chiamante.
La necessità di cambiare l'ordine su Apertura, nasce dal fatto che
sottoreport viene utilizzato da vari reports principali, ma con diversi
ordinamenti. Non volevo quindi creare più copie della stessa struttura che
si differenziano solo per i diversi ordinamenti, complicando perciò la
futura manutenzione.
Ho fatto molti tentativi di sintassi, tra cui
Me.OrderBy = "Nomecampo"
che mi sembrava quella più corretta, ho anche provato sugli eventi del
Corpo, ma continua a
darmi 'errore di runtime 2101 impostazione non valida per questa proprietà'.
Premetto che ho impostato la proprietà OrderByOn = True dalla finestra delle
Proprietà in VBA.
Ho verificato che se inserisco il nome del campo da ordinare nella finestra
delle Proprietà del Report tutto funziona.
Dove sbaglio? La sintassi? Forse non si può settarla da VBA?
Grazie in anticipo a chi avrà la pazienza di leggermi.
Maurizio.


title: casella di riepilogo - elenco

author: Mike Dens

text:
Ciao!!
Ho un problema: io desideravo tramite un pulsante di comando, una volta
selezionato un record da un elenco ( casella di ripepilogo ) impostare
tutti i campi, per es. della colonna 6 partendo da sx, da un valore di
testo, "c", ad un altro "d". Non so se sia possibile fare una cosa del
genere, io spero di si, rimane il fatto che io non ci riesca!!!
Qualcuno ha dei siggerimenti??
grazie
mike
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: casella di riepilogo - elenco

author: MA

text:
"Mike Dens" <
ra...@tiscalinet.it
> ha scritto nel
messaggio
news:77f94e77117ba4f899...@mygate.mailgate.org...
> Ciao!!
> Ho un problema: io desideravo tramite un
pulsante di comando, una volta
> selezionato un record da un elenco ( casella di
ripepilogo ) impostare
> tutti i campi, per es. della colonna 6 partendo
da sx, da un valore di
> testo, "c", ad un altro "d". Non so se sia
possibile fare una cosa del
> genere, io spero di si, rimane il fatto che io
non ci riesca!!!
> Qualcuno ha dei siggerimenti??
> grazie
> mike
Guardati la proprietą column.
In soldoni fa cosģ
me.TuoTesto = me.Tuacomba.column(5).
Ho scritto 5 per prendere la sesta colonna perchč
l'indice parte da 0
MAssimiliano


title: casella di riepilogo - elenco

author: 'gnurant

text:
Mike Dens <
ra...@tiscalinet.it
> ha scritto:
> Ciao!!
> Ho un problema: io desideravo tramite un pulsante di comando, una volta
> selezionato un record da un elenco ( casella di ripepilogo ) impostare
> tutti i campi, per es. della colonna 6 partendo da sx, da un valore di
> testo, "c", ad un altro "d". Non so se sia possibile fare una cosa del
> genere, io spero di si, rimane il fatto che io non ci riesca!!!
> Qualcuno ha dei siggerimenti??
> grazie
> mike
>
>
Abbi pazienza, ma non mi è chiaro il problema. Selezioni una riga della
combobox, becchi l'elemento della 6ª colonna e poi che fai? Non capisco
il "tra c e d"...sorry
Ciauz
--
'gnurant come una cucuzza
Inviato da
www.mynewsgate.net


title: casella di riepilogo - elenco

text:
Ciao, dunque mi spiego meglio:
1. seleziono tutte le righe della casella combinata ( Elenco )
2. Premo il pulsante X e cambio i valori della colonna 6 di tutte le
righe
3. La colonna 6 contiene un valore testo, quel che voglio fare è
cambiare
lo stato del flag ( colonna 6 ) da "c" a "d", quindi assegnare a tutte
le righe
il valore "d".
Spero di esser stato chiaro!!



title: casella di riepilogo - elenco

text:
Mike Dens <
ra...@tiscalinet.it
> ha scritto:
> Ciao, dunque mi spiego meglio:
>
> 1. seleziono tutte le righe della casella combinata ( Elenco )
> 2. Premo il pulsante X e cambio i valori della colonna 6 di tutte le
> righe
> 3. La colonna 6 contiene un valore testo, quel che voglio fare è
> cambiare
> lo stato del flag ( colonna 6 ) da "c" a "d", quindi assegnare a tutte
> le righe
> il valore "d".
>
> Spero di esser stato chiaro!!
>
Uhm...se l'elenco punta a una tabella e devi cambiare i valori della
tabella puoi a fare così
Private Sub CambiaCD(Valore)
Dim T As Recordset
  '*** Tabella è la tua tabella, metti tu il nome che sai :o)
  Set T = CurrentDb.OpenRecordset("Tabella", dbOpenDynaset)
    Do While T.EOF = False
      T.Edit
      T!Campo6 = Valore '*** Campo6 è il campo da variare
      T.Update
      T.MoveNext
    Loop
  T.Close
  Me.ListBox.Requery '*** il nome della tua listbox
End Sub
Se invece è un elenco con Tipo origine riga "Elenco valori" allora fai così
Private Sub CambiaCD()
Dim S As String
  S = Me.ListBox.RowSource  '*** la tua listbox
  For I = 1 To Len(S) - 2
    If Mid(S, I, 3) = "c" Then
      S = Mid(S, I - 1, 1) & "d" & Mid(S, I + 3, Len(S) - I - 2)
    Else
      S = Mid(S, I - 1, 1) & "c" & Mid(S, I + 3, Len(S) - I - 2)
    End If
  Next I
End Sub
Spero di aver capito



title: casella di riepilogo - elenco

text:
Ciao 'Gnurant :-), ti ringrazio per gli aiuti che mi dai!!
Non sono sicuro che quel che mi suggerisci possa funzionare:
all'interno dell'elenco io ho un filtro, vale a dire tutti i record
che hanno nome = mario e cognome = rossi e solo a questi voglio cambiare
il flag da c a d....non sarebbe più semplice sempre che si possa fare
selezionare
eventualmente un solo record dell'elenco ed assegnare al flag "d"??
grazie mille
mike :-)



title: casella di riepilogo - elenco

text:
Ciao, dunque funziona!!
Così come mi hai suggerito, rimane un problema, che il codice mi cambia
il flag di tutti i record della tabella principale, mentro io vorrei
cambiare i flag solo dei record filtrati che compaiono nella casella
combiata ( elenco )
grazi e ciao
mike



title: casella di riepilogo - elenco

text:
Mike Dens <
ra...@tiscalinet.it
> ha scritto:
> Ciao, dunque funziona!!
> Così come mi hai suggerito, rimane un problema, che il codice mi cambia
> il flag di tutti i record della tabella principale, mentro io vorrei
> cambiare i flag solo dei record filtrati che compaiono nella casella
> combiata ( elenco )
> grazi e ciao
> mike
>
>
Scusa se ti ho fatto aspettare, ma ti rispondo solo ora perché ieri non ho
potuto leggere più la posta.
Aggiungi una riga e il gioco è fatto :o)
Private Sub CambiaCD(Valore)
Dim T As Recordset
  '*** Tabella è la tua tabella, metti tu il nome che sai :o)
  Set T = CurrentDb.OpenRecordset("Tabella", dbOpenDynaset)
    Do While T.EOF = False
      If T!Cognome="Rossi" And T!Nome="Mario" Then
        T.Edit
        T!Campo6 = Valore '*** Campo6 è il campo da variare
        T.Update
        T.MoveNext
      End If
    Loop
  T.Close
  Me.ListBox.Requery '*** il nome della tua listbox
End Sub
Ti ho messo l'esempio con "Mario Rossi". Ma se il filtro che usi si basa ad es
sul campo Residenza, scriverai T!Residenza="..." e nei puntini metti la città
che ti interessa.



title: casella di riepilogo - elenco

text:
Ciao anche io ti rispondo tardi, scusami, ti ringrazio tanto per gli
aiuti che mi stai dando...ho visto quel che mi hai suggerito, ma
sfortunatamente
non va bene per quel che voglio fare; per farmi capire meglio:
ho letto la condizione If che mi hai suggerito e ti dico perchè non mi è
utile:
il perchè sta nel fatto che io non desidero inserirli nella routine i
valori dei campi
( tu come es. hai usato mario rossi ), ma vorrei che dalla routine
access
mi vada a sostituire il valore "flag" da "c" a "d" solo per quei record
che compaiono
nell'elenco!! Nella maschera in cui è presente lelenco io visualizzo un
solo
record ( l'ultimo ) che ha nome e cognome mario rossi. Nell'elenco
visualizzo
tutti gli altri record che hanno sempre come nome mario rossi; è a tutti
i
record mario rossi che voglio cambiare il flag; quindi la routine una
volta che io preme il tasto dovrebbe aprire la tabela associata alla
maschera cercarmi tutti i mario rossi e sostituire il flag di tutti i
record, sempre con
nome mario e cognome rossi, da "c" a "d".



title: Data corrente e funzioni matematiche con query di conteggio

author: Giuseppe Petrucci

text:
Salve,
lavoro per una società di informatica e mi sono affacciato solo da poco
nel mondo di Access.Ho visto che in questo newsgroup ci sono diverse
persone esperte e probabilmente forse qualcuno mi può aiutare.Ho un DB
al momento con un unica tabella: COTESSE.Uno dei campi della tabella si
chiama DASC,è di tipo numerico intero perchè contiene l'anno di scadenza
di una certa tessera - tipo 2003,2004, etc... Sto cercando di fare una
query con un filtro WHERE.Vorrei che mi estraesse tutti i record che
hanno come DASC l'anno corrente, percui ho creato la seguente clausola
in SQL:
WHERE COTESSE.DASC=datepart(yyyy,Date());
ma appena cerco di eseguire la query, a parte che appare un prompt che
mi richiede di inserire la data (non ho richiesto che apparisse un
prompt!!),una volta inserita questa mi da un messaggio di errore:
"Espressione non digitata correttamente o troppo complessa per essere
valutata.Un'espressione numerica, ad esempio, può contenere troppi
elementi complessi.Semplificare assegnando parti dell'espressioni o
variabili".
Non ho la minima idea del perchè dia questo messaggio d'errore.
Infine qualcuno mi saprebbe dire come impostare il valore visualizzato
in una casella di riepilogo in maniera tale che sottragga ad un numero
un'altro che è il risultato di una queri di conteggio?Io ho provato con:
=[8000]-[Conta Tessere Emesse]!Expr1000
ma non funziona.
Grazie infinite anticipatamente per l'aiuto.
Giuseppe Petrucci
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: TANNHAUSER

text:
Giuseppe Petrucci ha scritto:

> WHERE COTESSE.DASC=datepart(yyyy,Date());




> ma non funziona.

> Giuseppe Petrucci
Ciao,
per la prima domanda prova con questo codice SQL:
SELECT COTESSE.DASC
FROM COTESSE
WHERE (((COTESSE.DASC)=Year(Date())));
TANNHAUSER
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
"TANNHAUSER" <
tannau...@virgilio.it
> wrote in message
news:cnd1bf$a8s$
1...@news.newsland.it
> Ciao,
>
> per la prima domanda prova con questo codice SQL:
>
> SELECT COTESSE.DASC
> FROM COTESSE
> WHERE (((COTESSE.DASC)=Year(Date())));
>
> TANNHAUSER
Grazie tante,funziona!!Sei davvero un grande.
Sai mica pure come posso risolvere il secondo problema?
Giuseppe



text:
Giuseppe Petrucci ha scritto:
> "TANNHAUSER" <
tannau...@virgilio.it
> wrote in message
> news:cnd1bf$a8s$
1...@news.newsland.it
> > Ciao,
> >
> > per la prima domanda prova con questo codice SQL:
> >
> > SELECT COTESSE.DASC
> > FROM COTESSE
> > WHERE (((COTESSE.DASC)=Year(Date())));
> >
> > TANNHAUSER
> Grazie tante,funziona!!Sei davvero un grande.
> Sai mica pure come posso risolvere il secondo problema?
> Giuseppe
Non sono sicuro di aver capito la tua richiesta ma provo a darti una
risposta, in base anche alla prima domanda:
tu vorresti che, in una casella di riepilogo inserita in una maschera
venisse visualizzato un numero che è la differenza tra un valore fisso
(nel tuo caso 8000) ed un dato variabile che risulta essere il conteggio
di un numero di record, secondo certi parametri, effettuato da una query
che rappresenta l'origine dati della casella di riepilogo stessa. Se,
infine, ho ben capito il conteggio della query dovrebbe essere quello
effettuato sulle tessere emesse nell'anno corrente. Se così è, allora:
nella tua maschera inserisci una casella di riepilogo, Elenco, che avrà
come origine dati una query con il seguente codice SQL:
SELECT DISTINCTROW
8000-DCount([COTESSE]![DASC],"COTESSE",[COTESSE]![DASC]=Year(Date())) AS
Tessere
FROM COTESSE
WHERE (((COTESSE.DASC)=Year(Date())));
TANNHAUSER



text:
TANNHAUSER ha scritto:
> Giuseppe Petrucci ha scritto:







> TANNHAUSER
Mi correggo:
SELECT DISTINCTROW 8000-Count([COTESSE]![DASC]) AS Tessere



text:
"TANNHAUSER" <
tannau...@virgilio.it
> wrote in message
news:cnd5cm$j3u$
1...@news.newsland.it
> Mi correggo:
>
> SELECT DISTINCTROW 8000-Count([COTESSE]![DASC]) AS Tessere
> FROM COTESSE
> WHERE (((COTESSE.DASC)=Year(Date())));
>
> TANNHAUSER
No,TANNHAUSER è molto più
semplice.la
 mia prima domanda riguardava
qualcosa di separato
dalla seconda. Il punto è solo:
Vorrei che in una casella di riepilogo inserita in una maschera
venisse visualizzato un numero che è la differenza tra un valore fisso
(nel mio caso 8000) ed un dato variabile che risulta essere il risultato
di
una query di conteggio.Ho già fatto la query di conteggio che si chiama
"Conta Tessere Emesse",che mi restituisce al momento 7680.Poichè
l'utente
ha come limite massimo di tessere emesse 8000,deve sapere quante ancora
ne
può emettere.Ed ecco il perchè della casella di riepilogo.Io credevo che
si facesse
banalmente con una formula nel generatore di espressioni,ma quella che
ho
provato io:
=[8000]-[Conta Tessere Emesse]!Expr1000
non funge.
Grazie ancora per l'aiuto.



author: Alex NSB

text:
> Vorrei che in una casella di riepilogo inserita in una maschera
> venisse visualizzato un numero che è la differenza tra un valore fisso
> (nel mio caso 8000) ed un dato variabile che risulta essere il
> risultato di
> una query di conteggio.
SELECT  8000-[Conta Tessere Emesse].[Expr1000] FROM [Conta Tessere Emesse];
HTH.
Alessandro


text:
"Alex NSB" <
ale...@tin.it
> wrote in message
news:cnf0el$279$
1...@newsread.albacom.net

Grazie tante funziona alla grandissima.
E' anche merito vostro se il mio lavoro verrà apprezzato.
Thanks a tutti.



title: FE - allegati al file xml

author: RobertoA

text:
Per aggiungere degli allegati ad una fattura, uso il seguente codice:

.....
Set SubNode1 = Dom.createElement("Attachment")
                               SubNode1.Text =
ConvertiFileBase64(nome_file_temp)
SubNode.appendChild SubNode1
.....

Private Function ConvertiFileBase64(PathFile As String) As String
Dim DM As Object, EL As Object,    Dim ArrByte64() As Byte
Open PathFile For Binary Access Read As #1
ReDim ArrByte64(0 To LOF(1) - 1)
Get #1, , ArrByte64:    Close #1
Set DM = CreateObject("Microsoft.XMLDOM"): Set EL = DM.createElement("tmp")
EL.DataType = "bin.base64": EL.nodeTypedValue = ArrByte64
ConvertiFileBase64 = EL.Text
Set EL = Nothing: Set DM = Nothing
End Function

----------------------------------------------------------------------
I problemi, per i quali avrei bisogno del vostro aiuto, sono due:

1 - la funzione ConvertiFileBase64 restituisce la stringa convertita
come tante righe da 72 caratteri, in pratica ci mette un cr+lf per
andare a capo, immagino per consentire la visualizzazione semplifcata
anche per gli editor piu' scrausi, ma tutti sti 13+10 non rompono le
scatole al file da ricostruire? Vedo le fatture con allegati che ricevo
che non spezzano le righe come succede a me, quindi chiedo ai piu'
esperti, e' normale che la funzione sopra restituisca tante righe da 72
caratteri, separati da un cr+lf ?

2 - se tento di allegare piu' di un file, ripetendo la sezione
<Allegati> il visualizzatore che utilizzo (AssoInvoice)  riesce a farmi
vedere solo il primo (potrebbe essere un baco del visualizzatore), come
fare per capire se il file e' stato creato correttamente?


title: FE - allegati al file xml

author: Bruno Campanini

text:
RobertoA laid this down on his screen :

Nella fattura già in formato XML io conto 36 caratteri + R
per l'allegato, mentre per il corpo fattura ne ho contati
anche 87 + Ret.

> 2 - se tento di allegare piu' di un file, ripetendo la sezione <Allegati> il
> visualizzatore che utilizzo (AssoInvoice)  riesce a farmi vedere solo il
> primo (potrebbe essere un baco del visualizzatore), come fare per capire se
> il file e' stato creato correttamente?

Il programma di fatturazione che mette a disposizione l'ADE:

https://www.agenziaentrate.gov.it/wps/content/nsilib/nsi/schede/comunicazioni/fatture+e+corrispettivi/software+compilazione+fattura+elettronica

accetta un solo allegato della dimensione massima di 5Mb.
Analogamente da F&C non puoi inserire più di un allegato,
stessa dimensione massima.

Bruno


title: FE - allegati al file xml

text:

Ho provato a scaricarlo e ad usarlo
Ma dov'e' che lo inserisci l'allegato?
Ho aperto tutte le sezioni ma non trovo indicazioni su dove infilarcelo


title: FE - allegati al file xml

text:
RobertoA presented the following explanation :

Apri il file, espandi Fattuta, dopo Dati Pagamento trovi
Allegato, non attivato.
Selezionalo e attivalo con l'icona Abilita che appare in alto
sulla seconda riga delle icone.

Bruno


title: FE - allegati al file xml

author: BFS

text:
Il 10/02/2019 19:31, Bruno Campanini ha scritto:

Si tratta di limitazioni di programmi e portali ma gli allegati possono
essere più di uno.

il blocco allegati prevede N ripetizioni e molti clienti dei miei
clienti richiedono oltre l'allegato in pdf anche di allegare schede di
collaudo/schede tecniche/antincendio etc

quindi nel mio caso ho inserito più allegati, il fatto di visualizzarli
dipende da chi fa poi il software di trascodifica della fattura.

le specifiche sono ben chiare:

"Questo  blocco  può  essere  replicato  più  volte:  in  questo  modo
è  possibile allegare anche più di un file.

[2.5.1] NomeAttachment
Obbligatorietà: SI, ma solo se si allega un file.
Utilità: serve per indicare il nome del file allegato.
Criteri di valorizzazione: non è stabilito alcun criterio particolare;
la modalità
di valorizzazione del campo è demandata, nel rispetto delle caratteristiche
stabilite dallo schema XSD, alla valutazione dell’utente secondo esigenza. "

Asso Invoice ha inoltre un baco, almeno nel mio pc. Se visualizzo una
fattura con allegato, e poi passo ad un altra con allegato, l'allegato
che mi mostra è quello della fattura precedente.

BFS

---
Questa email è stata esaminata alla ricerca di virus da AVG.
http://www.avg.com


title: FE - allegati al file xml

text:
BFS formulated the question :

Di ciò s'è già trattato ad oltranza, sta di fatto che le procedure
dell'ADE non ti consentono l'inserimento di più allegati: sto
parlando di quella che hai testé sperimentato e di quella che
compila FE in F&C.

Se tu con altro software riesci a inserirne più d'uno e l'XML
così generato viene acquisito e poi regolarmente inoltrato
dal Sistema... danne circostanziata notizia.

Bruno


title: FE - allegati al file xml

text:

Probabilmente si tratta di un problema di visualizzazione di AssoInvoice
perche' se allego ad una fattura tre file, un pdf, un txt ed un pdf, il
primo ed il terzo me li visualizza correttamente, mentre il txt non
viene visualizzato
Chiedevo quindi un visualizzatore alternativo per chiarire la questione
e scagionare il formato del file fattura da possibili responsabilita'
Cosa usate voi per visualizzare le fatture in xml?
Browser web+foglio stile, ovviamente non vale


title: FE - allegati al file xml

text:
RobertoA explained on 12-02-19 :

Per una ricerca veloce io uso Notepad.
Altrimenti importo il file in Access, col che mi ritrovo
generate tante tabelle quanti sono i Nodes definiti nel file.
Aprendo la tabelle leggo gli eventuali Child-Nodes.

Bruno


title: FE - allegati al file xml

text:
> Cosa usate voi per visualizzare le fatture in xml?

Ti costerà del tempo, ma ti consiglio caldamente di sviluppare il lettore all'interno della tua procedura.
E' impensabile che gli utenti continuino a usare il foglio di stile o applicazioni esterne per far qualcosa che dovrebbero avere a bordo tutte le applicazioni.
E che tutte avranno, pure quelle da supermercato, in pochissimo tempo.

Saluti


title: FE - allegati al file xml

text:
on 12-02-19,
simoca...@gmail.com
 supposed :
>> Cosa usate voi per visualizzare le fatture in xml?
>
>
> Ti costerà del tempo, ma ti consiglio caldamente di sviluppare il lettore
> all'interno della tua procedura.
Ma non ci penso proprio!
Troppo complicato e soprattutto non mi serve.
Per le fatture emesse uso FE dell'ADE e la fattura che viene
stampata non è poi malvagia.
Per quelle ricevute stampo col Browser la pagina di sintesi
di F&C e, volendo i dettagli, stampo da "Visualizza file fattura"
quell'orrore fornito dallo stesso F&C derivante dal foglio
di stile
www.fatturapa.gov.it
.

> E' impensabile che gli utenti continuino a
> usare il foglio di stile o applicazioni esterne per far qualcosa che
> dovrebbero avere a bordo tutte le applicazioni. E che tutte avranno, pure
> quelle da supermercato, in pochissimo tempo.
Sono d'accordo, ma... pazienza!
MS son trent'anni che fa quel cazzo di SO, e ad ogni
release ci sono buchi nuovi!

Bruno


title: FE - allegati al file xml

text:
Il 12/02/2019 11:14, Bruno Campanini ha scritto:

ti confermo che inserendo più blocchi allegato (nel mio caso sono
arrivato a 4) sia il sito dell'agenzia delle entrate sia il portale
aruba lo rilevano corretto. Allegati regolarmente visualizzati dal
ricevente.
Invio fatto da oltre un mese con ricevuta di consegna.
Aruba stessa nel suo portale permette di inserire n allegati se si
decide di creare la fattura da zero.
Ovvio che se il programmatore che sviluppa portali ed applicazioni della
parte relativa alla visualizzazione non tiene conto della molteplicità
del blocco allegati non è sicuramene colpa di chi il file lo crea
rispettando le regole



title: FE - allegati al file xml

text:
BFS was thinking very hard :

Ok, allora procedura consentita da chi usa software diversi
da quelli che l'ADE rende disponibili, perché questi (2) proprio
non lo consentono.

Bruno


title: FE - allegati al file xml

text:

se i software di cui parli sono di sogei non mi stupirei della cosa.
anche la rappresentazione tabellare della fattura elettronica non lascia
dubbi a interpretazioni. Il blocco Allegati è esattamente come il blocco
DatiPagamento :molteplicità  0..N



title: FE - allegati al file xml

text:
BFS explained :

>> Ok, allora procedura consentita da chi usa software diversi
>> da quelli che l'ADE rende disponibili, perché questi (2) proprio
>> non lo consentono.
>
> se i software di cui parli sono di sogei non mi stupirei della cosa.
Sì certo che sono della Sogei: FE v2.01 del 1/2/19
e la procedura da F&C.

Bruno


title: Record cancellati

author: caffè

text:
Salve a tutto il NG.
ho un piccolo problema da risolvere nel cancellare un record da un form con
il pulsante creato con l'auto composizione.
la struttura della maschera è a schede e comprende mette in relazione n. tre
tabelle Tbl_Anaper; tbl_DatPers; Tbl_Recaptel
Le tabelle sono in relazione "Tbl_Anaper" 1 a 1 "tbl_DatPers" mentre
"Tbl_Anaper 1 a molti "Tbl_Recaptel" [cancella tutti i record correlati a
catena]
Seleziono un record e poi lo cancello con il pulsante  "Cancella" mi dà il
messaggio di eliminazione, confermo la eliminazione ma se vado in ricerca il
nominativo non lo ha eliminato.
Ma, se entro nella tabella Tbl_Anaper e seleziono il codice da cancellare
cancella il record e in più mi elimina tutti i record correlati a catena a
quel codice
il codice generaro dall'autocomposizione del pulsante
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
grazie per l'aiuto
--
Il Caffé
da sempre la migliore bevanda


title: Record cancellati

text:

A sentimento da uno smanettone che non è neppure sicuro di aver
capito....
Proverei ad anteporre al tuo codice un setfocus sul campo che vuoi
cancellare.
"Se mi sono sbagliato voi mi corrigerete!"
F:


title: vba da 2003 a 2010 compatta e ripristina

author: Principiante

text:
Salve a tutti,
in una maschera ho un pulsante con la seguente procedura.
--------------------------------
Private Sub PulCancTutto_Click()
If MsgBox("Vuoi veramente cancellare tutto?", vbYesNo, "Attento!") =
vbYes Then
    Dim stDocName As String
'cancella tutto il contenuto registrato

    stDocName = "Query1"
    DoCmd.SetWarnings False
    DoCmd.OpenQuery stDocName, acNormal, acEdit
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70

'compatta il database, riazzera il conteggio e riavvia l'applicazione
    CommandBars("Menu Bar"). _
    Controls("Strumenti"). _
    Controls("Utilità database"). _
    Controls("Compatta e ripristina database..."). _
    accDoDefaultAction
End If

Exit_PulCancTutto_Click:
    Exit Sub

Err_PulCancTutto_Click:
    MsgBox Err.Description
    Resume Exit_PulCancTutto_Click

End Sub
------------------------------

in access 2003 tutto OK, mentre 2010 va in errore la parte che
compatta il database,
riazzera il conteggio e riavvia l'applicazione.
Dato che sono un po arrugginito mi aiutereste?
Come dovrei modificare al codice?

Grazie anticipate, By Franco


title: Allora non si può fare! era : campi multipli nei report

text:
Riporto il messaggio, forse era Sabato, pioveva, il cielo era prorpio scuro,
ma č passato inosservato.
Salve Lista!
Ho un problema e spero che possiate aiutarmi.
Ho un elenco di prodotti che hanno in comune la descrizione generale e
varianti relativi alle finiture e prezzi.
Quando creo il report vorrei un elenco di questi prodotti omologhi e che la
descrizione sia dopo l'ultimo record del gruppo di codici, e non dopo il
primo come accade settando il controllo "nascondi duplicati" nelle
proprietą.
Se avete suggerimenti
Grazie


author: Antonio Biso

text:
"Sever66" <
sever6...@libero.it
> ha scritto nel messaggio
news:eh5F9.10118$t_1.1...@tornado.fastwebnet.it...
>
> Riporto il messaggio, forse era Sabato, pioveva, il cielo era prorpio
scuro,
> ma è passato inosservato.
>
>
> Salve Lista!
> Ho un problema e spero che possiate aiutarmi.
> Ho un elenco di prodotti che hanno in comune la descrizione generale e
> varianti relativi alle finiture e prezzi.
> Quando creo il report vorrei un elenco di questi prodotti omologhi e che
la
> descrizione sia dopo l'ultimo record del gruppo di codici, e non dopo il
> primo come accade settando il controllo "nascondi duplicati" nelle
> proprietà.
Non hai spiegato bene... ma se ho capito devi fare un raggruppamento per
descrizione, poi metti un piè di raggruppamento e lì dentro ci metti il
campo descrizione. Nel corpo invece i vari prodotti con i valori diversi...
Antonio


title: Formattare campo memo

author: Franco

text:
Salve a tutti,
in una tabella ho un campo memo, che implemento da una maschera, nella quale
c'č una casella di testo associata a tale campo.
Poichč le informazioni contenute in tale campo sono molteplici, mi
piacerebbe poter inserire alcune formattazioni, ma non a tutto il testo, ma
solo in alcune sue parti, tipo una parola sottolineata, o in grassetto, o in
colore diverso.
E' possibile ottenere ciň?
Uso Access 2003.
Grazie
Franco
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Formattare campo memo

author: ciroteo

text:
"Franco" <
franc...@inwind.it
> ha scritto nel messaggio
news:217Z222Z110Z44Y...@usenet.libero.it...
> Salve a tutti,
> in una tabella ho un campo memo, che implemento da una maschera, nella
quale
> c'è una casella di testo associata a tale campo.
> Poichè le informazioni contenute in tale campo sono molteplici, mi
> piacerebbe poter inserire alcune formattazioni, ma non a tutto il testo,
ma
> solo in alcune sue parti, tipo una parola sottolineata, o in grassetto, o
in
> colore diverso.
> E' possibile ottenere ciò?
> Uso Access 2003.
> Grazie
> Franco
>
> --------------------------------
> Inviato via
http://arianna.libero.it/usenet/
Dalla prossima versione di access, sarà possibile avere un controllo per
formattare i campi testo e memo.
fino a quel momento dovrai ingegnarti.
se non ricordo male sul sito di lebans (
www.lebans.com
) trovi un controllo
che consente di gestire i formati rtf.
Il formato rtf, è una "specie di linguaggio" che come html ed altri permette
la formattazione del testo attraverso appositi tag, o istruzioni.
Il controllo rtf salva nel campo della tabella il codice sorgente con gli
appositi tag, ma visualizza in forms o report il testo formattato. Non è uno
standard ma è molto diffuso.
ciao


title: Formattare campo memo

text:

Grazie, sono andato a guardare gli esempi, ma sono fuori dalla mia portata;
non riesco a decifrare quello che ho trovato.
Grazie ancora per l'interessamento.



title: Formattare campo memo

text:

Figurati!
questo è il link diretto, non ti nascondo che non è cosa facile.
Non saprei aiutarti altrimenti.
http://www.lebans.com/richtext.htm


title: Formattare campo memo

author: Alessandro Baraldi

text:
Franco ha scritto:
[CUT]
> Grazie, sono andato a guardare gli esempi, ma sono fuori dalla mia portata;
> non riesco a decifrare quello che ho trovato.
> Grazie ancora per l'interessamento.
> Franco
Quello segnalato da Matteo è il demo semplice, con l'OCX....!
Scherzi a parte l'uso dell'OCX è evidente dal Demo allegato, ovvio che
serve un minimo di
dimestichezza da parte tua in quanto se pensavi di trovare un sistema
che con la sola imposizione delle mani  facesse tutto..... era una
pretesa bella, ma tale rimaneva....
Ovvio che la formattazione del testo viene fatta via Codice, ma c'è
poco da inventare essendo tutto disponibile nel demo stesso.
L'importante è sapere che la formattazione è del tipo RTF con tutti i
pro e contro..., ma se rimane un'esigenza fine a se stessa direi che
con un minimo di impegno si risolve.
@Alex


title: Chiudere una query in automatico

author: ..::Maffi Maurizio::..

text:
E' una query di Unione, la quarta di 5 query che mi creano un report. Sono
riuscito a far chiudere le altre in automatico prima che mi apra il report
(erano query di creazione tabella) ma questa nn mi si chiude!
Devo per caso usare il comando Close? Se cosě fosse, quali parametri uso?
Grazie


title: Chiudere una query in automatico

author: Sergio MAZZA

text:
"..::Maffi Maurizio::.." <
mup...@libero.it
> ha scritto nel messaggio
news:aV3Gb.1808$VW.6...@news3.tin.it...
> E' una query di Unione, la quarta di 5 query che mi creano un report. Sono
> riuscito a far chiudere le altre in automatico prima che mi apra il report
> (erano query di creazione tabella) ma questa nn mi si chiude!
> Devo per caso usare il comando Close? Se così fosse, quali parametri uso?
> Grazie
>
Se ho capito bene dovresti utilizzare il metodo SelectObject e poi il
Close...
Ciao.
--
Sergio MAZZA


title: Mi sto perdendo con una sottomaschera...

author: RobertOne

text:
Ciao a tutti.
Come da oggett... Ho una maschera con sottomaschera integrata. Nella
maschera una casella di testo dove inserisco il nr. di telefono da ricercare
ed IN TEORIA ottengo il risultato... Il problema è che accedendo alla
maschera con incorporata la sottomaschera, mi trovo la sottomaschera già
popolata con tutti i record esistenti nel database... Invece mi deve dare il
risultato dopo che ho digitato il nr. da ricercare... Ho provato la query e
funziona regolarmente. Il problema è nel collegamento della sottomaschera a
mio avviso ma non lo trovo!
Mi sto perdendo in un bicchiere d'acqua ma non trovo la soluzione, chiedo
aiuto.
Grazie.
Rob.


author: Alessandro Cara

text:

Cosa fai sulla sottomaschera nel momento in cui accetti il valore di
ricerca? Modifichi il filtro il recordsource ho hai un qualche link
master/detail
Nei primi due casi fai alla prima attivazione fai partire il subform con
un criterio del tipo where 1=2
--
ac (x=y-1)


text:
"Alessandro Cara"  ha scritto nel messaggio ...
> Cosa fai sulla sottomaschera nel momento in cui accetti il valore di
> ricerca? Modifichi il filtro il recordsource ho hai un qualche link
> master/detail
>
> Nei primi due casi fai alla prima attivazione fai partire il subform con
> un criterio del tipo where 1=2
>
> --
>
> ac (x=y-1)
In teoria si dovrebbe modificare il filtro recordsource, se non dico una
assurditą. Se per esempio mando in esecuzione solo la subform mi esce la
finestra Imissione valore parametro, dove digito il dato da ricercare e dopo
aver dato invio, mi si visualizza correttamente il risultato.
Roberto


text:
"Alessandro Cara"  ha scritto nel messaggio ...
> Cosa fai sulla sottomaschera nel momento in cui accetti il valore di
> ricerca? Modifichi il filtro il recordsource ho hai un qualche link
> master/detail
>
> Nei primi due casi fai alla prima attivazione fai partire il subform con
> un criterio del tipo where 1=2
>
> --
>
> ac (x=y-1)
Questa è la query della subform:
SELECT [Utenza telefonica].TelUno, [Utenza telefonica].TelDue, [Utenza
telefonica].CelUno, [Utenza telefonica].CelDue, [Utenza telefonica].Fax,
[Utenza telefonica].Utente
FROM [Utenza telefonica]
WHERE ((([Utenza telefonica].TelUno) Like "*" & [Forms]![Ricerca utenti da
numeri]![N1] & "*")) OR ((([Utenza telefonica].TelDue) Like "*" &
[Forms]![Ricerca utenti da numeri]![N1] & "*")) OR ((([Utenza
telefonica].CelUno) Like "*" & [Forms]![Ricerca utenti da numeri]![N1] &
"*")) OR ((([Utenza telefonica].CelDue) Like "*" & [Forms]![Ricerca utenti
da numeri]![N1] & "*")) OR ((([Utenza telefonica].Fax) Like "*" &
[Forms]![Ricerca utenti da numeri]![N1] & "*"))
ORDER BY [Utenza telefonica].Utente;
Rob


text:
Il 17/05/2011 18.44, RobertOne ha scritto:
> "Alessandro Cara"  ha scritto nel messaggio ...
>
>> Cosa fai sulla sottomaschera nel momento in cui accetti il valore di
>> ricerca? Modifichi il filtro il recordsource ho hai un qualche link
>> master/detail
>>
>> Nei primi due casi fai alla prima attivazione fai partire il subform con
>> un criterio del tipo where 1=2
>>
>> --
>>
>> ac (x=y-1)
>
> Questa è la query della subform:
Regolare. Prova a inizializzare (in disegno) il controllo N1 con un
carattere qualsiasi non presente sui numeri telefonici (i.e. "_") e vedi
che succede.
Poiche' N1 parte vuoto la like della query restituisce, ovviamente,
l'intera tabella.
--
ac (x=y-1)


text:
"Alessandro Cara"  ha scritto nel messaggio ...
> Regolare. Prova a inizializzare (in disegno) il controllo N1 con un
> carattere qualsiasi non presente sui numeri telefonici (i.e. "_") e vedi
> che succede.
> Poiche' N1 parte vuoto la like della query restituisce, ovviamente,
> l'intera tabella.
>
> --
>
> ac (x=y-1)
Ho messo per prova la lettera S come valore predefinito nella casella di
testo e partendo dalla Home Page del db, la subform non si popola... Se non
c'è altra escamotage (ma credo che ci sia) lascerò tale lettera.
Roberto


text:
Il 17/05/2011 19.07, RobertOne ha scritto:
> "Alessandro Cara"  ha scritto nel messaggio ...
>
>> Regolare. Prova a inizializzare (in disegno) il controllo N1 con un
>> carattere qualsiasi non presente sui numeri telefonici (i.e. "_") e vedi
>> che succede.
>> Poiche' N1 parte vuoto la like della query restituisce, ovviamente,
>> l'intera tabella.
>>
>> --
>>
>> ac (x=y-1)
>
>
> Ho messo per prova la lettera S come valore predefinito nella casella di
> testo e partendo dalla Home Page del db, la subform non si popola... Se non
> c'ï¿œ altra escamotage (ma credo che ci sia) lascerï¿œ tale lettera.
altra cosa che puoi fare nella query, dove e' citato N1
nz(......N1,'_')
--
ac (x=y-1)


text:
"Alessandro Cara"  ha scritto nel messaggio ...
> altra cosa che puoi fare nella query, dove e' citato N1
>
> nz(......N1,'_')
>
> --
>
> ac (x=y-1)
Ti ringrazio per il tempo che stai perdendo per il mio rompicapo, però
quanto mi riporti sopra non riesco a metterlo in pratica, soprattutto per la
poca esperienza e la ruggine creata da una lungo disuso. Ho provato ad
utilizzare la funzione Nz ma non so dove inserirla e non mi funziona.
Rob.


author: max

text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio
news:iqu8mv$obg$1...@tdi.cu.mi.it...

lo devi inserire qui
WHERE ((([Utenza telefonica].TelUno) Like "*" & nz([Forms]![Ricerca utenti
da
numeri]![N1];"_"; & "*")) e lo fai per tutti e 4 i criteri inseriti in where
ciao
Max


text:
"max"  ha scritto nel messaggio ...
>
> lo devi inserire qui
> WHERE ((([Utenza telefonica].TelUno) Like "*" & nz([Forms]![Ricerca utenti
> da
> numeri]![N1];"_"; & "*")) e lo fai per tutti e 4 i criteri inseriti in
> where
> ciao
> Max
Grazie Max per la dritta ma avevo già provato nel modo che mi indichi e non
ottengo nessun risultato, Nel senso che dopo aver digitato un numero da
cercare la sottomaschera non si popola. Forse c'è qualcos'altro che mi
sfugge, strano ma vero.
Questa è la mia query:
SELECT [Utenza telefonica].TelUno, [Utenza telefonica].TelDue, [Utenza
telefonica].CelUno, [Utenza telefonica].CelDue, [Utenza telefonica].Fax,
[Utenza telefonica].Utente
FROM [Utenza telefonica]
WHERE ((([Utenza telefonica].TelUno) Like "*" & "nz[Forms]![Ricerca utenti
da numeri]![N1]" & "*")) OR ((([Utenza telefonica].TelDue) Like "*" &
"nz[Forms]![Ricerca utenti da numeri]![N1]" & "*")) OR ((([Utenza
telefonica].CelUno) Like "*" & "nz[Forms]![Ricerca utenti da numeri]![N1]" &
"*")) OR ((([Utenza telefonica].CelDue) Like "*" & "nz[Forms]![Ricerca
utenti da numeri]![N1]" & "*")) OR ((([Utenza telefonica].Fax) Like "*" &
"nz[Forms]![Ricerca utenti da numeri]![N1]" & "*"))



text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio
news:ir01bl$32k$1...@tdi.cu.mi.it...

questa come le altre 3 devono essere scritte così
WHERE ((([Utenza telefonica].TelUno) Like "*" & nz([Forms]![Ricerca utenti
da numeri]![N1];"_" )& "*")
ciao
Max


text:
"max"  ha scritto nel messaggio ...
>
> questa come le altre 3 devono essere scritte così
>
> WHERE ((([Utenza telefonica].TelUno) Like "*" & nz([Forms]![Ricerca utenti
> da numeri]![N1];"_" )& "*")
>
> ciao
> Max
Non ho parole... in pratica omettevo il passaggio "_" etc. etc. Ecco perchè
non funzionava...
Grazie Max e colgo l'occasione per ringraziare ancora una volta Alessandro.
Roberto


title: Automazione word bookmarks esempio sito Ccomune

author: Tom

text:
ciao a tutti,
ho scaricato l'esempio di automazione di access con word con l'utilizzo dei
segnalibri dal sito comune, l'ho provato e mi funziona correttamente, avrei
però la necessità in fase di inserimento dei records anzichè inserirli in
modo orizzontale come l'esempio scaricato, io dovrei inserirli in modo
verticale, spiego meglio con un esempio:
l'esempio del sito comune in fase di inserimento del recordset, mi crea
prima la riga con le intestazione di colonna:
Data       Prodotto                                        Um      Quantità
Prezzo        Totale
e poi sotto elenca i vari records.
record1
record 2
ecc...
ame interesserebbe invece una struttura composta in questo modo:
Record 1:    Data            ......
                    Prodotto        ......
                    UM                ......
                    Quantità        ......
                    Prezzo            ......
                    Totale            ......
Record 2:    Data            ......
                    Prodotto        ......
                    UM                ......
                    Quantità        ......
                    Prezzo            ......
                    Totale            ......
e così via...
è realizzabile una struttura del genere?
grazie, Tommy


author: namor

text:
"Tom" <
ar...@libero.it
> ha scritto nel messaggio
news:G1%Pe.33425$HM1.9...@twister1.libero.it...

Si, modifichi il ciclo sul recordset e fai inserire per ogni campo
l'etichetta fissa più il valore del campo, magari separati da una
tabulazione (chr$(9)), per mantenere la leggibilità. Le posizioni delle
tabulazioni le devi impostare subito prima di esportare i record.
While Not .EOF
    Wrd.Selection.TypeText "Data:" & chr$(9) & !data & vbcrlf
    Wrd.Selection.TypeText "Prodotto:" & chr$(9) & !prodotto & vbcrlf
    Wrd.Selection.TypeText "Quantità:" & chr$(9) & !quantita & vbcrlf
    ...............
Ciao.
Namor


title: Conversione in Euro

author: Grazia Cardone

text:
Salve a tutti.
Vorrei chiedervi se esiste una funzione che posso utilizzare in un controllo
di una maschera o report che faccia la conversione in Euro. Ho provato con
EuroConvert([campo lire];ITL;EUR;2;2) ma non va, probabilmente č
utilizzabile solo da VB.
Grazie


title: Conversione in Euro

text:

Ciao, sostanzialmente se realizzi una Funzione simile aggiri l'ostacolo:
************************************
Public Function fEuro (Lire as long) as long
    fEuro=Format(Lire/1936,27, "##,##0.00")
End function
************************************
La metti in un modulo "generale" e la richiami ogni volta che serve
passi il valore in Łire ritorna in Euro:
VelEuro=fEuro(10.000)-----> ValEuro=5,16
Verifica la funzione Format, sono andato a memoria.......
Alex.
>--------------------------------------------------------------------------<
Alessandro B.
E-Mail        ----->
ik2...@libero.it
Sito web    ----->
http://digilander.iol.it/ik2zok/
>--------------------------------------------------------------------------<
--
Posted from [212.141.54.103]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Conversione in Euro

author: CarloCos

text:
"Grazia Cardone" <
dome...@freemail.it
> ha scritto nel messaggio
news:9lv1oa$nuf$2...@nreadb.inwind.it...
> Salve a tutti.
> Vorrei chiedervi se esiste una funzione che posso utilizzare in un
controllo
> di una maschera o report che faccia la conversione in Euro. Ho provato con
> EuroConvert([campo lire];ITL;EUR;2;2) ma non va, probabilmente è
> utilizzabile solo da VB.
> Grazie
>
>
La conversione della Lira in Euro deve rispondere alle specifiche emanate
dal parlamento europeo.
Il cambio è fisso: un Euro = a Lire 1936,27
La terza cifra decimale va arrotondata per eccesso o per difetto a seconda
del suo valore.
Ti propongo queste due funzioni.
La prima trasforma le lire in euro, la seconda arrotonda il valore euro.
Public Function LireToEuro(denaro As Currency) As Currency
On Error Resume Next
Dim Euro as Currency
Euro = 1936.27
LireToEuro = denaro / Euro
End Function
Public Function ArrotondaEuro(dblValore)
   'dblValore è il valore in euro precedentemente avuto
    dblValore = (dblValore * 100) + 0.5
    If InStr(CStr(dblValore), ",") <> 0 Then dblValore = Int(dblValore)
    ArrotondaEuro = dblValore / 100
End Function
ArrotondaEuro è il vero valore.
Metti questo valore in un campo numerico di tipo precisione singola o
doppia.
Ciao, Carlo


title: Conversione in Euro

author: Bonavita Ozanam

text:
"Grazia Cardone" <
dome...@freemail.it
> ha scritto nel messaggio
news:9lv1oa$nuf$2...@nreadb.inwind.it...
> Salve a tutti.
> Vorrei chiedervi se esiste una funzione che posso utilizzare in un
controllo
> di una maschera o report che faccia la conversione in Euro. Ho provato con
> EuroConvert([campo lire];ITL;EUR;2;2) ma non va, probabilmente è
> utilizzabile solo da VB.
> Grazie
>
in db realizzati con access 97 ho risolto così
campi importo ed euro  tipo valuta con i relativi formati,
maschera : su dopo aggiornamento importo
euro = Fix("" & (importo / 1936.27) * (10 ^ 2) + Sgn(importo / 1936.27) *
0.5) / (10 ^ 2)
se nelle tabelle hai già dati caricati e vuoi aggiornare il campo euro puoi
usare la seguente query di aggiornamento del campo euro nella tabella
fondcass dove l'importo in lire si trova nel campo somma
Fix("" &
([fondcass]![somma]/1936,27)*(10^2)+Sgn([fondcass]![somma]/1936,27)*0,5)/(10
^2)
spero di esserti stato utile
P.S. la funzione di arrotondamento è una variante di quella presente sul
sito comune di Karl.. se non ricordo bene il nome non me ne voglia
--
lo...@tin.it
http://sicilia.cjb.net
http://bonavita.homepage.nu
http://space.tin.it/arte/loobo
http://www.geocities.com/bonavitao


title: Tasto che disabilita se stesso

author: A. Vincenzoni

text:
Come puo'  il codice associato a un bottone di comando, disabilitare il
bottone di comando stesso?
mi da' errore 2164 e dice "impossibile disattivare il controllo che ha
attualmente lo stato attivo"
Spiego - ho una tastierina (gruppo di bottoni di comando) disegnata a video,
per ogni tasto che si preme viene incrementato un contatore.  Quando il
contatore arriva a 100, disabilito tutti i tasti  (per evitare che nella
foga l'utente prosegua l'immissione) e passo a fare dei calcoli.
il codice associato alla pressione del tasto Cmd_01 e'
Private Sub cmd01_Click()
    Let TOT = TOT + 1
    If TOT >= LIM Then concludi_conteggio
End Sub
Quando il contatore TOT arriva al valore limite di LIM, viene chiamata la
routine concludi_conteggio che dapprima disabilita i tasti e poi chiama a
sua volta la routine di calcolo
Private Sub concludi_conteggio()
    Me.Cmd_01.Enabled = False
    Me.Cmd_02.Enabled = False
    ...
    Effettua_calcoli
end sub
quando il tasto Cmd_01 cerca di forzare a falso l'attributo enabled di se
stesso, da' errore. E' anche ragionevole, ma come aggiro la situazione?
grazie
VA


title: Tasto che disabilita se stesso

text:
"A. Vincenzoni" <
avinc...@hotmail.com
> ha scritto nel messaggio
news:g076rm$qt5$1...@tdi.cu.mi.it...

Prima di disabilitare tutti i controlli sposti il fuoco su un altro
controllo...
Ciao.
--
Sergio MAZZA


title: Tasto che disabilita se stesso

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:4827261f$0$29977$5fc...@news.tiscali.it...
> > Come puo'  il codice associato a un bottone di comando, disabilitare il
> > bottone di comando stesso?
> Prima di disabilitare tutti i controlli sposti il fuoco su un altro
> controllo...
Funziona!
grazie


title: Aiuto

author: Alessia

text:
Rieccomi, ho trovato una quasi soluzione al mio problema usando in una macro
l'azione ImpostaValore.
Espressa in questo modo:
Azione:         - ImpostaValore
Elemento:     -  [nomecampo]
Espressione: -  ([nomecampo]*2)/100 + [nomecampo]
Scrivendola così funziona, ma non mi basta perchè al posto del numero 2
vorrei fosse possibile inserire la percentuale desiderata senza dover aprire
la macro per variarla.
Poi, ovviamente problema esposto solo in questo preciso momento da chi dovrà
usare il programma, dovrei arrotondare il valore alle 100 lire superiori se
>50 e viceversa.
Non ho altro da dire.
Grazie mille.
Alessia


title: Aiuto

author: Roberto

text:
"Alessia" <
sd...@spin.it
> ha scritto nel messaggio
news:8mosva$9c1$1...@pc1.spin.it...

Se il valore da adoperarare come secondo fattore della moltiplicazione è
contenuto in un controllo di una maschera di nome Maschera1 e si chiama
Percentuale, prova a scrivere come espressione:
    Int(([nomecampo]*[Forms]![Maschera1]![Percentuale]+49)/100)+[nomecampo]
Roberto


title: Costruzione Report

author: Opera

text:
Ho un report basato su una query che resituisce un recordset con la seguente
struttura:
PROPRIETARIO1 | X_OGGETTO1 | Y_OGGETTO1 | Z_OGGETTO1 ....
PROPRIETARIO1 | X_OGGETTO2 | Y_OGGETTO2 | Z_OGGETTO2 ....
PROPRIETARIO1 | X_OGGETTO3 | Y_OGGETTO3 | Z_OGGETTO3 ....
PROPRIETARIO2 | X_OGGETTO1 | Y_OGGETTO1 | Z_OGGETTO1 ....
PROPRIETARIO2 | X_OGGETTO2 | Y_OGGETTO2 | Z_OGGETTO2 ....
PROPRIETARIO2 | X_OGGETTO3 | Y_OGGETTO3 | Z_OGGETTO3 ....
PROPRIETARIO3 | X_OGGETTO1 | Y_OGGETTO1 | Z_OGGETTO1 ....
PROPRIETARIO3 | X_OGGETTO2 | Y_OGGETTO2 | Z_OGGETTO2 ....
PROPRIETARIO3 | X_OGGETTO3 | Y_OGGETTO3 | Z_OGGETTO3 ....
Dove x, y e z sono proprietà del singolo oggetto.
Non riesco a costruire il report in modo tale che presenti nell'Intestazione
di Pagina i dati relativi al singolo PROPRIETARIO e nel Corpo tutti gli
oggetti di quel proprietario indipendentemente dal loro numero.
In sostanza, ho bisogno che l'intestazione di pagina si ripeta per ciascun
nuovo PROPRIETARIO solamente quando tutti gli oggetti di quello precedente
sono stati stampati.
Grazie per qualsiasi aiuto.


title: Costruzione Report

author: Roberto da casa

text:
"Opera" <
kronos...@virgilio.it
> ha scritto nel messaggio
news:43a9114c$0$16209$4faf...@reader3.news.tin.it...

Se il report lo stai creando con l'autocomposizione forse la cosa più
semplice è chiedere il raggruppamento del report sul campo che contiene il
proprietario e scegliere un layout Con rientri, quindi per la sezione
iIntestazione di gruppo imposta a Prima di sezione la proprietà Interruzione
pagina.
Così facendo ogni volta che cambia il proprietario il report va a pagina
nuova e il nome del proprietario compare solo all'inizio di ogni gruppo.
>
> Grazie per qualsiasi aiuto.
Prego, Buon Natale ed un Felice 2006
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Costruzione Report

text:
> Se il report lo stai creando con l'autocomposizione forse la cosa più
> semplice è chiedere il raggruppamento del report sul campo che contiene il
> proprietario e scegliere un layout Con rientri, quindi per la sezione
> iIntestazione di gruppo imposta a Prima di sezione la proprietà
Interruzione
> pagina.
> Così facendo ogni volta che cambia il proprietario il report va a pagina
> nuova e il nome del proprietario compare solo all'inizio di ogni gruppo.
>
Funge :)
Grazie ancora.
Ciao


title: Costruzione Report

text:
"Opera" <
kronos...@virgilio.it
> ha scritto nel messaggio
news:43a93136$0$13264$4faf...@reader2.news.tin.it...
[CUT]
> >
> Funge :)
>
> Grazie ancora.
Prego
>
> Ciao



title: Cerco esempio Software Fantacalcio

author: MAx

text:
Sto cercando un esempio per gestire un torneo di Fantacalcio.
Qualcuno mi può indicare dove poterlo reperirlo, magari in formato mdb?
Grazie Mille
Max


title: Valore Predefinito ComboBox

text:
Come faccio a fare sì che una combo box di una maschera abbia come valore
predefinito il primo della lista dei suoi possibili valori? In buona
sostanza, apro la maschera, e vorrei che la combo non fosse vuota (anche se
aprendo la tendina compaiono tutti i valori), ma vissualizzasse già il
primo. So farlo tramite VBA andando a leggerlo dalla SQL cui si riferisce
tramite DAO e impostando il valore desiderato, ma questo comporta che, se
faccio un requery (il rowsource, infatti dipende da un'altro combobox) non
funziona più....
Mi spiego meglio: ho ComboBox_A e ComboBox_B (a cui in fase di load della
form imposto il RowSource con una SQl che richiama ComboBox_A). Se cambio il
valore di ComboBox_A, con un Requery, ComboBox_B cambia la sua lista di
valori. Ora se il valore da visualizzare lo imposto nella routine di load
della form, al momento del requery, di lì non ci passo più! Dovrei dunque
impostare all'inizio che il DefaultValue di ComboBox_B non è un valore ma
una formula, ma non so come impostarlo nella finestra delle proprietà!
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Valore Predefinito ComboBox

author: Roberto dal portatile

text:
"P@olo" <
paolodamo...@tim.it
> ha scritto nel messaggio
news:194Z243Z137Z76Y...@usenet.libero.it...

Vai sul Sito Comune (link qui sotto) e nella Sezione Forms leggi la mia FAQ
intitolta "3.111 Selezionare da VBA la riga di una casella combinata".
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Valore Predefinito ComboBox

author: PBsoft

text:
[omissis]
Supponendo che la combobox si chiami cboTest, il codice che ti serve è il
seguente:
Me.cboTest.DefaultValue = Me.cboTest.ItemData(0)
===
"Liberalizziamo l'elenco dei CAP"
http://www.petitiononline.com/freecap/petition.html
===
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: Valore Predefinito ComboBox

text:
Il 03 Nov 2006, 16:24, PBsoft <in...@REMOVEpbsoft.it> ha scritto:
> [omissis]
>
> Supponendo che la combobox si chiami cboTest, il codice che ti serve è il
> seguente:
>
> Me.cboTest.DefaultValue = Me.cboTest.ItemData(0)
Non mi sono spiegato bene: se faccio così, il DefaultValue sarà ciò che al
momento del caricamento sarà contenuto in Me.cboTest.ItemData(0). Se però,
attraverso l'evento requery aggiorno la lista dei valori disponibili per
Me.cboTest, il DefaultValue non verrà aggiornato, a meno di non far girare
nuovamente la troutine VB!



title: Valore Predefinito ComboBox

text:
>> Me.cboTest.DefaultValue = Me.cboTest.ItemData(0)
> Non mi sono spiegato bene: se faccio così, il DefaultValue sarà ciò
> che al momento del caricamento sarà contenuto in
> Me.cboTest.ItemData(0). Se però, attraverso l'evento requery aggiorno
> la lista dei valori disponibili per Me.cboTest, il DefaultValue non
> verrà aggiornato, a meno di non far girare nuovamente la troutine VB!
Concordo pienamente, ma non vedo niente di male ad inserire questa riga di
codice anche a seguito del requery della combo.
Io sono sempre stato per la razionalizzazione del codice, ma si tratta pur
sempre di una sola riga!!!



title: Valore Predefinito ComboBox

text:
> Concordo pienamente, ma non vedo niente di male ad inserire questa riga di
> codice anche a seguito del requery della combo.
> Io sono sempre stato per la razionalizzazione del codice, ma si tratta pur
> sempre di una sola riga!!!
E' vero, ma forse mi sfugge qualcosa: io, ad un certo punto del codice
(anzi, più di uno), invoco la Requery della maschera che contiene la
ComboBox, percui, ad ogni istruzione Form.Requery dovrei far seguire la riga
di set del DefaultValue, dato che, mi pare, non esista un evento del tipo
AfterRequery della Combo o della Form, dico bene?



title: Valore Predefinito ComboBox

text:
> E' vero, ma forse mi sfugge qualcosa: io, ad un certo punto del codice
> (anzi, più di uno), invoco la Requery della maschera che contiene la
> ComboBox, percui, ad ogni istruzione Form.Requery dovrei far seguire
> la riga di set del DefaultValue, dato che, mi pare, non esista un
> evento del tipo AfterRequery della Combo o della Form, dico bene?
Ni.
Quando fai il requery della maschera non vai a modificare il valore predefinito
della combo, quindi non ti serve fare il requery della combo.
Il requery della combo ha senso solo quando modifichi l'origine riga della
combo stessa.



title: Incremento automatico cosi' mi piaci.......

author: Dino

text:
Ciao a tutti sono Dino.
Vi vorrei porre un quesito .Con l'espressione seguente:=Nz(DMax("[Num
doc]";"[Tabella fatture prodotti]");0)+1.
Riesco ad incrementare il num fattura e lo posso anche modificare.Il
problema e' il cambio anno.
Infatti il mio DB fa il cambio anno automatico ma l'incremento del num
fatt. no.
Sul nostro sito ho trovato l'espressione:
=IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
'*/" & Format(Date();"aa") &
"'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
'*/"
& Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
che azzera ogni inizio anno il tutto.Ok. Io se e' possibile vorrei
invece tenere l'espressione sopra riportata e magare implementarla con
un po' di VBA per far sì che ad inizio anno si riparta da 1.
Non mi dite che ci vuole la bacchetta magica.
STRA....grazie in anticipo.
Saluti Dino


author: geppo

text:
Ciao Dino wrote:
> Ciao a tutti sono Dino.
>
> Vi vorrei porre un quesito .Con l'espressione seguente:=Nz(DMax("[Num
> doc]";"[Tabella fatture prodotti]");0)+1.
>
> Riesco ad incrementare il num fattura e lo posso anche modificare.Il
> problema e' il cambio anno.
> Infatti il mio DB fa il cambio anno automatico ma l'incremento del num
> fatt. no.
>
> Sul nostro sito ho trovato l'espressione:
> =IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
> '*/" & Format(Date();"aa") &
> "'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
> '*/"
> & Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
>
> che azzera ogni inizio anno il tutto.Ok. Io se e' possibile vorrei
> invece tenere l'espressione sopra riportata e magare implementarla con
> un po' di VBA per far sě che ad inizio anno si riparta da 1.
>
> Non mi dite che ci vuole la bacchetta magica.
> STRA....grazie in anticipo.
> Saluti Dino
se hai un controllo in cui salvi la data corrente prova ad aggiungere:
"year(data)= "& Year(NomeTuoControllo)
diventera' cosi:
=Nz(DMax("[Numdoc]";"[Tabella fatture prodotti]"; "year(NomeCampoData)= "&
Year(NomeTuoControllo));0)+1
--
Ciao
Geppo


text:
On 25 Gen, 20:51, "geppo" <c...@tin.it.invalid> wrote:
> Ciao Dino wrote:
> > Ciao a tutti sono Dino.
>
> > Vi vorrei porre un quesito .Con l'espressione seguente:=Nz(DMax("[Num
> > doc]";"[Tabella fatture prodotti]");0)+1.
>
> > Riesco ad incrementare il num fattura e lo posso anche modificare.Il
> > problema e' il cambio anno.
> > Infatti il mio DB fa il cambio anno automatico ma l'incremento del num
> > fatt. no.
>
> > Sul nostro sito ho trovato l'espressione:
> > =IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
> > '*/" & Format(Date();"aa") &
> > "'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
> > '*/"
> > & Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
>
> > che azzera ogni inizio anno il tutto.Ok. Io se e' possibile vorrei
> > invece tenere l'espressione sopra riportata e magare implementarla con
> > un po' di VBA per far sì che ad inizio anno si riparta da 1.
>
> > Non mi dite che ci vuole la bacchetta magica.
> > STRA....grazie in anticipo.
> > Saluti Dino
>
> se hai un controllo in cui salvi la data corrente prova ad aggiungere:
>
> "year(data)= "& Year(NomeTuoControllo)
>
> diventera' cosi:
>
> =Nz(DMax("[Numdoc]";"[Tabella fatture prodotti]"; "year(NomeCampoData)= "&
> Year(NomeTuoControllo));0)+1
>
> --
> Ciao
> Geppo- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Ciao Geppo sono Dino.
Grazie per il consiglio.Ho pero' riscontrato dei problemi.
Ti spiego come gestisco il cambio anno automatico.Come prima cosa
Nella "Query fatture" sono andato a crearmi il Campo Anno (realizzato
dir nella query) Anno:Year([Data doc]).Ovviamente come risultato la
Query mi da l'anno corrente(Es 2008).Nella riga criteri poi sono
andato ad inserire il seguente ciclo IIF: IIf([Forms]![Cambio anni
precedenti]![AA]>0;[Forms]![Cambio anni precedenti]![AA];[Forms]!
[Cambio anno]![Cambio anno]).
Cioe' ho creato una tab con il campo Cambio anno dove viene calcolata
la data odierna.L'altra condizione invece e' una maschera con il
controllo [AA] dove posso scegliere gli ann ipassati e rip. il DB
all'anno voluto.
Come faccio con questa impostazione ad inserire il tuo consiglio.
Grazie ancora
Saluti Dino


text:

> Saluti Dino- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Geppo ciao sono sempre Dino.
Perdona le domande banali!!!!
Se dovessi usare l'altra espressione :
=IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
'*/" & Format(Date();"aa") &
"'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
'*/"
& Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
Il "contatore" di questa funzione e' illimitato cioe' 1000/08 oppure
se si arriva a 10.000/08 non cambia nulla vero????Che domandaccia
ehhhh....
Ancora ciao


text:
Ciao Dino wrote:
> On 25 Gen, 20:51, "geppo" <c...@tin.it.invalid> wrote:
>> Ciao Dino wrote:
>>> Ciao a tutti sono Dino.
>>
>>> Vi vorrei porre un quesito .Con l'espressione
>>> seguente:=Nz(DMax("[Num doc]";"[Tabella fatture prodotti]");0)+1.
>>
>>> Riesco ad incrementare il num fattura e lo posso anche modificare.Il
>>> problema e' il cambio anno.
>>> Infatti il mio DB fa il cambio anno automatico ma l'incremento del
>>> num fatt. no.
>>
>>> Sul nostro sito ho trovato l'espressione:
>>> =IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
>>> '*/" & Format(Date();"aa") &
>>> "'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
>>> '*/"
>>> & Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
>>
>>> che azzera ogni inizio anno il tutto.Ok. Io se e' possibile vorrei
>>> invece tenere l'espressione sopra riportata e magare implementarla
>>> con un po' di VBA per far sě che ad inizio anno si riparta da 1.

Non č che abbia capito molto, comunque potresti provare ad inserire come
criterio della Function Dmax
"& year([Forms]![Cambio anno]![Cambio anno])
--
Ciao
Geppo


text:
Ciao Dino wrote:
> On 26 Gen, 09:42, Dino <
verrengia.d...@alice.it
> wrote:
>> On 25 Gen, 20:51, "geppo" <c...@tin.it.invalid> wrote:
>>
>>
>>
>>
>>
>>> Ciao Dino wrote:
>>>> Ciao a tutti sono Dino.
>>
>>>> Vi vorrei porre un quesito .Con l'espressione
>>>> seguente:=Nz(DMax("[Num doc]";"[Tabella fatture prodotti]");0)+1.
>>
>>>> Riesco ad incrementare il num fattura e lo posso anche
>>>> modificare.Il problema e' il cambio anno.
>>>> Infatti il mio DB fa il cambio anno automatico ma l'incremento del
>>>> num fatt. no.
>>
>>>> Sul nostro sito ho trovato l'espressione:
>>>> =IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
>>>> '*/" & Format(Date();"aa") &
>>>> "'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
>>>> '*/"
>>>> & Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
>>
>>>> che azzera ogni inizio anno il tutto.Ok. Io se e' possibile vorrei
>>>> invece tenere l'espressione sopra riportata e magare implementarla
>>>> con un po' di VBA per far sě che ad inizio anno si riparta da 1.

Credo proprio di si, atteso che si tratta di un dato tipo testo.
--
Ciao
Geppo


author: Pablitomf

text:
>Sul nostro sito ho trovato l'espressione:
Sul NOSTRO sito quale?...
...
...
guarda sul mio (e di MA) vą... c'č proprio l'esempio che cerchi! lo misi
tempo addietro :
http://www.accessgroup.it/HomeArgomenti.asp?ID=126&Oggetto2=DB%20Fatturazione
;-)
--
---
Ciao
Pablitomf (Maurizio Facciuti)
Web Master
www.accessgroup.it


text:
On 26 Gen, 14:04, "Pablitomf" <
pablit...@hotmail.it
> wrote:
> >Sul nostro sito ho trovato l'espressione:
>
> Sul NOSTRO sito quale?...
> ...
> ...
> guarda sul mio (e di MA) và... c'è proprio l'esempio che cerchi! lo misi
> tempo addietro :
http://www.accessgroup.it/HomeArgomenti.asp?ID=126&Oggetto2=DB%20Fatt.
..
>
> ;-)
>
> --
> ---
> Ciao
> Pablitomf (Maurizio Facciuti)
>
> Web
Masterwww.accessgroup.it
Grazie mille super Publi.
La memoria mi inganna.Comunque quando parlavo del nostro sito parlavo
del "sito comune" e il nostro non vuole indicare ....Lo realizzato io
ma io molto modestamente attingoe imparo.
Ottimo anche il vostro e grazie per il linkconsiglio.
Ciao Dino


text:
On 26 Gen, 13:00, "geppo" <c...@tin.it.invalid> wrote:
> Ciao Dino wrote:
> > On 25 Gen, 20:51, "geppo" <c...@tin.it.invalid> wrote:
> >> Ciao Dino wrote:
> >>> Ciao a tutti sono Dino.
>
> >>> Vi vorrei porre un quesito .Con l'espressione
> >>> seguente:=Nz(DMax("[Num doc]";"[Tabella fatture prodotti]");0)+1.
>
> >>> Riesco ad incrementare il num fattura e lo posso anche modificare.Il
> >>> problema e' il cambio anno.
> >>> Infatti il mio DB fa il cambio anno automatico ma l'incremento del
> >>> num fatt. no.
>
> >>> Sul nostro sito ho trovato l'espressione:
> >>> =IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
> >>> '*/" & Format(Date();"aa") &
> >>> "'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
> >>> '*/"
> >>> & Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
>
> >>> che azzera ogni inizio anno il tutto.Ok. Io se e' possibile vorrei
> >>> invece tenere l'espressione sopra riportata e magare implementarla
> >>> con un po' di VBA per far sì che ad inizio anno si riparta da 1.

> Non è che abbia capito molto, comunque potresti provare ad inserire come
> criterio della Function Dmax
>
> "& year([Forms]![Cambio anno]![Cambio anno])
>
> --
> Ciao
> Geppo- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Grazie Geppo provo e se h odei problemi ti rompo(spero di no) le
scatole informatiche!!
Saluti Dino


text:
On 26 Gen, 13:01, "geppo" <c...@tin.it.invalid> wrote:
> Ciao Dino wrote:
> > On 26 Gen, 09:42, Dino <
verrengia.d...@alice.it
> wrote:
> >> On 25 Gen, 20:51, "geppo" <c...@tin.it.invalid> wrote:
>
> >>> Ciao Dino wrote:
> >>>> Ciao a tutti sono Dino.
>
> >>>> Vi vorrei porre un quesito .Con l'espressione
> >>>> seguente:=Nz(DMax("[Num doc]";"[Tabella fatture prodotti]");0)+1.
>
> >>>> Riesco ad incrementare il num fattura e lo posso anche
> >>>> modificare.Il problema e' il cambio anno.
> >>>> Infatti il mio DB fa il cambio anno automatico ma l'incremento del
> >>>> num fatt. no.
>
> >>>> Sul nostro sito ho trovato l'espressione:
> >>>> =IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
> >>>> '*/" & Format(Date();"aa") &
> >>>> "'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
> >>>> '*/"
> >>>> & Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
>
> >>>> che azzera ogni inizio anno il tutto.Ok. Io se e' possibile vorrei
> >>>> invece tenere l'espressione sopra riportata e magare implementarla
> >>>> con un po' di VBA per far sì che ad inizio anno si riparta da 1.

Ciao Geppo ho dei problemi con l'espressione :
=IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
'*/" & Format(Date();"aa") &
"'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
'*/"
& Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
Se elimino una qualsiasi fattura non mi funziona piu' l'incremento.
Devo cioe' aggiornare tutti i numeri per farlo funzionare :Es:
Fatture 01/08 - 02/08 - 03/08 cancello la 01/08. Non mi passa alla
04/08,devo trasformare la 02/08 in 01/08 e la 03/08 in 02/08.Facendo
cosi' cliccando su nuovo inserimento passo alla 03/08 e cosi'.
Secondo te' c'e' un rimedio.
Grazie in anticipo
Saluti Dino


text:
Ciao Geppo ho dei problemi con l'espressione :
=IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
'*/" & Format(Date();"aa") &
"'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
'*/"
& Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
Se elimino una qualsiasi fattura non mi funziona piu' l'incremento.
Devo cioe' aggiornare tutti i numeri per farlo funzionare :Es:
Fatture 01/08 - 02/08 - 03/08 cancello la 01/08. Non mi passa alla
04/08,devo trasformare la 02/08 in 01/08 e la 03/08 in 02/08.Facendo
cosi' cliccando su nuovo inserimento passo alla 03/08 e cosi'.
Secondo te' c'e' un rimedio.
Grazie in anticipo
Saluti Dino
--------------------------------
Risposta :
ma quel mio demo, lo hai visto si o no?



text:
Ciao Dino wrote:
> On 26 Gen, 13:01, "geppo" <c...@tin.it.invalid> wrote:
>> Ciao Dino wrote:
>>> On 26 Gen, 09:42, Dino <
verrengia.d...@alice.it
> wrote:
>>>> On 25 Gen, 20:51, "geppo" <c...@tin.it.invalid> wrote:
>>
>>>>> Ciao Dino wrote:
>>>>>> Ciao a tutti sono Dino.
>>
>>>>>> Vi vorrei porre un quesito .Con l'espressione
>>>>>> seguente:=Nz(DMax("[Num doc]";"[Tabella fatture prodotti]");0)+1.
>>
>>>>>> Riesco ad incrementare il num fattura e lo posso anche
>>>>>> modificare.Il problema e' il cambio anno.
>>>>>> Infatti il mio DB fa il cambio anno automatico ma l'incremento
>>>>>> del num fatt. no.
>>
>>>>>> Sul nostro sito ho trovato l'espressione:
>>>>>> =IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto
>>>>>> like '*/" & Format(Date();"aa") &
>>>>>> "'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
>>>>>> '*/"
>>>>>> & Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
>>
>>>>>> che azzera ogni inizio anno il tutto.Ok. Io se e' possibile
>>>>>> vorrei invece tenere l'espressione sopra riportata e magare
>>>>>> implementarla con un po' di VBA per far sě che ad inizio anno si

Invece di usare la "dcount" prova ad usare il "dmax".
--
Ciao
Geppo


text:

A Dino, me sa che se fa prima se segui il consiglio di Pablitomf.
--
Ciao
Geppo


text:
On 27 Gen, 18:38, "geppo" <c...@tin.it.invalid> wrote:
> Ciao Dino wrote:
> > On 26 Gen, 13:01, "geppo" <c...@tin.it.invalid> wrote:
> >> Ciao Dino wrote:
> >>> On 26 Gen, 09:42, Dino <
verrengia.d...@alice.it
> wrote:
> >>>> On 25 Gen, 20:51, "geppo" <c...@tin.it.invalid> wrote:
>
> >>>>> Ciao Dino wrote:
> >>>>>> Ciao a tutti sono Dino.
>
> >>>>>> Vi vorrei porre un quesito .Con l'espressione
> >>>>>> seguente:=Nz(DMax("[Num doc]";"[Tabella fatture prodotti]");0)+1.
>
> >>>>>> Riesco ad incrementare il num fattura e lo posso anche
> >>>>>> modificare.Il problema e' il cambio anno.
> >>>>>> Infatti il mio DB fa il cambio anno automatico ma l'incremento
> >>>>>> del num fatt. no.
>
> >>>>>> Sul nostro sito ho trovato l'espressione:
> >>>>>> =IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto
> >>>>>> like '*/" & Format(Date();"aa") &
> >>>>>> "'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
> >>>>>> '*/"
> >>>>>> & Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
>
> >>>>>> che azzera ogni inizio anno il tutto.Ok. Io se e' possibile
> >>>>>> vorrei invece tenere l'espressione sopra riportata e magare
> >>>>>> implementarla con un po' di VBA per far sì che ad inizio anno si

Cioa Geppo sono Dino (sono rientrato al lavoro9
Ho provato con Il DMax ma mi da errore.
Come se'' po fa''''''....................
Saluti Dino


text:
Ciao Dino wrote:
----cut---
>> - Mostra testo tra virgolette -
>
> Cioa Geppo sono Dino (sono rientrato al lavoro9
> Ho provato con Il DMax ma mi da errore.
> Come se'' po fa''''''....................
> Saluti Dino
Hai letto qualche post fa cio' che ti ha indicato Pablitomf?
--
Ciao
Geppo


text:

Ciao Geppo si ho letto il post.Il suo DB e' stupendo ma non toreo
(forse solo io) la risposta al mio quesito.
Volendo usare questa espressione se cancello un record mi rimane il
problema sopra descritto.
Il Dmax mi da errore forse perche' la proprieta' del campo e' Testo
Ciao Dino


text:

> Ciao Dino- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Cioa Geppo sono sempre io Come ti dicevo il l'espressione trovata sul
sito di pubb e' ottima ma ni segnala errore.
Con questa espressione:
=IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
'*/" & Format(Date();"aa") &
"'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
'*/"
& Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
ottengo ad esempio 01/08 mentre se sostituisco il Dcount con il dMax
mi da solo errore.
Io invece gradirei avere come formato non solo in num ma anche la data
Ciao grazie


text:

Dino, se mi dai la tua mail ti invio un db con cui si possono creare i campi
contatore come vuoi tu; avrei voluto segnalarti il link pero non ricordo da
dove l'ho scaricato.
--
Ciao
Geppo


text:
---cut---
> Cioa Geppo sono sempre io Come ti dicevo il l'espressione trovata sul
> sito di pubb e' ottima ma ni segnala errore.
> Con questa espressione:
> =IIf(IsNull(DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
> '*/" & Format(Date();"aa") &
> "'"));'1';DCount("TuoCampoTesto";"TuaTabella";"TuoCampoTesto like
> '*/"
> & Format(Date();"aa") & "'")+1) & "/" & Format(Date();"aa")
> ottengo ad esempio 01/08 mentre se sostituisco il Dcount con il dMax
> mi da solo errore.
> Io invece gradirei avere come formato non solo in num ma anche la data
> Ciao grazie
Ciao Dino
provala cosi:
=Format(IIf(IsNull(DMax("[NomeCampo]";"[NomeTabella]";"NomeCampo like
'??/" & Format(Date();"aa") &
"'"));1;Left(DMax("[NomeCampo]";"[NomeTabella]";"num like
'??/" & Format(Date();"aa") & "'");2)+1);"00") & "/" & Format(Date();"aa")
--
Ciao
Geppo


text:

Ciao Geppo sono Dino .avevo commesso un errore di
sintassi .L'espressione e' perfetta.
riconfermo "GEPPO .... IL GRANDE"
Alla prossima
Saluti Dino


text:

Pero', non ti ho ancora detto che il contatore si ferma a 100/Anno.
Se vuoi un numero piu' alto devi aumentare gli "0" i "?" e il numero passato
a Left.
--
Ciao
Geppo


text:

> Geppo- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Grazie Geppo per l'ulteriore consiglio. Per aumentare il contatore a
999 devo mettere 3 000 e 3 ??? e cos' via.
E' il num del Left che non ho ben capito.
Saluti Dino e ancora grazie.
PS:Ho appena consigliato (probabilmente lo vedrai )ad un nostro
"collega" la tua soluzione.


text:

la Left preleva dalla stringa i dati su cui esercitare l'incremento del
contatore; per cui se 999/00 la left deve avere 3
> Saluti Dino e ancora grazie.
> PS:Ho appena consigliato (probabilmente lo vedrai )ad un nostro
> "collega" la tua soluzione.
Perfetto questo è lo spirito del NG.
--
Ciao
Geppo


text:

Geppo grazie avrei bisogno (sempre se tu lo vuoi) di farti visionare
una problematica particolare.La mia mail e'
verreng...@alice.it
posso avere la tua .
Grazie di tutto
Saluti Dino


text:
Ciao Dino wrote:
----cut--
> Geppo grazie avrei bisogno (sempre se tu lo vuoi) di farti visionare
> una problematica particolare.La mia mail e'
verreng...@alice.it
> posso avere la tua .
> Grazie di tutto
> Saluti Dino
Dino, mi farebbe veramente piacere poterti aiutare, ma io oltre a non avere
le "competenze tecniche" , non faccio neanche' questo mestiere;
a tempo libero mi piace partecipare al NG, ma per puro divertimento/svago.
--
Ciao
Geppo


text:
On 31 Gen, 21:46, "geppo" <c...@tin.it.invalid> wrote:
> Ciao Dino wrote:
>
> ----cut--
>
> > Geppo grazie avrei bisogno (sempre se tu lo vuoi) di farti visionare
> > una problematica particolare.La mia mail e'
verrengia.d...@alice.it
> > posso avere la tua .
> > Grazie di tutto
> > Saluti Dino
>
> Dino, mi farebbe veramente piacere poterti aiutare, ma io oltre a non avere
> le "competenze tecniche" , non faccio neanche' questo mestiere;
> a tempo libero mi piace partecipare al NG, ma per puro divertimento/svago.
>
> --
> Ciao
> Geppo
Ok Geppo riguarda solo una dritta su alcune righe di codice :Magari
per te e' una sciocchezza.


text:

Ma allora perchè non posti il problema sul NG, cosi se non sono in grado di
aiutarti, puo farlo qualcun altro. :-)
--
Ciao
Geppo


title: Mettere Nome tabelle in Casella Riepilogo

author: AntFast

text:
Ciao a tutti
Non sono un esperto, gradirei sapere come si fa a mettere i nomi
delle tabelle presenti nell'mdb in una casella di riepilogo,
cos� da poter scegliere su quale tabella lavorare.
Grazie.
Antonio


author: Karl Donaubauer

text:
AntFast wrote:
> Non sono un esperto, gradirei sapere come si fa a mettere i nomi
> delle tabelle presenti nell'mdb in una casella di riepilogo,
> cosě da poter scegliere su quale tabella lavorare.

Puoi usare questo come "Origine riga" della combo:

SELECT MSysObjects.Name
FROM MSysObjects
WHERE MSysObjects.Name Not Like "MSys*"
      AND MSysObjects.Type In (1,4,6)

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


text:
"Karl Donaubauer"  ha scritto nel messaggio
news:aier2c...@mid.individual.net...

Grazie Karl
Dove posso andare a studiare/capire quello che mi hai gentilmente scritto ?
Antonio


author: Luigi

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:aier2c...@mid.individual.net...
> AntFast wrote:
>> Non sono un esperto, gradirei sapere come si fa a mettere i nomi
>> delle tabelle presenti nell'mdb in una casella di riepilogo,
>> cosě da poter scegliere su quale tabella lavorare.
>
> Puoi usare questo come "Origine riga" della combo:
>
> SELECT MSysObjects.Name
> FROM MSysObjects
> WHERE MSysObjects.Name Not Like "MSys*"
>      AND MSysObjects.Type In (1,4,6)
>
ciao Karl
e per aprire la tb corrispondente qual'č il codice da inserire sull'evento
clic?


text:
"Luigi"  ha scritto nel messaggio
news:50c46c90$0$13271$4faf...@reader2.news.tin.it...

"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:aier2c...@mid.individual.net...
> AntFast wrote:
>> Non sono un esperto, gradirei sapere come si fa a mettere i nomi
>> delle tabelle presenti nell'mdb in una casella di riepilogo,
>> cos� da poter scegliere su quale tabella lavorare.
>
> Puoi usare questo come "Origine riga" della combo:
>
> SELECT MSysObjects.Name
> FROM MSysObjects
> WHERE MSysObjects.Name Not Like "MSys*"
>      AND MSysObjects.Type In (1,4,6)
>
ciao Karl
e per aprire la tb corrispondente qual'� il codice da inserire sull'evento
clic?

per non scomodare il Gran Maestro:

Private Sub miaCasellaCombinata_Click()
DoCmd.OpenTable Me.miaCasellaCombinata
End Sub

saluti
Thomas.az


text:
"
thomas.az
" <
thomas.a...@alice.it
> ha scritto nel messaggio
news:50c4f7da$0$17946$4faf...@reader1.news.tin.it...
>
>
> "Luigi"  ha scritto nel messaggio
> news:50c46c90$0$13271$4faf...@reader2.news.tin.it...
>
>
> "Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
> news:aier2c...@mid.individual.net...
>> AntFast wrote:
>>> Non sono un esperto, gradirei sapere come si fa a mettere i nomi
>>> delle tabelle presenti nell'mdb in una casella di riepilogo,
>>> cosě da poter scegliere su quale tabella lavorare.
>>
>> Puoi usare questo come "Origine riga" della combo:
>>
>> SELECT MSysObjects.Name
>> FROM MSysObjects
>> WHERE MSysObjects.Name Not Like "MSys*"
>>      AND MSysObjects.Type In (1,4,6)
>>
> ciao Karl
> e per aprire la tb corrispondente qual'č il codice da inserire sull'evento
> clic?
>
> per non scomodare il Gran Maestro:
>
> Private Sub miaCasellaCombinata_Click()
> DoCmd.OpenTable Me.miaCasellaCombinata
> End Sub
>
> saluti
> Thomas.az
>
grazie Thomas


text:
AntFast ha scritto:
> "Karl Donaubauer"  ha scritto
>> ...come si fa a mettere i nomi
>> delle tabelle presenti nell'mdb in una casella di riepilogo,
>> cosě da poter scegliere su quale tabella lavorare.
>
> Puoi usare questo come "Origine riga" della combo:
>
> SELECT MSysObjects.Name
> FROM MSysObjects
> WHERE MSysObjects.Name Not Like "MSys*"
>      AND MSysObjects.Type In (1,4,6)
>
> Dove posso andare a studiare/capire quello che mi hai gentilmente scritto
> ?

Le tabelle di sistema non sono buon documentate.

MSysObjects č una tabella di sistema che contiene tutti oggetti
del database. In versioni <2007 puoi vederla con
Strumenti - Opzioni - Oggetti di sistema,
in >=2007 l'opzione si trova tra le opzioni del riquadro di spostamento.

Il campo "Name" contiene il nome dell'oggetto,
Il campo Type 1 = tabella locale, 4 = tabella ODBC, 6 = tabella collegata
Not Like "MSys" dice che non vuoi vedere le tabelle di sistema.
In versioni >=2007 puoi anche aggiungere:
And MSysObjects.Name Not Like "f_*"
per non vedere le tabelle per i nuovi tipi di dati (allegato, MVF ecc).



text:
"Karl Donaubauer"  ha scritto nel messaggio
news:aimf9e...@mid.individual.net...

AntFast ha scritto:
> "Karl Donaubauer"  ha scritto
>> ...come si fa a mettere i nomi
>> delle tabelle presenti nell'mdb in una casella di riepilogo,
>> così da poter scegliere su quale tabella lavorare.
>
> Puoi usare questo come "Origine riga" della combo:
>
> SELECT MSysObjects.Name
> FROM MSysObjects
> WHERE MSysObjects.Name Not Like "MSys*"
>      AND MSysObjects.Type In (1,4,6)
>
> Dove posso andare a studiare/capire quello che mi hai gentilmente scritto
> ?

Le tabelle di sistema non sono buon documentate.

MSysObjects è una tabella di sistema che contiene tutti oggetti
del database. In versioni <2007 puoi vederla con
Strumenti - Opzioni - Oggetti di sistema,
in >=2007 l'opzione si trova tra le opzioni del riquadro di spostamento.

Il campo "Name" contiene il nome dell'oggetto,
Il campo Type 1 = tabella locale, 4 = tabella ODBC, 6 = tabella collegata
Not Like "MSys" dice che non vuoi vedere le tabelle di sistema.
In versioni >=2007 puoi anche aggiungere:
And MSysObjects.Name Not Like "f_*"
per non vedere le tabelle per i nuovi tipi di dati (allegato, MVF ecc).

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it

Grazie di cuore
Antonio


title: Associare una QUERY PARAMETRICA ad un LISTBOX

author: Benedetto Romano

text:
Come posso associare ad un listBox, o ad un qualsiasi oggetto access che
abbia un campo RecordSource, una query parametrica, PASSANDOGLI dei
PARAMETRI ?
Mi serve perche' devo collegarmi ad un database SQL SERVER e quindi le Query
sono eseguite dal server, e non da ACCESS, quindi non posso scrivere cose
come :
SELECT pippo FROM pippi WHERE pippo = Forms!Maschera!Nome
perche', ovviamente, il server non vede le maschere di access.
Mi aiutate?  Grazie a tutti, siete preparatissimi.


author: George

text: Lo devi fare in un file MDB o un progetto ADP?


author: Antonio Biso

text:
"George" <
giorgio....@libero.it
> ha scritto nel messaggio
news:b9so76$18m$1...@newsreader.mailgate.org...
> Lo devi fare in un file MDB o un progetto ADP?
E lasciare parte del quoting del messaggio a cui rispondi?!?
Antonio


text:
Rispondo e leggo le news via Mailgate perchè il mio servizio Intebusiness di
Telecom non prevede news.
Se lascio parte del mex quotato il server di mailgate mi rifiuta il post.
Mi spiace.
Cercherò di non rispondere se infastidisco.
Ciao Antonio.
Giorgio


text:
"George" <
giorgio....@libero.it
> ha scritto nel messaggio
news:b9t0e2$fb8$1...@newsreader.mailgate.org...
> Rispondo e leggo le news via Mailgate perchè il mio servizio Intebusiness
di
> Telecom non prevede news.
> Se lascio parte del mex quotato il server di mailgate mi rifiuta il post.
> Mi spiace.
Prova ad aggiungere in fondo al tuo messaggio con quoting una serie di righe
vuote facendo una serie di invii
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:RPnwa.118453$iy5.3...@twister2.libero.it...

Mi è scappata una mail a te...
Proviamo come dici tu.


text:
"George" <
giorgio....@libero.it
> ha scritto nel messaggio
news:b9t2ea$itb$1...@newsreader.mailgate.org...

Come vedi è arrivato.
Poi fai delle prove per vedere quante righe aggiuntive ti saranno
sufficienti...
Antonio


text:
Lo devo fare in un progetto ADP.



text:
"Benedetto Romano" <
Rom...@tin.it
> ha scritto nel messaggio
news:s8zwa.2328$Ny5....@twister2.libero.it...
> Mi aiutate?  Grazie a tutti, siete preparatissimi.
Siete bellissimi, stupendissimi...
MANDI MANDI MANDI....
AUTOROTFL!!!!
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:JpGwa.2561$lK4....@twister1.libero.it...
> "Benedetto Romano" <
Rom...@tin.it
> ha scritto nel messaggio
> news:s8zwa.2328$Ny5....@twister2.libero.it...
>
> > Mi aiutate?  Grazie a tutti, siete preparatissimi.
>
> Siete bellissimi, stupendissimi...
> MANDI MANDI MANDI....
????????????????????????????????????
> AUTOROTFL!!!!
>
> Antonio
>
>
Spiega 'sta cosa dai che sono curioso...


text:
"George" <
giorgio....@libero.it
> ha scritto nel messaggio
news:b9ve5c$pr9$1...@newsreader.mailgate.org...

Forse non vedevi Mai Dire Gol di qualche anno fa.
C'era quel comico friulano che entrava e faceva: siete bellissimi,
simpaticissimi, fortissimi...altalenandosi sulle gambe...
e poi diceva mandi mandi, tipico modo di dire di udine, mi pare...
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:ZeHwa.2644$lK4....@twister1.libero.it...

Marco Mialno, alias "Mandi Mandi", non č friulano (per fortuna!) ma č
Milanese.
Fa ancora la parodia del Friulano medio a "Quelli che il calcio" imitando e
prendendo in giro Bruno Pizzul.
Ora ho capito a cosa ti riferivi...
Da buon friulano... mandi Antonio
P.S. - Origine del Mandi friulano: la lingua Friulana (Ladino orientale per
l'esattezza) deriva direttamente dal latino come le altre romanze. Il saluto
cordiale friulano Mandi deriva da "Mane Deo" che significa "Stai con Dio,
che Dio sia con te". Magari ti interessa.


text:
"Benedetto Romano" <
Rom...@tin.it
> ha scritto nel messaggio
news:s8zwa.2328$Ny5....@twister2.libero.it...

Se il progetto č un ADP puoi fare cosģ:
crei una stored procedure che restituisca un recordset dichiarando tutti i
parametri che ti servono;
crei la list box lasciando l'origine riga dati vuota;
da codice VBA compili la proprietą RowSource della lista indicando una roba
del genere: "exec <nome stored procedure>
@<parametro1>=<valore1>,@<parametro2>=<valore2>, ecc..."
Non serve fare il requery della lista che viene refreshata dall'esecuzione
della sp.
In alternativa puoi associare alla lista una funzione nella quale linki il
db ed estrai quello che credi.
Ciao.
Giorgio


text:
"George" <
giorgio....@libero.it
> ha scritto nel messaggio
news:b9vfrn$sl6$1...@newsreader.mailgate.org...
>
> P.S. - Origine del Mandi friulano: la lingua Friulana (Ladino orientale
per
> l'esattezza) deriva direttamente dal latino come le altre romanze. Il
saluto
> cordiale friulano Mandi deriva da "Mane Deo" che significa "Stai con Dio,
> che Dio sia con te". Magari ti interessa.
Sě, molto interessante...
Grazie
Antonio


title: Uso di Access su Pocket PC

author: Roberto La Forgia

text:
Ciao "ragazzi"
qualcuno ha avuto qualche esperienza di utilizzo di Access su Pocket PC
(in particolare HP iPaq 6515)
Grazie per qualunque suggerimento....
Ciao,
ROberto
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Uso di Access su Pocket PC

author: MA

text:
Roberto La Forgia wrote:
> Ciao "ragazzi"
>
> qualcuno ha avuto qualche esperienza di utilizzo di Access su Pocket
> PC (in particolare HP iPaq 6515)
>
> Grazie per qualunque suggerimento....
>
> Ciao,
> ROberto
AEOM ha usato Microsoft Emmbeded Visual Tools e dice che opo un pò di
ambientamento è riuscito a farlo andare per bene
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Uso di Access su Pocket PC

author: luigi Onofrio

text:
MA ha scritto:
> Roberto La Forgia wrote:
> > Ciao "ragazzi"
> >
> > qualcuno ha avuto qualche esperienza di utilizzo di Access su Pocket
> > PC (in particolare HP iPaq 6515)
> >
> > Grazie per qualunque suggerimento....
> >
> > Ciao,
> > ROberto
> AEOM ha usato Microsoft Emmbeded Visual Tools e dice che opo un pò di
> ambientamento è riuscito a farlo andare per bene
puoi spiegare meglio quello che hai detto? che è un argomento
interessante!!!
AOEN chi è? un frequentatore del NG o chi?
Microsoft Emmbeded Visual Tools è un programma per PPC, per PC o qualche
pacchetto di compilazione?
grazie
luigi
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Uso di Access su Pocket PC

text:
luigi Onofrio wrote:
> MA ha scritto:
>
>> Roberto La Forgia wrote:
>>> Ciao "ragazzi"
>>>
>>> qualcuno ha avuto qualche esperienza di utilizzo di Access su Pocket
>>> PC (in particolare HP iPaq 6515)
>>>
>>> Grazie per qualunque suggerimento....
>>>
>>> Ciao,
>>> ROberto
>> AEOM ha usato Microsoft Emmbeded Visual Tools e dice che opo un pò di
>> ambientamento è riuscito a farlo andare per bene
>
> puoi spiegare meglio quello che hai detto? che è un argomento
> interessante!!!
> AOEN chi è? un frequentatore del NG o chi?
Sì, un frequentatore
> Microsoft Emmbeded Visual Tools è un programma per PPC, per PC o
> qualche pacchetto di compilazione?
Per PC, dopo ti basta l'activesync, cmq l'help è fatto bene
> grazie
> luigi



title: Uso di Access su Pocket PC

author: AEOM

text:
"Roberto La Forgia" <
robertol...@virgilio.it
> ha scritto nel messaggio
news:aae0c58668c4c34871e...@mygate.mailgate.org...

la mia esperienza personale si limita alla realizzazione di  un programmino
per la raccolta ordini degli agenti  ( bibite) e relativa trasmissione in
sede via ftp per le successive elaborazione dei carichi dei camion per le
consegne.
Per sviluppare su palmare io uso EVb che scarichi gratuitamente dal sito
microsoft per realizzare il tuo "front end"...è praticamente identico a
visual basic.
Per far girare i file compilati da evb  nel palmare ti server il runtime
sempre scaricabile dal sito MS gratuitamente.
Il problema sorge per il "Back End" infatti il formato cdb, l'equivalente
del mdb non è più supportato da windows mobile e convertito automaticamente
da activesync a scapito del più solito sqlserverCE sempre scaricabile
gratuitamente dal sito MS.
Superate le prime difficolta si hanno grossi vantaggi essendo superati i
limiti del file cdb...uno tra tutte la mancanza di poter eseguire query di
raggruppamento.
Collegamento tra fron e back ce l'hai tramite la libreria ADOCE che è al 80%
simile alla     ADO classica
Quest'ultimo lo puoi sincronizzare solo con sqlserver express quindi altra
complicazione se non è il tuo database di uso normale
Quindi con i quintali di documentazione che trovi on line e con mooooolta
pazienza riesci a fare tutto
Ciao, AEOM


title: Uso di Access su Pocket PC

text:
"AEOM" <
fasdfsd...@tin.it
> wrote in message
news:450fd8f7$0$15874$
4faf...@reader2.news.tin.it
> <CUT>
>
Grazie  per le vostre "dritte"
Quello che vorrei/dovrei fare é appunto una raccolta dati su Pocket PC
da poter trasferire su un Notebook collegato oppure inviarli via rete
(mail) o ftp ad un server)
visto che l'Hp iPAQ 6515 funge anche da telefonino.
Ciao,
Roberto



title: Uso di Access su Pocket PC

text:
Roberto La Forgia wrote:
> "AEOM" <
fasdfsd...@tin.it
> wrote in message
> news:450fd8f7$0$15874$
4faf...@reader2.news.tin.it
>
>> <CUT>
>>
>
> Grazie  per le vostre "dritte"
>
> Quello che vorrei/dovrei fare é appunto una raccolta dati su Pocket PC
> da poter trasferire su un Notebook collegato oppure inviarli via rete
> (mail) o ftp ad un server)
> visto che l'Hp iPAQ 6515 funge anche da telefonino.
>
> Ciao,
> Roberto
Ciao Roberto
che ne dici se lo facciamo insieme online?
La cosa mi interessa molto e prima o poi lo dovrò fare una buona volta
Potremmo appoggiarci su Accessgroup.



title: Uso di Access su Pocket PC

text:
"MA" <
mas...@massimilianoamendola.it
> wrote in message
news:eerfph$4e7$
1...@area.cu.mi.it
> Roberto La Forgia wrote:
> > "AEOM" <
fasdfsd...@tin.it
> wrote in message
> > news:450fd8f7$0$15874$
4faf...@reader2.news.tin.it
> >
> >> <CUT>
> >>
> >
> > Grazie  per le vostre "dritte"
> >
> > Quello che vorrei/dovrei fare é appunto una raccolta dati su Pocket PC
> > da poter trasferire su un Notebook collegato oppure inviarli via rete
> > (mail) o ftp ad un server)
> > visto che l'Hp iPAQ 6515 funge anche da telefonino.
> >
> > Ciao,
> > Roberto
> Ciao Roberto
> che ne dici se lo facciamo insieme online?
> La cosa mi interessa molto e prima o poi lo dovrò fare una buona volta
> Potremmo appoggiarci su Accessgroup.
Ciao Massimiliano,
l’idea di fare insieme un’applicazione per Pocket PC mi va, ovviamente
devi essere paziente con me in quanto ho veramente molte cose da fare,
quindi se lo facciamo con calma secondo me ci riusciamo.
Poi sai ad una certa età … i neuroni cominciano a mancare ...;
COnviene che ci sentiamo via mail per non intasare il newsgroup ...



title: Uso di Access su Pocket PC

text:
Roberto La Forgia wrote:
> "MA" <
mas...@massimilianoamendola.it
> wrote in message
> news:eerfph$4e7$
1...@area.cu.mi.it
>
>> Roberto La Forgia wrote:
>>> "AEOM" <
fasdfsd...@tin.it
> wrote in message
>>> news:450fd8f7$0$15874$
4faf...@reader2.news.tin.it
>>>
>>>> <CUT>
>>>>
>>>
>>> Grazie  per le vostre "dritte"
>>>
>>> Quello che vorrei/dovrei fare é appunto una raccolta dati su Pocket
>>> PC da poter trasferire su un Notebook collegato oppure inviarli via
>>> rete (mail) o ftp ad un server)
>>> visto che l'Hp iPAQ 6515 funge anche da telefonino.
>>>
>>> Ciao,
>>> Roberto
>> Ciao Roberto
>
>
>> che ne dici se lo facciamo insieme online?
>> La cosa mi interessa molto e prima o poi lo dovrò fare una buona
>> volta Potremmo appoggiarci su Accessgroup.
>
>
> Ciao Massimiliano,
>
> l'idea di fare insieme un'applicazione per Pocket PC mi va, ovviamente
> devi essere paziente con me in quanto ho veramente molte cose da fare,
> quindi se lo facciamo con calma secondo me ci riusciamo.
>
> Poi sai ad una certa età . i neuroni cominciano a mancare ...;
>
> COnviene che ci sentiamo via mail per non intasare il newsgroup ...
>
> Ciao,
> Roberto
Ok su tutto, la mia mail qui è valida



title: Curiosità su DISTINCT

author: BiBi

text:
In Access 97 non è possibile utilizzare la seguente istruzione
nonostante sia standar SQL-2:
SELECT Count(DISTINCT NomeCampo) FROM NomeTabella
nelle versioni successive (2000 e 2002) è possibile usarla?
Ciao BB


title: Curiosità su DISTINCT

text:
BiBi <
bb...@gostec.it
> ha scritto:

No.
Ma ci sono possibilità per ricevere lo stesso risultato con Jet-SQL.
in A00 e AX puoi usare:
SELECT Count(*)
FROM (SELECT DISTINCT NomeCampo FROM NomeTabella)
o p.e. con due Alias:
SELECT Count(*) AS Foo
FROM (SELECT DISTINCT NomeCampo FROM NomeTabella) As Bar
In A97 invece per la stessa cosa si debbe usare una strana
(e non documentata) sintassi:
SELECT Count(*) AS Foo
FROM [SELECT DISTINCT NomeCampo FROM NomeTabella]. AS Bar
Questo sintassi funzione anche in A00 e AX.
Per di più anche A00 e AX cambiano lo statements che ho
scritto sopra automagically a la sintassi con "[ ]."se la query viene
salvata. Alora dopo A97 MS solo ha aggiunto una traduzione per
la sintassi più logica con ( ).
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: Curiosità su DISTINCT

text:


Incredibile!!!! Non sapevo che anche Access 97 potesse fare select
annidate! Grazie 1000!!!!!
Ciao BB :-)))


title: GUADAGNI NAVIGANDO IN INTERNET

author: Studiofiore Sas

text:
Mi sono iscritto ad una nuova società su Internet - Extra$
alary.com
 - che
paga i Propri iscritti per navigare su Internet o semplicemente per ricevere
alcuni e-mail. Mi paga anche quando navigano e/o ricevono e-mail altre
persone che si sono iscritte grazie al mio passaparola...ecco il perchè di
questo email.
Non devi pagare nulla, e non devi modificare il tuo abituale modo di
navigare su Internet.
Iscriviti ora a:
http://www.ExtraSalary.com/go.asp?refid=431515B477E7
Potrai iniziare a guadagnare da subito, la Extra$alary ti spiegherà tutto
nel proprio sito: é completamente gratuito,  e... i soldi sono veri.
Ciao Cristian


title: esecuzione explorer.exe

author: Glauco

text:
devo aprire l'explorer con gia la visualizzazione di un indirizzo che č
contenuto in un campo della mia form, ho provato con il comando "shell" ma
niente.
CHI MI DA UNA MANO?????
GRAZIE 1000


title: esecuzione explorer.exe

author: Sib dall'ufficio

text:
"Glauco" <
sur...@inwind.it
> ha scritto nel messaggio
news:9edtvo$rrb$1...@serv1.albacom.net...
> devo aprire l'explorer con gia la visualizzazione di un indirizzo che č
> contenuto in un campo della mia form, ho provato con il comando "shell" ma
> niente.
Perche' non fai un pulsante e sfrutti la proprieta' "collegamento
ipertestuale" del pulsante?
Sib


title: esecuzione explorer.exe

text:
Mi servirebbe un comando dove posso passare una stringa contenente il mio
indirizzo locale tipo C:\wwindows\.....
Abbiate un po' di pazienza sono una vera schiappa


title: esecuzione explorer.exe

text:
"Glauco" <
sur...@inwind.it
> ha scritto nel messaggio
news:9edvfg$t2e$1...@serv1.albacom.net...
> Mi servirebbe un comando dove posso passare una stringa contenente il mio
> indirizzo locale tipo C:\wwindows\.....
tipo "C:\Programmi\Internet Explorer\iexplore.exe indirizzo_da_aprire"  ?
:-)))
> Abbiate un po' di pazienza sono una vera schiappa
>
Anche io non sono una cima, ma impareremo !! ;-))
--
Claudio Tregambe


title: esecuzione explorer.exe

author: CarloCos

text:
"Glauco" <
sur...@inwind.it
> ha scritto nel messaggio
news:9edtvo$rrb$1...@serv1.albacom.net...

Cosě puo andare bene?
Shell "C:\Programmi\Internet Explorer\IEXPLORE.EXE C:\ANAGRAFICA.html"
Comunque cerca di essere piů chiaro nelle domande.
Ciao, Carlo


title: esecuzione explorer.exe

author: Sib dal portatile

text:
"Glauco" <
sur...@inwind.it
> ha scritto nel messaggio
> Mi servirebbe un comando dove posso passare una stringa contenente il mio
> indirizzo locale tipo C:\wwindows\.....
Basta che inserisci il percorso completo del fime da aprire (anche da
codice) nella proprieta' "coll. ipertestuale" del pulsante.
> Abbiate un po' di pazienza sono una vera schiappa
Sai, a "scatenare le ire" dei frequentatori non e' il livello di
preparazione di chi pone le domande, bensi' quelle che chiedono di
realizzare intere porzioni di una loro applicazione (se non tutta
l'applicazione)
Ciao
Sib


title: esecuzione explorer.exe

author: Omar Carrara

text:
Cl@udi0 <
clau...@hotmail.com
> wrote in message
9ee14s$t2c$1...@fe2.cs.interbusiness.it...

Forse vi do un aiuto ancora più utile.
Infatti: come fate ad aprire un indirizzo web  (pur conoscendolo per
intero), se sul PC invece che IE c'è Netscape?
Vi tolgo le castagne dal fuoco con questo codice, da salvare in un nuovo
modulo.
Chiamate poi il file (NB di qualsiasi estensione!), l'indirizzo web, un
indirizzo mail, o quello che solitamente aprite col doppio click, etc con
questa funzione:
call fHandleFile(NomeFile As String, WIN_NORMAL).
In pratica, questo codice cerca da solo l'applicazione legata al file così
come configurata nel registro, e lo apre.
Del tipo: .
se file.doc chiama Word
se file.xls chiama Excel
se file.htm chiama IE (o Netscape se sul PC è configurato Netscape come
browser predefinito)
se
om...@spidernet.it
 chiama Outlook Express ( o altro client di posta
predefinito).
etc, etc...
Ciao. Omar.
P.S. Vi confesso che non è farina del mio sacco! Qualcun altro prima di voi
ha tolto le castagne dal fuoco anche a  me.
********* INIZIO MODULO
Option Compare Database
Option Explicit
'(Q)    How do I start the application which is registered to handle a file
'       extension in Win Registry?
'(A)    You'll have to use the ShellExecute API.  Pass the filename
        'to fHandleFile function.  If the file extension is "known",
        'or registered,   it should automatically call the parent
application.
        'If the extension is unknown, it should bring up the
        'Windows standard "Open With" dialog box.
'************ Code Start **********
Private Declare Function apiShellExecute Lib "shell32.dll" _
    Alias "ShellExecuteA" _
    (ByVal hWnd As Long, _
    ByVal lpOperation As String, _
    ByVal lpFile As String, _
    ByVal lpParameters As String, _
    ByVal lpDirectory As String, _
    ByVal nShowCmd As Long) _
    As Long
'***App Window Constants***
Public Const WIN_NORMAL = 1         'Open Normal
Public Const WIN_MAX = 3            'Open Maximized
Public Const WIN_MIN = 2            'Open Minimized
'***Error Codes***
Private Const ERROR_SUCCESS = 32&
Private Const ERROR_NO_ASSOC = 31&
Private Const ERROR_OUT_OF_MEM = 0&
Private Const ERROR_FILE_NOT_FOUND = 2&
Private Const ERROR_PATH_NOT_FOUND = 3&
Private Const ERROR_BAD_FORMAT = 11&
'***************Usage Examples***********************
'Open a folder:     ?fHandleFile("C:\TEMP\",WIN_NORMAL)
'Call Email app:    ?fHandleFile("mailto:
das...@hotmail.com
",WIN_NORMAL)
'Open URL:          ?fHandleFile("
http://home.att.net/~dashish
", WIN_NORMAL)
'Handle Unknown extensions (call Open With Dialog):
'                   ?fHandleFile("C:\TEMP\TestThis",Win_Normal)
'Start Access instance:
'                   ?fHandleFile("I:\mdbs\CodeNStuff.mdb", Win_NORMAL)
'****************************************************
Function fHandleFile(stFile As String, lShowHow As Long)
Dim lRet As Long, varTaskID As Variant
Dim stRet As String
    'First try ShellExecute
    lRet = apiShellExecute(hWndAccessApp, vbNullString, _
            stFile, vbNullString, vbNullString, lShowHow)
    If lRet > ERROR_SUCCESS Then
        stRet = vbNullString
        lRet = -1
    Else
        Select Case lRet
            Case ERROR_NO_ASSOC:
                'Try the OpenWith dialog
                varTaskID = Shell("rundll32.exe shell32.dll,OpenAs_RunDLL "
_
                        & stFile, WIN_NORMAL)
                lRet = (varTaskID <> 0)
            Case ERROR_OUT_OF_MEM:
                'stRet = "Error: Out of Memory/Resources. Couldn't Execute!"
                stRet = "Errore: Out of Memory/Resorse. Impossibile
Eseguire!"
            Case ERROR_FILE_NOT_FOUND:
                'stRet = "Error: File not found.  Couldn't Execute!"
                stRet = "Errore: File non trovato. Impossibile Eseguire!"
            Case ERROR_PATH_NOT_FOUND:
                'stRet = "Error: Path not found. Couldn't Execute!"
                stRet = "Errore: Percorso non trovato. Impossibile
Eseguire!"
            Case ERROR_BAD_FORMAT:
                'stRet = "Error:  Bad File Format. Couldn't Execute!"
                stRet = "Errore: Formato del file errato. Impossibile
Eseguire!"
            Case Else:
        End Select
        'Visualizza un messaggio se ci sono problemi con la guida
        MsgBox stRet, vbOKOnly & vbInformation, "IMPREVISTO nell'apertura
del file"
    End If
    fHandleFile = lRet & _
                IIf(stRet = "", vbNullString, ", " & stRet)
End Function
'************ FINE MODULO