mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Back end su server remoto - velocità ridotta.

Le mie applicazioni hanno finora girato in locale.
Al massimo appoggiando il BE su server in LAN, e funzionava tutto bene.
La mia azienda ha una WAN, ed ho provato ad appoggiare il BE su server 
remoto.
Questo sarebbe necessario per poter condividere le tabelle da vari uffici 
sparsi per l'Italia.
Un disastro ... occorrono circa 3 minuti per aprire una maschera.
Avevo già letto altri messaggi analoghi, sapevo di questo problema del 
traffico di rete provocato da Access, ma pensavo fosse una cosa che 
rallentava ma comunque in termini accettabili, invece nel mio caso non è 
davvero accettabile.
Probabilmente le mie tabelle non sono normalizzate come dovrebbero, ma credo 
che gran parte del problema stia nella ridotta banda tra BE e FE.
Esiste un sistema (semplice) per migliorare le prestazioni ?
Anche qualcosa di poco ortodosso, tipo lavorare con il BE in locale e 
sincronizzare le tabelle in tempi successivi, possibilmente in modo 
trasparente per l'operatore.
Non è un applicativo cui accedono molti utenti e l'aggiornamento in tempo 
reale dei record sarebbe importante ... ma a questo punto non vedo 
alternative.
Aiuto ! :-)
Rick

 Aiuto ! :-)
Esiste un sistema che risolve senza riscrivere nulla: piuttosto utilizzato.
Configurare un Terminal Server.
Saluti.

 Configurare un Terminal Server.
Temo di non poterlo fare. Non ho la gestione del server, solo una cartella 
dove appoggiare i miei dati.
Rick
Newsgroup: it.comp.appl.access
Titolo: Puntare un record (se esistente) in un recordset

Ciao a tutti e buon anno.
Ho un piccolo problema relativo al codice VBA.
Costruisco un RecordSet:
rs as Dao.RecordSet
Set rs = CurrentDb.OpenRecordset("SELECT * FROM MiaTabella")
A seconda che un determinato record esista, devo aggiornarlo o aggiungerne
uno nuovo.
Ho fatto cosě:
Dim intConteggio As Integer
intConteggio = DCount("*", MiaTabella, "[IDUnivoco] = " & Me.CampoMaschera)
Adesso:
1) Se inConteggio = 0 non ci sono problemi:
With rs
.AddNew
!Cognome = strUtenteCognome
!Nome = strUtenteNome
!Protocollo = Me.Protocollo
.Update
.Bookmark = .LastModified
End With
2) Se intConteggio > 0 dovrei "puntare" il record esistente (sulla base del
campo IDUnivoco) e poterlo aggiornare.
Come faccio a "puntare" il record che voglio aggiornare?
Ciao ciao.

 Ciao ciao.
Non capisco perchč una volta aperto il Recordset non
usi il metodo FindFirst e gestisci l'eventuale errore
con la proprietą NoMatch...?
Tra le altre cose FindFirst sposta gią il puntatore.
Vedi l'help per chiarimenti, trovi anche un esempio.
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Come faccio a "puntare" il record che voglio aggiornare?
In alternativa a quanto suggerito da Alessandro, potresti filtrare il
recordset all'origine in base ai criteri che ti interessano, ottenendo un
recordset di un solo record (quello che ti interessa) ed evitando di tirarti
dietro tutta la tabella nonchè di dover usare i vari seek, find e compagnia.
Ad es.
Set rs = CurrentDb.OpenRecordset("select * from MiaTabella where
miatabella.idunivoco = " & Me.CampoMaschera)
Per poi testare la proprietà Bof (o Eof) del recordset per sapere se il
record esiste già oppure no:
if rs.Bof = False  Then ' il record esiste
   rs.edit
    ...ecc.
   rs.Update
else  ' il record non esiste
    rs.addnew
    ... ecc.
    rs.update
End If
--
Ciao
Galliano.
Newsgroup: it.comp.appl.access
Titolo: Criterio in query

Buonasera, da qualche giorno mi sto arrovellando invano per risolvere un 
problema.
 
Ho le tabelle macchine e fatture.
Per ogni macchina, ogni anno è stata emessa una fattura con il relativo 
campo se pagata o meno.
 
Ora io vorrei una query nella quale per ogni macchina venisse fuori un 
campo con l'indicazione se tutte le fatture sono pagate o meno.
 
Sono riuscito a fare questo con il raggruppamento ma questo mi impedisce 
di avere una query aggiornabile con nuovi record.
 
Mi potete dare una mano?
 
Grazie
Gianni

 Gianni


 
Grazie
Gianni
 

giannirusso wrote :

Sono sempre tormentato dal dubbio d'essermi spiegato male
o di trovarmi invece di fronte a uno che proprio non capisce.
 
Comunque se non dici quali aggiornamenti vuoi fare,
io non so risponderti.
 
Bruno

...
 
Incolla l'enunciato SQL della query di raggruppamento.
 
-- 
Ciao
Karl
*********
http://www.AccessDevCon.com
 
Access FAQ: 
http://www.donkarl.com/it
 
 
 
 


 
Ho fatto un piccolo database di esempio con tre tabelle Macchine, 
Verifiche, Fatture.
Le relazioni sono uno a molti tra macchine e verifiche e uno a molti fra 
fatture e verifiche, con integrità referenziale.
 
Il codice SQL è:
 
SELECT TblMacchine.IdMacchina, Max(TblFatture.pagata) AS MaxDipagata
FROM TblMacchine INNER JOIN (TblFatture INNER JOIN TblVerifiche ON 
TblFatture.IdFattura = TblVerifiche.IdFattura) ON TblMacchine.IdMacchina 
= TblVerifiche.IdMacchina
GROUP BY TblMacchine.IdMacchina;
 
Ottengo così quello che mi serve, ossia un controllo se ogni macchina ha 
tutte le fatture pagate o meno. Però non è una query aggiornabile, non 
posso modificare i campi né aggiungere record.
 
Grazie per la pazienza
Gianni

Newsgroup: it.comp.appl.access
Titolo: problema installazione

salve a tutti. ho installato windows me e ora quando inserisco il cd di
office il sistema operativo lo legge come cd di windows 95 e mi dice che non
è possibile effetuare l'installazione. come faccio ad installare access 97?

 ha scritto nel messaggio
news:RhA66.5042$eB2.9...@news.infostrada.it...

Puoi provare con
Start / Esegui /
d:setup.exe
dove d: è la lettera associata al lettore cdrom
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access
Newsgroup: it.comp.appl.access
Titolo: Cancellare da maschera continua

Come si può ottenere il calore del controllo corrente (quello all'interno
del quale sono posizionato col cursore) per inserirlo in una msgbox, essendo
la maschera continua?
E il comando standard per eliminare tale record funzionerebbe?



calore?
Saluti.
Emanuele.

 wrote in message
news:9xU28.25493$tl3.8...@twister2.libero.it...

Scusa...????
Proprio non capisco....!
MMMMMMM.....!!
Alessandro.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG



direttamente dall'Help
Dim ctlCurrentControl As Control
Dim strControlName As String
Set ctlCurrentControl = Screen.ActiveControl
strControlName = ctlCurrentControl.Name
Saluti.
Emanuele.

 ha scritto nel messaggio
news:61lt4u8u7q8racpqo...@4ax.com...

Grazie non mi è capitato sotto gli occhi....

 ha scritto nel messaggio
news:61lt4u8u7q8racpqo...@4ax.com...

Beh era il valore ovviamente.. Grazie!
Newsgroup: it.comp.appl.access
Titolo: Stampa report - Perchè ricorda una stampante che io non voglio ?

Un problema scemo, mi sta rincretinendo.
La spampa di un report non va sulla stampante predefinita del pc ma su
una vecchia stampante provvisoria e fuori uso, selezionata una volta
per sbaglio e che non riesco più a eliminare.
Qualcuno sa dove potrebbe essere l'impostazione da modificare ?
 
grazie infinite-


Non riveli quale versione di Access usi e cosa hai già provato.
Controlla quale stampente è impostata nella voce di menù o ribbon
File - Imposta Pagina. Non puoi cambiarla in questo dialogo?
 
-- 
Ciao
Karl
*********
Access FAQ: 
http://www.donkarl.com/it
 
 
 

 ha scritto nel messaggio 
news:9j502t...@mid.individual.net...

Avevo lo stesso problema, alcni report non erano 'nati' con la stampante 
predefinita in mente
Per essere sicuro che tutti i report usassero la stessa stampante ho scritto 
un ciclo di questo tipo
 
For count = 0 To Application.CurrentProject.AllReports.count - 1
    DoCmd.OpenReport 
ReportName:=Application.CurrentProject.AllReports(count).name, 
View:=acViewDesign, windowmode:=acHidden
    Reports(Application.CurrentProject.AllReports(count).name).UseDefaultPrinter 
= False
    Reports(Application.CurrentProject.AllReports(count).name).Printer = 
Application.Printers(stampante)
    DoCmd.Close objecttype:=acReport, 
objectname:=Application.CurrentProject.AllReports(count).name, 
Save:=acSaveYes
    Next count
 
Chiaramente su 'stampante' devi metterci il nome della stampante che 
desideri
Ovviamente se vuoi settare la stampante predefinita per ogni report il ciclo 
e' ancora piu' breve
Credo non funzioni su mde per via della modifica report
RobertoA 
 
 

 - Mostra testo citato -
 
grazie infinite a entrambi per l'aiuto sono riuscito a risolvere e
soprattutto a capire il motivo.
Il menu file / imposta pagina / pagina della barra strumenti consente
di selezionare la stamapnte relativa a quello che ho in uso.
Quindi se sto visualizzando un report la memorizzo per quel report, se
sono su una maschera la assegno a quella maschera e via dicendo....
grazie infinite.
 
una curiosità per la mia ignoranza-
Il ciclo che mi avete consigliato for count / next count dove lo posso
inserire, o meglio come lo posso utilizzare ?
Su una macro, su un evento o su qualcos'altro ? mi manca qualche
pezzo....su dove lo potrei scrivere.
grazie

Newsgroup: it.comp.appl.access
Titolo: documentazione ADOX

ciao a tutti.
sto cercando una documentazione "seria" su ADOX.
quel che ho trovato sul sito di microsoft č davvero poca poca roba...
avete qualche suggerimento?
ciao!
spintop

 avete qualche suggerimento?
e questo ti sembra poca roba?
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/ado270/htm/adoddlo1.asp
Newsgroup: it.comp.appl.access
Titolo: Trasformazione del puntatore

Vorrei sapere se è possibile trasformare il puntatore da "freccia" a 
"manina", come se si trattasse di un controllo ipertestuale, allorchè si 
passa su una etichetta, per indicare che è cliccabile (con una routine 
evento successiva su click).
Grazie!!!!!!!!!!! 

 ha scritto nel messaggio 
news:mzoPf.23710$A83.6...@twister1.libero.it...

Prova a dare un'occhiata qui:
http://groups.google.it/group/it.comp.appl.access/search?group=it.comp.appl.access&q=puntatore+mouse&qt_g=1&searchnow=Ricerca+in+questo+gruppo
 

http://www.mantuanet.it/alessandro.baraldi/
Sezione [API]
1.11 Cambio Cursore
@Alex

 ha scritto nel messaggio
news:440ec5d7$0$36936$4faf...@reader3.news.tin.it...

ma che fulmine!!!!!
ciao andrea!!!!
a stasera
nik

 ciao andrea!!!!
Leonardo è malato, se vuoi ci vediamo comunque.
Birra pizza e sql?
Saluti Andrea 

Copia il file .ico o .cur che desideri nella stessa cartella dove hai il DB. Poi crea un modulo contenente questo codice:
Option Compare Database
 Option Explicit
 Declare Function LoadCursorFromFile Lib "user32" Alias _
   "LoadCursorFromFileA" (ByVal lpFileName As String) As Long
 Declare Function SetCursor Lib "user32" _
   (ByVal hCursor As Long) As Long
 Public Function PointM(strPathToCursor As String)
   Dim lngRet As Long
   lngRet = LoadCursorFromFile(strPathToCursor)
   lngRet = SetCursor(lngRet)
 End Function
 Public Function Cursore(Immagine As String)
 Dim MioCursore As String
 MioCursore = Left(CurrentDb.Name, Len(CurrentDb.Name) - _
 Len(Dir(CurrentDb.Name))) & Immagine
 Call PointM(MioCursore)
 End Function
In ultimo sulla proprietą della etichetta "Su mouse spostato" scrivi questo:
=Cursore("NOMETUOFILE.ICO")
Attenzione non devi creare un evento ma devi proprio scrivere quella frase come proprieta su mouse spostato.
Ciao
-- 
alex78red 
------------------------------------------------------------------------
View this thread: 
http://www.itsistemi.net/viewtopic-789334.html
Inviato via 
http://www.itsistemi.net
Newsgroup: it.comp.appl.access
Titolo: Gif animata su maschera access2003

Salve a tutti,
come posso procedere per inserire una gif animata in una maschera di
Acc2003? Ho provato di tutto dalle Immagini agli Oggetti ai Controlli
ActiveX, senza risultato, l'immagine si vede ma non si muove.
Grazie, saluti
Danilo


mettici un webcontrol
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access

 wrote:

Scusa la mia ignoranza, non conosco bene Access, parli di
Micro,Web,Browser?
Non trovo altri controlli simili, se non fosse quello mi dai una
traccia dove trovarlo?
Grazie.
Danilo

d.fili...@tin.it
 ha scritto:

Microsoft Internet Controls aka shdocvw.dll-->WebBrowser
--
ac

 ha scritto nel messaggio 
news:1afcfdb7-1529-44c7...@56g2000hsm.googlegroups.com...

Oltre a quello che ti hanno consigliato potresti inserire un controllo 
Microsoft Animation Control 6.0 o 5.0 però i file devono essere avi.
Qui trovi delle spiegazioni:
http://support.microsoft.com/kb/209919
Personalmente preferisco questa soluzione.
Per convertire da GIF a AVI potresti usare questo tool gratuito:
http://www.soft32.com/download_19811.html
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: evento setfocus errato

ho due controlli A e B quando esco da A controllo se B e' diverso da 5555
nel caso sia diverso annullo il valore di a e mi riposiziono su B con
setfocus per modificarlo....solo che mi da errore ...come mai?
mex errore: e' necessario salvare il campo prima di andare sul controllo)
grazie
Private Sub ABeforeUpdate(Cancel As Integer)
If Not (IsNull(Me![A]Then
    If Me![B] <> "55555" Then
       MsgBox "errore vai al campo B blablabla"
       Me!A.Undo
       Cancel = True
        me!B.SetFocus
       Exit Sub
     End If
 End If
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

        Cancel = True
prova a togliere cancel.
Sib

 ha scritto nel messaggio
cut
Ricominciamo coi 2 minuti!
Sib


Ah Sib, č colpa mia se ti leggi le mie risposte e poi fai il "Bellillo"???


 prova a togliere cancel.
non cambia nulla :-(


 MAssimiliano
Si', si'....
secondo me ti sei messo l'orologio avanti...
Sib

 If me.A <> "" then
non e' che mi cambi molto...


 End If


 non cambia nulla :-(
hai ragione, scusa.
il messaggio compare perche' durante il salvtaggio di un campo non si puo'
spostare il focus su un altro controllo (NB non ho sbagliato i termini, il
primo e' proprio un campo e il secondo un controllo)
Usa l'evento su uscita con le stesse condizioni per spostare il focus
sull'altro controllo.
Sib

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

 Sib
ma io l'annullo il salvataggio...comunque a quale evento uscita ti
riferisci
lostfocus?


 lostfocus?
Proprio all'evento Uscita del controllo A
Sib

 Cancel = True
 
  flag= vero
in questo pezzo di codice dovrei aggiunger un flag
che testero' poi 
nella privatesub exit campoA
if flag = true then campob.setfocus
giusto? devo per forza usare un flag mi sembra...



No, puoi usare le stesse condizioni della sub precedente.
Sib
Newsgroup: it.comp.appl.access
Titolo: Come fare per richiamare una Funzione/Sub agendo dall'esterno?

Supponiamo di avere il classico sistema ristorazione, palmari ai 
camerieri, pc centrale, stampantine
I palmari per comunicare con la postazione centrale usano il wifi e 
sparano a postazione centrale delle informazioni come sequenze di 
comandi post su protocollo http
Sul pc c'e' un mini webserver che accetta le richieste e puo' fare cose 
in funzione del comando ricevuto
Sul pc e' costantemente acceso programma Access, supponiamo sia 
disponibile solamente la form frmMain che visualizza lo stato tavoli
La form frmMain e' sempre accesa
La gran parte delle funzioni e' all'interno di un modulo modGenerale
Dentro modGenerale c'e una funzione
RiceviComando(byval comando as string)as string
che accetta parametri e restituisce una stringa con informazioni
 
La domanda e': come fare per far eseguire la funzione RiceviComando 
quando il webserver riceve da palmare?
Una specie di quello che avviene se, da ambiente sviluppo, avvio la form 
frmMain e poi nella finestra Immediate digito a mano
?RiceviComando("stampa conto 10")
(ovviamente codice web server e consolle pc sono disponibili)
 
Per ultimo, per il programma chiamante in questo caso il webserver e' 
possibile avere la risposta dalla funzione chiamata?

Parli di WebServer o di WebService...?
Lo scenario in relazione al reale riferimento cambia molto, sinceramente il primo(webserver) mi lascia perplesso.
 
In caso di WebService, si usava la connessione con SOAP:
https://www.brainbell.com/tutorials/ms-office/excel/Access_SOAP_Web_Services_From_Excel.htm
 
https://social.msdn.microsoft.com/Forums/office/en-US/5805cf08-97a6-4e17-b3a7-1649daeda829/access-soap-web-service-in-ms-access-2010?forum=accessdev
 
 
, oppure questi esempi:
https://stackoverflow.com/questions/15644254/connect-to-web-service-in-ms-access-with-vba
 
 
@Alex


Ho scritto web server per far capire il tipo di programma, apre un 
socket tcp su una certa porta e rimane in ascolto dei comandi inviati 
dai terminalini, un qualcosa di simile ai millemila esempi che si 
trovano cercando 'socket server c#'
I palmari mandano una roba del tipo
 
http://ip_webserver:porta_webserver/comando=stampa_conto;tavolo=10;
 
che il webserver riceve, estrae il comando, memorizza sul db, risponde 
per conferma ricezione al palmare, poi deve fare qualcosa per far 
eseguire il comando
E 'sto qualcosa e' avviare un pezzo di codice dentro il programma 
consolle principale, che aggiornera' la visualizzazione a video
Attualmente uso uno script vbs qualche linea di codice come da ultimo 
esempio a questo link
 
https://stackoverflow.com/questions/58588935/it-is-possible-to-call-ms-access-function-from-outside
 
 
e gia' funziona, ma 'sbampola' troppo anche se metto quel 
objAccess.visible=false
 
Dovrebbe essere un'operazione invisibile agli occhi operatore, 
altrimenti ogni volta che arriva un comando dal campo c'e' sto flash che 
non e' niente piacevole
In sostanza l'obiettivo vuol essere avviare in esecuzione una 
funzione/sub di un programma Access, operando da programma esterno
Newsgroup: it.comp.appl.access
Titolo: Casella Combinata





Ciao a tutti,


 


mi stavo chiedendo se fosse possibile che, su un 
form una casella combinata con un certo set di records possa scrivere 2 valori 
di riferimento diversi (origine del controllo) su due campi della tabella 
di appoggio?


 


Fabio



 ha 
  scritto nel messaggio 
news:44283c27$0$13582$5402...@news.sunrise.ch
...


Newsgroup: it.comp.appl.access
Titolo: Modifica colore caselle di testo su attivazione

Ciao a tutti, sto sviluppando un db per l'inserimento di dati ed ho
creato una maschera di inserimento dove la casella di testo attiva si
colora diversamente per aiutare l'operatore durante l'inserimento.
tutto funziona ma per fare che il colore della casella cambi ho dovuto
inserire in "ogni casella" del codice con l'evento attivazione, E'
possibile fare in modo che questo accada in tutte le caselle di testo
creando una sola routine senza dover per forza inserire del codice per
ogni casella di testo? ciao e grazie in anticipo

 ha scritto nel messaggio 
news:d17aff0d-cbd6-48fa...@r15g2000prh.googlegroups.com...

la cosa più semplice è impostare il colore di sfondo delle textbox e poi 
settare lo stile sfondo a "trasparente".
ciao e grazie in anticipo
-- 
Ciao
Geppo


[risposta]
il mio  è il classico esempio di come ci si possa complicare la vita
andando a cercare soluzioni cervellotiche invece di andare a ricercare
nella guida di access o in post precedenti le piu' elementari nozioni
di sviluppo. che dirti geppe? grazie, e ciao

 di sviluppo. che dirti geppe? grazie, e ciao
opss.... geppo e non geppe
ciao ciao

sergiofanti@hotmail,it ha scritto:

Puoi ottenere l'effetto che cerchi utilizzando la formattazione condizionale, mettendo l'effetto desiderato su "controllo attivo"
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it

 ha scritto nel messaggio 
news:d17aff0d-cbd6-48fa...@r15g2000prh.googlegroups.com...

Certo che si può!
In un modulo inserisci
Function FOCUS()
   On Error Resume Next
   Screen.ActiveControl.BACKCOLOR = 65535
End Function
Function RemoveFocus()
   On Error Resume Next
   Screen.PreviousControl.BACKCOLOR = 16777215
End Function
Poi nell'evento Su Attivazione del controllo metti
=Focus()
nell'evento Su Disattivato
=RemoveFocus()
Ciao
-- 
Roberto da Parma 

 Roberto da Parma
[risposta]
scusatemi il ritardo ma ero impegnatissimo con il lavoro. ho provato
tutte le soluzioni ma l'ultima, quella di roberto da parma, è quella
che proprio mi serviva. grazie tanto e ciao
Newsgroup: it.comp.appl.access
Titolo: Ricerca Record

Mi dite come devo fare per creare un bottone di ricerca, che non sia quello
standard di Access?
In particolare, io vorrei fare una ricerca inserendo un nome o un numero o
una parte di essi senza che si apra la finestra clsassica della ricerca di
MS Access, questo perkè alcune volte la ricerca statndard fallisce li dove
non dovrebbe fallire, dicendomi che non sono presenti alcuni record, quando
io sono sicuro di averli scritti correttamente sia nel db che nel campo
ricerca. Cè quindi un modo per creare questo? Mi andrebbe bene anche del
codice, in modo da assegnarlo come macro, ad un bottone. Grazie a tutti.
Ciao. Linux.


aldila' del problema di creare il bottone di ricerca,
non mi risulta che la ricerca standard fallisca e se
fallisce e', come qualche volta mi e' successo,  
dovuto alle opzioni che ci sono;
i.e. ricerca su quale campo e se per campo intero, inizio o
parte. "Sometimes" puo' avvenire sui cbx, se la memoria
non mi tradisce, quando la prima colonna e' non visibile
(non ho sottomano un cbx di tal tipo per ricontrollare la cosa)
Che ci fa un Linux con access? Fedifrago! ;<)
--
a.cara

 Ciao. Linux.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: evitare ripetizioni nel codice

ciao a tutti
 
Vorrei ottimizzare questo codice
evitando ripetizioni
 
Dim Risposta As Variant
Risposta = vbYes
 
If Aperta("M_ConfermaCarichi") Then
If Forms("M_ConfermaCarichi")!LstEstremiFatture.Column(2) <> "Non Fatturato" Then
 
MsgBox "Non puoi fare modifiche perchè il Carico l'hai già fatturato!!!", vbExclamation, "Attenzione!!!"
Me.Undo
 
ElseIf Forms("M_ConfermaCarichi")!LstEstremiFatture.Column(4) <> "Fattura Fornitore da ricevere" Then
 
Risposta = MsgBox("ATTENZIONE: Il Fornitore ha già fatturato il Carico!!!, vuoi annullare la modifica ?", vbYesNo)
 
If (Risposta = vbYes) Then
Me.Undo
 
End If  
End If
 
Else
 
If Me.Parent!SM_EstremiFatture.Form!Fatturato <> "Non Fatturato" Then
MsgBox "Non puoi fare modifiche perchè il Carico l'hai già fatturato!!!", vbExclamation, "Attenzione!!!"
Me.Undo
 
ElseIf Me.Parent!SM_EstremiFatture.Form!FattFo <> "Fattura Fornitore da ricevere" Then
 
Risposta = MsgBox("ATTENZIONE: Il Fornitore ha già fatturato il Carico!!!, vuoi annullare la modifica ?", vbYesNo)
 
If (Risposta = vbYes) Then
Me.Undo
 
End If    
End If
 
 
Grazie

Non abbiamo la sfera... hai scritto 2 righe... devi dare indicazioni TECNICHE precise.
 
In tutti i casi non è buona abitudine scrivere CODICE di controllo ESTERNO alle maschere se poi quello che è da controllare è dentro...!
 
Ogni MASCHERA deve avere una completa funzionalità e possibilmente INDIPENDENZA... al fine di essere flessibile e non sparpagliare codice di VALIDAZIONE in giro per il tuo applicativo.
 
@Alex


ciao Alex
 
ho 2 maschere con la medesima sottomaschera
e in prima di aggiornare della sottomaschera
ho inserito il codice precedentemente postato.
 
E' forse bene creare una copia della sottomaschera?
 
grazie
 

Direi di no Franco, la SottoMaschera dovrà contenere SOLO quello che riguarda la SOTTOMASCHERA... poi la MASCHERA(le maschere) che la contiene avrà il codice per gestire gli scambi di controlli.
 
@Alex

 @Alex
 
grazie Alex
 
cmq non trovando altra soluzione che
scrivere codice di controllo esterno
l'ho sintetizzato in questo modo
 
If Aperta("M_ConfermaCarichi") Then
If Forms("M_ConfermaCarichi")!LstEstremiFatture.Column(2) <> "Non Fatturato" Then
GoTo pos1
 
ElseIf Forms("M_ConfermaCarichi")!LstEstremiFatture.Column(4) <> "Fattura Fornitore da ricevere" Then
GoTo pos2
 
End If
 
Else
 
If Me.Parent!SM_EstremiFatture.Form!Fatturato <> "Non Fatturato" Then
pos1:
MsgBox "Non puoi fare modifiche perchè il Carico l'hai già fatturato!!!", vbExclamation, "Attenzione!!!"
Me.Undo
 
ElseIf Me.Parent!SM_EstremiFatture.Form!FattFo <> "Fattura Fornitore da ricevere" Then
pos2:
Dim Risposta As Variant
Risposta = vbYes
 
Risposta = MsgBox("ATTENZIONE: Il Fornitore ha già fatturato il Carico!!!, vuoi annullare la modifica ?", vbYesNo)
 
If (Risposta = vbYes) Then
Me.Undo
 
End If
 
End If
 
End If
Newsgroup: it.comp.appl.access
Titolo: una domanda su costruzione maschere e report

mi capita spesso durante la costruzione di maschere e report di dover
inserire oggetti, linee,testo e quant'altro molto piccoli e ho sentito in
questi casi la mancanza di un ingrandimento della visualizzazione per un
posizionamento di precisione.
La mia domanda è questa: sono io che non lo conosco o access non prevede
l'ingrandimento della visualizzazione durante la costruzione delle
maschere e report?
grazie
luigi
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 luigi
La seconda che hai detto
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

MA ha scritto:

Sicuramente non è previsto l'ingrandimento ma nessuno ti vieta di
utilizzare la sezione "formato" delle proprietà del controllo ed
inserire i valori numerici per il posizionamento (Sinistra, Da margine
superiore ecc)... più preciso di così!
Con la selezione multipla diventa più immediato fare allineamenti di
più controlli: resta comunque un lavoraccio ma che alla fine secondo
me paga per la chiarezza che ottieni.
Bye
Beppe

 ha scritto nel messaggio 
news:1139473091.7...@g14g2000cwa.googlegroups.com...
MA ha scritto:


Bye
Beppe
Aggiungo che se vai sulle proprietà della maschera alla voce
X griglia e  Y griglia se setti a 64 il valore di entrambi vedrai
che potrai spotare i controlli con più precisione.
Morgan

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

> luigi


 La seconda che hai detto
peccato!  mi meraviglio che non l'hanno inserita! dopo tutte queste
revisioni!.
Possibile che a nessuno serva?
pazienza


 pazienza
Per essere preciso io uso selezioanre e scriverci il numero nella proprietą
che mi serve


 Info:  
www.donkarl.com/it
-- 


Newsgroup: it.comp.appl.access
Titolo: Modifica attributi campo da codice

Ciao boys!
Dovrei via codice modificare la lunghezza di un campo contenuto in una
tabella di un BE dal FE
Is it possible?
Grazie
AEOM

tabella di un BE dal FE
Non si puo'.
Quello che puoi fare e' creare un nuovo campo, eliminare il
vecchio e rinominarlo dopo aver trasferito i dati.
Vedi l'help su alter table, oppure su field, size, ecc.
Se non ricordo male sul sc ci dovrebbe essere una funza che
fa tutto lei...
--
Lorenzo Coronati
--
<<Ragazzi, sapete indicarmi una utility in 
internet che sia in grado di recuperare le 
password da un database access e da un system mdw?
intendevo, gratuita...>>
(Marco Tullio Bisoli, 27/04/2001)
--
Newsgroup: it.comp.appl.access
Titolo: Come togliere la parte inferiore e sinistra di uma maschera

in una maschera vorrei non visualizzare la parte inferiore, 
(quella con indicato Record: ed i tasti per avanzare ecc.)
e non vorei visualizzare la parte sinistra, (quella con il simbolo
di freccia e la riga nera verticale.
qualcuno sa come fare?
grazie
ciao
calimero

 ha scritto nel messaggio
news:1o4bud53aworx$.zxf9t9zdm7nl$.dlg@40tude.net...

Ciao Calimero,
Proprietą della maschera
    Selettori Record = No
    Pulsanti di spostamento = No
Ciao
Cinzia

Newsgroup: it.comp.appl.access
Titolo: nome controllo

Ciao a tutti,
 
ho una maschera con una casella combinata"aaaa" nella quale scelgo da un elenco valori "pippo" 
ora vorrei che nell aprire il report "prova" vorrei che il controllo "pippo" fosse visibile mentre "pluto" non visibile.
 
non riesco a trovare la sintassi giusta x fare riferimento all' oggetto giusto!!
grazie a chi mi può dare una mano



grazie a chi mi pu� dare una mano
 
La condizione di visibilit� dei controlli pippo e pluto � fissa oppure
dipende da come � valorizzata la combo nella maschera?
Se s�, il report pu� essere aperto solo quando gi� la naschera �
aperta oppure anche in altri casi?
Alberto S
 
---
Questa e-mail � priva di virus e malware perch� � attiva la protezione avast! Antivirus.
http://www.avast.com
 
 

Allora, se io nella form scelgo pluto, quando apro il report, pluto dovrà essere visibile, mentre pippo dovrà restare invisibile.
il report lo apro solo da questa maschera.
 
ho risposto a tutto??
(Penso che il mio problema sia nella sintassi dell, oggetto)

 oggetto giusto!!
 
Anche dopo la tua risposta ad Alberto non � chiaro se parli di
una situazione fissa ma se supponiamo di s�:
 
Nel report imposta tutti controlli a visibile e scrivi una riga nel codice
dell'evento "Avvio" del report:
 
If Forms!NomeMaschera!aaaa = "pippo" Then Me!pluto.Visible = False
 
Se non funziona scrivi dove e come esattamente e riporta i nomi veri
degli oggetti e valori che usi.
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

Grazie Karl, risolto!
dove posso imparare la corretta dicitura degli oggetti?
 
grazie
Newsgroup: it.comp.appl.access
Titolo: Creazione bookmark

Salve ;)
Volevo sapere se è possibile creare dei bookmark su un foglio word
direttamente da access e se si possono anche posizionare all'interno
del documento word!
Mi sapete dare qualche dritta?
Un indizio da dove partire? ;)
Grazie!
Lau

Lau ha scritto:

A memoria non ricordo come si fà, ma prova a sfruttare un metodo
semplicissimo quanto efficace...!
Attiva la registrazione MACRO in WORD, creati un Bookmark manualmente,
STOPPA
la registrazione Macro e vai a vedere il codice VBA che è stato
scritto...!
Quello lo puoi usare da Access direttamente...!
@Alex

Alessandro Baraldi ha scritto:

Grazie mille! :)
Ho fatto la macro ora provo a mettere il codice in access x vedere che
mi combina :D

Lau ha scritto:

A quanto pare funziona :)
Ho messo così:
    Doc.Activate
    'Mi crea il nuovo Bookmark Test
    Doc.Bookmarks.Add Range:=Selection.Range, Name:="Test"
    'Lo seleziona
    Doc.Bookmarks("Test").Select
    'Scrive li ciao mondo :P
    Wrd.Selection.TypeText ("Ciao mondo")
Ora cerco di posizionarlo in giro per il foglio word :D

Newsgroup: it.comp.appl.access
Titolo: Numeri e Numeri

Ciao a tutti, come faccio in una maschera a verificare che un utente mi
compili un campo di tipo testo con soli numeri ????
Grazie a tutti



Conosci l'istruzione  
Numeric,


Vai a vedere l'Help.


Ciao


Ragazzi impariamo ad usare un pò anche l'help.


 

Marcolino ha scritto:




Utilizzando la proprietà "Maschera di input" di quel controllo
Roberto

 - rimuovi XXX x rispondere    ICQ #8814554
Worf: Tu devi lasciarle vedere il fuoco nei tuoi occhi...
Geordi: Ma cosa dovrei dirle?
Worf: Le parole vengono dopo.
...
Worf: Ho molto da insegnarti sulle donne!
		-- "Transfigurations", data astrale 43957.2
Newsgroup: it.comp.appl.access
Titolo: nuovo ordine con stesso cliente precedentemente inserito nella combo

buon anno a tutti!
 
nella maschera "M_Ordine" ho una combo dove posso selezionare i nomi dei 
vari clienti.
Ora vorrei che da pulsante una volta selezionato un cliente (nella 
combo"CboCliente")si aprisse
la maschera "M_Aggiungi_Ordine" (strutturata in questo modo:
IdOrdine, DataOrdine, Cliente.) in un nuovo ordine con il cliente 
(precedentemente inserito nella combo)già inserito.
 
questo è l'sql della query nella maschera "M_Aggiungi_Ordine"
SELECT TbOrdine.IDOrdine, TbOrdine.DataOrdine, TbClienti.Ragione_Sociale, 
TbClienti.Indirizzo, TbClienti.CAP, TbClienti.Citta, TbClienti.IdCliente
FROM TbClienti LEFT JOIN TbOrdine ON TbClienti.IdCliente = 
TbOrdine.IDCliente
WHERE (((TbClienti.IdCliente)=[Forms]![M_Ordine]![CboCliente]))
ORDER BY TbOrdine.DataOrdine;
 
grazie 
 
 


ho trovato la soluzione
    DoCmd.OpenForm "M_Aggiungi_Ordine", acNormal, "", 
"[Forms]![M_Aggiungi_Ordine]![IdCliente]", acAdd, acNormal
    Forms!M_Aggiungi_Ordine!IDCLIENTE = Me!CboCliente_1.Column(0) 
 
 

    Forms!M_Aggiungi_Ordine!IDCLIENTE = Me!CboCliente_1.Column(0)
 
Se capisco bene fai alcune cose superflue qui e basta:
 
DoCmd.OpenForm "M_Aggiungi_Ordine", , , , acFormAdd
Forms!M_Aggiungi_Ordine!IDCLIENTE = Me!CboCliente
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 ha scritto nel messaggio 
news:9m9358...@mid.individual.net...

grazie
cosi' va meglio! 
 
 

 ha scritto nel messaggio 
news:4f007769$0$1390$4faf...@reader1.news.tin.it...

e se volessi fare in modo che aprendo la maschera "M_Aggiungi_Ordine"
il nuovo record si crei solo nel momento in cui inserisco la data?
 
 
 
 


nella prima fase, su clic di un pulsante nella maschera "M_Ordine" ho
    DoCmd.OpenForm "M_Aggiungi_Ordine", , , , acFormAdd
 
poi su doppio clic del controllo "Dataordine" della Maschera 
"M_Aggiungi_Ordine" ho inserito
 
 If Me!DataOrdine = Date Then
     DoCmd.GoToRecord , , acNewRec, acFormAdd
     Forms!M_Aggiungi_Ordine!IDCLIENTE = Forms!M_Ordine!CboCliente
 End If
 
ma non ottengo cio'che vorrei
cio� lo stesso idCliente che ho nella CboCliente della maschera "M_Ordine"
nell'IdCliente della Maschera "M_Aggiungi_Ordine" 
 
 

 nell'IdCliente della Maschera "M_Aggiungi_Ordine"
 
risolto semplicemente cosi'
nella Maschera "M_Aggiungi_Ordine"
 
Private Sub DataOrdine_DblClick(Cancel As Integer)
    Me!DataOrdine = Date
 
    If IsNull(Me!NumeroOrdineVendita) Then
        Me!NumeroOrdineVendita = Nz(DMax("[NumeroOrdineVendita]", 
"[TbOrdine]"), 0) + 1
    End If
 
    Me!IDCLIENTE = Forms!M_Ordine!CboCliente
End Sub
Newsgroup: it.comp.appl.access
Titolo: File System

Ho una sub che crea un collegamento ad un file di excel e mi importa in
alcune tabelle i valori contenuti nelle celle.
Ho perņ uno svariato numero di file tutti identici da importare e mi
chiedevo come poter entrare, tramite il file system  object, dentro la
cartella dove sono contenuti i file ed elaborarli in automatico.
Si puņ fare?
Grazie in anticipo per l'aiuto!!
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Puoi usare la libreria Microsoft Scripting Runtime.
Per il suo utilizzo, vedi il seguente link di MSDN
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/94e39f9a-c7bf-42be-ae71-5768f034e070.asp
Non ho mai provato, ma dovrebbe funzionare il costrutto For Each...Next per analizzare ogni file 
dentro ad una folder.
Michele

Newsgroup: it.comp.appl.access
Titolo: Aiuto per Messaggio da query

Ho necessità di eliminare il messaggio che durante la query di creazione
tabella mi avvisa della eliminazione della vecchia tabella e della creazione
della nuova. Nel pannello opzioni di access ho deselezionato tutti i flag
per i messaggi di avviso ma quesro messaggio rimane . Come posso fare per
eliminarlo ?
Grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 wrote in message
news:151Z96Z0Z8Y10...@usenet.libero.it

1) Macro
   Imposta Avvisi False
   ApriQuery "NomeQuery"
   Imposta Avvisi True
Alternativa
2) VBA
   docmd.SetWarnings False
   docmd.OpenQuery "NomeQuery"
   docmd.setwarnings True
Ciao
Marco
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.appl.access
Titolo: Access 2003 runtime

Ciao,
mi hanno trasmesso un DB realizzato con Access 2007 ed io non ho
questa versione ma solo la 2003.
Dal sito Microsoft ho scaricato "Access 2003 Runtime" ,
successivamente, l'ho installato..
Quando cerco di aprire il DB si avvia Access 2003 runtime ma mi trovo
di fronte ad una schermata vuota, il software è avviato ma non vedo
nient'altro.
Perche?
Grazie 1000 per eventuali suggerimenti!

 ha scritto nel messaggio 
news:7f1a9a55-d183-4cae...@w19g2000yqk.googlegroups.com...
Ciao,
mi hanno trasmesso un DB realizzato con Access 2007 ed io non ho
questa versione ma solo la 2003.
Dal sito Microsoft ho scaricato "Access 2003 Runtime" ,
successivamente, l'ho installato..
Quando cerco di aprire il DB si avvia Access 2003 runtime ma mi trovo
di fronte ad una schermata vuota, il software � avviato ma non vedo
nient'altro.
Perche?
Grazie 1000 per eventuali suggerimenti!
-----
Perch� nel sw non �previsto una maschera inziale.
Nel runtime non viene visualizzata la finestra di database

 Grazie 1000 per eventuali suggerimenti!
Ci sono un p� di cose che non tornanno....
1- non mi risulta un ac2003 runtime messo "gratuitamente" da MS
2- se la versione � 2007 scaricati appunto il runtime 2007 (questo si che � 
a disposizione)
3- se il db non prevede il funzionamento con il runtime non vedi niente lo 
stesso, in tal caso il tuo db lo puoi vedere lo con la versione completa.
Ciao
-- 
Roberto da Parma
Newsgroup: it.comp.appl.access
Titolo: Filtro su maschera

Ho una maschera in cui sono riportati :
Mese | Personale | Commessa |Ore Lavorate
Selezionando il mese e il personale vorrei calcolare il totale delle ore
lavorate.
Come posso fare?
Grazie

Salve, Non uso molto spesso Access:
Chiedo: è possibile personalizzare la finestra che chiede
il valore del parametro di una query con parametro ?
Esempio  : se il parametro fosse [citta], si potrebbe chiedere: dammi la
citta da selezionare:
TIA

 ha scritto nel messaggio
news:Zr47a.237952$0v.66...@news1.tin.it...

SELECT * FROM NomeTabella WHERE [citta] = [Digita la città da selezionare:];
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:q437a.237539$0v.66...@news1.tin.it...

Usa una funzione di aggregazione sui dominii DSum (vedi help).


Ciao a tutti  ho questo problema
Con questa routine su un pulsante mi vengono filtrati   i
record della  marca  Aprilia
 DoCmd.ApplyFilter "", "[Marca]=""Aprilia"""
    DoCmd.GoToControl "CmbCercaCodice"
    CmbCercaCodice = Forms![CodificaModelliGenerico]![Modello]
    CmbCercaCodice.Requery
 E fin qui tutto bene , solo che ho la casella CmbCercaCodice che non
mi filtra i record Aprilia come nella maschera ,ovvero mi visualizza
tutti i record sottostanti
L'origine riga di CmbCercaCodice é una query con i due campi
Modello e Marca  con la colonna associata 1 su Modello
Cos'è che non va bene ,
Ciao Giuseppe




wrote:

dwvi cambiare l'origine dati della combo
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: Casella di testo

Ciao. deisderavo sapere se vi è la possibilità di far inserire in una
casella di testo un valore ( testo ) a seconda della selezione tramite
menu a tendina di un altro valore ( nuemerico ) se si come si fa???
ciao e grazie
mike
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 mike
Me.CasellaDiTesto = Me.Combo.Column(NumeroColonna)
Antonio.

Newsgroup: it.comp.appl.access
Titolo: cambiare colore ad una textbox se è minore di qeulla a fianco

maschera in visualizzazione continue contiene campo1 e campo2
vorrei
se campo1 è minore di campo2 sfondo rosso altrimenti sfondo verde
mi sapete aiutare?
Grazie.

 wrote in message
bbslhu$mtp$1...@lacerta.tiscalinet.it...

Vai sul Sito Comune (link qui sotto) e nella Sezione General troverai tre o
quattro FAQ che parlano di formattazione condizionale di maschera continue;
dai un'occhiata a quella si Silvio Savoldi: dovrebbe fare al caso tuo,
naturalmente dopo aver modificato debitamente la funzione di
condizionamento.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: [SQL] Ottenere record da posizione x a posizione y

Per ottenere i primi 7 record si scrive:
SELECT * TOP 7
FROM miatabella
ORDER BY miocampo
Cosa si può fare per ottenere i record da una posizione x ad una y.
Supponiamo dalla posizione 6 alla posizione 12?
Kaos.

 ha scritto nel messaggio
news:7QIU9.35273$AA2.1...@news2.tin.it...

Potresti sfruttare la procedura del sito comune per generare una numerazione
progressiva all'interno di una query e quindi filtrare con un between 6 and
12
Antonio

 news:7QIU9.35273$AA2.1...@news2.tin.it...

    Forse la query seguente potrebbe andarti bene.
    Tabella Clienti di Northwind:
        SELECT TOP 6 [Clienti].[NomeSocietà]
        FROM Clienti
        WHERE Clienti.NomeSocietà Not In
            (
            SELECT TOP 6 Clienti.NomeSocietà
            FROM Clienti
            ORDER BY [Clienti].[NomeSocietà]
            )
        ORDER BY [Clienti].[NomeSocietà]
        ;
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

 wrote in message
czPU9.2600$ZE.7...@twister2.libero.it...


E' cervellotica come soluzione! :)
Ma interessante sotto il profilo logico.
Kaos.


 Ma interessante sotto il profilo logico.
Sě, va beh.... ora rabboniamolo pure...
Hehe hehe eh
Antonio
Newsgroup: it.comp.appl.access
Titolo: richiesta aiuto

vorrei sapere se in una ricerca di un report č possibile evidenziare alcuni
campi a video!
grazie


Se non è l'anteprima di stampa che ti serve, cerca di spiegarti meglio.
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------

campi a video!
MITICA! :-D
--
Lorenzo Coronati
--
<<Si perché forse Ilbo (ed altri come lui) sono 
convinti che noi poveri principianti (nel senso 
ironico) scrivano le domande senza pensare.>>
(Ivan Lelli, 25/08/2000)
--

MITICA! :-D
chissa cosa voleva dire
cmq merita di essere inserita nell'elenco delle perle
Carlo Ve


Ci pensavo proprio oggi: ma dov'č questo elenco?
Ciao.

credo che Lorenzo  possa darci  una mano vero ?
Anche tutt'e due.
Ma non e' che abbia poi molto...
--
Lorenzo Coronati
--
<<Complimenti per la risposta disinteressata a 
differenza di altri che sul NG ci mangiano sopra.>>
(Voltolini, 20/04/2000)
--
<<[...] Altrimenti ci arrabbiamo....>>
(Voltolini, 10/10/2000)
--

Ma non e' che abbia poi molto...
Sui tuoi vecchi msg se qualche mitica citazione
la dovremmo trovare
poi basta avere pazienza e il materiale verrà da solo
Carlo Ve

Newsgroup: it.comp.appl.access
Titolo: DB Access e tabelle collegate?

Ho creato un DB Access, (anzi 2) dati.mdb e nota.mdb
db principale è dati, che contiene le tabelle di nota
(collegate)  il programma funziona perfettamente
dal server ma quanto viene chiamato dal client
le tabelle collegate non vengono rintracciate e da errore
di rete o disco, cosa posso fare?
(se invece tutte le tabelle vengono inserite fisicamente
nel db dati tutto funziona correttamente)
il progr. si trova in:
\\server\c\programma\prog.exe
Ciao Enzo
www.scozzaro.it

 ha scritto nel messaggio
news:9u2rj2$qdd$1...@newsreader.mailgate.org...

Hai verificato che il Client abbia l'accesso al computer Server ?
Pietro

Newsgroup: it.comp.appl.access
Titolo: Margini impossibili!!!

Ciao amici, ho un bel problemone. Devo assolutamente impostare i margini di
un report tutti a 0 solo che lui non gli accetta ma vuole un margine minimo
superiore a 0!!! help! Grazie!

"Enzo" <

Dipende dal driver della stampante ... di conseguenza resteranno margini
impossibili :-)
Ciao, Giorgio

 ha scritto nel messaggio
news:LCue9.68796$ub2.1...@news1.tin.it...

stessa risposta, i margini piccoli sono conseguenza della stampante stessa.
Leggi il manuale della tua stampante per vedere quale č il margine minimo
impostabile
Ciao
NSantini


potresti ...by-passare il problema
impostando un diverso formato carta
non è da manuale ma ... se hai fretta ....
ciao
Zef

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

Ciao a tutti,
Vorrei poter con un comando in VB aprire un file .doc sull'evento Onclick
(da un tasto di una maschera) come posso fare?
Grazie
Roberto

 ha scritto nel messaggio
news:GgNub.44567$9_.17...@news1.tin.it...

Guarda nella guida GetObject e CreateObject
impostando la proprietą Visible a True o False puoi renderlo manifesto
oppure no
Ciao
Marco
Newsgroup: it.comp.appl.access
Titolo: gestione indice contolli di una maschera

 i = 0
 For i = 0 To Me.Section(0).Controls.Count - 1
  Debug.Print Me.Section(0).Controls(i).Name
 Next i
Con questa routine si può stampare il nome dei controlli di una sezione di
una form, è possibile gestire gli indici.
Se io volessi manipolare le caratteristiche solo di alcuni controlli,
tendenzialmente controlli dati e non etichette ecc., è possibile dare ai
singoli controlli un valore, tipo l'ordine di tabulazione, in modo che possa
fare un ciclo for da 1 a n, dove n è il numero max a cui io voglio arrivare.
Lo scopo è arrivare a questo:
 i = 0
 For i = 0 To n
  Debug.Print Me.Section(0).Controls(i).Locked = False
 Next i
Grazie.
** Articolo inviato tramite i servizi gratuiti di 
www.x-privat.org
 **

  Next i
Il metodo standard è utilizare la proprietà Tag del controllo.
Basta di inserire p.e. un x nel Tag dei controlli che ti
interessano e poi:
Dim ctl As Control
For Each ctl In Me.Controls
    If ctl.Tag = "x" Then ctl.Locked = False
Next ctl
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com
Newsgroup: it.comp.appl.access
Titolo: mde

Qualcuno può dirmi se è possibile da un file mde risalire alla struttura
delle maschere senza avere il file mdb?
Sono disperato, Aiuto!!!!!!
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

qualcuno sa dirmi se è possibile da un file mde modificare le maschere
senza avere il file mdb?
Sono disperato, aiuto!!!!!!!!!!!!!


 Sono disperato, aiuto!!!!!!!!!!!!!
Mi dispiace.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

SEcondo il mio modesto parere non è possibile risalire alla struttura
delle maschere dal mde; d'altronde si fa l'mde proprio per nascondere il
codice e le strutture di report e maschere. Ciao.

Newsgroup: it.comp.appl.access
Titolo: OT: Richiamare un documento di Word da una Form di Visual Basic.

Un saluto a tutti.
Scusate, so di essere OT, ma ho bisogno di una 'illuminazione' urgente.
Di seguito ho elencato il codice VB  (ver.5) per richiamare un file di Excel
da una
Form qualsiasi:
Dim appbudget As Excel.Application
Dim budget As Excel.Workbook
Dim budgetsheet As Worksheet
Load Form2
Set appbudget = CreateObject("Excel.Application")
Set budget = appbudget.Workbooks.Open("c:\Bilancio di previsione.xls")
Set budgetsheet = budget.Sheets("BIL.PREV.")
budgetsheet.Activate
appbudget.Visible = True
Fin qui tutto Ok, funziona, ma mi sapreste dire cosa devo fare per
richiamare un documento di Word? Con quale codice?
GRzie mille
Ciao Rita

 ha scritto nel messaggio
news:V7Kn9.53339$Eu.12...@twister1.libero.it...

In pratica è la stessa cosa
   Dim WordApp          As Object
   Dim WordNewDoc       As Object
   Set WordApp = CreateObject("Word.Application")
   Set WordNewDoc = CreateObject("Word.Document")
   Set WordNewDoc = WordApp.Documents.Open("C:\Documenti\Prova.doc")
   WordApp.Visible = True
   Set WordNewDoc = Nothing
   Set WordApp = Nothing
Ciao Giorgio.

 > Di seguito ho elencato il codice VB  (ver.5) per richiamare un file di
   Scusa togli questa riga non serve 'Set WordNewDoc =
CreateObject("Word.Document")'
Ciao Giorgio.

 ha scritto nel messaggio
news:annsv3$kt5$1...@lacerta.tiscalinet.it...

Che velocità!!! Grazie Giorgio, lo utilizzo subito.
Ciao Rita