mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Problema apostrofo in query vba

In una form ho una combobox che fornisce un parametro ad una query nel
modulo della form, la query è questa:
Sql = "SELECT Ricette.Nome FROM Ricette WHERE Ricette.Ing_Principale
=  '" + cmbChiaveRicerca + "';"
il probelam è cge alcune voci della combo contengono l'apostrofo, es:
"Albume d'uovo" che manda in errore la query, più precisamente
l'apertura del recordset.
Come potri fare per aggirare questo problema?
Grazie.
Alessio Forconi

 ha scritto nel messaggio 
news:1189861714....@g4g2000hsf.googlegroups.com...




Grazie.
prova con la funzione replace:
SQL = "SELECT Ricette.Nome FROM Ricette WHERE Ricette.Ing_Principale = 
Replace(cmbChiaveRicerca, "'", "''") & "');"
-- 
Ciao
Access 

 Alessio Forconi
Prova cosě:
...WHERE Ricette.Ing_Principale =  " & Chr$(34) & cmbChiaveRicerca & 
Chr$(34) &  ";"
Ciao.
-- 
Sergio MAZZA 


Il problema è che l'editor di vba interpreta il carattere ' come
commento e rende commentata questa parte cmbChiaveRicerca, " '", "''")
& "');" dalla virgola di cmbChiaveRicerca, in poi.

 ha scritto nel messaggio 
news:1189864001.9...@22g2000hsm.googlegroups.com...
Cos?
sql = "SELECT ricette.Nome FROM ricette WHERE ricette.Ing_Principale = '" & 
Replace(cmbChiaveRicerca, "'", "''")
Il problema è che l'editor di vba interpreta il carattere ' come
commento e rende commentata questa parte cmbChiaveRicerca, " '", "''")
& "');" dalla virgola di cmbChiaveRicerca, in poi.
-- 
Ciao
Access 

 ha scritto nel messaggionews:1189864001.9...@22g2000hsm.googlegroups.com...


 ha scritto nel messaggio 
news:1189942022.7...@57g2000hsv.googlegroups.com...
Niente sbagliavo io ad incollare la stringa, va bene.
Però non sembra funzionare come dovrebbe perchè avendo come
ingrediente "Albume d'uovo" la funzione come me l'hai scritta tu
restituisce la stringa coì:
SELECT ricette.Nome FROM ricette WHERE ricette.Ing_Principale =
'Albume D''uovo
Ho letto la guida per la funzione Replace ma non mi è chiaro quelo che
vuoi fare, te lo chiedo perchè così provo anch'io a risolvere il
problema senza pesare completamente sulla tua già buona disponibilità.
Grazie.
Alessio Forconi
Forse facciamo prima se ti leggi questo post di @Alex e Giorgio Rancati:
http://groups.google.it/group/it.comp.appl.access/browse_thread/thread/b5b8796b61685aec/11677bc48493d235?lnk=gst&q=apostrofo&rnum=1&hl=it#11677bc48493d235
Spero di esserti stato utile.
-- 
Ciao
Access 

 Access
senz'altro grazie.
Lo leggo.

Newsgroup: it.comp.appl.access
Titolo: Errore 3251 dopo divisione database.

Il seguente codice:
Dim DbMioDB As Database
Dim RS As Recordset
Set DbMioDB = CurrentDb
Set RS = DbMioDB.OpenRecordset("Contratti")
RS.Index = "Mese"
( ...)
 funzionava bene fino a quando non ho diviso il database.
Adesso con le tabelle collegate la riga rs.index = ... mi da errore 3251
(operazione non supportata per questo tipo di oggetto).
Come posso risolvere il problema?
Grazie.


Newsgroup: it.comp.appl.access
Titolo: Riferimenti

Scusate la mia ignoranza, quando si parla di controllare i riferimenti
significa aprire un modulo contenente codice e selezionare i riferimenti
alle librerie?
Per la funzione date() utilizzata per suggerire la data corrente in alcune
form su pc diversi da quelli dove il db è stato creato ho controllato che i
riferimenti selezionati siano uguali e lo sono, in "compilazione" nessun
errore,  ma al momento di visualizzare le maschere invece che la data
corrente si visualizza #errore#, cosa devo controllare ancora?
(Tutto il casino si risolve creando un nuovo db e importando tutto, ma che
differenza c'è fra questo e ricompilare l'originale?)
grazie per l'aiuto.

differenza c'č fra questo e ricompilare l'originale?)
Si per riferimenti intendo i rif. alle librerie. L' #errore
sembrerebbe infatti un errore di sintassi quindi il fatto che la
funzione Date() non viene riconosciuta. Se importi tutti gli oggetti
in un nuovo DB e distribuisci quello su, tutti i PC Client, il tuo
prob. si risolve?  
-----------------------------------------------------
Roberto Bergonzini -MO- 
robb...@tin.it
Microsoft Certified System Engineer
Microsoft Certified Professional Specialist Internet
-----------------------------------------------------

-----------------------------------------------------
Il problema si risolve solo se creo un nuovo db sul pc client e vi importo
tutto!!!
Ma perchè solo con la funzione date()?
Cos'ha di particolare rispetto a tutte le altre funzioni?

Newsgroup: it.comp.appl.access
Titolo: dim as database :(

Salve a tutti,
ho sempre usato con Access97 la seguente riga di codice:
dim dbs as Database
Con Access2000 invece non funziona :(, mi dice un qualcosa come "tipo
utente non definito" ... eppure negli esempi questa riga c'e' e come!
Qualcuno saprebbe darmi delucidazioni in merito o qualche metodo
alternativo ?
Ringrazio tutti anticipatamente :)

 wrote in message
38fb71d...@news.iol.it...

Newsgroup: it.comp.appl.access
Titolo: Errrore 48: errore di caricamento dll

Allora, procedure realizzate con Access 2003, su pc1
Usano l'automazione Office per caricare un documento Word, cambiargli alcuni 
dati, stamparlo
Sul pc1 tutto bene
Sul pc2 dove era installato un vecchio Word97 e Word2002, li disinstallo da 
Installazione applicazioni, eseguita correttamente, per sicurezza elimino a 
mano anche la directory 'Office' dentro Programmi\Microsoft Office   (tanto 
dovrebbe installare tutto su Office11)
Installo sul pc2 l'Office 2003 con Access, Word, Excel
Copio da pc1 a pc2 le procedure Access
Lancio da pc2 le procedure appena copiate e quando tento di avviare la 
stampa tramite Word (premesso che Word si apre e funziona correttamente) 
esattamente alla riga
Sub StampaDaWord()
  Dim objWord As Word.Application
  Set objWord = CreateObject("Word.Application")
  ...........
Alla  Set objWord   mi butta fuori un bel "ERRORE 48: ERRORE DI CARICAMENTO 
DLL"
Per prima cosa ho verificato che i Riferimenti siano tutti presenti, in 
particolare l'MSWORD.OLB, presente e disponibile (nella stessa versione del 
pc1)
Ho provato a cercare un po' in rete ma tutti i messaggi trovati (tra i quali 
uno di Rancati anni fa) non sono stati risolutivi finora
Ho provato a vedere con Filemon se viene cercato qualche file strambo senza 
trovarlo, niente, tutti i NOT FOUND prima o dopo vengono risolti
Quindi ricapitolando, su pc1 funziona correttamente, su pc2 va tutto in 
patacca
Penso sia una qualche eredita' delle vecchie installazioni di office 
precedenti, ma non saprei dove/cosa verificare
Che sia qualche chiave nel registry da 'ripulire' ?
Cosa mi consigliate di provare per attivare il funzionamento anche sul pc2 ?
Grazie e ciao
RobertoA
 


Da notare che quando parte il  Set objWord....  e mi sputa fuori l'errore, 
da task manager si vede partire in memoria una WINWORD.EXE, che poi rimane 
li perche' la procedura viene deviata verso la gestione errori e l'istanza 
Word creata non viene distrutta
Se rilancio la procedura e rifaccio passare di nuovo dal Set objWord.... 
viene caricata un'altra istanza WINWORD.EXE in memoria e cosi via
RobertoA


wrote:


Newsgroup: it.comp.appl.access
Titolo: Access e word

Vorrei prelevare dei dati da un record esportarli in word e poi trattare il
tutto come un normale testo.
Come posso fare?
Grazie
        Alessandro

 Come posso fare?
O parti dal Word e ti imposti la "Stampa Unione" collegata al tuo db (tbl o
qry) oppure da Access scrivi qualche riga di codice VB (vedi precedenti msg)
e passi i/il record ad un determinato documento di Word (al quale prima
avrai comunque inserire i controlli che riceveranno i record!).
UJ

 ha scritto nel messaggio
news:JxZb7.147558$Pb6.8...@news1.tin.it...

Seleziona i record dalla tabella e copiali  negli appunti (Ctrl+C).
Incollali quindi in Word (Ctrl+V). Otterrai una normale tabella che,
eventualmente, potrà essere convertita in testo (menu Tabella-->Converti).
Se l'intestazione dei campi ti da fastidio puoi selezionarla ed eliminarla
con l'opzione Cancella riga nel menu della tabella.
ciao!
Gio
Newsgroup: it.comp.appl.access
Titolo: funzione in query unione

ciao
dove inserisco questa funzione
Between DataDal() And DataAl())
in questa query unione?
SELECT DISTINCT Gruppi.Data, Gruppi.TipoDiGruppo
FROM Residenti_ INNER JOIN Gruppi ON Residenti_.IDUtente = Gruppi.IDUtente
WHERE (((Gruppi.TipoDiGruppo)="Teatrale e/o Creativo"))
UNION SELECT DISTINCT Gruppi.Data, Gruppi.TipoDiGruppo
FROM Residenti_ INNER JOIN Gruppi ON Residenti_.IDUtente = Gruppi.IDUtente
WHERE (((Gruppi.TipoDiGruppo)="Figli"));
grazie

 WHERE (((Gruppi.TipoDiGruppo)="Figli"))
HAVING Gruppi.Data Between #data1# And #data2#;
Guarderò anch'io altre risposte.
ciao
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Newsgroup: it.comp.appl.access
Titolo: creazione campo numerico progressivo in query unione

Buongiorno a tutti.
Ho una tabella "tblFatture" ed una tabella "tblincassi" legate tra
loro dal campo ID.
Ho creato una query unione dove ho tutte le fatture e i record della
tabella incassi.
Il campo Id per gli incassi è uguale a quello della fattura
corrispondente.
Come faccio a creare un numero progressivo in base alla data fattura e
alla data incasso della query unione in modo che la casella di testo
con origine =GetLineNumber([Form];"id";[id]) arrivati al record degli
incassi non mi riporti di nuovo l'id della fattura?
Inoltre nella stessa maschera continua con origine la query unione, il
saldo progressivo ottenuto con la funzione
=CreaTotProgr("id";[id];"[totalefattura]")  (dove il totalefattura
nella query di unione al record relativo all'incasso è
tblfatture.totalefattura-tblincassi.totalefattura+tblincassi.incasso)
arrivati ai record degli incassi il progressivo anzichè diminuire
dell'importo dell'incasso, mi dà dei valori che non capisco come li
calcola.
Si risolverebbero  entrambi creando un campo unico o sono due problemi
con due soluzioni diverse?
Grazie anticipate.
Giuseppe.

E' forse meglio creare una query di creazione tabella in cui
memorizzare tutte le fatture e tutti gli incassi?
Attendo consigli.
Grazie.
Giuseppe.
Newsgroup: it.comp.appl.access
Titolo: Decimali query unione, ancora problemi!!!

Ciao a tutti ,
in un post precedente avevo presentato questo problema:
ho creato due query di selezione una che mi estrae dei valori di
valuta cosi come li trova nella tabella la seconda che mi estrae determinati
valori di valuta scorporando l'IVA (cioč dividendoli per 1,20).
Ho formattato tutte e due le query le indicando che dovevano
restituire valori di valuta euro con i relativi decimali.
Singolarmente tutte e due funzionano perfettamente cioč
restituiscono valori in euro come richiesto.
Il problema si presenta quando copiando l'SQL le unisco in una query
di unione: per i valori non scorporati tutto ok, quelli scorporati dell'IVA
invece perdono la formattazione per l'euro restituendomi una serie infinita
di decimali.
Ho  ovviato al problema, sfruttando il consiglio di Roberto da Casa, usando
cioč nell'SQL della query di unione la funzione CCur che mi toglieva i
troppi decimali.
Creando perň un report basato sulla query di unione e sommando qli importi
scorporati non tiene in considerazione i soli due decimali.
Esempio: Importo euro 4495 Scorporato euro 3745,83      OK
               Importo euro  280 Scorporato  euro 233,33         OK
               Somma importi scorporati    euro 3797,17        Errore!!!
Ciň e dovuto al fatto che facendo la somma non considera solo i valori
restituiti dalla query con 2 decimali ma considera nuovamente tutti i
decimali creando errori nell' arrotondamento.
Come posso fare per ovviare a questo inconvente?
Grazie anticipatamente!!!

 Grazie anticipatamente!!!
Nella query unione arrotonda il risultato della divisione che ti calcola
l'importo scorporato al secondo decimele; puoi farlo usando la funzione di
Karl che trovi nella Sezione General del Sito Comune (link qui sotto).
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ---------------------------------------------
Trovata:
Function fctRound(Optional varNr, Optional varPl As Integer = 2)
' by Konrad Marfurt + ? + Karl Donaubauer
'varNr: numero da arrotondare
'varPI: numero di decimali (due predefinito)
   If IsMissing(varNr) Or Not IsNumeric(varNr) Then Exit Function
   fctRound = Fix("" & varNr * (10 ^ varPl) + Sgn(varNr) * 0.5) / (10 ^
varPl)
End Function
perň enso che con le mie conoscenze non mi sia possibile usarla!!

 però enso che con le mie conoscenze non mi sia possibile usarla!!
Se posti il codice dell query possiamo vedere di dargli una sistemata
richiamandi la funzione di arrotondamento.
Comunque devi memorizzare la funzione di cui sopra in un modulo del tuo
database e nel codice SQL della query invece di:
Importo/1.2
scrivi:
fctRound(Importo/1.2)


 ---------------------------------------------
Il problema dell'arrotondamento nella query l'ho superato con CCur, come giŕ
mi avevi spiegato;
č nel report che la somma non ne tiene conto (vedi esempio sopra).
Grazie mille dell'interessamento.
Ciao Ale

 Ciao Ale
-- 


 ---------------------------------------------
Alllora ci proverň.
Un grazie infinito per il tuo interessamento.
Ale
Newsgroup: it.comp.appl.access
Titolo: probema coi report

Da poco ho affinato le mie conoscenze sulla costruzione dei report.
Vorrei sapere se c'è la possibilità di riprodurre una sorta di tabella word 
in cui però siano delimitate solo i bordi esterni delle colonne e non i 
bordi di ciascuna riga.
!Cognome!Nome!Nascita!
!Pinco      !Pallino!12122  !
!rossi       ! Paolo !1111   !
!Bianchi    !Luca  ! 1111  !
e cosi via.
la definizione dei bordi riguarda solo il corpo del repor e non 
l'intestazione in cui ci sono i campi della tabella dal lato uno.
nel corpo ci sono i dati (raggrupati) della tabella dal lato molti
Grazie 

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

 Grazie
Non so se ho capito bene quello che vuoi fare, io prenderei la linea dalla
casella degli strumenti, in posizione verticale e di altezza esattamente
uguale al corpo del report.
Ciao
Luigi
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio 
news:436a5aba$0$22300$4faf...@reader1.news.tin.it...

Ciao Michele
inserisci una linea verticale, uguale all'altezza del corpo, tra un 
controllo e l'altro
Daniele 

 ha scritto nel messaggio 
news:dkdndg$9s2$1...@news.newsland.it...

Ma cosi non va bene, perchè la linea si allunga solo per quanti sono i 
record.
Io voglio una linea che congiunga l'intestazione con il pie di pagina ed 
attraversi tutto il corpo, indipendentemente dal numero di record (righe) 
che ci sono nel corpo stesso. 

 ha scritto nel messaggio 
news:436a5aba$0$22300$4faf...@reader1.news.tin.it...

Ok. la soluzione Me.Line, va bene
dovrò perdere un casino di tempo per allinearle ai controlli, ma meglio di 
niente
grazie
Newsgroup: it.comp.appl.access
Titolo: report etichette indirizzi

Non riesco a impostare un report contenente etichette (3x7 in un A4).
Il problema è stampare solo le righe che contengono dati evitando la stampa
di righe vuote.
Lo schema dell'etichetta è:
titolo, nome, cognome
carica (per. es. Presidente della Regione Lazio )
c/o (seguito dal nome del padrone di casa)
via, numero civico
CAP, località, comune
stato estero
Vorrei che la stampa di alcune righe risultasse così:
Sig.ra Maria Rossi
Via Maggi 7
00121 Roma
e non
Sig.ra Maria Rossi
Via Maggi 7
00121 Roma
Come posso fare?
Grazie
Linda
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Linda
Vai sul Sito Comune (link qui sotto) e nella Sezione Reports fai il download
del database di esempi allegato alla FAQ intitolata "Esempi di utilizzo dei
reports".
Apri il database che hai scaricato, evidenzia il Topic intitolato
Eliminating White Space in Reports with CanShrink & Code, pigia il pulsante
di comando Show Example: ti verrà mostrato un esempio di ciò che ti serve.
Per maggiori dettagli di come sia stato realizzato l'esempio di cui sopra
vai al link:
http://support.microsoft.com/default.aspx?id=95390
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Funzione per ordinare numeri con lettere

ciao a tutti
uso questa funzione per ordinare numeri con lettere
per esempio:
a/11
a/12
oppure
1a
2a
ecc.
------------inizio-------------------
Public Function NumS(S As String) As String
Dim I As Long
For I = 1 To Len(S)
    If IsNumeric(Mid(S, I, 1)) Then
        NumS = NumS & Mid(S, I, 1)
    ElseIf NumS <> "" Then
        Exit For
    End If
Next
End Function
------------fine---------------
 
e nella query
CodNum: Val(NumS([mioNumero da riordinare]))
 
 
ma se ho per es.
14/100/a
14/101/a
ecc.
 
nella colonna CodNum mi da
14
14
e non 
14100
14101
di conseguenza non me li ordina
come posso fare?
grazie

 ...
 
Puoi darsi che non hai scritto tu il codice? ;-)
Togli le due righe:
 
     ElseIf NumS <> "" Then
         Exit For
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
Access Lobby: 
http://www.AccessDevelopers.org
 


infatti....
grazie Karl

Newsgroup: it.comp.appl.access
Titolo: gruppo di opzione e report

in una maschera ho un gruppo di opzioni - tipo1 = 1   e tipo2 = 2
associato al campo tipo della tabella archivio.
Vado a fare un report, nel corpo dello stesso devo inserice anche il
controllo opzioni, ma alla vista o stampa dello stesso mi da il valore
memorizzato 1  o 2, mentre a me interessa che esca invece del valore, il
suo riferimento : tipo1  o tipo2 .
Come diavolo posso fare?
un grazie č poco! lo so!
luigi
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 luigi
Creati un controllo calcolato
="Tipo " & quello che vuoi
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007

 ="Tipo " & quello che vuoi
ti puoi esprimere con un esempio pratico? non ho la bravura giusta per
capirti al volo. tank


 ="Tipo " & quello che vuoi
Rileggendo bene il tuo post, non credo di avere il risultato cercato,
a me interessa stampare l'etichetta del valore assegnato al gruppo di
opzioni .
es. 
opzione 1  etichetta giamaica  valore assegnato 1
opzione 2  etichetta germania  valore assegnato 2
Naturalmente nella tabella archivio al campo "tipo" abbinato al gruppo di
opzione, vengono memorizzati i valori assegnati : 1  o 2
Quindi , ricapitolando, nel report devono uscire giamaica o germania a
secondo del valore assegnato al campo tipo della tabella "archivio"
spero di avermi spiegato bene.

Newsgroup: it.comp.appl.access
Titolo: Bloccare/Sbloccare Maschere

Ho condiviso da poco con altri utenti il database che utilizzo in azienda ,
senza affrontare il problema delle autorizzazioni (ci arriverň un pň per
volta). Sviluppando continuamente l'applicazione diventa troppo incasinato
aggiornare 7 o 8 FE diversi, cosě vorrei poter bloccare/sbloccare tutte le
maschere (circa 150) con unico pulsante per evitare che chi deve solo
consultare i dati faccia casini. Naturalmente, avendo poca dimestichezza con
DAO/ADO sto impazzendo per riuscirci.
Mi date una mano? Uso A xp
Grazie

 Grazie
Penso che RunTime tu debba scordarti questo sogno..., visto che non puoi
lavorare sui FE è impossibile, a meno che tu in fase di realizzazione non
abbia previsto di leggere un FLAG e utilizzando le proprietà ALLOWEDITS ecc..
modificarle....
Io personalmente faccio così:
MDW a parte....
Nel BE ho una Tbl di Login con:
NomeUtente----> Password---->Permission (Kriptati)
Il FE fa eseguire il LOGIN all'inizio e a secondo delle Permission utilizzo
le proprietà delle Form AllowEdits, AllowModifie, AllowDeletetion e
Allpermissio
poi siccome utilizzo delle variabili Globali in un Modulo la prima
cosa che faccio su Load della Form è leggere il valore e Impostare le
relative autorizzazionni.
Sembra difficile, ma si tratta di pochissime righe di codice....
@Alex.
-- 
Posted from  [146.133.1.30] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:wIgC7.8456$Qj6.7...@news.infostrada.it...

...Come al solito non sono riuscito a spiegarmi perfettamente :-)
In ogni caso con le vostre risposte mi avete acceso un flag ed ho risolto un
altro dei problemi che avevo.
Grazie

Newsgroup: it.comp.appl.access
Titolo: Adattare textbox

Salve a tutto il NG,
e possibile adattare una textbox di un report rispetto ai dati contenuti...
Grazie.
Lucio
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio
news:cjj9m5$prj$1...@news.newsland.it...

Ciao Lucio,
guarda le proprietà Espandibile e riducibile
adattano l'altezza del controllo in funzione del contenuto.
Saluti
Cinzia

Cinzia ha scritto:


Il mio problema si propone per la larghezza...


 ha scritto nel messaggio
news:cjj9m5$prj$1...@news.newsland.it...

guarda bene che nelle proprietą del controllo c'č riducibile espandibile ...
fanno proprio ciņ che chiedi tu ...

 ha scritto nel messaggio
news:cjjbrd$448$1...@hulme.interac.it...

scusa ... gią cinzia, che potrebbe fare invidia a shumacher, mi ha
anticipato!


Ciao Lucio,
allora forse potrebbe tornarti utile il metodo TextWidth(espressione)
che ti restituisce per l'appunto la larghezza di un testo, andando a
verificare questa larghezza nell'evento Corpo_print del report, potresti
modificare la larghezza del controllo in funzione del valore restituito
dalla funzione.
Saluti
Cinzia

Newsgroup: it.comp.appl.access
Titolo: Collegamento A2000 con Microsoft Outlook

Vorrei sapere se è possibile collegare una tabella Appuntamenti fatta in
A2000 e l'archivio appuntamenti di  Microsoft Outlook. Grazie


Newsgroup: it.comp.appl.access
Titolo: Nel file .mdb rimangono le immagini?

Quando salvo un Db con Access nel file mdb vengono comprese anche tutte le
immagini che utilizza per le aschere o per i report, cosi' che quando porto
il file da un'altra parte funziona tutto?
Grazie di tutto
Matteo

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

 wrote in message
news:R_Vq9.33925$%
M1.8...@twister2.libero.it

Speriamo tu abbia strutturato in modo da contenere solo i collegamenti
e predisposto una Cartella Immagini, altrimenti il TUO DB diventerebbe
trasportabile solo con l'HD da 30Gb...! ;-)
Scherzi a parte se necessiti di salvare diverse immagini non
ti conviene inserire IMMAGINI, ma un controllo con File immagine
collegato.
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

trasportabile solo con l'HD da 30Gb...! ;-)
E' no ... gli basterà un HD da uno/due Gigabite!  ;-))
Ciao, Silvio

 wrote in message
news:aohpiv$dji$
1...@fe1.cs.interbusiness.it

He, He... !!
Ciao Silvio, ci si risente finalmente...!
Beh, sai che funziona proprio bene, e non da più 
quei difetti congeniti che aveva all'inizio....!!
Tu dirai "Ma và.!!!".
Ho deciso di non toccarla, gli manca solo la parola.
Ci risentiamo Tete a Tete....!!
@Alex.

Newsgroup: it.comp.appl.access
Titolo: SQL Server e Client ACCESS - Blocco record

Salve a tutti
Ho un problema che a prima vista ha dell'incredibile....
L'altro giorno mi e capitato di modificare un record tramite una maschera di
access con tabelle collegate ad un DB SQL Server.
Modifico un campo e poi ne modifico un altro. Passo al record successivo con
relativo salvataggio automatico e ti scopro che il record e bloccato da un
altro utente e quindi devo scegliere se annullare le modifiche o copiare
negli appunti (l'opzione salva le modifiche era disabilitata).
Alche ho cercato di capire cosa succedeva e mi sono accordo che se
modificavo uno dei due campi da variare e salvavo il tutto andava a buon
fine mentre se modificavo l'altro campo mi dava l'errore prima indicato.
Un blocco a livello di ...... CAMPO???? Questa mi giunge nuova. Qualcuno mi
sa dare spiegazioni???
Grazie a tutti
DD

 ha scritto nel messaggio
news:Uq_d9.7815$%z1.1...@twister1.libero.it...

Forse un trigger parametrizzato male ?
per essere sicuro esegui la stessa procedura da Enterprise Manager, se è un
trigger la fonte dell'incoveniente il problema si deve ripetere.
Ciao Giorgio.


No, la cosa particolare è che se modifico il campo da Enterprise manager la
modifica me la fa tranquillamente, modificato il campo se ritorno sul client
e provo a rifare la modifica, mi ridice che il record e bloccato (in effetti
solo quel campo). Da notare che il campo e di tipo text.
DD

 solo quel campo). Da notare che il campo e di tipo text.
Che versione di Sql Server?


2000
Bug?
DD

 Bug?
Mi pareva che qualcosa del genere (con ODBC) succedesse con la versione 7.0
e che fosse stato corretto dal S.P 2.
Evidentemente il tuo č un altro problema ... ti faccio la domanda di rito:
prova a creare un link a un altro database del Server SQL (uno d'esempio) e
vedere se pure quello rompe.
Ciao, Giorgio

Newsgroup: it.comp.appl.access
Titolo: orderby

Ho la necessità di ordinare in ordine crescente una maschera in base al nome
dei Clienti, ma nella maschera ho solo l'Id_Cliente.
come fare?
grazie Riccardo

 ha scritto nel messaggio
news:9qpjqn$r3d$1...@news.panservice.it...

Suppongo che nella combo da cui selezioni l'ID cliente avrai anche il
nome...se no come faresti a sapere qual'è il cliente?
Nell'origine riga della combo, invece che TabellaTalDeiTali crei una query
con IDcliente e Nome e ordini in base al nome

 
A parte che non è ben chiaro ciò che hai realizzato, ma se l'origine dati
della tua Form è una Tabella, e nella Form Visualizzi solo Id_Cliente
non importa, inserisci nella Proprietà "Ordina per" di Maschera il campo
"Nome" relativo all'origine Dati:
Es.----> TblClienti.NomeClienti   (Crescente)
Se l'ordinamento fosse Decrescente aggiungi "DESC".
@Alex
-- 
Posted from  [62.98.27.133] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.appl.access
Titolo: macro EseguiComando ApriDatabase

Ciao
Sto provando a fare una macro dove apro un DB e collego delle tabelle.
Ho scelto il comando "EseguiComando" e poi "ApriDatabase" ma non
riesco a capire dove devo specificare il DB da aprire...
Nella finesctra delle macro ho 2 colonne azione e commento.
Se sapete indicarmi delle pagine dove spiega come fare.
Grazie

"Al" <no...@nowhere.booo> ha scritto nel messaggio
news:kscdd01g87l28vndn...@4ax.com...

Se non sbaglio l'azione che descrivi ti apre la finestra "Apri file"...
Ciao.
-- 
Sergio MAZZA

Se non sbaglio l'azione che descrivi ti apre la finestra "Apri file"...
quando provo ad eseguirla non mi da nulla, solo un'errore

"Al" <no...@nowhere.booo> ha scritto nel messaggio
news:2okdd0lm2jub3mio5...@4ax.com...

Ok; ma che dovrebbe fare questa macro?
Ciao.
-- 
Sergio MAZZA

Ok; ma che dovrebbe fare questa macro?
dovrebbe collegare delle tabelle

"Al" <no...@nowhere.booo> ha scritto nel messaggio
news:r82ed0p1s5i7e3bfl...@4ax.com...

Utilizzi la funzione sul sito comune?
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Controllare modifiche maschera

Vorrei introdurre in una maschera di carico un evento che mi consenta di
controllare le modifiche ai dati gia inseriti.
La maschera, che ho chiamato Carico, è composta dai seguenti record:
Data
Articoli
Descrizione,
ecc
(I record articoli è una casella combinata al quale sono associati i record
Descrizione)
Vorrei dunque  che per impedire modifiche ai dati gia inseriti ci fosse un
evento che tramite una finestra di messaggio mi avvisasse del tentativo di
modifica riportandomi il valore o il testo originario in caso non volessi
modificare.
Come posso fare?
Grazie

 Come posso fare?
Se usi ACCESS2000 o superiore hai l'EVENTO ONDIRTY, con A97 su evento
BEFOREUPDATE verifica che la Proprietà DIRTY di Form sia Falsa.....!!!
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:HPMN8.5847$Kt3.1...@twister2.libero.it...

Vai sul Sito Comune (link qui sotto), nella Sezione Forms leggi la FAQ di
Federico Luciani intitolata "Confermare il salvataggio dei dati".
Penso faccia al caso tuo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


Newsgroup: it.comp.appl.access
Titolo: ODBC accede soltanto in lettura a tabelle as/400 !

Ciao a tutti , è il mio primo msg.
Semplice tabella collegata ad Access . ODBC nativo IBM CLient Express
opportunamente settato su " lettura/scrittura " .
Apro la tabella ma non c'è verso di poter aggiornare /aggiungere/cancellare
dati , soltanto lettura
Qualche suggerimento ???
Grazie mille
Max

Qualche suggerimento ???
Quando apri Access ti dice che stai aprendo un file in sola lettura?
Altrimenti guarda se ci sono permessi settati.
Saluti.
Luciano
(DOC)

 ha scritto nel messaggio
news:3k1z6.5710$5Y1.1...@news1.tin.it...


 ha scritto nel messaggio
news:3k1z6.5710$5Y1.1...@news1.tin.it...


Newsgroup: it.comp.appl.access
Titolo: fine set dir record

Cosa vuol dire il messaggio:
"impossibile passare al record specificato.
E' possibile che ci si trovi alla fine di un set di record"
me lo segnala dopo che ho eliminato l'ultimo record e faccio un Gotorecord
,,aclast perché altrimenti mi si posiziona su un record vuoto.


Come dovrebbe fare a puntare l'utlimo record se non ci sono record???????
Alfio


Usa On Error goto [NomeEtichetta] per gestire l'errore e fare in modo che in
caso di errore (come il tuo) il tuo applicativo continui a girare, nella
fattispecie potresti usare DoCmd.GotoRecord First
Ciao
Newsgroup: it.comp.appl.access
Titolo: Inviare una variabile ad un Report fuori dalla sua query

Vorrei inviare un valore al di fuori della query che carica i dati sul
report, praticamente come è già possibile fare per le maschere con
l'argomento OpenArgs..
come posso fare?
ciao e grazie 10 elevato alla 5
ciao

 ha scritto nel messaggio
news:a5ks98$hvo$1...@fe2.cs.interbusiness.it...

Forse la cosa più facile è dichiararsi in un Modulo una variabile pubblica
nella quale andrai a memorizzare il valore che vuoi passare al report.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 come posso fare?
Un sistema che uso  di scrivere il valore da passare al report in una
maschera che sia aperta (ad es. la maschera che chiama il report o una
maschera menu).
In pratica fai un control non associato, non visibile. Prima di aprire il
report ci scrivi il valore, poi dal report fai riferimento a quel control.


Intanto come và? tutto quasi OK?
poi adesso parliamo di lavoro.....
dovrei fare così?
Public Function prova (variabile)
dim variabile as string
    public Const = variabile
End Function
poi dal report lancio il modulo
su apertura report
sub Report_Open(cancel as integer)
    call prova (messaggio)
    msgbox messaggio
end sub
va bene così circa

 ha scritto nel messaggio
news:3c7e0...@news.telnetwork.it...

ci avevo pensato..ma non volevo fare delle maschere temporanee su cui
scrivere un valore...lo volevo passare al volo via codice....se possibile

 va bene così circa
Più semplicemente, in un Modulo dichiarerei:
Public MiaVariabile As String
Poi, prima di aprire il report (DoCmd.OpenReport ....) scriverei:
MiaVariabile = QuelloCheVuoiTu
A fronte dell'evento "Su apertura" del report usa come vuoi il valore
contenuto in MiaVariabile.


 contenuto in MiaVariabile.
penso di avere capitissimo...sperem
ti rompo ancora se non ci riesco ok?

Newsgroup: it.comp.appl.access
Titolo: OutputSu : sovrascrivere file xls automaticamente

Ciao,
in una macro, dopo l'esecuzione di alcune Query, uso l'azione OutputSu
per esportare una query in un file xls.
Ad inizio macro ho inserito l'azione ImpostaAvvisi=No ma quando viene
eseguita l'azione OutputSu deve confermare a mano la sovrascrittura
del file xls.
E' possibile evitare la conferma della sovrascrittura ?
Grazie.
djfede

 ha scritto nel messaggio
news:570fff42.03051...@posting.google.com...

Prima di eseguire la tua macro verifica con la Funzione Dir (vedi help) se
il file xls esiste e in caso che esista cancellalo con l'Istruzione Kill
(vedi help).
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 (vedi help).
Grazie per la risposta ma non ho trovato nulla nč su dir nč su kill,
potresti essere piů chiaro ?
Sono comandi interni alla macro ?
grazie.

 grazie.


...

Grazie,
ma trasferendo via codice con TransferSpreadSheet si sovrascrive automaticamente.
Meglio così.
Grazie
Newsgroup: it.comp.appl.access
Titolo: Non considerare "sabato" e "domenica" nel conteggio dei giorni...

Salve a tutti i partecipanti vorrei un consiglio su come risolvere questo
"probema":
Ho sviluppato un programmino che gestisce la programmazzione di alcuni
macchinari così sviluppato:
In base all'inserimento di un codice articolo e la relativa quantità da
produrre il db calcola quanti giorni (di 8 ore) sono necessari
all'evasione della commessa, ora il problema stà nel fatto che inserita la
data di inizio commessa dovrei fare in modo che nel campo
calcolato relativo alla data di fine commessa (data_inizio_lavoro +
giorni_evasione_commessa) tenga conto dei giorni lavorativi
(Sabato = 4 ore ; Domenica = 0 ore).
grazie a tutti per la collaborazione
P.S. Access97



 wrote in message
news:bjn7vp$7vm$
2...@lacerta.tiscalinet.it

Fatti una Routine che dividendo per 44(ore lavorative settimanali)
ti calcola quante settimane dura la produzione.
Se il risultato è con decimale devi trasformare il decimale
in gg, quindi con DateAdd sommi prima il numero delle Settimane(ww), poi
il numero dei giorni(d).
Es.:
146 ore lavorative: 3.318
Settimane Lavorative=3    (0.318settimane=14ore)
Giorni = 2 (Arrotondando)
Ora sommi tutto......!
Ciao.
@Alex.
sommi alla data di partenza il numero di settimane previsto
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:9e5d34eb6d296d6f3c...@mygate.mailgate.org...

Grazie per avermi risposto ma il problema è un'altro:
mettiamo il caso che debba mettere in produzione una commessa e che per
evaderla occorrano 16 ore,
se inizio oggi (che mettiamo il caso sia venerdì 12/09/03)
la fine commessa non dovrà essere 14/09/03;  ma considerato che di mezzo ci
sono sabato(4 ore lavorative) e
domenica (zero ore lavorative) il risultato dovrebbe essere il 15/09/03
(arrotondando).
Credo che la cosa più semplice sia di contare quanti sabati e quante
domeniche sono presenti
tra l'intervallo di inizio commessa e la presunta data finale e quindi
sommarle al numero di giorni per evasione,
a parole sembra facile, ma non sò come fare.
Grazie ancora per l'aiuto!


vedi messaggio "sabato lavorativo" piu' sotto (ho sbagliato a spedirlo, sono
nuovo dei ng)

Newsgroup: it.comp.appl.access
Titolo: Overflow??

Qualcuno sa dirmi perchè nel punto evidenziato la funzione di AntoGal mi da
Overflow??Private Const GWL_STYLE = -16
Private Const WS_SYSMENU = &H80000
Private Const WS_MINIMIZEBOX = &H20000
Private Const WS_MAXIMIZEBOX = &H10000
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" _
    (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" _
    (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As
Long
Private Declare Function GetParent Lib "user32" (ByVal hwnd As Long) As Long
Public Sub LockAppWindow(fForm As Form)
    ModifyAppWind fForm.hwnd
    MsgBox "Ciao ciao pulsantini!"
End Sub
Private Sub ModifyAppWind(wChildWnd)
    Dim wParentWnd%
==>    wParentWnd = GetParent(GetParent(wChildWnd))
    Dim PrevWinStyle As Long, NewWinStyle As Long
    PrevWinStyle = GetWindowLong(wParentWnd, GWL_STYLE)
    NewWinStyle = PrevWinStyle And Not WS_SYSMENU And _
       Not WS_MINIMIZEBOX And _
       Not WS_MAXIMIZEBOX
    PrevWinStyle = SetWindowLong(wParentWnd, GWL_STYLE, NewWinStyle)
End Sub
Grazie Valerio.

     Dim wParentWnd%
Prova:
Dim wParentWnd as Long
Probabilmente AntoGal testň solo con win '9X.


 ha scritto nel messaggio
news:GlRXa.227707$lK4.6...@twister1.libero.it...


 form.
Perchè non era quello lo scopo del codice di AntoGal.
http://www.mvps.org/access/api/api0022.htm
Ciao.

 ha scritto nel messaggio
news:sdSXa.227588$Ny5.6...@twister2.libero.it...


 la maschera č Maximized?
Ehmmm ... beh, dovrebbe essere la seconda API postata da "The Access web",
mi sfugge qualcosa?
Ti saluto.


Ciao Valerio.

Newsgroup: it.comp.appl.access
Titolo: Eseguire query nel backend

Ho un db strutturato secondo la classica configurazione back-end/front-end.
Nel backend ho messo le tabelle e un paio di query che servono per
l'importazione dei dati da un db AS/400 (o mySQL) via ODBC.
Per l'importazione dei dati ho creato nel backend un collegamento ad una
tabella presente all'interno del db AS/400: questo perchè il frontend verrà
installato su diverse postazioni PC e non volgio che sia necessario
ricollegare la tabella AS/400 su ogni postazione.
Essendo una tabella collegata, quando effettuo il collegamento BE/FE questa
non viene vista dal FE, pertanto le query di importazione dei dati non
possono essere eseguite sul lato FE.
La soluzione che mi è venuta in mente è quella di salvare queste query nel
BE, in modo tale che le tabelle necessarie (due nel db Access e una nel db
AS/400) fossero reperibili.
Come faccio dal FE a far eseguire queste query?
Esistono altre soluzioni?
Grazie

 ha scritto nel messaggio 
news:6olldyaqtjc1$.14f24wta815qy.dlg@40tude.net...

Secondo me posso esistere altre soluzioni. Per esempio leggi CreateQueryDef 
o il Metodo Execute o più in generale le query pass-through.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: problema aggiornamento

ho una maschera di inserimento nella quale ci sono delle caselle combinate
collegate a delle tabelle.
se l'utente inserisce qualcosa che nella tabella non c'è come faccio a fare
in modo che la casella combinata aggiorni la tabella e aggiunga il nuovo
valore? grazie ciao francesco

 ha scritto nel messaggio
news:8o8c7.3379$1c2.1...@news.infostrada.it...

In grandi linee devi:
1) Impostare a SI le proprietà "Solo in elenco" e "Espansione automatica"
della casella combinata (vedi help).
2) A fronte dell'evento "Su non in elenco" (vedi help) della casella
combinata apri una maschera che ti permetta di inserire un nuovo record
nella tabella su cui è basata la query che è origine riga della casella
combinata.
3) Dopo la chiusura della maschera di cui sopra effettua un Requery della
casella combinata.
In alternativa, l'aggiornamento della tabella, anziché aprendo una maschera,
puoi effettuarlo aprendo un recordset sulla tabella.
La nuova descrizione da inserire in tabella, se non vuoi ridigitarla, la
trovi nella variabile NewData.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:9kr63b$46im$1...@stargate1.inet.it...



Non escludo che il tutto possa essere fatto con delle macro, però la verità
è che se tu sei impedito con il codice VBA io lo sono altrettanto con le
macro.
Fammi sapere se ti interessa approfondire il problema trovando una soluzione
con il codice VBA.

Newsgroup: it.comp.appl.access
Titolo: Nome utente db in un campo

Vorrei mettere in un campo, come valore predefinito, il nome del pc di chi
ha aperto il db.
In sostanza ho 3 campi: data, persona che ha inserito la nota, testo della
nota.
Vorrei inserire in automatico la persona che ha inserito la nota
identificandola con il nome del pc.
Sapete dirmi se č possibile?
Grazie
Fabio

 ha scritto nel messaggio 
news:1u2Md.811020$35.31...@news4.tin.it...

___________________________________
Incolla in un modulo questo codice
Declare Function GetComputerName Lib "kernel32.dll" _
        Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) 
As Long
Public Function GetCompName()
    Dim name As String, RetVal As Long
    name = Space(255)
    RetVal = GetComputerName(name, 255)
    GetCompName = Left(name, InStr(name, vbNullChar) - 1)
End Function
Poi con GetCompName ottieni il nome del Pc.
Per inserirlo vedi l'help sui Recordset
ciao
Riccardo 

 Per inserirlo vedi l'help sui Recordset
Grazie, ci provo.
Ciao
Fabio

 ha scritto nel messaggio
news:ctqdv3$akd$1...@news.panservice.it...

Una volta mi sembra di aver usato il metodo CurrentUser() inserito alla voce
valore predefinito del campo interessato
Mi sembra che funzionasse ed č piů semplice.

 Mi sembra che funzionasse ed è più semplice.
Sono 2 cose estremamente differenti in effetti.
L'autore del Post chiedeva il Nome del PC, mentre quanto hai
suggerito restituisce il nome dello User del Database, che nel caso
non sia altrimenti specificato da un file di configurazione utenti
è sempre "Admin"
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


E' vero, grazie della precisazione!


Anche se rileggendo... l'oggetto è: Nome utente db in un campo!

 Anche se rileggendo... l'oggetto č: Nome utente db in un campo!
Cosa vuoi mai ha i messaggi hanno Oggetto e Corpo, qualcuno
ha il vizio di leggerli entrambi......!!!
Ciao
-- 
@Alex (Alessandro Baraldi)


 Anche se rileggendo... l'oggetto č: Nome utente db in un campo!
Vero, č un'imprecisione mia.
Quello che mi interessava era il nome del pc.
Grazie a tutti.
Fabio
Newsgroup: it.comp.appl.access
Titolo: domanda forse OT

come posso saper abbianre i colori nel vestirmi se non me ne intendo di
moda?
conosciete qualche sito che spiega l'abbinamento dei colori?
sapreste indicarmi voi esperti qualche regola base da rispettare?
Grazie.

 ha scritto nel messaggio
news:b0uvru$j7k$1...@lacerta.tiscalinet.it...

scusate doveva finire in free.it.moda.sartoria, distrazione mia.

 ha scritto nel messaggio
news:b0uvru$j7k$1...@lacerta.tiscalinet.it...

Mah... diciamo intanto che su quei denti gialli, ci metterei una bella
cravatta marrone...
Antonio

 news:zJ6Z9.51623$ZE.14...@twister2.libero.it...

    ROTFL1
    Simba883, prova a farti un giro su 
msdn.microsoft.com
 dove troverai una
valanga di materiale. Potresti cominciare dalla pagina:
        Accessibility Design Guidelines for Software
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.appl.access
Titolo: Formula che non va

In una maschera ho una casella in cui ho scritto una formula del tipo:
iif((residuo]-[gennaio]-[febbraio]-[marzo])>=0;"vero";"Falso").
Mi succede che residuo ad esempio č 50,20  se inserisco a gennaio 50,20
ottengo come risultato della formula VERO. Tutto bene quindi.
Ma se inserisco invece 25,10 a gennaio e 25,10 a febbraio ottengo falso.
Nel caso di numeri interi tuuto perņ funziona bene.
PERCHE????? I campi sono in formato numerico precisione singola.
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Grazie
usa precisione doppia
Saluti.
Emanuele.

 Emanuele.
Scusa, mi sono sbagliato, era già precisione doppia ma non funziona!


Scusa, mi sono sbagliato, era già precisione doppia ma non funziona!
evidentemente i dati sono diversi prova a tracciarne il valore da
debug... con uno stop in esecuzione del codice
Saluti.
Emanuele.


I controlli: residuo, gennaio , febbraio, marzo sono associati? Se sģ, hai
controllato nella struttura della relativa tabella?
Se non sono associati, prova con:
'-----------
iif((nz([residuo];0)-nz([gennaio];0)-nz([febbraio];0)-nz([marzo];0))>=0;"ver
o";"Falso")
'-----------
Ciao.
--
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: buon 2012 e una domandina...per una media.

In una maschera ho quattro caselle di testo
Testo114  Testo116  Testo118  Testo120
queste celle, se compilate, contengono  i valori dei quattro
trimestri.
Avrei bisogno di suddividere un valore x in base a quanti trimestri
siano diversi da zero cioè compilati.
In pratica se ho solo tre trimestri compilati dovrei dividere il mio
valore x per tre.
Sto cercando con l'istruzione Count ma ho paura di essere fuori
strada.
Qualcuno mi può aiutare?
grazie infinite.

 grazie infinite.
 
 
dim i as integer
dim ValoreTotale as currency
dim ValoreDiviso as currency
 
if nz(testo114)<>0 then
 
	i=i+1
end if
 
if nz(testo116)<>0 then
 
	i=i+1
end if
 
if nz(testo118)<>0 then
 
	i=i+1
end if
 
if nz(testo120)<>0 then
 
	i=i+1
end if
 
if i>0 then
valoreDiviso=Valoretotale/i
end if
 
ciao!
BFS

 grazie infinite.
"t'anno" risposto.
rispostina immediata.
 
-- 
 
ac (x=y-1)
Newsgroup: it.comp.appl.access
Titolo: Data Valida

salve, ogni tanto vengo a porvi un quesito,
ho una mia maschera di immissione dati, e precisamente nel controllo "Data
Bolla" (al fine di evitare degli inconvenienti, .....) vorrei che la data da
poter inserire sia compresa tra lo 01/01/2002 ed il 31/12/2002 dico questa
data a mò di esempio.
    Colgo l'occasione per salutarVi tutti,  ed un ringraziamento
anticipato!!
CF





 ha scritto nel messaggio
news:QV8F8.72958$US3.1...@twister1.libero.it...

Nella proprietà Valido se del controllo Data Bolla scrivi:
Between #01/01/2002# And #31/12/2002#
e nella sua proprietà Messaggio errore scrivi:
Data Bolla Errata
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: [?] Maschere collegate

Ciao ... a tutti.
Ho un problemino,
in pratica ho circa 5 maschere che vorrei
collegare tra di loro ad una main mask.
la 1° dovrebbe contenere 5 bottoni che aprono la rispettiva sub-maschera.
E' possibile tramite autocomposizione ottenere una cosa di questo tipo?
A quanto pare la cosa è fattibile solo con 2 tabelle.
Se scelgo più di due tabelle, non compare la scelta di collegare
le maschere tra di loro tramite:
sottomaschera - o - bottone.
Ho provato a fare la cosa manualmente, creando i cmd_button,
ma non sono riuscita a legare l'id dei record nella mask principale
[id_dichiarante],
con quello della sottomaschera [id_persona].
Qualche consiglio ?
--
Bye
R@m ^_^
l'alchimista

 ha scritto nel messaggio
news:mhfbb.131945$R32.4...@news2.tin.it...

ciao, creati con l'autocomposizione la maschera principale e solo una delle
sottomaschere, poi studiati il codice che è associato al bottone per far
apparire la sottomaschera.
Da li crearti la tua maschera con le 5 sottomaschere diventerà banale.
Ciao, AEOM

 Da li crearti la tua maschera con le 5 sottomaschere diventerà banale.
E' quello che sto facendo ... ^_^
ci sono quasi


 Da li crearti la tua maschera con le 5 sottomaschere diventerà banale.
Tutto Ok ..
ci sono riuscita.
grazie :)
--
Bye
R@m ^_^
'l'alchimista'