mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Report e query sottostante

Esiste un modo tramite VBA di fare in modo che a un report sia
associata una certa query (o un'altra) a seguito di una scelta
dell'utente tramite controlli?
Altrimenti si potrebbero creare n Report > n Query e chiamare questo o
quel report da una serie di if dopo la scelta dell'utente ma mi
sembrerebbe un pò uno spreco.
Vorrei che il report fosse uno.


1a soluzione
=========
Devi impostare la proprietà RecordSource del report, ad esempio quando
questo parte (su apertura).
Chiaramente la scelta su quale sorgente di dati utilizzare la devi
fare in base ad un parametro che passi (può anche essere il nome della
query stessa, c'è qui tra i vari post uno che spiega come fare; cerca
quello dal titolo: "memorizzare valore controllo")
2a soluzione
=========
Crea una tabella con la struttura dei dati che intendi stampare, poi
riempi la tabella con i dati che vuoi tramire query o tramite codice
VBA (chiaramente pulesci prima la tabella).
A questo punto hai un report i cui dati variano a seconda di quello
che devi fare.
Il pregio di questa seconda soluzione è che puoi fare più facilmente
il debug dei programmi in quanto i dati restano fino a nuova
elaborazione nella tabella temporanea utilizzata per la stampa.
Ciao,
Roberto LF

Newsgroup: it.comp.appl.access
Titolo: creare un report con i dati di un solo record

Come creare un report, che riporti tutti i campi relativi perņ ad un solo
record, che seleziono da una casella combinata??
l'idea sarebbe quella di far aprire una maschera, nella quale ci sia una
casella combinata in cui selezionare il record, dopodiche, premendo un
pulsante, si visualizzino tutti i campi relativi a quel record.
Grazie in anticipo!

 pulsante, si visualizzino tutti i campi relativi a quel record.
Origine record del report: tutta la tabella.
Apri il report con il comando dopcmd.openreport ed utilizzando il parametro
CriterioWHERE di cui puoi vedere ottimi esempi sull'help!
Antonio


Ho risolto scrivendo due righe in SQL, prese d'esempio da un database che ho
trovato:
------------
PARAMETERS [cognome] Text ( 255 );
SELECT [tabella1].ID, [tabella1].Cognome, [tabella1].data di nascita,
[tabella1].sesso
FROM [tabella1]
WHERE (([tabella1].Cognome)=[cognome]));
------------
cosi' funziona, ma vorrei riuscire a fare la selezione del cognome non
scrivendolo ma selezionandolo da una casella combinata, anche se, quando i
record saranno molti, forse la selezione a tendina risulterebbe poco
pratica?
che ne pensi?
Ciao


Inserisci nella origine record del report il criterio
form!tuamaschera!tuacombo
Quando i record diverranno + di uno gurdati sul sitocomune i lmultipik.
Quando diverranno tanti record ti consiglio una bella sottomaschera che ti
seleziona tu tti quelli che vuoi.
MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.appl.access
Titolo: Data

Salve,
Come posso impostare il valore predefinito di un controllo in una maschera
per far si che mi visualizzi l'anno corrente a 4 cifre?
es.---  2002
Grazie
Giorgio

 ha scritto nel messaggio
news:mXd68.1938$kv.4...@twister2.libero.it...

= Year(Date())
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


wrote:

la visualizzazione dipende dal formato del controllo
gg/mm/aaaa
Saluti.
Emanuele.

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

Ciao a tutti, chi mi puņ aiutare a risolvere questo problema????
Ho fatto una maschera con alcuni campi di cui dovrei fare dei semplici
calcoli, sottrazione, divisione, ecc. in modo automatico.
Grazie, Alessio

 ha scritto nel messaggio
news:b4sluh$q4m$1...@grillo.cs.interbusiness.it...

Se hai sulla form i controlli [primoNumero], [secondoNumero] e [totale];
nella origine dati di [totale] inserisci:
=[primoNumero]-[secondoNumero]
oppure
=[primoNumero]+[secondoNumero]
oppure
=[primoNumero]/[secondoNumero]
oppure
=[primoNumero]*[secondoNumero]
Ciao.
--
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Problema con Runtime di Access 2000

Ciao a tutti, avrei bisogno di una mano.
Avendo a disposizione il RT di Access 2000, non riesco a visualizzare in un
report un'immagine collegata. Vedo solamente immagini incorporate. Il fatto
è che mi servono immagini collegate, perché altrimenti non potrei
sostituirle a piacimento dell'utente.
Avete qualche soluzione da propormi?
Grazie
D.

 ha scritto nel messaggio
news:17rQ7.4106$NB6.1...@news2.tin.it...

Prova nel report a sostituire il controllo OLE non associato con un
controllo Immagine.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

"Logo"

Utilizza il formato .bmp: non necessita di filtri di conversione (che ART
non installa su PC formattati).
Ciao, Stefano

 wrote in message
news:jC0R7.274220$sq5.13...@news.infostrada.it...


 Adesso funziona. L'unica cosa è che l'immagine BMP deve essere a 8 bit.
Boh, a me funziano anche a 24 bit!
Ciao, Stefano

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

Private Sub Form_Current()
Dim iAnno As Integer
Dim p1 As Double
Dim p2 As Double
On Error Resume Next
p1 = 0
p2 = 0
iAnno = 0
p1 = [Sottomaschera Interventi trimestrali]!Totale
p2 = [Sottomaschera Interventi Trim Lavori]!Totale
iAnno = [Sottomaschera Interventi Trim Lavori]!Anno
If (IsNull(p1)) Then
    p1 = 0
End If
If (IsNull(p2)) Then
    p2 = 0
End If
If (IsNull(iAnno)) Then
    Me.EtichettaImportoTotale = "Importo Totale "
Else
    If (iAnno = 0) Then
        Me.EtichettaImportoTotale = "Importo Totale "
    Else
        Me.EtichettaImportoTotale = "Importo Totale " & iAnno
    End If
End If
Me.ImportoTotale = p1 + p2
End Sub
non fa solo il calcolo (Me.ImportoTotale = p1 + p2) in access2000 con xp
funziona tutto perfettamente
chiedo come posso risolvere il problema

Usa un buon subject e continua i post precedenti
MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.appl.access
Titolo: Secondo problema con i report di Access

Quando si usano i controlli settati espandibili in un report le righe
vengono chiaramente create automaticamente;
come faccio ad allineare un'altro controllo al margine inferiore se il
controllo di riferimento si espande ??
Grazie Nicola

 ha scritto nel messaggio
news:B%eX5.1708$D8.4...@twister2.tin.it...

Controlla sull'help:
Proprietą ASinistra, DaMargineSuperiore (italiano)
Proprietą Left, Top (inglese)
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access

 wrote in message
ecqX5.43952$hk4.1...@news.infostrada.it...


 Hai un idea?
Sě.
1) Rispondi dopo i messaggi precedenti x favore.
2) Le impostazioni le controlli con l'evento Su formattazione della sezione
(corpo, intestazione pagina, ecc. ecc.) del report.


 wrote in message
YTJX5.51239$hk4.1...@news.infostrada.it...

1. Scusa ma non sono un frequentatore dei newsgroup, cosa intendi per
rispondi dopo i messaggi precedenti ?
2. Ok su l'evento formattazione ho gia provato, ma purtroppo la proprieta'
     Height ha la dimensione iniziale e diventa corretta solo sull'evento di
stampa,
    purtroppo sull'evento di stampa non si possono impostare le proprieta'
del         controllo da spostare  ?
Qual'e' la tua prossima mossa ?
Ciao e Grazie
Nicola


Ho avuto anch'io il tuo stesso problema e non ho avuto risposte quindi ho
utilizzato questo trucchetto...
supponiamo che il tuo controllo di riferimento contenga 50 caratteri, al
momento di stampa, dividi il numero di caratteri da scivere in quel
controllo per 50, ottieni così il numero di righe. In base al numero di
righe a tutti gli alti controlli (trasformati in stringhe) aggiungi in testa
il codice ascii del ritorno a capo, quindi anche quel controllo si espanderà
della stessa misura di quello predefinito.
Spero di essere stato chiaro.
Bobbit
Newsgroup: it.comp.appl.access
Titolo: Messaggistica Aziendale interna

Salve a tutti! Ho un problemino facile facile per un progetto penso +
complicato.
Praticamente vorrei riuscire a Sviluppare un sistema di messaggistica
interna alla rete aziendale tramite dbcondiviso.
Comunque il primo blocco ke ho trovato è stato questo :
Allora il db è cosi strutturato
ho una maschera chiamata "Posta" e una sottomaschera collegata chiamata
"Lavagna" a colonne che praticamente ha gli stessi dati uguali a maschera
"Posta" cambia solo il metodo di filtraggio.
Ora nella maschera principale "Posta" ho inserito un bottone nuovo record,
solo ke vorrei ke tale bottone al suo Click inserisse un nuovo record
nella sottomaschera "Lavagna".
Ho provato come normale, pur essendo la maschera "Posta" aperta, mi dice
che l'oggetto Lavagna non è attiva.
Qualcuno saprebbe aiutarmi per favore??
Grazie , saluti Marco!!!
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie , saluti Marco!!!
WinPOPUP non ti piace?

 ha scritto nel messaggio
news:ah5u8k$rmf$1...@news.newsland.it...

Se hai già i dati del nuovo record:
Il nuovo record prova ad accodarlo alla tabella che alimenta la
sottomaschera e poi fai un requery di quest'ultima.
Ovviamente tutto da codice.
Oppure crea una query di accodamento sempre sulla tabella che alimenta la
sottomaschera e poi il solito requery.
Se vuoi semplicemente avviare la scrittura del nuovo record nella
sottomaschera:
DoCmd.GoToControl "Lavagna"
DoCmd.GoToRecord , , acNewRec
Ciao, Carlo

 Ciao, Carlo


 Carlo Costarella wrote:




Per far puntare alla sottomaschera tutto ok, ma mi sto incasinando perchè
non riesco a sviluppare l'idea.
Vorrei ke la riequery fosse eseguita in base ad un campo chiamato utente
che praticamente diverrebbe il mittente o il destinatario della tabella
posta.
Puoi aiutarmi per favore??


Newsgroup: it.comp.appl.access
Titolo: Controlli ActiveX

Salve a tutti,
ho creato una maschera con il controllo activex SnapShotViewer , ho provato
e riprovato il programma e non ci sono errori di sorta, il problema sorge
quando devo creare il file MDE, mi avvisa che l'activex deve essere
registrato, ma io già l'ho registrato e ne sono sicuro al cento per cento.
Un'altra stranezza è che su un altro pc il file mde viene creato
regolarmente, l'unica differenza tra i due pc e che su quello che non riesce
a creare l'MDE c'è il sistema operativo WXP, mentre su quell'altro c'è W98,
ma entrambi usano ACCESS 97 PRO.
Come posso sistemare il problema?
Qualche suggerimento?
Grazie Giovanni.


Newsgroup: it.comp.appl.access
Titolo: formattazione di un report

in un report ho messo un campo con la qualità espandibile =SI
sotto cè un campo testo non associato
quando il campo superiore si espande va a coprire
il testo che compare sotto nel campo testo non associato
come posso risolvere? cè un modo per spostare automaticamente
il campo testo non associato, all'occorrenza?
grazie Alfonso

 ha scritto nel messaggio
news:9VFu7.14265$0Y2.2...@news.infostrada.it...

Prova così:
sull'evento format del corpo del report scrivi:
me.NomeControlloNonAssociato.Top = Me.ControlloEspandibile.Top +
Me.ControlloEspandibile.Height
dovrebbe funzionare.
Ciao Roberto - Syd

Newsgroup: it.comp.appl.access
Titolo: Uso del With con un form

Ciao ragazzi,
sto cercando di capire come usare il costrutto "With ... End With"
qualcuno ha un attimo per spiegarmelo?
Grazie mille!!
Marco

mbic...@yahoo.it
 ha scritto:

Mi spiego meglio...
Sto provando a lavorare direttamente con un oggetto di tipo form.
Ho scritto la seguente routine:
Public Sub primo_elemento (frm As Form)
	With frm
    		If 
frm.name
 = "ANAGRAFICA" Then
        	....
    		Else
       		...
    		End If
	End With
End Sub
E speravo che con il costrutto With sarei riuscito a gestire l'oggetto
form  che ho.
Ho provato a vedere sull'help ma niente...
Suggerimenti?
Grazie ancora
Marco


Usando with tu definisci implicitamente un oggetto
e avrai già disponibili metodi e proprietà
Es.
With Pabliotmf
    .CompetenzaCalcio = true  'Tifoso del Napoli
    .CompetenzaFemmine = False    'Se si eccettua la sua signora, ma è stata 
lei a sceliere lui
    .CompetenzaAccess = vbnull
end with
Se non l'avessi usato avrei dovuto usare sempre Pablitomf
-- 
-- 
Massimiliano Amendola
www.accessgroup.it
Il sito italiano di svilupatori Access
www.donkarl.com/it/cisa
 

MA ha scritto:

Sinceramente non capisco... o meglio capisco ma mi manca un pezzo...
Ma with può essere utilizzato solo in questo modo?
Io pensavo di inserire all'interno di un blocco with un paio di if ed
altre porzioni di codice, ma a questo punto mi sorge il dubbio che non
sia fattibile...
Se invece lo è, come si fa?

 Se invece lo è, come si fa?
dim rs as dao.recordset
set rs = currentdb.openrecordset("tuatabella")
with rs
    do
    If !Nome = "PablitoMF" then
        .Edit
        !compenza = vbNull
        .update
        .close
    .movenext
    loop until .EOF
end with
set rs = nothing
La morale è: fuori da with ... end with
devi renderlo esplicito


MA ha scritto:

Sinceramente non capisco... o meglio capisco ma mi manca un pezzo...


 
Mettendo tutto il codice che vuoi all'interno del blocco.
with oggetto
      codice,codice,codice,codice
      .metodooggetto     (se scrivo oggetto.metoto oggetto sono un pollo 
perche' potevo risparmiarmi la with)
       codice,codice,codice
      oggetto.proprieta = valore (qui faccio il pollo)
      aricodice, aricodice......
end with
  .metodo1 (qui il sistema si incavola perche' non sa piu' a quale 
oggetto riferirsi)
spero si capisca
 
-- 
ac
email: w+1=x

Alessandro Cara ha scritto:

Ragazzi scusate per il silenzio...
Grazie mille per le vostre risposte!!
Newsgroup: it.comp.appl.access
Titolo: apertura mdb in lan inibita su win7

nel mio ex ufficio ho necessita di continuare ad usare dei vecchi mdb sul server, sui nuovi pc con win7 ho un msg di protezione che mi impedisce di aprirlo.
 
Scusate la semplicità del problema, ma cercando al volo non ho risolto, ed un po di ruggine dopo 3 anni che ho lasciato l'ufficio c'è.

roby.roma isw 232 ha scritto:

Magari il testo del messaggio d'errore e la versione di Access potrebbero
aiutarci a capire se il problema è dovuto ad Access o a Windows, o a
chissà cos'altro.
Ciao.
-Marco-
 
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 

On 1 Feb, 13:11, 
marco.pizzamig...@gmail.com
 (Marco Pizzamiglio)
wrote:

il messaggio è questo "Impossibile aprire il file. Il file è
disponibile in una posizione esterna alla rete intranet o in un sito
non attendibile"
la cartella è condivisa sul server, ovviamente nessun problema con
altri pc con win2k ed xp prof

 non attendibile
 
http://www.donkarl.com/it/faq/FAQ7Bug.htm
 
 
7.7
 
BFS

 altri pc con win2k ed xp prof
 
Prova se aiuta:
 
 File esterno alla rete Intranet
 
http://www.donkarl.com/it?FAQ7.7
 
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 altri pc con win2k ed xp prof
 
Quindi presumo che l'mdb sul server non si riesca ad aprire nemmeno con
esplora risorse.
Verifica le impostazioni di protezione di internet explorer, vedi se
riesci ad inserire la rete locale tra i siti attendibili. Bisognerebbe
capire se quel server sta sulla stessa sottorete del PC o meno, se c'è un
router in mezzo.
Ad ogni modo non è un problema di access, se rifai la domanda su un sito
di esperti windows sicuramente ti sanno rispondere subito.
Ciao.
-Marco-
 
 
 
-- 


 altri pc con win2k ed xp prof
 
Quindi presumo che l'mdb sul server non si riesca ad aprire nemmeno con
esplora risorse.
Verifica le impostazioni di protezione di internet explorer, vedi se
riesci ad inserire la rete locale tra i siti attendibili. Bisognerebbe
capire se quel server sta sulla stessa sottorete del PC o meno, se c'è un
router in mezzo.
Ad ogni modo non è un problema di access, se rifai la domanda su un sito
di esperti windows sicuramente ti sanno rispondere subito.
Ciao.
-Marco-
 
 
 
-- 

Newsgroup: it.comp.appl.access
Titolo: aggiunta di record in sottomaschera da altra maschera

Salve a tutti, possiedo una maschera fattura con all'interno una
sottomaschera fattureRighe che contiene le righe di ogni fattura ed è in
visualizzazione continua, dalla maschera principale fattura con un bottone
apro un ulteriore terza maschera in visualizzazione continua dove con un
pulsante VORREI importare in una nuova riga della sottomaschera fattureRIGHE
il record selezionato, accade però che non riesco a farlo, o meglio mi resta
indietro di 1 nella visualizzazione,
quindi vi chiedo come?
dalla terza nmaschera aperta eseguire quanto segue:
1. seleizonare la sottomaschera fattureRighe
2. aggiungere un nuovo record (nuova riga di fattura)
3. importargli dentro il record scelto
grazie a tutti.


non potresti usare uno statement sql? INSERT INTO.....?
Saluti.
Emanuele.

 Salve a tutti, possiedo una maschera fattura con all'interno una
Concettualmente non credi che sia più corretto intervenire a livello della
tabella puntata dalla sottomaschera, aggiungendo lì il record, e poi fare
una requery della sottomaschera?
Antonio

 grazie a tutti.
Potresti usare una casella combinata nella prima colonna della sottomaschera
che prende i dati dalla tabella_articolo (esempio), quindi apri la casella e
selezioni l'articolo riga per riga...io di solito faccio cosi e funziona.
Potresti usare il campo codice:
quindi al posto del controllo Codice ci metti sta casella combinata e dopo
aggiornamento della casella combinata gli dici di "copiare" i valori del
resto nelle altre caselle:
Esempio:
casella combinata: prende i valori da tabella_articoli con le seguenti
colonne:
- codice - descrizione - prezzo
dopo aggiornamento:
-Me.nomecampocodice.value = me.casellacombinata.column(0)
(penso che siccome se lo mette da solo, puoi omettere questa riga)
-Me.nomecampodescrizione.value = me.casellacombinata.column(1)
-Me.nomecampoprezzo.value = me.casellacombinata.column(2)
e ti riporti i valori dell'articolo selezionato :)
Spero di non aver detto fesserie.
Ciao :)
Newsgroup: it.comp.appl.access
Titolo: Aiuto: Index... Seek

Utilizzo il metodo Seek per individuare un record in un recordset. L'index è
una chiave primaria composta. La sintassi utilizzata è la seguente:
----------------------------------------------------------------------------
---------------------
...
rstarchivio.index = "primaryKey"       '   IdDipendente, giorno, Ufficio
rstArchivio.Seek "=", idagg, i, Uff
If rstArchivio.NoMatch Then            '  ... se c'è...
...
----------------------------------------------------------------------------
---------------------
- "i" è la variabile incremento utilizzata in un ciclo For... Next i.
-- idagg, i, Uff     corrispondono allo stesso tipo di dati della primaryKey
--- E' sicuro che il record esiste, ma nel debug "NoMatch" risulta vera e
quindi salta la routin successiva.
---- Sono un dilettante e quindi avrò commesso un errore, ma quale?... chi
mi aiuta?
Grazie in anticipo.

 ha scritto nel messaggio
news:hCDY6.180$bG1....@news1.tin.it...

Per quello che si può vedere, le tre righe di codice VBA che hai postato
hanno una sintassi esatta; l'unica inesattezza sta nel commento della If: la
condizione si verifica nel caso che il record "non c'è" e non "... se c'è
...";
non so se l'inesattezza sta nel commento o in quello che c'è scritto dopo la
If.
Se questo non è il problema, sono portato a credere che non c'è uniformità
tra il tipo dei campi della tabella che compongono la chiave primaria ed il
tipo assegnato alle tre variabili.
Ad esempio, ammettiamo che la variabile idagg contenga il risultato di una
funzione Val (che restituisce il risultato in doppia precisione) e il campo
IdDipendente sia Numerico o Contatore con Dimensione campo = Intero lungo,
pur essendo sia il campo che la variabile di tipo numerico, la Seek ti
darebbe esito negativo; ti funzionerebbe solamente se anche IdDipendente
avesse una Dimensione campo = Precisione doppia; in alternativa al posto
della funzione Val usa la funzione CLng (tanto per capirsi, l'esempio
dell'help è inesatto).
Insomma se la Dimensione campo dei campi IdDipendente, giorno e Ufficio sono
= Intero lungo, prova a scrivere la Seek così:
rstArchivio.Seek "=", CLng(idagg), CLng(i), CLng(Uff)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: MDE

Allora, il problema è il seguente
- il database di Access non è protetto a livello utente;
- nessuna password di accesso al codice Visual Basic;
- il database non è stato replicato;
- il database non contiene dei riferimenti a un altro database di Access o a
un componente aggiuntivo
Nonostante tutto questo, quando cerco di creare un .MDE ottengo un messaggio
dal sistema il quale m'informa che "è impossibile creare il file MDE".
Sono abbastanza disperato.
Grazie per qualsiasi aiuto
OS

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

 ha scritto nel messaggio
news:lHNlc.139707$hc5.6...@news3.tin.it...

Ciao
Sono impazzito anch'io con lo stesso problema recentemente.
Nel mio caso avevo un errore nel codice di una form.
Magari ricontrolla. Credo sia solo quello il tuo problema.
Ciao
TT

 ha scritto nel messaggio
news:Z_Slc.37855$Qc.14...@twister1.libero.it...

Mi aggiungo alla lista di quelli che non riescono più a creare mde ...
ricordo che si poteva tramite un comando dei menu compilare tutto il db,
cosi da poter controllare gli eventuali errori.
Credo poi che la lentezza di alcune form che si verifica periodicamente sia
dettata appunto da alcuni residui errorini ...
Qualcuno mi ricorda come fare?

ciroteo ha scritto:




Provate a cercare con google i post di ICAA che contengono "mde"
nell'oggetto. Ce n'è qualche centinaio, tra cui quelli che riportano le
soluzioni a questi problemi.
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
Newsgroup: it.comp.appl.access
Titolo: Interrompere esecuzione codice senza tasto Pausa/Interr

Ciao a tutti,
durante il debug capita spesso di dover interrompere manualmente l'esecuzione del codice, finora l'ho fatto senza neanche pensarci premendo CTRL + Pausa.
Ora pare che sia stato deciso che il tasto Pausa/Interr non era tanto usato e hanno deciso a tavolino che è obsoleto.
Non che abbia una particolare simpatia per questo tasto, ma nel mio nuovo notebook il tasto non c'è più e mi sono reso conto che non riesco più a interrompere l'esecuzione del codice manualmente.
Che alternative ci sono?
(già provate: CTRL + C, BlocScorr + tutti i tasti CTRL, ALT, ecc, CTRL + quasi tutti i tasti,...)
 
Ciao

Salve Davide,
 
Davide La Mantia:

La rimozione del tasto di pausa dipende dal produttore. Tanti purtroppo 
lo fanno, altri no. Ho già mandato indietro un nuovo portatile a causa 
di questo, perché non è accettabile per il mio lavoro.
 
Prima di rispedirlo allora, ho anche cercato delle alternative: Con 
alcuni produttori, una combinazione di tasti FN può emulare il tasto 
Pausa (vedi manuale). Altre alternative includevano la tastiera su 
schermo di Windows, hack di registro, ecc. Puoi trovare queste cose sul 
web e dovresti testarle.
 
Per me, nessuno di loro ha funzionato o era accettabile.
 
Ciao
Karl
*********
http://AccessDevCon.com
 
Access FAQ: 
https://www.donkarl.com/it
 


Ciao Karl,
mi stai dando una notizia bruttissima, perchè ero tutto contento di questo mio nuovo notebook, ma per una sciocchezza del genere rischio veramente di doverlo restituire...
Veramente resto basito da queste scelte dei produttori che, a quanto pare, si diffondono. 
Pare ormai puntano esclusivamente al mercato consumer...
 
Adesso comunque sto provando PowerToys, che consente di rimappare i tasti, ho configurato CTRL + F12 come Break e sembra funzionare.
Tuttavia lo verificherò nei prossimi giorni prima di eventualmente restituire il portatile se continuo ad avere problemi.
 
Ciao


Ad esempio:
https://www.dell.com/support/kbdoc/it-it/000145271/break-key-non-pi%C3%B9-lungo-disponibile-on-dell-xps-e-m-series-portatili
 
 
 
Provato con :
Fn + Ctrl + b
 
@Alex

 @Alex
 
Ciao Alex,
ho provato questo e tutte le combinazioni che mi sono venute in mente.
 
L'assestenza LG (cortese e premurosa) mi ha richiamato al telefono per dirmi di provare Fn+ b, ma come dicevo non ha funzionato.
 
Come dicevo, mi salva PowerToys con la rimappatura che funziona perfettamente.
 
Se non fosse stato per quello, avrei preso in seria considerazione l'idea di restituire il portatile, che tra l'altro ho recensito su youtube, casomai interessasse a qualcuno ;-), anche se in quel momento non mi ero ancora reso conto di questa grave lacuna.
 
Ciao
Davide
Newsgroup: it.comp.appl.access
Titolo: query a campi incrociati

ciao a tutti,
ho un problema con una query a campi incrociati che cerchero di
spiegare,
vorrei sommare i valori in questo modo
i campi interessati sono comune(origine riga) tipo(origine colonna)
esempio
comune        privato        azienda        ente
primo            5                    7                2
secondo        6                    4                3
e fin qui tutto bene, è possibile fare questo
comune        privato        azienda        ente        somma
primo            5                    7                2            14
secondo        6                    4                3            13
somma           11                11                5            27
grazie mille

 ha scritto nel messaggio 
news:421b7777$0$32353$5fc...@news.tiscali.it...

In una form e in un report sì; nella query no...
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: formato data

Ciao a tutti,
spero di essere chiaro :
ho una foglio di dati anagrafici in excel ;
ho creato un database access con una tabella collegata al foglio excel
da qui ho creato un file doc per stampare degli attestati di servizio, il
problema che riscontro è che il formato delle date di nascita e delle date
di assunzioni escono con il formato , esempio : 01/01/2000 00.00.00 ;
se vado in access nella struttura della tabella per modificare il formato
dei campi, mi dice che non è possibile "modificare alcune proprietà della
tabella", anche mettendo "gg/mm/aaaa" come valore predifinito non ottengo
alcunchè.
Soluzioni ?
grazie a tutti
--
----------------------------------------------------------------------------
------------
I know english is a world language....but I'm Italian so sorry for mistake!
----------------------------------------------------------------------------
------------------

Dovresti cambiare il formato data da Excel tramite Formato/formato celle....
selezionando la colonna Data e dandogli solo il formato data (gg/mm/aaaa) o
simile e dovresti risolvere il problema
Altrimenti ho superato il problema facendo un copia incolla dei dati di
Excel, ma con incolla/speciale .. solo Valori
In altri casi ho esportato i dati in csv da excel con salva con nome, o in
TxT
oppure da Access creo una Query che legge tutta la tabella, poi dalla
griglia del campo "Data" tasto Dx ... proprietą gli ho dato il formato che
voglio
buon lavoro
Ciao Vittņ
Newsgroup: it.comp.appl.access
Titolo: Ricerca in casella combinata

In un database ho un elenco di nomi; volendo operare in una maschera una
ricerca e non essendo un esperto di VBA, ho usufruito della creazione
guidata di Access 2000 creando una casella combinata e scegliendo "Trova un
record nella maschera basato sul valore selezionato nella casella combinata"
e quindi indicando il campo "Nome". Tutto funziona bene fino a quando non
inserisco la ricerca di un nome che contiene un apostrofo (tipo D'Antonio o
Dell'Orto): in tal caso il programma si blocca con un messaggio di errore di
run time 3077 (errore di sintassi: operatore mancante nell'espressione);
andando nel debug la linea incriminata ha la seguente sintassi:
rs.FindFirst "[Nome] = ' " & Me![CasellaCombinata24] & " ' "
Qualcuno può indicarmi la sintassi corretta che funzioni sia con i nomi
senza apostrofo che con quelli con l'apostrofo, o un sistema per aggirare l'
ostacolo? Grazie per l'aiuto

"Dany" ha scritto nel messaggio ...

Ciao Dany, con questa sintassi non dovresti avere problemi:
rst.FindFirst "[Nome]= """ & Me![CasellaCombinata24] & """"
RoDAgo

Prova cosě:

Newsgroup: it.comp.appl.access
Titolo: Richiesta URGENTE Help! grazie

Ciao
ho creato una tabella con ms accesso
Nella tabella ho messo 3 campi: il campo INIZIO, il campo FINE e il
campo DURATA
Il campo INIZIO è impostato come Formato Data Generica (gli ho messo
un valore predefinito come Now() in modo che all'inserimento mi mostri
l'ora attuale)
Il campo FINE è impostato come Formato Data Generica (senza nessun
valore predefinito)
Il campo durata è impostato su NUMERO INTERO
Vorrei che il campo DURATA restituisse la differenza in secondi tra il
campo fine e il campo inizio
Ho usato la funzione:
Datediff ("s";[Fine];[Inizio])
ma quando tento di salvare la tabella ms access mi restituisce questo
errore:
Il modulo di gestione database non riconosce il campo FINE in una
espressione di convalida o il valore predefinito nella tabella
Qualcuno mi può aiutare?
GRAZIE

 ha scritto nel messaggio
news:hr8il0t807tmmhbgj...@4ax.com...
[CUT]
Nel tuo interesse, ti faccio presente che in questo NG normalmente non si
risponde a messaggi che non abbiano un subject che riassume il quesito.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

...pareva strano che nessuno rispondesse
Apro un altro post 
grazie
Newsgroup: it.comp.appl.access
Titolo: Formattazione Numero

Buongiorno, 
eseguendo la formattazione di un numero con la funzione FORMAT ad 
esempio Format("6","000") ottengo come risultato "006", come posso 
ottenere invece il risultato "600". In pratica la funzione format parte 
da destra verso sinistra, avrei bisogno di farla partire da sinistra 
verso destra.
Grazie anticipatamente per gli eventuali suggerimenti.
Andrea
-- 
Andrea

 ha scritto nel messaggio 
news:200512191...@mynewsgate.net...

Se scrivi Format("6","000") il risultato sarà 006 perchè prima ci sono i 
decimali poi le unità poi le decine e poi le centinaia, il tutto da destra 
verso sinistra. Il punto esclamativo (!), nelle maschere di input, 
visualizza la maschera da destra a sinistra invece che da sinistra a destra.
6 cos'è? Un testo o un numero? Format(6,".000") restituisce 6,000 così come 
Format("6",".000").
Dove devi usare questa cosa? Si tratta sempre di numeri interi? Di stringhe? 
Gli zeri sono sempre centinaia o migliaia?
Ciao, Carlo 

 ha scritto:

Buongiorno e grazie per la tua attenzione, in pratica ho bisogno di fare 
questo: ho un numero esempio 1250,45 io devo estrapolare la parte intera 
e quella decimale  rappresentandola in un file di testo in questo formato:
12 interi + 3 decimali esempio (000000001250450).
Ho fatto una funzione che estrapola il tutto e per la parte intera non 
c'è nessun problema, per la parte decimale invece non riesco perchè il 
risultato mi viene fuori così (045). 
Grazie anticipatamente.
Andrea
-- 
Andrea

 Andrea
penso che, se puoi moltiplicare sempre per 1000 il valore numerico che hai
(anche se non contiene decimali) e poi lo formatti con 15 cifre si riesca
ad ottenere quanto ti necessita
 
in breve: format(TuoValore*1000,"000000000000000")
Giorgio
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Il suggerimento di Giorgio č perfetto. Se hai bisogno di avere due valori 
(parte intera e decimale) per accodarli in altrettanti campi fammelo sapere.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: Pulsanti + e -

Devo costruire una maschera con due pulsanti + e - per poter aumentare o
diminuire i prodotti in magazzino.
Come potrei realizzarla? Ci sono comandi specifici da inserire direttamente
in access per risolvere questa soluzione?
Grazie 1000 a tutti.

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

 ha scritto nel messaggio
news:KsXac.102428$Kc3.3...@twister2.libero.it...

Mi aiuteresti a definire queste due azioni? Non sono molto esperto.
Grazie sei gentile.

 Grazie sei gentile.
Potrei tentare di farlo a condizione che tu mi spieghi cosa intendi con
"aumentare o diminuire i prodotti in magazzino".
-- 


 ha scritto nel messaggio
news:UT9bc.103445$Kc3.3...@twister2.libero.it...

E' molto semplice, devo poter gestire dei prodotti (immaginiamo orologi)
Quando il corriere mi porta il pacchetto io con un lettore di codici a barre
inserisco il rispettivo codice, poi descrizione e quantità.
Nel momento che vendo quel prodotto, vorrei associare la data di vendita e
dovrei calare di 1 (il prodotto venduto) la quantità che ho a magazzino.
Pensavo di mettere dei pulsanti + e - con i quali decidere; tipo... ne ho
venduti 3 di orologi... faccio clik, clik, clik e cala il numero di 3 unità.
Non so se sono riuscito a spiegarmi.
Grazie di tutto. Ciao Lorenzo.

 ha scritto nel messaggio
news:c4jq69$nm$1...@news.ngi.it...

Non mi è chiaro quante e quali siano le tabelle del tuo database e quale sia
la loro struttura.


 ha scritto nel messaggio
news:bafbc.104064$Kc3.3...@twister2.libero.it...

una tabella sola
CODICE A BARRE
PRODOTTO
DITTA
N. FATTURA
DATA
COSTO ACQUSITO
COSTO VENDITA
DATA VENDITA
TOTALE MAGAZZINO (da gestire con il + e il - )
il tutto gestito con una maschera.
Ciao Lorenzo.

il tutto gestito con una maschera.
non vorrei sembrare banale ....
ma potresti semplicemente creare due pulsanti
e mettere questo codice:
Me.NomeCampo = Me.NomeCampo + 1 (per aumentare)
...l'ho buttata lě
ciao, Zef

 ha scritto nel messaggio
news:cems60t9lqvcl5v6h...@4ax.com...

Grazie funziona benissimo.... tnk.
Ciao Lorenzo.

Newsgroup: it.comp.appl.access
Titolo: msgbox su valori di campo uguali

Sto lavorando ad un db per l'analisi i risultati di un questionario.
La form che raccoglie le risposte degli intervistati è composta da una
maschera principale con i dati anagrafici dell'intervistato e da una
sottomaschera che raccoglie le risposte alle singole domande. Le domande
sono raggruppate per area. Ora io vorrei che nel caso in cui la stessa
domanda fosse erroneamnete ripetuta due volte, mi apparisse un msgbox di
avviso. Come posso fare?
grazie a tutti
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 wrote in message
ah931t$7q2$1...@news.newsland.it...


 Simone
Scrivi DOPO il quoting!!!
Antonio
Newsgroup: it.comp.appl.access
Titolo: formattazione lentissima e aumento db size

Ciao a tutti, premetto che ho un sistema suddiviso in file dati e
file front end. 
Mi e' successo questo:
1 ho compattato il db front end.
2 ho aperto un report basato su una query un po' complessa (7
sotto query, unioni etc...)
3 per formattare il report ci sono voluti 3 minuti circa, ma il
numero di record che la query restituiva era bassisimo (20) e il
tempo necessario a eseguire la query da sola era limitato (1 sec)
4 la dimensione del front end e' passata in 4 esecuzioni di questo
report d 5,5 Mb a 22 Mb
a qualcuno e' mai successo qlc di simile?
grazie a tutti
Tom

 wrote in message 3C84ADE7...@libero.it...

Se esegui la query da sola non hai problemi almeno da ciň che ho capito...
allora dimmi, fai dei controlli sull'apertura del Report?

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

Ciao,
ho un problemaccio.
Un report molto ricco di campi calcolati va in Overflow.
Penso sia dovuto ad uno o più campi in cui ci sono delle divisioni per 0.
Ho tentato di isolare il problema ma non sono riuscito ad individuarlo.
E' possibile impostare del codice che mi testi il report e restituisca a 0 i
campi che vanno in errore?
Grazie Mille

 Penso sia dovuto ad uno o pių campi in cui ci sono delle divisioni per 0.
E allora garantisci con delle iif che non ci siano le divisioni per 0
Antonio
Newsgroup: it.comp.appl.access
Titolo: Proprietà Data-Link

Cercando di connettermi al server sql da access (SQL Servere Express 2005), 
alla pressione di
"Connessione.." dal menu File, da qualche tempo non appare le relativa
finestra di dialogo della proprietą di Data Link ed č impossibile connettere 
il progetto .adp al server.
Qualcuno puņ aiutarmi?
Grazie

 ha scritto nel messaggio 
news:4798cfb1$0$17943$4faf...@reader1.news.tin.it...

Ti connetti con DSN?... cambiato IP del server?... cambiato impostazioni di 
connessioni di SQL Expr.?

Newsgroup: it.comp.appl.access
Titolo: nascondere il caricamento di una jpg in access

quando carico una immagine jpg e non bmp tra una form e l'altra vedo una 
barra di caricamento immagine che vorrei non visualizzare, so che c'era il 
modo ma non ricordo piu come fare.
qualcuno si ricorda come si può fare?
Grazie a tutti. 

 Grazie a tutti.
Sul sito comune č spiegato come rimuoverla...
Ciao.
-- 
Sergio MAZZA


Vedi l'ultimo paragrafo della FAQ 2.2 Archiviare Immagini
sul sito indicato sotto.
-- 
HTH
Karl
*********
Access-FAQ 
http://www.donkarl.com/it

 wrote in message
news:ciqa15$65o$1...@lacerta.tiscalinet.it...

Setta la chiave
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Shared Tools\Graphics
Filters\Import\GIF\Options]
"ShowProgressDialog"="No"
su sistemi Nt si deve impostare anche su
[HKEY_CURRENT_USER\Software\Microsoft\Shared Tools\Graphics
Filters\Import\GIF\Options]
"ShowProgressDialog"="No"
ciao

 Grazie a tutti.
Si hai 2 modi:
1)
www.mvps.org
\access
  API: Suppress the "Loading Image" dialog
2)Le routines di Lebans che evitano l'uso dei Filtri di COnversione
attraverso l'uso di GDI+.dll
Ciao
@Alex

Newsgroup: it.comp.appl.access
Titolo: [OT] Messaggio per Filippo Schillaci

Caro Filippo,
l'8 novembre 2004 hai inviato del materiale al webmaster del Sito Comune, ma
la mancanza di alcune informazioni fondamentali non ne permettono la
pubblicazione.
Se pertanto leggi questo messagio ti prego di metterti in contatto con me.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Roberto
Puoi chiedere a suo fratello quando stasera si collegherà dalla Cueva.
MAssimiliano

 ha scritto nel messaggio 
news:u_3ld.32433$B06....@news.edisontel.com...

lo sapevo ...  la battuta in effetti era servita su un piatto d'argento!...

 MAssimiliano


 ha scritto nel messaggio 
news:PN4ld.30248$Es2.6...@twister2.libero.it...

Roberto da te non me l'aspettavo! sei caduto nella rete dell'isola dei 
famosi anche tu ...
naaaaaaa! 

 naaaaaaa!

Newsgroup: it.comp.appl.access
Titolo: popolare una combo

ho una maschera dove c'e' una combo e due sottomaschere
la combo mi filtra la prima sottomaschera.
nella prima sottomaschera nel campo qualita' esce esempio il record "g20"
vorrei che nella seconda sottomaschera nel campo con la  combo "ordine"
quest'ultima fosse popolata solo dagli ordini che hanno creato il "g20"
questo per poter scegliere tra gli ordini del g20 e non tra tutti gli ordini
di tutti i tipi di qualita'
e' possibile?
--
vi ringrazio ciao

 ha scritto nel messaggio
news:ivO59.58124$n04.1...@twister2.libero.it...

Devi modificare il codice dell'Origine Riga della 2° COMBO, con
un'istruzione SQL in cui inserisci
una Clausola WHERE NomeCampo=Combo1
Ovviamente su Ufter_Update della COMBO1 devi mettere il REQUERY della
COMBO2.
@Alessandro.

Newsgroup: it.comp.appl.access
Titolo: #Errore

ciao a tutti
 
in una query di selezione, nonostante...
NumeroDocFo: IIf(IsError([NumeroDoc]);"";[NumeroDoc])
 
continuo ad avere #Errore
 
grazie.


risolto
il problema era causato dalla query precedente

Newsgroup: it.comp.appl.access
Titolo: tracciati record banche

quancuno di voi sa dirmi dove posso trovare i tracciati record che
dovrebbero essere unici per tutte le banche per poter emettere le 
ri.ba
 dal
mio programma su floppy da consegnare alla banca?
grazie a tutti.

 ha scritto nel messaggio
news:7BAj9.33064$Av4.6...@twister2.libero.it...

se mi scrivi in provato ti mando il file
ciao,
AEOM

 ha scritto nel messaggio
news:7BAj9.33064$Av4.6...@twister2.libero.it...

Auguri :) sono 80 e passa pagine e records a lunghezza variabile.
http://www.quercia.com/ITSite/ita/pdf/Sezione_II_-_Incassi.pdf
Ma non c'era qualcuno che aveva postato il codice già fatto sul sito comune?
Arnaldo M.
Newsgroup: it.comp.appl.access
Titolo: Pulsanti di spostamento

Buongiorno
E' possibile non visualizzare i pulsanti di spostamento di una query ?
Grazie
MArco

 ha scritto nel messaggio 
news:01ccd714-5f97-4f6a...@c22g2000prc.googlegroups.com...

Dove?
E quali sono i "...pulsanti di spostamento di una query..."?
Ciao.
-- 
Sergio MAZZA 

 Sergio MAZZA
se intendi dire la query in visualizzazione foglio dati ... direi di
no.
creati una maschera continua basata sulla query in visualizzazione
foglio dati.
e imposta visualizza pulsanti spostamento a no. otterrai il risultato
da te voluto.


Intanto grazie per la risposta e per lo sforzo nel comprendere anche
aspetti non troppo espliciti della domanda.
Intendevo proprio quello che hai capito e speravo si potesse fare.
Ciao


No, ma l'errore iniziale da evitare è usare direttamente una Query,
cosa che non si dovrebbe fare.
Usa sempre Form per interfacciarti con l'utente, poichè Access ha
definito che siano quelle le interfaccie grafiche di interazione.
@Alex
Newsgroup: it.comp.appl.access
Titolo: mostrare i prezzi fondo pagina solo nell'ultima pagina

Come faccio ad aprire un report e su formattazione dirgli che deve mostrarmi
i prezzi fondo pagina solo se quella è l'ultima pagina del documento, come
accade nelle fatture?
Grazie.

 ha scritto nel messaggio
news:bkpjo2$sqf$1...@lacerta.tiscalinet.it...

sull'evento formattazione del report metti:
if 
me.page
=me.pages then
        me.prezzo.visible=true
        else
       me.prezzo.visible=false
end if
ciao, AEOM

Newsgroup: it.comp.appl.access
Titolo: report e query

vorrei mostrare in un report soltanto i record che soddisfano ad una certa
query; ho provato a scrivere la query, controllarne il risultato (per essere
certo della sua correttezza) e metterla come origine dati delle caselle di
teso che rappresentano i campi dei record che vanno selezionati ma, quando
apro il report compare una maschera di immissione
come posso fare?
i record sono del tipo:
cognome    text
nome         text
importo      numerico
pagato       booleano
ed andrebbero filtrati nel report in base al campo pagato
grazie

apro il report compare una maschera di immissione
del tipo "Immissione valore parametro"?


esatto ...  proprio qulcosa cosi' ...

Comunemente il problema è questo:
il criterio impostato per effettuare la selezione fa riferimento a un campo
errato o inesistente al momento della esecuzione della query; controlla la
sintassi di tale criterio; poichè Access non trova il dato per effettuare la
selezione la chiede all'utente.
Cordiali saluti.
Toni

 ha scritto nel messaggio
news:S7y99.92293$n04.2...@twister2.libero.it...

hmmm, non credo possa essere cosi': la query e' una banalissima:
select * from clienti where clienti.pagato=vero
ed i record hanno il campo pagato di tipo booleano

 certo della sua correttezza) e metterla come origine dati delle caselle di
La query è origine record del report e le caselle di testo sono associate ai
campi della query caso mai, o no?
Antonio
Newsgroup: it.comp.appl.access
Titolo: pulsante chiusura finestra access

E' possibile non far vedere il pulsante di chiusura della finestra di
access?
Vorrei che l'utente abbandonasse l'applicazione soltanto tramite un pulsante
apposito.

 ha scritto nel messaggio
news:De4oc.237421$rM4.10...@news4.tin.it...

Sul sito comune hai già visto?
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:c7qjd2$28i$1...@canarie.caspur.it...

Si sergio ho visto. Mi scuso per aver postato prima di guardare.
Nella sezione general ho trovato  una funzione ma non capisco come fare a
richiamarla.
L'ho copiata in un modulo ... ma non so andare avanti.


Le istruzioni che dicono?
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:c7qknt$2nc$1...@canarie.caspur.it...

Dal sitocomune sezione general:
      Rimuovere il pulsante di chiusura (X), il menu e i pulsanti di
ridimensionamento di Access.
        AntoGal
l'autore in calce scrive:
La funzione va richiamata cosě:
LockAppWindow Screen.ActiveForm
non capisco cosa intenda. Ho provato sull'evento click di un pulsante, su
corrente della maschera, ma  non so proprio come richiamare una funzione
public.

 ha scritto nel messaggio
news:oK4oc.237719$rM4.10...@news4.tin.it...

Prova "su apertura" della form ad inserire: LockAppWindow Screen.ActiveForm
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:oK4oc.237719$rM4.10...@news4.tin.it...

Nella macro autoexec lanciare una funzione che fa quello?
Antonio

 ha scritto nel messaggio
news:X35oc.179918$Kc3.5...@twister2.libero.it...

Provato anche questo, ma purtroppo non accade niente.
Non riconosce la funzione, io ho salvato le routine direttamente in un
modulo vuoto che ho salvato con il nome della funzione.
ve lo posto anche se č disponibile sul sito comune:
Private Const GWL_STYLE = -16
Private Const WS_SYSMENU = &H80000
Private Const WS_MINIMIZEBOX = &H20000
Private Const WS_MAXIMIZEBOX = &H10000
Private Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" _
    (ByVal hwnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" _
    (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As
Long
Private Declare Function GetParent Lib "user32" (ByVal hwnd As Long) As Long
Public Sub LockAppWindow(fForm As Form)
    ModifyAppWind fForm.hwnd
    MsgBox "Ciao ciao pulsantini!"
End Sub
Private Sub ModifyAppWind(wChildWnd)
    Dim wParentWnd%
    wParentWnd = GetParent(GetParent(wChildWnd))
    Dim PrevWinStyle As Long, NewWinStyle As Long
    PrevWinStyle = GetWindowLong(wParentWnd, GWL_STYLE)
    NewWinStyle = PrevWinStyle And Not WS_SYSMENU And _
       Not WS_MINIMIZEBOX And _
       Not WS_MAXIMIZEBOX
    PrevWinStyle = SetWindowLong(wParentWnd, GWL_STYLE, NewWinStyle)
End Sub
'La funzione va richiamata cosě:'LockAppWindow Screen.ActiveForm

ciroteo ha scritto:





Sul Sito Comune esiste anche l'esempio di Alessandro Baraldi
"AccessBtnControl.mdb" che penso ti sia utile.
--
rgrds
SC
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


thanks vado a vederlo!