mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Come vedere se il record è una MAIL o stringa normale

Ciao
A tutti
Desidererei conoscere un metodo per vedere se il record formato da un campo
testo, il contenuto č un indirizzo mail oppure un testo normale.
Cerco una funzione che mi indichi la presenza del carattere @ nella stringa
Ciao
--------------------------------
Inviato via 
http://usenet.libero.it



INSTR()
Saluti.
Emanuele.


dim numero as integer
dim stringa_chiocciola as string
stringa_chiocciola = "@"
numero = Instr(stringa_da_verificare,stringa_chiocciola,1)
se numero > 0 allora la chiocciola è presente nella stringa_da_verificare
alla posizione indicata dal valore di numero.
Se hai ancora dubbi cerca la funzione Instr() nella guida.
Buon lavoro
Roberto Pasqualini

Newsgroup: it.comp.appl.access
Titolo: Tabelle nascoste ??

Nei database access, ci sono delle tabelle nascoste ??
Ve lo chiedo perche' ho provato a fare una cosa del genere :
Sub visualizaNomiTabelle()
Dim db As Database
Set db = CurrentDb
Dim a As Integer
For a = 0 To db.TableDefs.Count - 1
msgbox db.TableDefs(a).Name
Next a
End Sub
ed ho scoperto che ci sono delle tabelle con nomi "strani" : MSysACES,
MSysModules, MSysObjects..etc.etc. che, pero', non si vedono da nessuna
parte.
Di che si tratta ??
Grazie

 wrote in message
BfIj8.9966$%g7.2...@twister2.libero.it...

Tabelle di sistema... puoi vederle anche se in Strumenti/Opzioni scegli
l'opzione visualizza oggetti di sistema

 l'opzione visualizza oggetti di sistema
Grazie.
Ciao

Newsgroup: it.comp.appl.access
Titolo: ACCESS 2k su server win2k va solo *monoutente*

Ho questo problema (e ringrazio anticipatamente chi vorra' rispondermi):
Ho pubblicato un programma Access 97 su un server Win 2000 e tutto 
funzionava perfettamente. Sono passato a Office 2000 e il programma
funziona bene solo per il primo user che si collega: i successivi
aprono regolarmente l'mdb e relative form ma quando eseguono qualsiasi 
query, pur non ricevendo alcun messaggio di errore, vedono la clessidra 
per alcuni secondi poi la clessidra scompare ma non viene visualizzata
la form successiva coi risultati della query stessa. Si tratta di
query pass-through che interrogano un db Oracle.
Ripeto che il problema e' intervenuto solo con Access 2000 e che 
l'mdb e' sempre lo stesso che funzionava in Access 97 (ovviamente
convertito). Grazie e saluti a tutta la lista.

"Paolo POggi"

Hai aggiornato JET 4.0 a Service pack 8.0?
Pare abbia risolto vari problemi di connettività ad Oracle (comprese SQL
Pass Th.)
http://support.microsoft.com/default.aspx?scid=kb;[LN];829558

 Pass Th.)
Non credo sia questione di connettivita' perche' altrimenti non dovrebbe
avere successo neanche la prima volta (col primo utente).
Inoltre ho verificato che la riga esatta dove il codice fallisce e' questa:
DoCmd.CopyObject , FormToOpen, acForm, "frm_Preview_BarCodeData_template"
dove FormToOpen e' il nome della form assegnata a quella sessione-utente con
una specifica RecordSource e l'altra e' appunto il template della form.
Grazie comunque del consiglio.
Newsgroup: it.comp.appl.access
Titolo: problemi con DlookUp

annoprec = DLookup("[raggiunto]", "002_Febbraio", "[zona] = " & a And
"[famiglia] = " & b And "[anno] = " & c)
a me questa istruzione non dà errore ma non funziona! sapete indicarmi
secondo voi qual'è l'errore?
Grazie.

 wrote in message
jPB08.24459$aD.8...@twister2.libero.it...

Quando si deve confrontare un valore non numerico devi circondarlo con gli
apici. Inoltre l'and deve andare dentro la stringa, tu l'hai lasciato fuori
Quindi
"[zona] = '" & a & "' And [famiglia] = '" & b & "' And [anno] = " & c
Antonio

Newsgroup: it.comp.appl.access
Titolo: PostgreSQL8.0.3

Sto installando PostgreSQL, ma non riesco ad attivare il server. Potete
dirmi come avete effettuato l'installazione? Quali pre-requisiti
necessita il sistema? Ho letto che è necessario installare Cygwin.
Potreste rispondermi al più presto è urgente. Grazie per la cortese
attenzione....................

 ha scritto nel messaggio
news:1126684344.5...@g14g2000cwa.googlegroups.com...
Sto installando PostgreSQL, ma non riesco ad attivare il server. Potete
dirmi come avete effettuato l'installazione? Quali pre-requisiti
necessita il sistema? Ho letto che č necessario installare Cygwin.
Potreste rispondermi al piů presto č urgente. Grazie per la cortese
attenzione....................
Ciao Alessia,
questo NG č dedicato ad Access, potresti  provare a postare su
it.comp.software.database o su un NG dedicato a Postgres i cui indirizzi
torverai senz'altro sul sito di Postgres.
Ciao
Cinzia

Newsgroup: it.comp.appl.access
Titolo: chiudere un db e farlo riaprire a se stesso è possibile?

vorrei che su click di un pulsante nel mio db esegua il quit per uscire a 
windows ma poi venga riaperto
il db stesso è possibile?
oppure sapete dirmi come svuoto la cache di windows per il download corretto 
di un file da ftp? 

 oppure sapete dirmi come svuoto la cache di windows per il download corretto di un file da ftp?
La cache di windows?!!?? Di quale cache parli? I file temporanei di IE? Il file di swap-memory di Win?
Mhmm... Si fa sempre piů intrigante questo quesito...
Ciao.
-- 
Sergio MAZZA 

 wrote in message 
news:439e36ce$0$7312$4faf...@reader4.news.tin.it...

Senza entrare nel merito dello scopo che vuoi perseguire.
Sì, prendendo due piccioni con una fava.
Attiva da un pulsante la funzione di compattamento.
Bruno 

 di un file da ftp?
E questo che c'azzecca con quanto scritto prima....?
Boh....!
@ALex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.appl.access
Titolo: Lettura dati da Porta seriale

Ho un quesito tecnico:
E' possibile leggere dati da una porte seriale (es. valori di un sensore)
per poi caricarli in un database di ACCESS ????
Oppure al contrario inviare risultati di una elaborazione di dati ???
Grazie a tutti coloro che mi daranno un suggerimento o qualche
indicazione.
Raffaele Alberoni

 altrimenti prova a cercare in rete, che esistono controlli free
Con Access Developer non hai una versione o licenza per MSComm.ocx.
Forse questo rumore viene dai sviluppatori che hanno anche VB o VS
č cosě una licenza. Č la causa per molte domande nei Access NG dalla
gente con ODE o MOD che riceve un errore di licenza.
Un buon controllo Freeware č
http://ourworld.compuserve.com/homepages/richard_grier/xmcomm.htm
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

Newsgroup: it.comp.appl.access
Titolo: Comando simile al LPAD di SQL

Salve, sto cercando in Access il comando simile LPAD di SQL.
Il mio problema è il seguente ho una tabella con quattro campi numerici.
Devo riempire l'ultimo campo con l'insieme dei primi tre e deve avere sempre
la stessa lunghezza, dunque dove necessario devo inserire degli zeri.
Spero di essere stato chiaro.
Grazie a tutti.
    Old-Jack!

 wrote in message
c0Hs7.7242$aE.17...@news.infostrada.it...

Grazie lo stesso ragazzi, ma ho già risolto.
Perchì fosse interessato, ho adoperato la seguente stringa:
    Format([NomeCampo];"00")
Ciao
    Old-Jack!

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

Amici della NG
ho un file in Access2000 contenente informazioni e quotazioni di un
catalogo.
Ho la necessità di portare detto file su CD e di farlo girare.
Dove posso trovare il motore di Access da installare su CD ?
E' gratuito ?
Cosa bisogna fare per fare in modo che l'utilizzatore non abbia problemi ?
Grazie
Luigi

 wrote in message
news:aKGS6.15101$Ww.3...@news2.tin.it...

C'e' la Developer's edition, ma credo esista solo fino ad Access '97. NON e'
ovviamente gratuita (io all'epoca, con licenza studenti, spesi circa 1
milione e mezzo!!!), permette di distribuire dei DB Access anche a chi non
dispone della licenza full. Vai sul sito comune per maggiori dettagli...
Ciao,
Crì

Ti ringrazio Cristiano.
Un amico mi parlava di un runtime gratuito che farebbe girare Access senza
problemi. E' vero ?
Luigi

 wrote in message
news:gWIS6.15339$Ww.3...@news2.tin.it...

Sinceramente non ho mai sentito parlare di prodotti free che facciano
questo...
Crì

 ha scritto nel
messaggio news:9ffjd1$6ea$1...@pluto.news.dsi.unimi.it...

Esiste amche per il 2000, e la versione completa comprende O2000 premium e
costa attorno ai 2 miliono, mi pare.
Tuttavia non so se il tutto può funzionara daCD, essendo un supporto read
only.
Max
Newsgroup: it.comp.appl.access
Titolo: posizionarsi dulla tabella

Saluto tutto il news e passo a descrivere il mio problema...
ho due tabelle inserire in una form, la prima come source della form principale
e la seconda in una sottomaschera...
nella sottomaschera, sono inserite delle date, tramite una casella di testo
nella form principale, inserendo una data,  devo trovare nella sottomaschera il
record corrispondente alla data inserita. Spero di essere stato chiaro, sarei
molto felice se qualcuno di voi mi postesse dare una mano...grazie 
-----------------------------------------
Messaggio inviato con Excite Newsgroup.
http://www.excite.it/newsgroup

 
http://www.excite.it/newsgroup
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

      GS
Giusto per non darti l'impressione di portare rancore.... ti saluto e ti
auguro buona Domenica.
Per precisare il tuo suggerimento perņ converrebbe tener presente del
DataType, in questo caso
mi pare di intuire Data/Ora di conseguenza potrebbe essere necessario
inserire:
SELECT * FROM Tabella2 WHERE Tabella2.[Data]=# " &
Forms![Tabella1]![Textbox] & "#;"
Saluti.
@Alex.

 molto felice se qualcuno di voi mi postesse dare una mano...grazie
Imposta la proprieta Collega campi master del controllo sottomaschera con il
nome della casella di testo dell maschera principale dove inserisci la data
da ricercare; imposta invece la proprietà Collega campi secondari del
controllo sottomaschera con il nome del campo di tipo Data/ora dell'oggetto
che è origine record della sottomaschera.
Se tali due proprietà del controllo sottomaschera sono già impostate in
altro modo, rifatti vivo.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: caselle combinate

Ciao a tutti mi ripresento!!! :-)
Dunque ho 2 tabelle: 1= Gruppo, costituita per es. da 2 gruppi: carne e
pesce e la 2= Sottogruppo, costituita per es. da maiale, bovino,
salmone, trote.
Io desideravo poter selezionare tramite casella combinata da tabella 1
un gruppo ( per es. pesce ) ed ottenere in automatico nella casella
combinata i sottogruppi legati a pesce e cioè salmone e trote....ora far
le caselle combinate non è un problema e fin li ci son arrivato, ma non
riesco a legare le due caselle.......qualcno può seggurirmi una via
d'uscita?????
grazieeeeee e ciao
michele
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 d'uscita?????
La tab 2 avrà un campo che specifica il tipo di gruppo no?
La sconda combo deve avere come origine riga una query sulla seconda tabella
che abbia sotto il campo accennato sopra, un criterio where fatto così
like nz([forms]![tuaform]![combo1];"*")
su evento dopo aggiornamento della prima combo scrivi
combo2 = ""
combo2.requery
Antonio
Newsgroup: it.comp.appl.access
Titolo: Cambiare colore celle EXCEL

Salve,
dato il seguente codice:
Dim oApp As Excel.Application
Dim oWks As Excel.Workbook
Dim oWsh As Excel.Worksheet
Set oApp = CreateObject("Excel.Application")
Set oWks = oApp.Workbooks.Open("prova1.xls")
Set oWsh = oWks.Worksheets(1)
oApp.Visible = True
oWsh.Cells(1,1) = "Paperino"
oWks.Save
oWks.Close False
oApp.Quit
come faccio a far cambiare il colore alla cella 1,1 ?
GRAZIE 1000
faf...@tiscalinet.it

fatto
oWsh.Cells(5, numerogiorno + 3).Font.ColorIndex = 3
Newsgroup: it.comp.appl.access
Titolo: Raggruppare records in una maschera

Sto cercando di realizzare un database access che gestisca la
produzione di una piccola azienda.
Ho una tabella che viene aggiornata con gli ordini dei clienti; ogni
articolo subisce una o più lavorazioni che vengono effettuate da
differenti macchine; non tutte le macchine sono contemporaneamente
necessarie alle lavorazioni.
Vorrei realizzare una maschera che raggruppa le fasi di lavorazione
per macchina.
La maschera deve essere "dinamica", cioè non voglio crearne una
contenente delle sottomschere per ogni macchina (dal momento che è
previsto l'acquisto di macchinari in futuro, per cui dovrei rimettere
"mano" al database). D'altra parte, una macchina che non effettua
alcuna lavorazione non deve comparire nell'elenco e tutte quelle che
sono impegnate devono comparire sulla stessa pagina (a colpo d'occhio
devo valutare la situazione globale).
Qualcuno è in grado di aiutarmi?
Grazie in anticipo
Emanuele

 ha scritto nel messaggio
news:9c95460c.04090...@posting.google.com...

Secondo me potresti trovare uno spunto sul Sito Comune (link qui sotto),
nella Sezione Reports, nella FAQ di AntoGal intitolata "Rappresentazione, su
Report, di periodi temporali mediante segmenti".
Invece di una maschera i risultati li avrai nell'anteprima di un report.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: tabelle collegate

Salve a tutti.
Ho questo problema: Ho realizzato un database, che contiene tutti i
dati, poi un'altro che contiene una maschera che permette soltanto di
visualizzarli. Ovviamente le tabelle sono collegate.
Il problema nasce quando porto i due database in un altro PC.
Il collegamento delle tabelle non funziona più. In pratica, il
database di visualizzazione, mi va a cercare le tabelle nella posizione
originaria (es: destop/nome/database.mdb), dovrei invece fare in modo
che spostando i due database da qualsiasi parte, sia possibile fargli
ritrovare il database contenente i dati.
Sicuramente qualcuno ha già risolto il problema.
Posso avere il vostro aiuto? 
Grazie

Grazie
Prego
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: query con dati cumulati...?

Ringrazio anticipatamente chi saprà risolvere il mio problema.
supponiamo che io registri in una tabella OPERAZIONI dei pagamenti in mio
favore:
Data        Importo    Pagato Si/No
13-01-03 Euro 50 NonPagato
14-01-03 Euro 50 NonPagato
15-01-03 Euro 50 NonPagato
etc. etc.
Supponiamo mi paghino fisicamente 100 Euro
Vorrei costruire una query che:
mi mostrasse solo le operazioni IL CUI TOTALE assomma a 100 Euro (vale a
dire quella del 13 e qualla del 14) per poi aggiornare il "Non Pagato" in
"Pagato".
Mi interessa esclusivamente la query di selezione; devo fare un campo
calcolato (per la "cumulata") o altro?
Grazie ancora,
Guido
--
in moto:
sfortunà tanti
fortunà pochi
bravi gnanca uno

 ha scritto nel messaggio
news:fIfJa.124614$pR3.2...@news1.tin.it...

Ciao Guido
Vedi se ti va bene.
----------------------------------
SELECT Op1.Data, Op1.Importo, Op1.Pagato, Op1.Progressivo
FROM [SELECT
        Op0.Data,Op0.Importo,Op0.Pagato,
        (Select TOP 100 PERCENT
             SUM(Importo)
          FROM
             Operazioni
          WHERE
               Data<=Op0.Data AND
               Pagato=0
         ) AS Progressivo
     FROM
        Operazioni AS Op0
     WHERE
        Op0.Pagato=0
     ORDER BY Op0.Data
   ]. AS Op1
WHERE (((Op1.Progressivo)<=100));
---------------------------------
Ciao Giorigo.
Newsgroup: it.comp.appl.access
Titolo: Query Pass Through

Ciao a tutti
Come faccio a passare in una query Pass Through dei criteri che impongo
in una maschera?
Grazie Sam
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

crei la stringa sql via codice e poi la esegui....
esempio:
'Importazione e creazione tabella *** TITOLI DELLA GIORNATA ***
txt = " SELECT titolo.PROG_TITOLO, titolo.COD_SUBAGENZIA AS sub,
titolo.COD_TITOLO AS titolo, titolo.COD_STATO_TITOLO AS stato,
titolo.DAT_RATA AS rata, titolo.DAT_INIZIO_COPERTURA AS decorr,
titolo.DAT_FINE_COPERTURA, titolo.NUM_POLIZZA AS pol, titolo.COD_RAMO,
titolo.DAT_RATA, titolo.TOT_RATA AS totrata, titolo.NETTO_RATA AS netrata,
titolo.ACCESSORI_RATA AS accrata, titolo.IMPONIBILE_RATA AS imponrat,
titolo.IMPOSTA_RATA AS imprata, titolo.DAT_CONTABILE,
titolo.DAT_EFFETTIVO_INCASSO AS effinc, titolo.DAT_INSERIMENTO ,
titolo.DAT_INSER_GDC AS giorcas, IIf([COD_APPENDICE]='
',Null,[COD_APPENDICE]) AS appendice INTO titolosql " _
& " FROM titolo IN cliras[ODBC;DSN=cliras;UID=sa;PWD=;DATABASE=cliras;] " _
& " WHERE (((titolo.DAT_RATA)>#12/31/2000#) and (titolo.cod_stato_titolo =
'E') and (DAT_INSERIMENTO > #" & Format(Date, "mm/dd/yyyy") & "#));"
Set loqd = CurrentDb.QueryDefs("crea_archivio")
loqd.SQL = txt
loqd.Close
' Esecuzione query
DoCmd.OpenQuery "crea_archivio"
ciao
ringo

 ha scritto nel messaggio
news:c94eq0$3f1$1...@newsread.albacom.net...

Credo che quello che hai suggerito sia il metodo per eseguire una Query
normale, ma il Messaggio Originale se non errato chiedeva di una Query
PassTrough.
In questo caso non basta passare il Codice SQL alla Proprietà SQL
dell'oggetto
QueryDef, ma serve prima di tutto avere un Database SQL come BE, quindi
passare la Stringa di Connessione sempre all'oggetto QueryDef.
Chiarita la differenza a voi le conseguenze....!
Ciao.
@Alex.

Newsgroup: it.comp.appl.access
Titolo: Maschera di immissione : aiuto

Ciao a tutto l' N.G. . Premetto di essere un novellino del VBA e quindi
scusate l'ingenuita' delle richieste.
Allora il mio problema e' questo : Ho una maschera di immissione dati Con
diciamo sei controlli :
A B C D E F. Per me e' importante che l'utente immetta sempre qualcosa nei
controlli A B C mentre puo' tralasciare C D E . Io vorrei che se questo
avviene all'utente venga impedito (con messaggio) sia il passaggio ad un
record precedente o successivo attraverso i tasti di spostamento che ho
creato , sia la chiusura della maschera (attraverso tasto da me creato o
attraverso quello preesistente nella maschera.)
Ho cercato di fare da solo ma mi trovo sempre in qualche caso strano che
sfugge al mio controllo.
Per esempio se l'utente apre la maschera , poi invece cambia idea e la
richiude senza scrivere niente mi succede che mi appare lo stesso il
messaggio e mi impedisce l'uscita se non forzandola .
Ringrazio chiunque provera' ad aiutarmi e saluto tutti augurandovi un buon
Week-end

 ha scritto nel messaggio
news:VjOA8.4910$US3.1...@twister1.libero.it...

Sulla tabella, per i campi A B C, imponi a Sģ la proprietą "richiesto".
Ciao, Salvatore
Newsgroup: it.comp.appl.access
Titolo: Valore casella di testo

Ciao,
ho un problema, che penso stupido, ma che non riesco a risolvere.
Tramire codice (DoCmd.OpenReport "Informativa 5-10",
acViewPreview, , , acDialog, NomeCognome) vado ad aprire un report in
cui c'è una casella di testo a cui non riesco ad assegnare il valore
OpenArgs (NomeCognome).


Cioè una cosa come questa non funziona o ti segnala qualche errore?
Private Sub Report_Open(Cancel As Integer)
    Me.TuaCasellaDiTesto = Me.OpenArgs
End Sub
HTH Roberto


Perche' non segnalare che hai fatto il medesimo post su mpioa?
-- 
ac
y-1=x

Newsgroup: it.comp.appl.access
Titolo: Fatture ed euro...

Ho la necessità di eseguire dei calcoli con dei campi valuta e formato
impostato Euro, cioè con i due canonici decimali.
Dovendo calcolare l'importo dell'iva di determinate operazioni mi trovo al
problema che il cliente, saltuariamente, inserisce come importo un numero
maggiore di decimali.
Nel form che ospita dette operazioni ho utilizzato la funzione Round per
detti calcoli con due decimali, ma mi succede questo ad  esempio :
Quantità = 13,50
Importo = 1,0145
Iva = 20 %
quindi 13,50x1,0145 = 13,696 che arrotondato alla seconda cifra fa 13,70 x
20%= 16,44 invece nel risultato ottengo 16,43.
Il calcolo è : =Round([Quantità]*([Importo]+NZ([Importo]*[IVA])/100);2)
Qualche suggerimento, risoluzione ?
Grazie anticipatamente

 ha scritto nel messaggio

Le norme stabiliscono che imponibile e iva vanno arrontondati separatamente
e poi sommati.
Round([Quantità]*[Importo])+Round([Quantità]*[Importo]*[IVA]/100)
ma tu l'iva la memorizzi come numero intero?
la funzione round comunque non e' adatta per usi commeriali, vedi sul sito
comune.
Sib

 ha scritto nel messaggio
news:qZ8X9.58515$0v.18...@news1.tin.it...

Personalmente uso il tipo di dati in precisione singola o doppia, imposto il
formato a Numero Generico e le cifre decimali su Automatiche.
Questo permette di visualizzare sia 2 che n cifre decimali.
Per i calcoli applico le regole di arrotondamento previste per l'euro.
Al più utilizzo due campi: uno con il valore arrotondato e un altro con il
valore non arrotondato.
Comunque il cliente deve decidersi a rispettare le regole: nei dettagli è
consentito l'uso di più di due decimali ma nel totale fattura, per esempio,
i decimali devono essere due e con le regole di arrotondamento.
Ciao, Carlo

 Round([Quantità]*[Importo])+Round([Quantità]*[Importo]*[IVA]/100)
cut
ops:
Round([Quantità]*[Importo],2)+Round([Quantità]*[Importo]*[IVA]/100,2)
Sib

Newsgroup: it.comp.appl.access
Titolo: selezionare solo n-record

come posso fare ?
in mysql usavo
select * from fornitori limit 0,1
(limit...)
ma con access non va ... 

 ha scritto nel messaggio
news:iry_d.1080162$35.40...@news4.tin.it...


 wrote in message
news:iry_d.1080162$
35.40...@news4.tin.it

Leggi riguardo l'uso del predicato TOP nel costrutto
SQL, ma fai attenzione all'eventuale Ordinamento dei Record
tramite la proposizione ORDER BY
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.appl.access
Titolo: Strano Problema su maschera:Aiuto!

Ciao a tutti,
vi spiego in breve la situazione.Ho utilizzato una soluzione presente
sul Sito Comune per l'autenticazione utente:in sostanza in base al
login+psw inserite, memorizzo un valore numerico in una variabile
globale (var_tipo).
In questo modo a seconda del valore assunto dalla variabile gestisco
il tipo di autorizzazione sull'apertura delle varie maschere di
inserimento dati! (1=Admin;2=inserimento;3=Solo Visualizzazione;ecc)
Questo è la routine che inserisco sull'evento apertura di maschere e
sottomaschere:
Private Sub Form_Open(Cancel As Integer)
Me.OrderBy = "anno desc"
Me.OrderByOn = True
If var_tipo <> 0 Then
Select Case var_tipo
Case 1
    Me.AllowAdditions = True
    Me.AllowDeletions = True
    Me.AllowEdits = True
    Me.AllowFilters = True
Case 2, 4
    Me.AllowAdditions = True
    Me.AllowDeletions = False
    Me.AllowEdits = True
    Me.AllowFilters = True
Case 3, 5, 6
    Me.AllowAdditions = False
    Me.AllowDeletions = False
    Me.AllowEdits = False
    Me.AllowFilters = True
End Select
Else
End If
End Sub
La M_Principale contiene una struttura a schede con 7 sottomaschere
collegate tramite il campo id_Utente!
Il problema è che se accedo come Admin (quindi var_tipo=1) è tutto ok,
mentre se accedo con altri login mi succede una cosa strana nelle
sottomaschere della M_Principale:non visualizza in molti record i dati
nelle sottomaschere,o meglio riesco solo a vedere il colore di sfondo
delle stesse,non si vede nessun controllo!!
Mi aiutate per favore a trovare dove può essere la soluzione??Sono
giorni che ci provo!!
Grazie

 Grazie
Ciao.
-- 
Sergio MAZZA 

 Sergio MAZZA
Ok hai ragione ho letto le condizioni,mi scuso per alcune cose come ad
esempio l'oggetto posto troppo generico!!
Ricerche invece ne avevo fatte sia sul sito comune sia sul neswgroup.
Comunque ho risolto il problema al mio quesito,era questo:
Me.AllowAdditions = False
dovevo porlo a True.Era questo che mi impediva di vedere i controlli e
i dati su alcune maschere.
Ringrazio lo stesso e una buona giornata a tutti

Newsgroup: it.comp.appl.access
Titolo: gif animate nelle maschere

E' possibile far vedere gif animate nelle
maschere
Come?
Grazie in anticipo Alfonso

 E' possibile far vedere gif animate nelle maschere
Con un controllo ActiveX come:
Freeware: XGIF 
http://members.xoom.com/MAX_MOSER
Shareware: Animation Gif Control 
http://www.jcomsoft.com/anigif.htm
Un altra possibilità è con il controllo Webbrowser o DHTML Edit
del MS Internet Explorer.
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com
Newsgroup: it.comp.appl.access
Titolo: al posto di xcopy

Vorrei sapere se esiste la possibilità di copiare una cartella usando
shell.run o set application al posto di usare xcopy.
Adesso uso questa sintassi ma forse esiste qualcosa di alternativo
Shell.Run "xcopy " & PathSource & " " & PathTarget & cNameFileDate &"
/v/e/s/i", 1
Windows cosa attiva per copiare ed incollare?
Grazie
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:6dba474cab8aca18e28...@mygate.mailgate.org...

esempio:
Dim Path1 as string
Dim Path2 as String
Il PathSource è per es. Path1 e il Path2 é il PathTarget
FileCopy Path1, Path2
se vuoi eliminare il file 1:
Kill Path1
ciao
Giorgio

  Dim fso
    Dim Drive, folder, folderorigine, folderdestinazione
    folderorigine = "c:\pippo\"
    folderdestinazione = "f:\"
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set folder = fso.GetFolder(folderorigine)
    folder.Copy folderdestinazione, True
    Debug.Print "La cartella " & folderorigine & " è stata copiata in " &
folderdestinazione & "."
Newsgroup: it.comp.appl.access
Titolo: Contare i record in una casella di riepilogo

Ahinoi, per fortuna il problema del mio post precedente l'ho risolto...
Ora vi chiedo una cortesia.
Selezionando una voce in una casella di riepilogo (una persona), in un'altra
casella escono tutte le attività relative a quella persona (attività).
Questi dati sono estratti da una tabella dove c'è la chiave, la persona,
l'attività, un segno di spunta (si/no) che indica se l'attività è attiva o
no (scusate il gioco di parole).
Io avrei bisogno di visualizzare quante attività sono attive per un
fornitore, ed eventualmente anche quelle non attive.
Però non ci sono riuscito. Ho provato con Dcount.
Voi potete darmi una mano? Ciao e grazie

 wrote in message
ag6b8.21564$Jo.6...@twister2.libero.it...

Inserisci due caselle per i due risultati diversi denomin. ad esempio Attivi
e NonAttivi :
I°) Attivi : nella casella scrivi "=Somma(IIf(["Digita Nome del campo
Si/No"]=1;1;0))
II°) NonAttivi : nella casella scrivi "=Somma(IIf(["Digita Nome del campo
Si/No"]=0;1;0))
Funziona?


Purtroppo no, perchè la maschera non è associata alla tabella: ho quindi il
problema di contare solo le attività della persona e, soprattutto, solo le
attività attive (sono quindi due variabili).
Magari provo a sviluppare l'idea, ma se hai/avete nuovi dettagli da
implementare io sono in attesa!

 Però non ci sono riuscito. Ho provato con Dcount.
Non sono siccuro di capirti.
Se i dati della casella vengono da una query (?) puoi farti una
casella di testo calcolata con una formula come:
=DCount("*";"NomeQuery";"Attivita = True")
e un altra casella con
=DCount("*";"NomeQuery";"Attivita = False")
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 ha scritto nel messaggio
news:a4jcp6$o4q8$1...@ID-46617.news.dfncis.de...

In realtà non deriva da una query, il conteggio con Dcount è basato su
tabella...
Vedo con la query... E Grazie!

 Però non ci sono riuscito. Ho provato con Dcount.
con dcount devresti riuscirci visto che nel criterio puoi metterci l'espressione
di andare a contare solo quelli con la spunta ovviamente con la chiave uguale a
quelli
della persona selezionata quindi credo un criterio doppio di filtraggio sulla
rtabella di quella persona che hai scelto
e con spunta

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

Prova

Prova
Newsgroup: it.comp.appl.access
Titolo: sommatoria tabella query

Ogni mese creo da codice una tabella di access con i campi
Stabilimento, Articolo, Quantità, Prezzo
Avrei bisogno (via codice) di lanciare una query di sommatoria
generale di tutti gli stabilimenti per ogni articolo ed accodare alla
tabella del mese un record per ogni articolo con i totali.
Ossia: tabella Gennaio, in coda al codice dopo aver creato la mia
tabella access Gennaio vorrei avere nel campo stabilimento "99999" ed
avere un record per ogni articolo con la sommatoria di quantità e di
prezzo.
Potete aiutarmi o suggerirmi vie migliori? O qualche link con
definzione query via codice?
Grazie.


Ciao, la tua situazione è abbastanza strana, perchè una tabella per
mese/stabilimento ?
Perchè non una sola tabella ? Ci puoi fare poi quello che vuoi con
semplici query di aggregazione e somma di dati.
Ciao.
Alberto

 Alberto
Ho una tabella sola per mese con tutti gli stabilimenti.
E' il risultato di fusione di un file excel per ogni stabilimento(210)
che ricevo in formati diversi e che raggruppo per mese
e al quale in coda vorrei inserire totali per quadratura via codice
onde evitare di doverlo fare sempre io questo lavoro e di poterlo dare
in gestione anche a colelghi che non sanno nemmeno aprire access ma
che possono aprire un command utton


Ciao,
potresti postare il DB con i dati di un mese o il file di Excel che
carichi in Access ?
Semplificherebbe il tutto.
Ciao
Alberto

Newsgroup: it.comp.appl.access
Titolo: Incredibile: caratteri GIAPPONESI in seguito ad istruzione UPDATE

Salve a tutti, 
	non ci credo io stesso nel dirvelo, in seguito ad una semplice
istruzione di update, in cui tra l'altro aggiornavo solo alcuni campi
di una tabella, sono apparsi caratteri *giapponesi* in tutti i campi
di tipo stringa, e in quelli numerici un valore stratosferco. Avete
idea di cosa possa essere accaduto?

Gilmour ha scritto:

Penso proprio che la tabella si sia corrotta
Se non hai una copia sono guai

 ha scritto nel messaggio 
news:1142184162.5...@z34g2000cwc.googlegroups.com...

E' capitato anche a me, in un record mi sono trovato alcuni campi con 
caratteri giapponesi e aprendo la tabella in visualizzazione foglio dati, 
quando il campo diventava attivo, mi chiudeva il DB.
Ho esportato i dati in un foglio di excel, ho eliminato il record corrotto e 
poi reimportato i dati nella tabella. chiaramente prima di reimportare ho 
dovuto eliminare le relazioni per poi rifarle dopo.
non so se sia il giusto modo di agire, so che con il mio DB ha funzionato.
ciao C.
Newsgroup: it.comp.appl.access
Titolo: Doppio Inserimento in 2 tabelle

Ciao a tutti,
ho questa Q paramenrica di inserimento, i valori arrivano da una pagina
dinamica.
E' possibile effettuare un'unica operazione per fare un inserimento su due
tabelle?
Lo saprei fare con SQL Server, ma in access non so.... :(
Avrei usato un TRANSIZIONE, ma qui...bho..
Sapete aiutarmi?
Ciao e grazie
Alen
INSERT INTO TBL_Prenotazioni ( ConfermaVia, Nominativo, Azienda,
RecapitoTelefono, RecapitoFax, Email, DataArrivo, DataPartenza,
CamereSingole, CamereDoppie, CamereMatrimoniali, CamereTriple,
CamereQuadruple, Fumatore, PagamentoFormula, Osservazioni )
VALUES ([@1], [@2], [@3], [@4], [@5], [@6], [@7], [@8], [@9], [@10], [@11],
[@12], [@13], [@14], [@15], [@16])
INSERT INTO TBL_MailingList ( Email) VALUES ([@6];

 ha scritto nel messaggio
news:YsgGb.4106$_P.1...@news4.tin.it...

Al di là che non avresti usato una Transazione ma una STORED PROCEDURE
nella quale avresti fatto eseguire 2 istruzioni sequenziali.......!!
La TRANSAZIONE è tutt'altra cosa e nel tuo esempio non ce nè nemmeno
l'ombra...!
Quì con Acecss è la stessa cosa, solo devi farne una per volta.
Currentdb.Execute "INSERT INTO bla bla bla"
Currentdb.Execute "INSERT INTO bla bla bla"
PEr usare Currentdb devi impostare DAO Reference, se usi ADO
mi pare esista CurrentProject.Execute, ma non ne sono certo,oppure il
vecchio DocmdRunSQL "INSERT INTO........"
Ciao.
@Alex.

Newsgroup: it.comp.appl.access
Titolo: esiste un ng. dedicato a SQL-Server?

Come da oggetto..
Ciao a tutti.


microsoft.public.it.sql
Ciao Giorgio.

Come da oggetto..
Idem.
Saluti.
Luciano

 >Come da oggetto..
Peccato, un vero peccato ;-(
Ciao.

 ha scritto nel messaggio
news:ooFO9.51862$TC5.1...@twister1.libero.it...

Peccato ?? penso che difficilmente si possa trovare un ng serio e
professionale come microsoft.public.it.sql
Ciao Giorgio.
Newsgroup: it.comp.appl.access
Titolo: Tasto di chiusura di ACCESS.

Salve!
Scusate, ma non riesco a trovare il modo di inibire il tasto di chiusura di
Access, quello in alto a destra.
Un pò di tempo fa se n' è parlato, ma non sono riuscita a ritrovare il
messaggio.
Grazie per l'aiuto.
Ciao Rita.

messaggio.
Non c'era qualcosa su SC?
Saluti.
Luciano

 ha scritto nel messaggio
news:aacfg3$9nkdu$2...@ID-86073.news.dfncis.de...

Ciao Luciano, mi pare che non ci sia nulla, ma ho letto un pò di tempo fa,
ora ricontrollo.
Grazie ciao
Rita

 ora ricontrollo.
Sotto General, "Rimuovere il pulsante di chiusura (X), il menu e i pulsanti
di ridimensionamento di Access". Disabilità sia la chiusura che i pulsanti
di ridimensionamento.
Marco

Ciao Rita.
--------------------------------
Inviato via 
http://usenet.iol.it
 

 ha scritto nel messaggio
news:30ly8.97386$SR5.2...@twister1.libero.it...

Si, Grazie Marco, ora l'ho trovato sul SC..
Ciao Rita

 ha scritto nel messaggio
news:gpokcusvg4dpi92dt...@4ax.com...

Grazie mille, farò tesoro dei tuoi suggerimenti, imparare un pò di codice
non mi fa certamente male!
Ciao Rita

 ha scritto nel messaggio
news:62Z11Z107Z221Y1...@usenet.iol.it...

Grazie mille anche a te Max, cercherò di capire le righe di codice che mi
hai inviato e le proverò.
Ciao Rita


C'иииииииииии!!! L'ho trovato Luciano.
Ciao Rita
Newsgroup: it.comp.appl.access
Titolo: [?] Come si realizza un master - detail in access

Come da oggetto, vorrei sapere come si fa a creare un master detail in
access in modo che le colonne del master nella relazione identificante
vengano riportate sulle relative colonne detail (di solito di una griglia).
In Delphi è molto semplice, ci sono delle proprietà ad hoc da impostare
sulla griglia.
Grazie
            Golan
--
1.Un robot non può recar danno ad un essere umano, né permettere che, a
causa
 del suo mancato intervento, un essere umano riceva danno.
2.Un robot deve obbedire agli ordini degli esseri umani, purché questo non
 contrasti con la Prima Legge.
3.Un robot deve proteggere la propria esistenza, purché questo non contrasti
 con la Prima e la Seconda Legge.

 wrote in message
news:8t8nvj$m0l$1...@fe2.cs.interbusiness.it...


  con la Prima e la Seconda Legge.
io di solito lo faccio con maschera e sottomaschera. La maschera principale ha
come origine record la tabella master, mentre la secondaria, impostata a
maschere continue o a foglio dati ha come origine record la tabella detail.
nella sottomaschera hai le proprietà Link Child field e Link Master Field, che
ti consentono di mettere in relazione i campi chiave della tabella master con i
campi chiave esterna della tabella Detail
ciao
Paolo
-------------------------------------------------------------------------------
Un giorno le macchine riusciranno a risolvere tutti i nostri problemi.
Ma nessuna macchina sarà in grado di porne uno.
-------------------------------------------------------------------------------

Ti ringrazio Paolo, visto che non mi rispondeva nessuno ho intrapreso la
strada dei wizard, e dopo aver impostato l'integrità referenziale con
aggiornamento/cancellazione in cascata, mi sono creato un form guidato.
Dopo due tentativi, e appena 10 minuti (access in tal senso e grandioso) ho
raggiunto proprio la configurazione che mi hai esposto.
Se qualcuno ha seguito il discorso si ricordi quindi della integrità
impostabile con la voce Relazioni del Menu.
Golan

Newsgroup: it.comp.appl.access
Titolo: HELP Partita Doppia

Un cliente mi ha chiesto di implementare la partita doppia dal precedente 
software che gli avevo costruito di fatturazione e gestione magazzino, come 
fare da dove partire oltre alle tabelle anagrafiche come piano dei conti 
ecc.
Qualcuno mi pu� dare una mano su come implementare la partita doppia? 
(registrazione pagamenti, registrazione fatture....)
Premetto che conosco gi� la partita doppia ma volevo costruire un software 
che fosse in grado di creare i movimenti in modo che l'utente non si renda 
conto che sta registrando partita doppia, ma sta copiando documenti che ha 
sottomano....
Aiuto!!!!
PS. Sarebbe bello vedere una qualche demo per dare un'idea....
Andrea 

 
dovresti fare richieste piï¿œ precise...rispondere a "come fare un 
programma in partita doppia" non ï¿œ una cosa da un post.
demo ne trovi a centinaia su internet.
Parti dal piano dei conti, struttura quello e poi passa allo step successivo
ciao
BFS
Newsgroup: it.comp.appl.access
Titolo: lancio di query

Mi scuso per la mia ignoranza in materia ma non riesco ancora a capire una cosa, sino ad oggi forse ho pasticciato, ma vorrei un parere autorevole.
 
Sino ad oggi quando da una maschera dovevo aggiornare una query ho sempre utilizzato questa sintassi :
 
'aggiorna Query Data limite
    Dim stDocName As String
    stDocName = "QRY_frm_Aggiorna_Data_Limite"
    Me.Requery
 
Se invece avessi scritto :
 
'aggiorna Query Data limite
    QRY_frm_Aggiorna_Data_Limite.requery
    Me.Requery
 
avrebbe funzionato ugualmente ? cioè la prima sintassi è utilizzata quando nel nome query ci sono degli spazi ?
 
Seconda domanda.
La mia maschera ha origine dati da una tabella che necessita di essere aggiornata sempre da una query di aggiornamento.
Vale il codice di cui sopra ?
Devo comandare tale query all'apertura della maschera o posso utilizzare qiulacos'altro ? Per qualcos'altro intendo un pulsante che ad esempio aggiorna tutte le query del database o un automatismo o se è possibile rendere tale aggiornamento sempre attivo.
 
grazie infinite a chiunque mi aiuterà a diradare la nebbia...
grazie.


Non amo le query action, ma priva con
currentdb.execute "QRY_frm_Aggiorna_Data_Limite"

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

Ci riprovo....
Un saluto a tutto il news
Quando in una maschera seleziono una casella combinata contenente una lista 
di valori in euro, non so per quale motivo me li visualizza arrotondati e 
senza decimali.
Poi una volta selezionato il valore che a me interessa, viene inserito nel 
campo in modo corretto.
Qualcuno sa dirmi il perchč????
Grazie in anticipo 

 Qualcuno sa dirmi il perchè????
"valori in euro" probabilmente vuol dire che si tratta di un campo
del tipo Valuta. Di solito per la presentazione nell'elenco di una
casella combinata/di riepilogo questi campi vengono formatato
da Access come stringa con 2 decimali. È strano che non vedi
niente decimali ma non conosco i dettagli del tuo db e PC.
In ogni caso puoi provare di formattare il campo da te stesso.
P.e. questa espressione nella query d'origine riga ti devo dare
2 decimali anche nella presentazione nell'elenco:
Format([TuoCampo];"#.##0,00")
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
+ Conferenza Italiana per Sviluppatori di Access (CISA)
Newsgroup: it.comp.appl.access
Titolo: durata valore di una matrice es adattato da Sito Comune 4.17 Creare il totale di pagina ecc.

Salve a tutti,
ho adattato il codice presente nel file corrispondente al punto 4.17 della 
sezione Report del sito comune
per poter gestire i totali di più controlli e non di uno solo
Il codice di partenza è questo:
Me!ProgrPag = Me!RunSum
If Page = 1 Then
    Me!PageSum = Me!RunSum
Else
    Me!PageSum = Me!RunSum - x
End If
x = Me!RunSum
Mentre il mio codice è questo:
Dim strSuffisso As String, i As Integer, strStringaDebug As String, 
strStringaDebug2 As String
    Dim valX(6) As Currency
    For i = 1 To 7
        strSuffisso = Choose(i, "CE", "CU", "BV", "BP", "PV", "PP", "PFC")
        Me("ProgrPag" & strSuffisso) = Me("runSum" & strSuffisso)
        If page = 1 Then
            Me("PageSum" & strSuffisso) = Me("runSum" & strSuffisso)
        Else
            Me("PageSum" & strSuffisso) = Me("runSum" & strSuffisso) - 
valX(i - 1)
            strStringaDebug = strStringaDebug & ";" & valX(i - 1)
        End If
        valX(i - 1) = Me("runSum" & strSuffisso)
        strStringaDebug2 = strStringaDebug2 & valX(i - 1) & ";"
    Next i
   Debug.Print "Pag. " & page & strStringaDebug & vbCrLf & strStringaDebug2
Per un report di 5 pagine ciò che ottengo nella finestra immediata è questo:
Pag. 1
0;900;3294;3,5;0;0;0;
Pag. 2;0;0;0;0;0;0;0
0;1763,2;5035,2;2162,2;0;0;0;
Pag. 3;0;0;0;0;0;0;0
1853,6;1763,2;5035,2;3936,48;210;0;0;
Pag. 4;0;0;0;0;0;0;0
2205,6;2045,44;5488,8;4186,48;210;360;150;
io mi sarei aspettata di trovare al posto di  "Pag. 2;0;0;0;0;0;0;0" la 
stringa "Pag. 2;0;900;3294;3,5;0;0;0;" perchè nella prima pagina avevo 
memorizzato questi valori nella mia matrice. Invece perdo per strada i 
valori memorizzati nella matrice.
Dove sbaglio?
Grazie mille
-- 
Nina 

 ha scritto nel messaggio news:450a7c63$0$35074$4faf...@reader4.news.tin.it...

Forse hai dimenticato di dichiarare fuori dalle sub le variabili:
Dim x As Double
Dim y As Integer
quelle dell'esempio che hai citato e che servono per i totali...
Ciao.
-- 
Sergio MAZZA 

 Sergio MAZZA
Ciao e grazie mille!
Tonina
Newsgroup: it.comp.appl.access
Titolo: Colonna associata in query inserimento

ciao a tutti,
forse ho le idee un po' confuse, lavoro pochissimo con Access...
E' possibile utilizzare il concetto di colonna associata senza utilizzare maschere? Cerco di spiegarmi meglio... 
tabella 'prodotti' (id_prodotto | descrizione_prodotto) 
tabella 'ordini' (id_ordine | fk_prodotto) 
 
Vorrei creare una query parametrica di inserimento dove il parametro da inserire sia selezionabile dall'elenco descrizione_prodotto ma poi sia inserito il suo valore associato id_prodotto nella tab 'ordini'.
 
Faccio utilizzare Access2007 tramite applicazione di terze parti (Table Editor) che riesce a dare l'accesso via web e l'esecuzione di tutte le query (purtroppo non gestisce le maschere). A quel punto gli utenti possono esportare anche in .xml o .xls e manipolare i dati in base alle necessità.
Da qui l'idea di fare inserimento con una query anch'essa visibile via web con Table Editor.
 
Fermatemi se le ho sparate troppo grosse :-)
 
grazie,
Mara

 Fermatemi se le ho sparate troppo grosse :-)
 
Bo!!  mai visto TableEditor,  e mi sembra strano che con quello tu possa accedere direttamente alle query.
 
Comunque 
nella visualizzazione struttura grafica delle query di Access
clikki su un campo
proprietà
selezioni il  "Ricerca"
puoi generare una casella combinata direttamente nella query
.......
 
Facci sapere
 
 
 

 
 
 
In effetti così ho casella combinata nella query da access, purtoppo via web visualizzo l'elenco di tutti gli elementi.
A questo punto per 'tenere lontani' gli utenti da possibili manipolazioni del db, comincerò a valutare l'ipotesi di esportare in .mde 
Rimarrebbero protette maschere e report anche se ancora accessibili le tabelle.
 
grazie!
Mara

Newsgroup: it.comp.appl.access
Titolo: Percorso tabelle collegate

Salve a tutti!
Vorrei mettere nella scheda principale del mio db, una etichetta che mi 
indichi il percorso completo del db su cui si trovano le tabelle collegate 
al db principale. Qualcuno mi illumina sul codice da scrivere?
Grazie anticipato. 

 wrote in message 
news:457999f6$0$19106$4faf...@reader4.news.tin.it...

Metti nel Control Source di un Text Box qualcosa del genere:
=CurrentDB.Name & "  " & FileLen(CurrentDB.Name)/1024 & "  kb - v1.T02.P18"
Bruno 

 scrivere?
Origine Controllo di una casella di testo se intendi tabelle di JET:
=DLookUp("Database";"MSysObjects";"Type=6")
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 ha scritto nel messaggio 
news:4ttp2eF...@mid.individual.net...


 Karl
Speriamo sia solo un BE...!
;-)
@Alex

 Scusate il ritardo, ringrazio tutti e due per il consiglio, funzionano!
Come fai a dire che funzionano?
La formula che ti ho inviato io non può funzionare per
tabelle collegate. Molto precipitosamente l'ho copiata da una
mia Form utilizzata come menu, che porta in calce le indicazioni
del database corrente (FE) e del BE che contiene le tabelle.
Ma ho copiato quella sbagliata...
Quella per il BE è una formula VBA.
Bruno
Newsgroup: it.comp.appl.access
Titolo: troppi If nidificati

Capisco che per un programmatore il mio problema è banale , ma non per
me :
ho una serie di condizioni tipo :
IF qs. condizione si verifica allora MSGBOX e fai qs.
ELSEIF qs. si verifica allora MSGBOX e fai qs
ELSEIF qs. si verifica allora MSGBOX e fai qs
ecc.
END IF ( tutti gli ELSEIF controllano variabili diverse ; non è sempre
la stessa variabile , altrimenti potevo usare SELECT CASE)
quando tutte le condizioni sopra sono state controllate e sono tutte
vere , ALLORA ma solo ALLORA
vai al record successivo .
Per favore qualcuno mi indica come fare esattamente e se la scelta
dell'uso di molti IF ed ESLE IF è corretta ?
L'errore che non riesco a superare è che la routine mi da i vari
MSGBOX quando verifica una condizione non vera e comunque dopo il
messaggio passa ugualmente al record successivo.
Io invece vorrei che si bloccasse e rimanesse allo stesso record fino
a quando l'operatore non modifica i dati in modo che le considioni
siano tutte vere.
Grazie per l'aiuto

deve...@aruba.it
 ha scritto:

introduci una variabile che imposti a vera all'inizio del codice(prima 
delle if) e imposti a falsa in ogni ELSEIF.
Prima di passare al record successivo testi la variabile e se è falsa 
non esegui, qualcosa del genere
...
Dim possoScrivere As Boolean
...
possoScrivere = True
IF qs. condizione allora MSGBOX e fai qs.:: possoScrivere = False
ELSEIF qs. allora MSGBOX e fai qs: possoScrivere = False
ELSEIF qs. allora MSGBOX e fai qs: possoScrivere = False
ecc.
END IF
...
If possoScrivere = True Then ScrivoIlRecord
...
-- 
IvanDaBologna
-=-=-==--==-=-=-
sottOFFICEale             - il mio blog
barbera del monferrato    - il mio vino
carmen                   - la mia donna
non necessariamente nello stesso ordine

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

Vorrei sapere se esistono altri programmi simili ad access.
grazie Marco


Fra i più diffusi ed in ordine sparso: Delphi, Filemaker, Foxpro
Vincenzo Turturro
---------------------------------------------------------
Se no diventiamo tutti **** dai portatili o peggio ancora 
provetti poeti fiorentini come vturturro.
(Così disse Ivan Lelli Ven 25 Aug 2000 09:34:52 +0200)
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com/
---------------------------------------------
... e quello di it.comp.as400:
http://www.faq400.com/
---------------------------------------------