mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Immagini e trova

Ciao a tutti.
C'è qualcuno che mi può indicare un modo per inserire un'immagine (o un
collegamento ad essa) nella tabella in cui ci sono tutti i record, passando
i dati da una maschera.
Mi spiego meglio:
ho un db nel quale aggiungo i dati da una maschera. Adesso ho la necessità
di associare ad ogni record che inserisco, due immagini. Come posso fare?
E ancora... nella maschera ho messo un'opzione per la ricerca di record, la
quale mi permette di effettuare la ricerca solo all'interno di un campo.
Come posso fare per inserirne un altro?
Grazie e ciao.
--
~~~~~~~~~~~~~~~~~~~~~~~~~
   Per rispondere in E-Mail togli AT.

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

 modificata perchè funzioni in base al contenuto di più campi.
Cosa intendi?
Nella maschera ho messo un pulsante di comando con la funzione di ricerca
record. Tra le opzioni c'è il nome di un solo campo e il nome della
maschera.
Io vorrei mettere il nome di due campi e togliere il nome della maschera che
non serve a niente.
Grazie e ciao.
Stefano.

 wrote in message
ABoe9.76080$pX1.2...@news2.tin.it...

Non ho ancora capito cosa usi per fare la ricerca dei record, ma poco
importa, provo a darti una soluzione ex novo.
Supponiamo che la ricerca vada effettuata in base al campo di tipo Numerico
chiamato Campo1 ed in base al campo di tipo Testo chiamato Campo2.
Nell'intestazione della tua maschera inserisci due caselle di testo non
associate chiamate rispettivamente Cerca1 e Cerca2 dove digiterai i
parametri di ricerca rispettivamente per Campo1 e Campo2; nell'intestazione
della maschera inserisci anche un pulsante di comando chiamato Cerca.
A fronte dell'evento "Su clic" del pulsante di comando genera il seguente
codice VBA:
Private Sub Cerca_Click()
Me.Filter = "Campo1=" & Me!Cerca1 & " And Campo2=" & Chr$(34) & Me!Cerca2 &
Chr$(34)
Me.FilterOn = True
End Sub


Non è la soluzione che cercavo.
La mia ricerca non deve rispettare due parametri, ma uno solo, ad esempio:
devo cercare "parola" all'interno del db; vorrei essere in grado di poter
scegliere il campo in cui cercarlo.
Il modo che uso per fare la ricerca è quello standard di access, cioè quello
che si crea con la creazione guidata dei pulsanti. Nella finestra che mi
appare mi permette di scegliere solo uno dei campi che ho nella tabella,
mentre io ne vorrei aggiungere un altro.
Tornando anche all'inserimento dell'immagine ho un problema: non riesco a
fare un pulsante del tipo "Sfoglia" per la ricerca dell'immagine: mi sai
aiutare?
Nelle FAQ che mi hai consigliato non ho trovato aiuto in questo senso.
Grazie e ciao.
Stefano.


 Stefano.
[CUT]


 ha scritto nel messaggio
news:vSIe9.17720$%z1.3...@twister1.libero.it...

Newsgroup: it.comp.appl.access
Titolo: pannello di controllo

Salve, dopo un paio di tentativi ho immesso
il pannello di comando, volevo solo sapčere
come si fa  a fare in modo che all'apertura del file parta direttamente il
apnnello di controllo.
Ciao marceme

marceme <mar...@cucu.te> wrote in message
a3m9a3$jvm$1...@newsreader.mailgate.org...

Sul menů strumenti, avvio, c'č la voce Visualizza maschera
Antonio

Newsgroup: it.comp.appl.access
Titolo: ma dov'e' il sito comune?

Ciao a tutti,
Sono nuova del gruppo.
Avrei una domandina stupida stupida su una Crosstab Query ma, prima di
postarla nel gruppo, volevo cercare di trovare la soluzione nel sito
comune.
Qualcuno puo' mandarmi l'url?
Grazie mille
Veronica

 ha scritto nel messaggio
news:c69a7012.01102...@posting.google.com...

Il link del Sito Comune è
http://www.sitocomune.com
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:c69a7012.01102...@posting.google.com...

www.sitocomune.com
Ciao, FABIO

 wrote in message
c69a7012.01102...@posting.google.com...

Veronicuccia... sentiamoci per mail magari, e potrò darti tutte le
informazionuccie che ritieni necessarie, che ne pensi, mon amour?!?
E sono sicuro che le tue domande sono intelligentissime, proprio come te...
Antonio

 E sono sicuro che le tue domande sono intelligentissime, proprio come
te...
Eh, caro Antonio,
Stai invecchiando.
Ben in due ti hanno anticipato...
hehehehe
Sib
Newsgroup: it.comp.appl.access
Titolo: caselle di controllo, records ecc.ecc.

Ho un problemino : ho una maschera basata su una tabella; su questa tabella
ci sono 2 caselle di controllo(tipo Sě/No) che si chiamano "Cliente" e
"Fornitore" e che compaiono anche sulla maschera; vorrei che lo stato di
queste caselle mi abiliti o meno l'uso di due pulsanti chiamati "Tariffe
Cliente" e "Tariffe fornitore" ovvero:
se č selezionata la casella "Fornitore" il pulsante "tariffe fornitore" sia
abilitato (mentre l'altro disabilitato)
se č selezionata la casella "Cliente"    il pulsante "tariffe cliente"
sia abilitato (mentre l'altro disabilitato)
e sto discorso deve funzionare per tutti record presenti nella tabella
quando mi sposto da un record all'altro nella maschera.
GRAZIE MILLE.
-- 
Posted from 
smtp2.libero.it
 [193.70.192.52] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Poichè mi sembra di capire che i due campi di tipo Si/No sono tra di loro in
alternativa, per non complicarti inutilmente la vita nella gestione, ti
consiglio di avere nella tabella un'unico campo Si/No chiamato
ClienteFornitore: se conterrà il valore Si vuol dire che il record riguarda
un cliente in caso contrario è relativo ad un fornitore.
A questo punto avrai anche nella maschera un'unica casella di controllo
chiamata ClienteFornitore.
Stanti così le cose, a fronte dell'evento "Dopo aggiornamento" della casella
di controllo genera il seguente codice VBA:
If Me!ClienteFornitore = True Then
Me![tariffe cliente].Enabled = True
Me![tariffe fornitore].Enabled = False
Else
Me![tariffe cliente].Enabled = False
Me![tariffe fornitore].Enabled = True
Lo stesso codice VBA generalo anche a fronte dell'evento "Su corrente" della
maschera.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Perchč usi caselle di controllo e non pulsanti di opzione???
Ciao
--
Leo_duca

 ha scritto nel messaggio news:3b2b0...@news.dada.it...

Stavo pensando al fatto che in 'Visualizzazione predefinita =  Maschere continue'
tutti i pulsanti visualizzati assumono l'aspetto dei pulsanti del record corrente,
 perciň quando sarai su un record 'Cliente'
 tutti i pulsanti 'TariffeCliente' saranno attivi  (anche quelli nei recors 'Fornitori')
e viceversa quando sarai in un record 'Fornitore'.
Credo che nel tuo caso questo fatto possa provocare un effetto visivo ingannevole.
Ciao
--
Leo_duca


Visto che, come dici tu il record corrente č comunque uno solo, sposta i due
pulsanti dal corpo all'intestazione della maschera: cosě sicuramente eviti
l'"effetto visivo ingannevole"; il pulsante abilitato riguarda comunque il
record corrente.

Newsgroup: it.comp.appl.access
Titolo: in che data cadono tutti i giovedi di un determinato anno

esiste una funzione che mi restituisca in che data cadono ad esempio tutti i 
giovedi o venerdi ecc. di un determinato anno?
potrei costruirla popolando con un ciclo for una tabella temporanea ma 
utilizzando quale funzione?
dateadd + 7 fino al 31/12?
Grazie. 

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

 Roberto
Non sapevo che il ciclo for accettasse anche le date
Grazie mille. 

 ha scritto nel messaggio 
news:46af5af3$0$17941$4faf...@reader1.news.tin.it...



si va bene, quella di Roberto mi sembra piu' semplice.
cambia qualcosa?
-- 
Ciao
Access 

Ciao Luciano,

grazie comunque, ma ho capito la differenza.
-- 
Ciao
Access

Newsgroup: it.comp.appl.access
Titolo: versione microsoft DAO 3.6 e Microsoft Office Library 10.0 problema

Ogni volta che mando un db al cliente devo farlo entrare in vb riferimenti
per fargli spuntarele 2 voci di cui all'oggetto.
Questo non è affatto bello, vorrei poter aggiornargli defitivamente questi
componeit, sapete come posso fare? Grazie.
Lui ha la office library 9.0 e il DAO non ricordo.
Grazie in anticipo.

 ha scritto nel messaggio
news:b0f0c7$mi2$1...@lacerta.tiscalinet.it...

Ti assicuri della versione, se lui non ha 3.6 hai 3 soluzioni
la distribuisci tu, sfrutti la 3.51 oppure provi con MDE.
@Alex.


la distribuisco io? come devo fare?  cosa gli devo installare nel computer?
Mdac?
Grazie.

 ha scritto nel messaggio
news:b0gp2p$bbu$1...@lacerta.tiscalinet.it...

Mi pare di si anche se io ho aggiornato con SR2, ma non l'ho mai fatto, e
credo ti convenga valutare MDE.....!!!
@Alex.

Newsgroup: it.comp.appl.access
Titolo: Bug Access 2000 non cancella le chiavi dal registro...???

Qualcuno sa dove trovare la patch per il bug di Access 2000 che non cancella
una chiave dal registro una volta disinstallato ???
(Grazie Bobbit :-)

http://www.mvps.org/access/resources/index.htm
l'ho trovato!! vai nella sezione bug e cerca!
Ciao Bobbit
"Univer" <uni...@iii.itCANCELLA> ha scritto nel messaggio
news:8ggn1c$aej$1...@serv1.iunet.it...


 wrote in message
TASW4.38957$EY1.4...@news.infostrada.it...


Newsgroup: it.comp.appl.access
Titolo: [OT] Saluti...

"il 2010 ci ha regalato molte soddisfazioni e alcune ottime notizie,
tra cui un decesso eccellente:
dopo lunga e penosa malattia, è morta la morale!"
http://www.partitodupilu.it/
ciao a tutti
Daniele 


e che vor dě?
Antonio 


Io lo voto... quantunquemente...!!!!!!!!!!!!!!
Chiù PILU per tutti...!!!!!
Viva LU PILU.
@Alex
Newsgroup: it.comp.appl.access
Titolo: Euro Lire: gestione cassa

Ciao, (uso A2000)
sono immersa nella preparazione di un DB per la gestione di una cassa gettoni
Ticket, che mi gestisca i resti sia in Lire che Euro.
Il Db serve per registrare tutti i movimenti fatti con entrambe le valute, in
modo che a fine giornata l'operatore possa sapere quante lire o quanti Euro
sono entrati.
Il mio problema nasce dal 1 gennaio, perchè da quanto sembra nn sanno ancora se
è obbligatorio dare sempre il resto in Euro anche a chi ancora paga in Lire.
(considerate che ho a che fare con camionisti stranieri e per lungo tempo
arriveranno con Lire)
Ho creato una Tbl 
ID
TARIFFA€
TARIFFAL
DATA
NUMGETTONI
ENTRATA1    (lire)
ENTRATA2 (€)
SCONTRINO
Nella Form ho usato i due controlli ENTRATA1 ed ENTRATA2, un campo calcolato
per elaborare i resti sia in € che in Lire
Vorrei poter bloccare uno dei due controlli se l'altro è già pieno, in modo da
evitare errori il più possibile.
Considerando che il DB viene usato su una cassa molto frequentata, voglio poter
velocizzare il tutto il più possibile (altrimenti i miei colleghi mi mandano a
quel paese) per ora l'unica idea che ho avuto è questa.
Grazie dell'aiuto
Alessia
-- 
Posted from  [80.16.202.2] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Hai troppi campi non necessari, la tabella la vedrei così, poi con una
semplice query e una maschera sei a posto.
 DATA             (Indice)
 SCONTRINO (Indice)
 TARIFFAeuro
 NUMGETTONI
 VALUTAeuro (Si/No)
--
                     Angelo
------------------------------------------------------
Sito comune di it.comp.appl.access
http://www.sitocomune.com
------------------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Da mdf a Access

Ciao a tutti
Ho un file mdf piu' un altro ldf: come posso convertirli in formato access?
grazie, CIAO!

 ha scritto nel messaggio
news:lDOkc.177271$rM4.7...@news4.tin.it...

Ciao,
devi avere Ms Sql Server. Se il file mdf č inferiore a 2 Gb puoi usare
MSDE2000
http://www.microsoft.com/italy/sql/msde/
una volta "attaccati"  i files mdf e ldf
(vedi sp_attach_db dal manuale
http://www.microsoft.com/sql/techinfo/productdoc/2000/books.asp
  )
da Access ti colleghi via ODBC e importi le tabelle.
Ciao Giorgio

 da Access ti colleghi via ODBC e importi le tabelle.
Tutto fatto (e per me che sono completamente a digiuno di Access, SQL e
compagnia e' davvero un gran successo) grazie anche all'aiuto di google per
le varie procedure (non sapevo nemmeno dove scriverlo EXEC sp_attach_db).
C'e' pero' un problema: ho importato tutte le tabelle ma in nessuna di
queste ci sono i dati che io mi attendevo (e che sono sicuro ci siano). Dove
sbaglio?
CIAO e GRAZIE!!!

 sbaglio?
Se l'importazione viene effettuata senza errori non sbagli.
Per verificare in modo diretto i dati e la struttura delle tabelle puoi
collegarti a Sql Server con Access 2000 (sp3) o AccessXp al database tramite
un  progetto ADP.
Oppure con il tool Dba Manager di Andrea Montanari
http://www.asql.biz/DbaMgr.shtm
(al 99.99999% i dati che vedi sono quelli che ti hanno dato)
Ciao Giorgio

 Se l'importazione viene effettuata senza errori non sbagli.
Infatti, sbagliavo nel impostare il DSN ODBC. Ora tutto e' apposto
Grazie 1000, CIAO!!
Newsgroup: it.comp.appl.access
Titolo: SalvaRecord in VBA

>Esiste un comando da inserire in una routine evento per salvare un record?
sendkeys "~^"
(o ^~?  vedi l'help di sendkeys per la combinaizone Ctrl-Invio)
non funziona se hai il focus su un controllo di tipo testo legato ad
un campo memo.
molti umani che conosco non passerebbero il test di Turing. (Lbo)
---------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access

Esiste un comando da inserire in una routine evento per salvare un record?
Possibile che in VBA si possano salvare solo oggetti come da Help di Access?
saluti
FrancoK

 ha scritto nel messaggio
news:8st588$qlr$2...@news.mclink.it...

Dice che è una forma arcaica di Access, ma per registrare il record corrente
funziona:
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------

 ---------------
Ovvero ?

Premesso che non si puo' compilare .mdb in .exe, on Tue, 24 Oct 2000


intanto quella è una signature automatica, forse doveva essere più
staccata dal resto del messaggio.
il test di Turing è un "test" proposto dal matematico inglese Turing
(vissuto a cavallo della seconga guerra mondiale, che diede un grande
impulso alla decodificazione dei messaggi segreti tedeschi, enigma e
tutta quella roba là) per valutare se un'intelligenza sia artificiale
o meno.
si fanno domande finché non sei certo che sia naturale...
---------------
molti umani che conosco non passerebbero il test di Turing. (Lbo)
---------------


 si fanno domande finché non sei certo che sia naturale...
Stile Blade Runner...
Antonio

Newsgroup: it.comp.appl.access
Titolo: Giorni lavorativi

Qualcuno sa se in Access esiste una funzione "semplice" per il conteggio dei
giorni lavorativi fra due date? (tipo GIORNI.LAVORATIVI.TOT di Excel).
Grazie, FT

 Grazie, FT
In 
www.sitocomune.com
 nella sezione General puoi trovare la funzione
"Conteggio dei giorni lavorativi tra due date" di Paolo Bizzarro, Silvio
Mazzetto,Roberto.
--
rgrds
SC
-- 
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:cjbgoa$g1b$1...@news.newsland.it...


Newsgroup: it.comp.appl.access
Titolo: R: testo descrizione controllo

 Grazie
Invece che nella proprietà Testo descrizione controllo scrivi il testo per
ogni pulsante nella sua proprietà Etichetta.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:dqZ6b.301487$lK4.9...@twister1.libero.it...

Sarebbe troppo lungo ed illeggibile!

 Sarebbe troppo lungo ed illeggibile!
Inserisci una etichetta vicino ai pulsanti e scrivici quello che vuoi; se
poi non va bene neppure così significa che non ho capito cosa vuoi fare.

Newsgroup: it.comp.appl.access
Titolo: visibilità bottone sottomaschera  in funzione della maschera che la accoglie.

ciao a tutti!
ho 1 maschera continua C che uso, in due contesti diversi, come
sottomaschera di A E B:
come faccio a rendere invisibile 1 bottone contenuto in C se questa č
sottomaschera di A, e lasciarlo visibile se č invece sottomaschera di B?
grazie!
em.an.

 
Parent.name = "A" then
	bottone visibile
else
	bottone invisibile
endif
--
a.cara

Ciao ragazzo romano della via Gluc...!
Sei stato in ferie..?
@Alex

 Sei stato in ferie..?
Ciao Alex.
Ma quali ferie. Magari.
Ho tre o quattro cose "tecniche" da fare e sono sempre in ritardo.
Mi limito a "lurkare".
Ho visto che ti hanno convinto a tenere una "lecture" sull'allevamento 
delle api ;<)
--
a.cara

 a.cara
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

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

 ha scritto nel messaggio
news:ZmJIf.4319$uQ4....@tornado.fastwebnet.it...

grazie mille alessandro!
em.an.

Newsgroup: it.comp.appl.access
Titolo: come aprire odt con vba e openoffice

salve
 
qual 'e la sintassi in msAccess per aprire un file odt
 
    Dim stAppName As String
    dim sNomeFile as String
 
    sNomeFile = "prima mia prova 1.odt" 
 
    stAppName = "soffice.exe " & 
    Call Shell(stAppName, 1)
 
e se il nome del file contiene degli spazi?


Vedi tua analoga richiesta di pari data per aprire i pdf, usa lo stesso metodo.
Ciao.
-Marco-

Newsgroup: it.comp.appl.access
Titolo: Problema con le definizioni delle variabili

Qualcuno ha idea del perche' il codice segnato dalla freccia da' errore?
--------------
Public Function AggiungiReferenti(conv, rag)
    Dim numref, critfix, ninv, cod, x
    Set MioDb = DBEngine.Workspaces(0).Databases(0)
    Set MioSetA = MioDb.OpenRecordset("SocietaReferenti", DB_OPEN_DYNASET)
    Set MioSetB = MioDb.OpenRecordset("ConvegniPartecipanti",
DB_OPEN_DYNASET)
 ...
    MioSetA.FindFirst critA
    ninv = 0
    Do Until MioSetA.NoMatch
--->     cod = MioSetA.re_cod
 ...
End Function
--------------
MioDb, MioSetA, MioSetB sono delle variabili definite Public in un modulo
diverso da
quello che contiene tale Function ed in piu' tale modulo sta in una libreria
(che
chiaramente e' in attach al Db).
re_cod e' un campo della tabella SocietaReferenti.
Lo so che in genere bisognerebbe fare riferimento al campo di una tabella
attraverso il
punto esclamativo e cioe'
 cod = MioSetA!re_cod
pero' il fatto e' che qualora il modulo della suddetta libreria venga
importato,
in tal caso viene accettata anche la sintassi col punto '.'
Per me rimane un mistero, spero di essere stato chiaro e spero ci sia
qualche anima pia
che abbia voglia di confrontarsi con questo problema.
Grazie.

 cod = MioSetA!re_cod
Non ho capito se col punto esclamativo funziona....
Comuque, puoi riferirti ad un campo di un recordset anche con un progressivo
numerico che parte da zero e segue l'ordine che hanno i campi, es: miorst
(2) e' il terzo campo. Prova se cosi' lo becchi, altrimenti il motivo e' un
altro.
Saluti.
Luciano
(DOC)
Newsgroup: it.comp.appl.access
Titolo: Campo Contatore

Ciao a tutti
Ho la necessità di numerare in ordine crescente tutti gli ordini da me
inseriti in una maschera, quale istruzione devo immettere dentro la maschera
per creare un campo che numeri gli ordini immessi in modo crescente?
Grazie a tutti

per creare un campo che numeri gli ordini immessi in modo crescente?
sito comune.
-----------------------------------
ATTENZIONE: il ng it.comp.database.access cambia nome e diventa it.comp.appl.access
linkatelo!
-----------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access

Newsgroup: it.comp.appl.access
Titolo: collegare campi di una maschera con campi di un doc word

ho una maschera protocollo con i campi 'oggetto documento' e 'destinatario'.
dopo averli compilati, vorrei che tramite un controllo (pulsante?) possa
aprire un modello di word in cui i rispettivi campi 'oggetto' e
'destinatario' corrispondano a quelli appena immessi nella maschera.
grazie per la lettura
saluti
riccardo

 
Non so se può fare al caso tuo, ma sul Sito Comune c'è un esempio
legato all'applicazione di Word, anche se credo tu debba leggerti
la funzione Merge......(Mai usata)....
http://www.sitocomune.com/
@Alex.
-- 
Posted from  [62.98.10.25] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:9no5em$17so$1...@newsreader1.mclink.it...

Io, se non sbaglio, ho affidato tutto ad una qry che mi crea una tabella e
poi ho collegato i campi del documento alla tabella.

 wrote in message
9no5em$17so$1...@newsreader1.mclink.it...

Io ho preparato un documento di base (.doc) in cui ho inserito dei
riferimenti tramite
Inserisci, Segnalibro (es: DataDDT) che poi utilizzo per inserire le
informazioni col codice che segue (di cui una parte prelevata dal newgroup):
Private Sub StampaModello()
    Dim wordApp As Word.Application
    Dim WordDoc As Word.Document
    Dim aVar As Variant
    Dim blOpen As Boolean
    Dim WordRange As Word.Range
    Dim fld As Field
    On Error Resume Next
    blOpen = True
    Set wordApp = GetObject(, "Word.Application")
    If Err.Number = 429 Then
        Set wordApp = CreateObject("Word.Application")
        blOpen = False
        Err.Number = 0
    End If
    On Error GoTo gestErrori
    Set WordDoc = wordApp.Documents.Open("c:\Contratto.doc")
    wordApp.Visible = True
    If Not IsNull(Me.DataDDT) Then
        Set WordRange = WordDoc.Goto(What:=wdGoToBookmark, Name:="DataDdt")
        WordRange.InsertAfter Me.DataDDT
    End If
    If Not IsNull(Me.IDDDT) Then
        Set WordRange = WordDoc.Goto(What:=wdGoToBookmark, Name:="IdDdt")
        WordRange.InsertAfter Me.IDDDT
    End If
    ' come gestire il caso di bookmark non trovato
    'On Error Resume Next
    'Set WordRange = WordDoc.Goto(What:=wdGoToBookmark, Name:="Pippo")
    'If Err.Number = 5101 Then
    '    MsgBox "Segnalibro 'Pippo' non trovato"
    'End If
Sergio
Newsgroup: it.comp.appl.access
Titolo: copia un dato da campi uguali in tabelle diverse

Ciao a tutti, per prima cosa volevo ringraziare tutti del forum per re
risposte date.
Il mio problema attuale è il seguente:
dispomgo di due tabelle A e B entrambe contengono un campo che
chiamerò NUMERO
la tabella A è origine redord della maschera FORM01  e nella maschera
FORM01 è presente una sottomaschera FORM02 che ha come origine record
la tabella B.
E' possibile aggiornare il campo A della FORM01 in automatico
inserendo il valore del campo B nella FORM02 (SOTTOMASCHERA) ?
Grazie a tutti anticipatamente.
P.S. Spero solo di esserni spiegato bene.
Ciao Salvatore


se le due caselle si chiamano numero:
sul dopo aggiornamento del campo numero della subform metti 
me.parent.numero=me.numero
ciao
BFS

Newsgroup: it.comp.appl.access
Titolo: [OT] Conferenza organizzata da Karl

Ciao a tutti, volevo sapere, la conferenza ad Arezzo è stata confermata?
E se decidessi solo di partecipare alla conferenza ed eventualmente ai 
pranzi quale sarebbe il costo? (ho amici ad Arezzo).Posso rivolgermi a 
qualcuno in particolare per questo tipo di domande?
Spero di non avere scritto a sproposito in questo NG, in caso contrario me 
ne scuso.
Ciao a tutti
Roberto 

 contrario me ne scuso.
Per domande individuali è meglio che usi mail.
Sul sito 
www.donkarl.com/it/cisa
 è già indicato un indirizzo che
sarà anche presente sul sito degli iscrizioni nei prossimi giorni.
Per non attirare i spam bot qui lo ripeto senza @ e con spazi:
cisa1 at 
donkarl.com
-- 
cu
Karl
*********
Access FAQ: 
www.donkarl.com/it
 + CISA1, Arezzo, 4+5/6/2005
la prima Conferenza Italiana per Sviluppatori di Access
Newsgroup: it.comp.appl.access
Titolo: Campi NULL

Buongiorno
ho il seguente problema che spero riusciate a risolvermi:
In una query ho posto una condizione IIF che mi verifica un campo NULL. Nel
caso questo campo sia veramente a NULL ho necessità che non venga riportato
nulla in casella
ES:    ART: IIf([ALIQUOTA] Is Null;[ARTICOLO] =" ";[ARTICOLO])
Il problema è che mi viene sempre riportato uno "0" (Zero) al posto di uno
spazio vuoto.
Come posso fare ?
Grazie
Luigi

 Come posso fare ?
        ART: IIf(IsNull([ALIQUOTA]);[ARTICOLO]=" ";[ARTICOLO])
    Ma attenzione:
        [ARTICOLO]=" "
e' una espressione logica (booleana). Assumera' quindi il valore
        Vero, quindi -1
-oppure-
        Falso, quindi 0
a seconda che [ARTICOLO] sia o non sia uguale ad un carattere spazio.
    Tu invece cosa vorresti ottenere?
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

Buongiorno
č possibile fare in modo che, in seguito ad una istruzione "IIf" invece di
ricevere una risposta "0" o "-1" a seconda che la condizione sia vera o
meno, si abbia una altro caratter evidenziato ?
Possibilmente uno spazio vuoto ?
Grazie
Luigi

 è possibile fare in modo che, in seguito ad una istruzione "IIf" invece di

luigi cosa ci azzecca l'oggetto con la tua richiesta?
la sintassi di iif e' (da help) : IIf(expr, truepart, falsepart)
il che significa 
x=iif(1=1,"Oggi trippa","Domani Brodo")
in x ho "Oggi Trippa"
x=iif(1=2,"Oggi trippa","Domani Brodo")
in x ho "Domani Brodo"
se invece vuoi sostituire ad un NULL un vuoto si puo' fare cosi'
x= "" & x
--
a.cara

Newsgroup: it.comp.appl.access
Titolo: memoria esaurita

Con access 2000 mi capita spesso che le risorse si esauriscano in un lampo
quando uso maschere continue con molti record.
Chi mi sa dare la soluzione? Non ditemi aumenta la memoria.

 ha scritto nel messaggio
news:8p188j$27n$1...@sirmdpsin16.inwind.it...


Newsgroup: it.comp.appl.access
Titolo: modalitè inserimento...

Salve a tutti
della stessa tabella vorrei fare 3 maschere diverse a seconda delle modalità
:
INSERIMENTO RECORD
CERCA E MODIFICA RECORD
COME DEVO FARE?
--
                        ..................................................
                                    Stefano Fumana
                              P.o.box 1 - 37057 Verona
                               e-mail 
stfu...@tin.it
                                   ICQ# 21281008
 
www.vrol.it
\veronambulanze
                        ..................................................
                         [ QUANTO SCRITTO E' IMHO ]


beh tanto per cominciare potresti andare sull'help e cercare:
allowadditions,allowdeletions,allowedits and dataentry  (4 proprieta' della
maschera)
--
Alessandro Cara

COME DEVO FARE?
Potresti utilizzare le proprieta'
allowadditions,allowdeletions,allowedits and dataentry  (vedi help) e il suo
utilizzo specifico
da abbinare a dei pulsanti (Inserisci Cerca Modifica Elimina)
in modo da poter utilizzare una sola maschera
o magari aggingerne solo un'altra di tipo popup per la ricerca e/o selezione
del record
Insomma devi devi impararti un po' Access
Carlo Ve
Newsgroup: it.comp.appl.access
Titolo: VBA moduli - riferimenti default

E' possibile fissare quali riferimenti di default disporre nella creazione
di un nuovo modulo all'interno di access?
Io vorrei ad esempio disporre sempre della libreria DAO 3.6, che per default
non viene caricata.
--------------------------------
Inviato via 
http://usenet.libero.it


Non credo, ma si può creare una Routine che verifica se è impostata
e nel caso non lo sia la Setta.....!!!
Ma non è la stessa cosa.
@Alex.

Newsgroup: it.comp.appl.access
Titolo: ruotare etichetta testo in un report

Salve a tutti!
Chiedo un Vs.aiuto per sapere se c'è la possibilità ,in un report, di 
"ruotare" una etichetta in modo che il testo da orrizzontale sia leggibile 
verticalmente da sx a dx.
In pratica avrei la necessità che una etichetta contenente un numero (id) 
venga stampata nel report per essere letta dal lato lungo A4.
Spero di essermi spiegato nel caso...chiedo venia in anticipo.
Un ringraziamento a tutti.
Acquarello 


Non andrebbe bene ruotare il foglio ?
In struttura report vai su file/imposta pagina /pagina - orizzontale
Ciao

Ciao
------
Scusami ...ma in effetti non ho specificato chiaramente (prima) che il 
report è composto di varie sezioni.
Immagina un A4 in verticale che visualizza una o più schede dati personali 
(ed altro) da leggere da sx a dx(normalmente).
Accanto(a dx) ad ogni scheda viene riportata una etichetta "idcliente", che 
andrebbe invece letta ruotandola verso sx di 180gradi.
Temporaneamente per risolvere il problema ho semplicemente adattato la 
larghezza etichetta in modo da "costringerla" a contenere
un singolo carattere, p.e. l'id "1289" verrà visualizzato così:
1
2
8
9
Ovviamente si può vivere felici lo stesso...tuttavia il ng ci ha abituati 
male...!!!
Grazie comunque per l'aiuto.
Ciao
Acquarello 

 male...!!!
credo che sia da versione a2003 <alt+f11> <f1> -->vertical
mai provato poiche' i miei db son a2k
--
ac

Alessandro Cara ha scritto:

"mai provato poiche' i miei db son a2k" ..hi hi hi ...in agosto diventate tutti più
simpatici ...hi hi hi ...
cb

 Acquarello
Se hai Access <2003 puoi provare il RotateText di Lebans
www.lebans.com
ciao
cesare
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 mai provato poiche' i miei db son a2k
Tsk, retrogrado 8-)
ciao,
Panathos

 ha scritto nel messaggio 
news:g7ea8r$9fe$1...@news.newsland.it...

Un ringraziamento a tutti!!
Ero sparito per un pò...ed ora mi metto subito a verificare i 
vs.suggerimenti.
Ah!!!Non avevo specificato la versione di Access  che è 2007.
Anticipo un bel "chi se ne frega" avvisando che fra circa 3 ore spegnerò 
tutto per 15gg.,
quindi mi scuso con chi dovesse continuare a postare.
Acquarello
Newsgroup: it.comp.appl.access
Titolo: voce di default

vvf wrote
per rendere la selezione delle voci più semplice in una casella combinata
vorrei presentare una voce di default, generalmente utilizzo questa
subroutine quando sono in presenza di una sola cbo per maschera
Private Sub Form_Current()
Me![CasellaCombinata196].SetFocus
CasellaCombinata196.Text = "paolo"
End Sub
nella nuova maschera tieni presente che ho più di una cbo
smiley Paolo
togliere i tre asterishi per rispondermi

 ha scritto nel messaggio
news:8o467u$an5$1...@nslave1.tin.it...

Hai provato a generare, a fronte dell'evento "Su attivato" di ogni combo, il
codice:
    NomeCombo.Text = "Paperino"
e non adoperare più l'evento "Su corrente" della maschera?
Roberto


Usa la proprieta' 'Valore predefinito' dei controlli in questione.
-- 
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------

 wrote in message
39A6376E...@paperino.libero.it...



 selezionata successivamente
Scusami, ma non ben capito, cmq tieni presente quanto segue:
nelle combo il 'Valore predefinito' si riferisce alla colonna associata.
Se le colonne sono:
1 BO
2 FI
3 PD
con
Numero colonne = 2
Larghezza colonne = 0cm;2,54cm
Colonna associata = 1
Valore predefinito = 2
nella combo verra' visualizzato FI, ma il valore del campo e' 2
con
Numero colonne = 2
Larghezza colonne = 0cm;2,54cm
Colonna associata = 2
Valore predefinito = "PD"
nella combo verra' visualizzato PD, il valore del campo e' PD
spero di essere stato chiaro.


Newsgroup: it.comp.appl.access
Titolo: Abilitazione Campo

Ciao a tutti,
esiste per caso un codice che mi permetta di disabilitare tutti i campi in
una volta sola di una maschera di inserimento dati all apertura o su
caricamento?
Grazie mille

Ludo ha scritto:

Proprietą di maschera: consenti modifiche (allowupdates) = False
oppure un ciclo:
dim ctl as control
on error resume next
for each ctl in me.controls
  ctl.enabled=false
next
on error goto 0
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Namor
Personalmente utilizzo la prima soluzione proposta da Namor, ma ho
l'esigenza di tenere sbloccato un controllo (casella di ricerca), quindi
quando č attivo questo controllo abilita le modifiche (allowupdates) =
True, ma appena perde lo stato attivo le disabilita nuovamente, 
ciao 
Carlo.
-- 

Newsgroup: it.comp.appl.access
Titolo: Format....in campo query

Ho una query di accodamento che accoda in una mia tabella dei dati
provenienti da una tabella esterna...
Funziona tutto ok ma...
C'è un campo [Peso] nella tbl esterna in formato decimale es.00012,25
il campo [Peso] invece nella mia tabella è in formato Numerico
InteroLungo;
Che formula devo usare nel campo [Peso] della query di accodamento per
trasformare il valore decimale in Numerico no decimale e, magari
arrotondare ? (es.00012,25 = 13)
Grazie.
Ciao a tutti.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Ciao a tutti.
Function arrotondaeuro(varNr As Double, Optional varPl = 2) As Double
' by Konrad Marfurt + ? + Karl Donaubauer + Fanton Emanuele
'varNr: numero da arrotondare
'varPI: numero di decimali (due predefinito)
varNr = Nz(varNr, 0)
   arrotondaeuro = Fix("" & varNr * (10 ^ varPl) + Sgn(varNr) * 0.5) /
(10 ^ varPl)
End Function
con parametro VarPI=0
Saluti.
Emanuele.

Newsgroup: it.comp.appl.access
Titolo: valore predefinito

Ciao a tutti, vorrei che in una tabella "Lista" il campo "codice" avesse
come valore predefinito quello  restituito da una query "Selezione" nel
campo "Valore"
Pertanto ho inserito come valore predefinito di "codice" l'espressione:
[Valore].[Selezione], tuttavia Access dice che c'è un errore di sintassi,
dove sbaglio?

 ha scritto nel messaggio
news:Hh8Fb.199721$vO5.7...@twister1.libero.it...

Il valore predefinito solitamente si imposta nella Maschera sul Controllo
associato a tale Campo.
In questo caso dovresti usare NomeControllo.DefaultValue=Espressione.
Il fatto è che non puoi accedere ad una QRY_SELECT, ma devi trovare
un'alternativa, che non sò consigliarti date le poche INFO che hai dato.
La strada di andare direttamente sulla Tabella a modificare il DEFAULTVALUE
è un pò più complessa e sinceramente non molto pratica........!!!
Ciao.
@Alex.
Newsgroup: it.comp.appl.access
Titolo: HELP!!! Tabelle collegate SQL7

Aiuto!!
Non riesco a modificare dei recordset di tabelle collegate da una base dati
SQLServer 7 (continua a darmi il messaggio 'This Recordset is not
updatable') con Access97.
Ho delle tabelle collegate allo stesso SQLServer ma a Database diversi in
cui ho la stessa configurazione delle autorizzazioni e con le altre tabelle
non ho problemi. Ho provato ad utilizzare sia un DSN che utilizza una
connessione Trusted che uno che utilizza una connessione al database (per
sicurezza ho usato l'utente 'sa'), ma il risultato non è cambiato.
E' access che ha qualche problema sulla tabella o devo agire diversamente
sul DSN o devo cambiare qualche impostazione su SQLServer?
Grazie anticipatamente per quasiasi suggerimento.
Roberto

...

Alcune possibili cause:
- permessi sulle tabelle (ma tu sembri già scartare questa possibilità)
- le tabelle non hanno una Primary Key e quando le hai collegate hai dato
annulla alla richiesta fatta da Access di segnalargli quali campi
individuano un record in modo univoco
- il database in questione si trova in modo readonly
 altre al momento non mi sovvengono.Verifica intanto queste e poi vediamo.
Ciao Nicola
email: metti inwind al posto  di NOSPAM

Mancava la Primary Key, grazie 1000 !! :-)
"Nicola Ardito" <men...@NOSPAM.it> ha scritto nel messaggio
news:95b0jn$lnr$1...@nread2.inwind.it...

Newsgroup: it.comp.appl.access
Titolo: VSA

Riepilogo: Microsoft ha presentato Visual Studio for Applications (VSA), la
nuova soluzione che offre funzionalità complete per realizzare applicazioni
personalizzate per il Web. La tecnologia può essere integrata sia
all'interno di soluzioni pacchettizzate sia in applicazioni sviluppate ad
hoc. Grazie all'esperienza di oltre 3 milioni di esperti di Visual Basic,
VSA permette alle aziende e agli ISV (Indipendent Software Vendor) di
sviluppare rapidamente e facilmente linee di codice su misura tramite Visual
Basic.NET, la nuova versione del linguaggio di programmazione diffuso in
tutto il mondo. L'architettura flessibile di Visual Studio for Application è
infatti pienamente compatibile con Visual Basic.NET e a breve sarà integrata
con altri linguaggi .NET, tra cui C#.

Milano, 30 gennaio 2001
"Visual Studio for Application di Microsoft è la prima tecnologia che
permette alle aziende di ritagliare le applicazioni Web a seconda di
specifiche necessità di business", ha sottolineato Yuval Neeman, Vice
President Developer Management Division di Microsoft. "Grazie a VSA possiamo
garantire un reale vantaggio competitivo alle aziende e agli ISV: la
possibilità di utilizzare tool e linguaggi già conosciuti, consentendo loro
di ridurre il time to market e implementare prodotti in grado di soddisfare
pienamente le esigenze dei loro clienti".
Attraverso il supporto integrato di Visual Studio.NET e di Microsoft .NET
Framework, VSA permette di valorizzare le caratteristiche della piattaforma
.NET. Questa combinazione assicura elevati livelli di scalabilità e
performance, semplificando il processo di sviluppo, implementazione e
gestione delle soluzioni enterprise.
Già al lavoro i primi utenti VSA
Visual Studio for Applications è già disponibile per i partner interessati a
valutarne le caratteristiche. Great Plains Software Inc., Epicor Software
Corp., Marlborough Stirling, Ci Technologies e NetIQ Corp. sono le prime
aziende che già collaborano
con Microsoft per integrare le funzionalità di personalizzazione di VSA
all'interno delle proprie applicazioni Web.
Le aziende e gli ISV che desiderano testare Visual Studio for Applications
possono contattare Microsoft o Summit Software Co., agente di vendita per
VSA, all'indirizzo
http://www.summsoft.com/about/offices.htm
VSA verrà rilasciato sul mercato - sempre a scopo di valutazione - nella
primavera prossima in concomitanza con il rilascio della versione beta 2 di
Visual Studio.NET. Entrambe le soluzioni saranno disponibili in versione
definitiva nella seconda metà dell'anno.
Ulteriori informazioni sulle funzionalità di VSA e sulle aziende e ISV che
stanno già sviluppando applicazioni per il web con VSA sono disponibili
all'indirizzo 
www.microsoft.com/presspass/

 ha scritto nel messaggio
news:p7ba9.99632$n04.2...@twister2.libero.it...

Madonna, certo che ti sei dato subito da fare ;-)
Newsgroup: it.comp.appl.access
Titolo: moduli di gestione

Aiuto! Non riesco ad accedere più al mio database. Quando clicco sul file 
esce questo messaggio:
Il modulo di gestione di database Microsoft Jet ha interrotto 
l'elaborazione. Un altro utente sta tentando contemporaneamente di 
modificare gli stessi dati. Nel db avevo delle maschere collegate ad una 
tabella presente in rete, questa stessa tabella poi l'ho importata nel mio 
db. Già in precedenza avevo avuto qualche segnalazione di questo genere ma è 
la prima volta che non riesco neppure a visualizzare gli oggetti del db. C'è 
un modo per salvare il mio lavoro?
Grazie e ciao 

 ha scritto nel messaggio
news:WFqie.1399896$35.52...@news4.tin.it...

Hai provato ad importare tutto in un file mdb nuovo?
SunRex

 ha scritto nel messaggio 
news:Shrie.909903$b5.39...@news3.tin.it...


 ha scritto nel messaggio 
news:cUrie.1400365$35.52...@news4.tin.it...


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

 ha scritto nel messaggio 
news:F0Xie.10906$TR5....@news.edisontel.com...

nuovo gli oggetti mi dà sempre la stessasegnalazione.
Ciao e grazie
Newsgroup: it.comp.appl.access
Titolo: Consiglio su file mdw

Ho un dubbio su dove posizionare il file mdw.
In azienda ho un discreto numero di utenti che utilizzano i programmi che ho
fatto in Access.
Il FE è installato sul PC locale e i vari BE + mdw nel server.
Ho sempre pensato che fosse la strada giusta, in quanto quando modifico il
file mdw (eventuali nuovi utenti o gruppi) tutti i PC sono automaticamente
ok.
Parlando con Roberto in un 3ad vecchio ho capito che la strada che ho scelto
non è probabilmente quella giusta, cioè dovrei mettere in locale il file
mdw.
Ho fatto un programma in vb6 che aggiorna tutti i vari prog. di Access in
automatico sul PC locale, quindi non avrei problemi ad aggiungerci anche il
file mdw.
Voi dove sistemate questo file ?
Pro e contro delle due strade ?
grazie 1000 per gli eventuali suggerimenti.
--
ciao MarcoS
www.marcosanti.it

 ha scritto nel messaggio
news:b9ahcd$gtrgc$1...@ID-122915.news.dfncis.de...

Sicuramente in Windows/System o System32.
In alternativa, usando un'altra cartella,  va modificata anche la chiave del
registro SystemDB.
Ciao, Carlo

 registro SystemDB.
Scusa, ma non ho specificato una cosa importante, tutti i programmi su i PC
sono installati con la versione runtime.
Quindi inserisco questa stringa:
"C:\Programmi\Microsoft Office\Office\Msaccess.exe"
C:\prog\access\Lay_98.mdb /Wrkgrp c:\prog\database\zecc.mdw
Il mio dubbio č solo se mettere il file in oggetto in locale o in rete,
esempio:
c:\prog\database\zecc.mdw
\\tnt\prog\database\zecc.mdw
grazie
ciao Marco S.

 ha scritto nel messaggio
news:b9ahvg$h2jf0$1...@ID-122915.news.dfncis.de...

Non so consigliarti perchč non ho mai usato un System.mdw in rete ma sempre
in locale.
Ovviamente perchč ho sempre previsto forme alternative di sicurezza (OCX
autocostruito).
Se non hai problemi di sicurezza quando installi il pacchetto (db in forma
mde) potresti usare un mdw per ogni macchina.
Comunque dalla stringa che hai postato manca l'opzione /RunTime.
Ciao, Carlo


Hai ragione, ho copiato la stringa dal mio PC dove non uso la runtime :-)
grazie
ciao Marco S.
Newsgroup: it.comp.appl.access
Titolo: esportare in xml

Salve a tutti
devo (con access 2003)  da codice esportare i dati da 1 tabella di testata e
da 1 tabella di dettaglio righe in 1 file xml. Nel file xml deve essere
specificata la tabella alla quale appartengono i dati (prima la testata e
poi il dettaglio).
Mi sapete aiutare ?
Grazie.

 ha scritto nel messaggio 
news:FSe6e.1210284$35.44...@news4.tin.it...

Rispondo per sola volontà di aiuto anche se non so nulla di xml.
Mi perdonerai se dico eresie.
Gozzovigliando con il codice sono riuscito, con molta semplicità, a salvare
recordset, da tabelle o da più complesse query sql, in un file xml
utilizzando il metodo save dell'oggetto adodb.recordset (di cui serve la
library installata)
dim rst as new adodb.recordset
dim strSql as string, strFile as string
strSql = "select bla bla bla...."
strFile= "percorso/nomefile.xml"
rst.open strSql, curretproject.connection,,, adcmtext
rst.save strFile, adPersistXml
probabilmente la risposta al tuo problema sta nella creazione di una query
che contenga il corretto riferimento alle due tabelle, ma forse cerchi
qualcosa di più avanzato...
esiste anche il procedimento contrario: la creazione di un recordset da file
xml che, ovviamente, utilizza il metodo open:
dim rst as new adodb.recordset
dim strFile as string
strFile= "percorso/nomefile.xml"
rst.cursorlocation = aduserclient
rst.open strFile, "Provider=MSPersist"
rst.save strFile, adPersistXml
Ciò che potevo condividere è tutto qua...
In bocca al lupo.
Ho scritto il codice a mano, spero di non avere commesso errori.
vtt

Newsgroup: it.comp.appl.access
Titolo: richiamare form diversa in base alla risoluzione video

c'è un modo di verificare la risoluzione attuale anche in windows 8 e sulla 
base della risoluzione in uso
caricare una form o l'altra che saranno adattate a quella risoluzione?
 
grazie. 
 

Private Declare Function GetSystemMetrics32 Lib "user32" Alias "GetSystemMetrics" (ByVal nIndex&) As Long
 
Const SM_CXSCREEN = 0 'X Size of screen 
Const SM_CYSCREEN = 1 'Y Size of Screen 
 
ActResX = GetSystemMetrics32(SM_CXSCREEN) 
ActResY = GetSystemMetrics32(SM_CYSCREEN)
 
Ciao
@Alex

"@Alex"  ha scritto nel messaggio 
news:b2c32b4f-e59e-498b...@googlegroups.com...

grazie mille, un altra domanda :
siccome ho fatto 2 versione front end normale e HD per risoluzione 1920x1080 
pixel (non so se ho fatto bene)
in termini di prestazioni ha senso creare un terzo db che legga la 
risoluzione e in base a quello faccia partire uno o l'altro front end?
 
grazie.
 

La soluzione che hai adottato è, a mio avviso la più pulita, nonostante io abbia realizzato un Demo per il RESIZE AUTOMATICO con il cambio Risoluzione, non lo userei mai in un'applicazione professionale.
 
Ho peraltro usato la soluzione di un'applicativo sviluppato in VB6(quindi un EXE sul quale poi ho fatto l'icona per il Link di lancio) che fa il lavoro sporco in BackGround... legge la Risoluzione ed apre il FE relativo.
 
Ritengo che in questo modo si possano ottimizzare fuinzionalità e codice.
 
@Alex

news:6ba43490-67cd-4d55...@googlegroups.com...

grazie.
Newsgroup: it.comp.appl.access
Titolo: Etichette da Access

Buon giorno al NG.
Vi chiedo una piccola info.
Ho necessità di stampare delle etichette che si originano da un report di
Access.
Non "posso" passare per la stampa unione di Word.
Vorrei mettere un pulsante su un pannello di controllo del DB che mi mandi
in stampa il report (o la tabella) sotto forma di etichette.
Tenete conto che non conosco VB e quindi non so scrivere del codice da far
eseguire da una macro.
Grazie per il gentile aiuto
Andrea

 ha scritto nel messaggio
news:wSG5a.215022$0v.60...@news1.tin.it...

Ciao Andrea,
usa l'autocomposizione etichette di un report e vedrai che sarà facile.
Bye, bye, Luca.

 ha scritto nel messaggio
news:u7I5a.291790$AA2.11...@news2.tin.it...


Newsgroup: it.comp.appl.access
Titolo: annullare la sub in caso di numero record uguale a zero

ciao a tutti,
ho una maschera che contiene vari pulsanti che filtrano dei dati in base
a dei parametri, alcune volte capita che a seguito del filtro, i record
siano zero e quindi va in errore... 
come posso fare un controllo prima che la sub del filtro venga attivata e
che in caso di zero record mi appaia un messaggio e torni al punto
precedente??
grazie 1000
Nicola

 ha scritto nel messaggio 
news:pan.2005.03.21....@tiscalinet.it...

fai prima un dcount del filtro e in caso di risultato uguale a zero annulli 
l'operazione.

 ha scritto nel messaggio 
news:d1mj47$vir$1...@hulme.interac.it...

Dim cerca As String
Dim stringadiricerca As String
cerca = InputBox("Ricerca Cognome", "Cognome?")
stringadiricerca = "[cognome] like " & Chr(34) & "*" & cerca & "*" & Chr(34)
Dim conteg As Integer
conteg = DCount("[cognome]", "elenco", stringadiricerca)
Me.RecordSource = "select * from elenco order by cognome,nome;"
If conteg > 0 Then
Me.FilterOn = True
Me.Filter = stringadiricerca
Else
MsgBox ("Errore non ci sono persone con il cognome: " & cerca)
End If
End Sub

Newsgroup: it.comp.appl.access
Titolo: Aprire un file

Se da utilizzo il seguente codice riesco ad aprire senza problemi il file
Shell("e:\programmi\Jasc Software Inc\Paint Shop Pro 7\psp.exe
C:\Win98\Desktop\Black.jpg")
Se però cerco di sostituire il percorso del
file da aprire con una variabile non funziona
Shell("e:\programmi\Jasc
Software Inc\Paint Shop Pro 7\psp.exe prova")
prova è il nome della
variabile String o Variant
Grazie Enrico
--------------------------------
Inviato via 
http://usenet.iol.it


La sintassi corretta č:
 Shell("e:\programmi\Jasc Software Inc\Paint Shop Pro 7\psp.exe " & prova)
Ciao
Stefano

 ha scritto nel messaggio
news:151Z20Z95Z44Y9...@usenet.iol.it...

Prova con:
Shell ("e:\programmi\Jasc Software Inc\Paint Shop Pro 7\psp.exe " & Chr$(34)
& prova & Chr$(34))
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------