mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Convertire formule excel in access

Devo trasferire un foglio fatto in excel in access
In excel si usa SE, O, ecc.
In access IF THE ELSE, ecc.
Cè un qualcosa che possa interagire tra i dure e creare una conversione.
Sicuramente la risposta è negativa, però tenetar non nuoce
Ciao e grazieeeeeeeee

 ha scritto nel messaggio
news:cncq65$km5$1...@grillo.cs.interbusiness.it...

Se il foglio Excel è correttamente strutturato come database, tutti i dati
li puoi facilmente importare in Access. Solo i dati opportunamente
formattati. Poi...entri in un altro mondo!
Fai sapere
Ciao
mayerlink

 ha scritto nel messaggio
news:3%7nd.187939$b5.93...@news3.tin.it...

Dei dati faccio poco, a me serve proprio i controlli, cioè tutte le varie
condizione di calcolo.
Il foglio in excel è quello che ti ho spedito l'altra sera per posta

Newsgroup: it.comp.appl.access
Titolo: Impostazione formato in campo calcolato

Ciao a tutti,
ho due problemi.
1) In una maschera continua imposto il formato di un capo in questo modo: 
0\.00\.00, tale che mi faccia vedere per esempio il numero 1002030 così 
100.20.30
In un campo calcolato che ha origine controllo: ="Totale Area: " & 
Somma([Area])
non è sufficiente ipostare il formato dalle proprietà, quindi come posso 
fare per leggere p.e.
Totale Area: 14400.20.30 invece di Totale Area: 144002030
2) Nella stessa maschera continua imposto il formato di un capo in questo: 
Euro, decimali: 2, tale che mi faccia vedere per esempio il numero 200,5865 
così ?200,59
In un campo calcolato che ha origine controllo: ="Totale Valore: " & 
Somma([Valore])
non è sufficiente ipostare il formato dalle proprietà, quindi come posso 
fare per leggere p.e.
Totale Valore: ?175.180,42 invece di ?175.180,4188
Grazie a chiunque sappia rispondere 

 ha scritto nel messaggio 
news:43921244$0$343$5fc...@news.tiscali.it...

1) Hai provato con
="Totale Area: " & Format(Somma([Area]);"00\.00\.00")
2) Qui oltre a impostare i decimali a due cifre puoi usare una delle 
funzioni di arrotondamento dell'euro presenti nel sitocomune. Inoltre così 
dovrebbe funzionare:
="Totale Valore: " & format(Somma([Valore]);"0.00")
Tieni presente che l'arrotondamento dell'euro segue un criterio diverso 
dall'arrotondamento standard.
Ciao, Carlo


Grazie Carlo, č perfetto
Ciao, cranze 

 ha scritto nel messaggio 
news:4392aba3$0$340$5fc...@news.tiscali.it...

Anzi grazie al tuo suggerimento ho fatto vari tentativi e per il 2° problema 
ho risolto cosě:
="Totale Valore: ? " & format(Somma([Valore]);"Standard")
Ciao e ancora grazie
Newsgroup: it.comp.appl.access
Titolo: doppia ricerca con casella combinata

Ragazzi scusate la domanda forse un pò banale ma ho questo problema:
Sto sviluppando un database per la gestione di articoli di magazzino
ora ho creato una maschera Fornitori e su questa si poggia una 
sottomaschera da me chiamata SubListino. Collegata con i campi master e 
secondario ID_Aricolo.
per esempio all'ID_Articolo 101 mi corrisponde un nome Fornitore Pinco. 
ecc ecc
ed la mia sottomaschera SubListino mi fa vedere tutti gli articoli dell 
Fornitore Pinco.
ora quando faccio un'ordine merce ho creato una casella combinata la 
quale trae origini dati dalla tabellla listino ,
per facilitare la ricerca di un determinato tipo di articolo la mia 
casella combinata mi permette di selezionare solo l'ID_Articolo
io vorrei che la  mia casella combinata mi permettesse di selezionare 
prima L'idArticolo e successivamente ance la descrizione dell'articolo.
per esempio selezione da casella combinata
ID_Articolo    descrizione
101           nastro adesivo.
Grazie in aticipo

Ciao
nella casella combinata puoi visualizzare più di una colonna se ti
aggrada, così vedi anche la descrizione dell'articolo.
Ciao
Fabio
Newsgroup: it.comp.appl.access
Titolo: Re: Svuotare tutte le tabelle del db

 per poterle eliminare tutte in un solo click?
Dim db As DAO.Database
Dim i As Integer
Set db = CurrentDb
For i = db.TableDefs.Count - 1 To 0 Step -1
    db.Execute "DELETE FROM " & db.TableDefs(i).Name
Next i
Ma sei molto prudente con un tale codice, Cataldo! ;-)
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 Ciao
Forse 3d dimenticato..:-))
http://groups.google.it/group/it.comp.appl.access/browse_thread/thread/87d962cbee27fb61/589801ea368d3f72?lnk=gst&q=svuotare+tutte+le+tabelle#589801ea368d3f72
Ciao
--
sv
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Ma sei molto prudente con un tale codice, Cataldo! ;-)
Ahh, sono io che è troppo prudente quando si tratta di cancellare
qualcosa. Certo che puoi meglio usare un semplice ciclo sui tabledef
e con l'esclusione delle tabelle di sistema come scritto da AntoGal
nel thread citato da Salvino.
-- 
cu


 Ciao
Ti quoto parte della risposta di Antogal:
 'svuota tutte le tabelle, tranne quelle di sistema 
 For Each tdf In CurrentDb.TableDefs 
  If (tdf.Attributes And dbSystemObject) = False And (tdf.Attributes And 
dbHiddenObject) = False Then 
   DoCmd.RunSQL "DELETE * FROM " & tdf.Name 
  End If 
 Next tdf 


 mi restituisce errore di compilazione, variabile non definita.
Come prima riga manca:
Dim tdf As DAO.Tabledef
-- 
HTH


 mi restituisce errore di compilazione, variabile non definita.
Cosa? tdf?
Allora poni nei Riferimenti DAO
Sotto l'evento click di un pulsante metti:
Dim tdf As TableDef


 è possibile escludere solo queste due nell'esecuzione del codice?
Utilizza tda.Name:
 Dim tda As DAO.TableDef
 For Each tda In CurrentDb.TableDefs
 If (tda.Attributes And dbSystemObject) = False _
 And (tda.Attributes And dbHiddenObject) = False _
 And tda.Name <> "Tb_Documenti" And tda.Name <> "tb_Tipo_Documenti" Then
 DoCmd.RunSQL "DELETE * FROM " & tda.Name
 End If
 Next tda


 ho cosi modificato il codice e continua a svuotarle tutte :-((
L'ho testatato e a me funziona. Mettile allora nascoste.


 (cmq, tranquillo ho la copia del be)
A2007? 
Ho inserito il demo in AccessGroup sezione VBA.

Newsgroup: it.comp.appl.access
Titolo: inserimento immagini in un campo di una tabella

ciao a tutti!!
Io ho provato a realizzare un database con access ,sono riuscito a creare 2
tabelle parle relazionare ed ho creato una maschera ,sono riuscito ad
inserire in un campo di una tabella (oggetto ole) un documento word
ho provato in egual modo ad inserire anche file immagine jpeg con scarsi
risultati poichč dopo diversi accessi al database non me le visualizza
...volevo capire quale era la procedura corretta per inserire jpeg
all'interno del database .
GRAZIE!!!
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Il Sat, 11 Aug 2007 22:19:52 GMT, 
mic...@alice.it
 (Orlando) ha
scritto:

www.sitocomune.com
Sez. General
FAQ:
6.13
6.75
6.93
6.96
6.125
6.160
6.161
6.162
6.197
6.223

 Inviato via 
http://arianna.libero.it/usenet/
Segui l'estrazione del lotto di VT...
Ciao.
-- 
Sergio MAZZA 

 Grazie per l'aiuto!!!!


Newsgroup: it.comp.appl.access
Titolo: le tabelle collegate si aggiornano ?

In un MDB esistono tabelle collegate , che sono presenti in altri MDB.
Se io sposto fisicamente questi altri file MDB in un path diverso e li 
modifico , tali modifiche verranno recepite anche dalle tabelle collegate ?
Grazie 

"Gabriele" <arre> ha scritto nel messaggio 
news:468940af$0$37204$4faf...@reader3.news.tin.it...

Ciao Gabriele,
se tu sposti gli MDB collegati in un altro percorso e li modifichi, il 
db che conteneva i collegamenti non troverà più il database collegato 
e quindi non solo non vedrà le modifiche ma non vedrà nemmeno i 
dati... a questo punto sarai costretto a rifare il collegamento ai db 
modificati e spostati ed in questo modo rivedrai anche le modifiche.
-- 
Cinzia [Office Access MVP]
_______________________
 
www.riolab.org
----------------------------------------> 

 quindi non solo non vedrà le modifiche ma non vedrà nemmeno i dati...
però le query e i report vengono creati ugualmente ( con i dati vecchi ) , 
forse perchè le tabelle
collegate sono comunque presenti nel file MDB rimasto orfano .
Come si spiega sennò il fatto che riesco a lanciare la query e il report 
anche se il file MDB è orfano ?
ciao 

 ciao



 in effetti ho spostato il file con le tabelle collegate in un'altra 
cartella  , ma i file con le tabelle di origine erano sempre al loro posto !
Grazie
Newsgroup: it.comp.appl.access
Titolo: Date progressive bis

Salve a tutti,
in un post precedente ho chiesto come fare affichè in una casella di testo
di una maschera compaiano automaticamente delle date progressive
(modificabili) in modo da non doverle digitare.
Il suggerimento che mi è stato dato è:
Me.Data.DefaultValue= "#" & DateAdd("d", 1, Me.Data.Value) & "#" nella
procedura Before_Update
Purtroppo dopo aver testato questa soluzione ho riscontrato che funziona
solo per il record successivo a quello per il quale si inseriscono i dati.
Ad esempio se la data di partenza è 15/05/2000 quella del record che segue è
(correttamente) 16/05/2000 ma quella del record successivo a questo rimane
16/05/2000 al posto di aggiornarsi in 17/05/2000.
Penso che dipenda dal fatto che il valore di Me.Data.Value rimane 15/05/2000
e quindi l'evento Before_Update aggiunge 1 giorno a questa data per ogni
nuovo record creato.
Ho provato a definire una variabile globale (i as integer) modificando la
procedura Before_Update in:
i=i+1
Me.Data.DefaultValue= "#" & DateAdd("d", i, Me.Data.Value) & "#"
ma non funziona. Come posso risolvere la questione?
Grazie.
Nexus.

Nexus <Nex...@hotmail.com_nospam> wrote in message
wbjU4.37704$F46.4...@news.infostrada.it...

Se ho capito bene quando metti questo codice nell'evento Before_Update, la
routine, giustamente ti riazzera le variabili dichiarate, e quindi il tuo
i=i+1 ritornerà sempre alla prime volta, cioè: 1=0+1.
Quindi ipoteticamente visto che è vero (non ho verificato di persona) che
non c'è ricorsività nella impostazione del .DefaultValue, sembra voler dire
che manca un aggiornamento in .DefaultValue o .Value. Anche lì non ho
verificato il perché della mancanza di aggiornamento, ma a rigor di logica
per garantirsi una ricorsività sicura è meglio utilizzare la stessissima
variabile dalle due parti dell'uguale, e cioè che al posto di .Value provi
con .DefaultValue.
Se non dovesse funzionare, allora basta rendere pubblica o statica la
variabile i. Non è il massimo dell'eleganza ma almeno funziona di sicuro.
Nel caso di i è meglio renderla statica se no se usi i altrove, ti ritrovi
con un macello!
Ciao
Thierry

Newsgroup: it.comp.appl.access
Titolo: Codice a barre

Salve a tutti, sto costruendo un programma in Access per la gestione di un
magazzino basata sui codici a barre. Per la lettura non č un problema
utilizzando l'emulazione tastiera ma   :-(   per stampare i codici a barre
da Access? Qualcuno sa come si fa?
Grazie, ciao Marco

 Grazie, ciao Marco
Se ne parla in continuazione di questo problema sul NG; ad esempio dai
un'occhiata al thread aperto il 27/10/2002 alle ore 7:21 da Emyr.
Comunque se torni indietro trovi molti altri thread.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Contatore più complesso del solito

Il mio problema consiste nel creare un campo contatore tipo "Numerazione
crescente per fatture ed altro" tratto dal sito comune ma con una variante
per poterlo utilizzare in una maschera continua e con la condizione di
riazzerarsi a seconda del tipo di dato selezionato.
Pongo un esempio per essere più chiaro:
Tabella1 Campi:
               MioContatore
               Fornitori
               Ordini
Maschera1 con relativi campi come Tabella1
La funzione dovrebbe darmi un MioContatore tipo Anno/NumerazioneCrescente
(03/0001) e fin qui tutto facile ma il difficile, ovviamente per me, risulta
dover fare in modo che il contatore si riazzeri a 1 ad ogni fornitore
diverso ed ovviamente si riazzeri ogni inizio del nuovo anno, il tutto in
una maschera continua.
Vi ringrazio per l'aiuto che potrete darmi.
Fino ad ora solo leggendo i vostri messaggi ho risolto brillantemente molte
problematiche dei db di access.
--------------------------------
Inviato via 
http://usenet.libero.it

 riazzerarsi a seconda del tipo di dato selezionato.
cut
Per farlo in maschere continue, devi valorizzare il campo da codice.
per azzerare in funzione del fornitore basta che ad ogni fornitore assegni
una lettera che poi userai come marcatore
A03/00001    -    fornitore 1
B03/00001    -    Fornitore 2
ecc.
Sib

 > End Sub
    Questa funzione crea una numerazione crescente per ogni fornitore ma non si
azzera all'inizio di ogni anno come posso fare ad ottenere ciò?
Scusate ma come già detto non sono troppo pratico di Vb.
Andy

Newsgroup: it.comp.appl.access
Titolo: Utilizzo dell'istruzione Select

Ho recuperato una piccola procedura in Access, e la sto utilizzando per
imparare a capore ed utilizzare il codice VBA.
In particolare mi interessano le istruzioni che mi permettono di utilizzare
l'istruzione SELECT per recuperare informazioni dalle tabelle in funzione di
parametri di maschera.
Ho provato quindi a 'copiare' l'istruzione che mi permette di testare una
password: ho una tabella con user e password che ho chiamato utenti e ho
creato una funzione che testi l'esistenza dello user e la correttezza della
password digitata.
All'interno di questa function ho scritto le istruzioni
    Dim rs As New ADODB.Recordset
    Dim sqlQuery As String
    On Error GoTo Err_Login
    sqlQuery = "SELECT IdUtente, Password FROM Utenti"
    rs.Open sqlQuery, CurrentProject.Connection, adOpenForwardOnly
perň quando cerco di eseguirla mi viene visualizzato un errore "Impossibile
trovare il metodo o il membro di dati"
Temo di non avere scritto correttamente le istruzioni per creare il
Recordset: in effetti la procedura dalla quale copio ha le tabelle su
sqlServer mentre il opero con tabelle in access.
E' cosě o sono fuori strada?
Potete darmi una mano a capire come devo operare?
Grazie
***mauro

 ha scritto nel
messaggio news:Zn81c.52421$gk.22...@news3.tin.it...

Hai provato a creare una nuova connection invece di utilizzare:
CurrentProject.Connection?
Non sarebbe piů semplice l'utilizzo della funzione Dlookup?
Ciao.
--
Sergio MAZZA


Ciao e grazie
***mauro


Prova con:
Dim rs As New ADODB.Recordset
Dim sqlQuery As String
Dim conn as string
On Error GoTo Err_Login
conn = "Driver={Microsoft Access Driver (*.mdb)};DBQ=momeMDB.mdb"
sqlQuery = "SELECT IdUtente, Password FROM Utenti"
rs.Open sqlQuery, conn, adOpenForwardOnly
Ciao.
--
Sergio MAZZA


Grazie 1000 della gentilezza.
Adesso provo.
***mauro
Newsgroup: it.comp.appl.access
Titolo: RAGGIUNGERE UN CONTROLLO IN UNA MASCHERA

Salve sono Fanciullo,
perché non è possibile impostare come criteri di una casella combinata
un riferimento a un controllo di una stessa maschera dove si trova la
casella combinata?
riporto la stringa SQL:

 ha scritto nel messaggio
news:5r9vh.9595$422.1...@twister2.libero.it...

Dov'è....?
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 Dov'è....?
Suacombobox.visible=false
:-)
-- 
Saluti @ndrea
Access 2003 - Windows XP

Newsgroup: it.comp.appl.access
Titolo: per ufficio - codice fiscale

in una tabella inserisco diversi campi (necessari per creare un codice
fiscale) access dovrebbe generare in un campo della stessa tabella il codice
fiscale
come si fà

Il Computer č IMBECILLE mi spiego meglio:
E' INTELLIGENTE QUANTO E' INTELLIGENTE IL PROGRAMMATORE.
Quello che sa fare č fare i conti velocissimi.
Comunque per la tua risposta una volta che hai inserito tutti i dati devi
dirgli come si fa a gererare il codice fiscale.
Prova a cercare in questo indirizzo 
http://www.sitocomune.com/
Saluti
Newsgroup: it.comp.appl.access
Titolo: Access 97 su Windows 2000

Stò provando ad installare Access 97 su Windows 2000 Pro. Me lo installa
senza problemi....word ed excel partono access invece mi dà il seguente
errore:
"Impossibile avviare Microsoft access. Non è stata concessa la licenza d'uso
su questo computer"
Qualcuno saprebbe darmi un consiglio?
Ciao
Roberto

 su questo computer"
www.aladinoinformatica.com
 , area download, terz'ultimo file.

 su questo computer"
Sei sicuro che non c'era gia' installato O2000 o qualche suo pezzo?
Sib

 io mi sono rotto i coglioni a provare di installarlo dopo aver eliminato
office 2000 e alla fine, dopo vari vani tentativi, ho cancellato windows e
l'ho reinstallato d'accapo insieme ad office 97.
Alla faccia della MICROSOFT!!!!!

 ha scritto nel messaggio
news:9qi1mn$705$1...@nreada.inwind.it...

Se invece di romperti i "santissimi" a reinstallare Windows 2000 ed Office
97 avessi cercato sui post precedenti del NG avresti risolto in pochi
minuti; è una nota bug di A97 documentata anche dalla Microsoft che ti dice
come avresti risolto semplicemente rinominando un file prima e dopo
l'installazione di A97.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Alla faccia della MICROSOFT!!!!!
Perdonami, ma piu' che altro alla faccia tua.
Quando e' capitato a me, grazie all'aiuto del ng, ho risolto in 10 minuti
con le istruzioni che ti ho dato.
Sib
--
----------------------------------------------------
la mia home:
http://digilander.iol.it/syb
----------------------------------------------------
il sito comune di it.comp.database.access:
http://www.sitocomune.com
----------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente
Newsgroup: it.comp.appl.access
Titolo: Importo non a zero

in una tabella che ho creato ho messo du campi :
1) ImportoD (numerico Precisione singola)
2) ImportoP (numerico Precisione singola)
dove ci passo dei normalissimi importi
il mio problema è nato quando ho dovuto fare una query di saldi su di questa
tabella.
Mi spiego:
Per scartare i totali con i saldi a zero, mi sono creato una query con un
campo calcolato in cui eseguo :
ImportoD-ImportoP a video mi come 0,00 appena clicco sopra mi viene fuori un
numero lunghissimo
per cui non me li scarta perche' per la query non è un campo a Zero.
come posso fare ????
Premetto che ho provato a usare Format, Tronca eccc. ma il risultato è
sempre lo stesso
doce sbaglio ????

 ha scritto nel messaggio
news:pCLF9.10884$qF1.4...@news2.tin.it...

Ciao Alfonso, non sbagli niente, è semplicemente il prezzo da pagare quando
si utilizzando i campi precisione singola o precisione doppia.
Visto che in questo caso non hai problemi di arrotondamento puoi  utilizzare
nella query la funzione Round([ImportoD]-[ImportoP];2) per testare i totali
con saldo a zero.
Ciao Giorgio.

usa questa per arritondare e fare i calcoli
Function fctRound(Optional varNr, Optional varPl As Integer = 2)
' by Konrad Marfurt + ? + Karl Donaubauer
'varNr: numero da arrotondare
'varPI: numero di decimali (due predefinito)
   If IsMissing(varNr) Or Not IsNumeric(varNr) Then Exit Function
   fctRound = Fix("" & varNr * (10 ^ varPl) + Sgn(varNr) * 0.5) / (10
^ varPl)
End Function
Saluti.
Emanuele.

Newsgroup: it.comp.appl.access
Titolo: Office XP Developer Full Retail nuovo 400 euro trattabili

come da oggetto contiene : word, excel, power point, outlook, access,
FrontPage.
La suite office xp developer ti permette ( a differenza del professional)
di creare le run time di access, i  modo che sia eseguibile il programma
creato
da te anche a chi access non ha.

 ha scritto nel messaggio
news:b63p9k$nv6$5...@lacerta.tiscalinet.it...


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

Avete qualche dritta su dove scaricare esempi a parte il sito ufficiale
foxitaly non ho trovato niente.
Mi interessa lavorare con i dbf dato che sono un ex clipperista e mi diletto
anche un po' nella objected oriented.

 ha scritto nel messaggio 
news:fB%Rf.34776$PR2.6...@twister2.libero.it...

Puoi provare con il Mulo, ma non hai la garanzia sulla bontà del prodotto.
Coni dbf non saprei ma se ricerchi file tipo mdb\mde ne trovi a centinaia 
...
Saluti
-- 
**********
EmMeCi
**********
Blog: 
http://www.setfocus.it
La mia prima volta con Access 12: 
http://tinyurl.com/e7jc4
 

 ha scritto nel messaggio 
news:fB%Rf.34776$PR2.6...@twister2.libero.it...

Scusa ma gli esempi dovrebbero essere:
1 - Access -> FoxPro?
2 - FoxPro -> Access?
3 - FoxPro -> FoxPro?
Secondo me, nei casi 2 e 3 sei nell'NG sbagliato; nel primo caso si tratta 
di collegare il DBF.
Ma è probabile che non ho capito...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Problemi con la posta in Access

Ciao a tutti
    Sto cercando di fare una macro per l'invio di Posta elettronica. Quando
la faccio partire Access dice che il programma della posta non funziona
bene, anche se è aperto e ricevo posta. Che succede Me date 'na mano ??
--
Ferrante Luigi

 ha scritto nel messaggio
news:9iEx7.9955$YC3.2...@news1.tin.it...

Il 1° consiglio è quello di andarti a vedere le faq sull'argomento presenti
nella sezione General del Sito Comune.
Dovrebbero essere sufficienti x risolverti i problemi e chiarirti qualche
punto oscuro.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

Newsgroup: it.comp.appl.access
Titolo: CASELLA DI TESTO

come posso utilizzando codice abilitare/disabilitare, bloccare/sbloccare una
casella di testo
chiamata testo1.
grazie.

 ha scritto nel messaggio
news:bjwc6.5436$L94....@twister2.tin.it...

Per abilitare la tua casella di testo:
Me![NomeCasellaDiTesto].Enabled = True
per disabilitarla
Me![NomeCasellaDiTesto].Enabled = False
per bloccarla
Me![NomeCasellaDiTesto].Locked = True
per sbloccarla
Me![NomeCasellaDiTesto].Locked = False
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Run-Time 3048

faccio un accesso DAO su di una query.
Mi dice sempre impossibile aprire altri Database.
Ho provato a chiudere tutto addirittura riavviare.  Nulla da fare
La mia Query si chiama QrFinale
Dim rst As DAO.Recordset
CercaAutori = ""
Set rst = CurrentDb().OpenRecordset("QrFinale")
rst.MoveFirst
Do Until rst.EOF
    If rst![Titolo] = Titolo Then
        CercaAutori = CercaAutori & rst!Autore & ", "
    End If
    rst.MoveNext
Loop
Tanti Auguri!!!

"Peppe Verde" <g.v...@localhost.localdomain> ha scritto nel messaggio
news:av16kk$644$1...@lacerta.tiscalinet.it...

Prima di tutto non serve mettere le parentesi tonde dopo CurrentDB se hai
messo le librerie DAO prima di ADO,
poi per sapere quanti record ci sono devi prima spostarti all'ultimo e poi
al primo:
rst.MoveLast
rst.MoveFirst
Accertati che tutte le tabelle allegate siano attive e che nella query non
hai messo per sbaglio più volte il riferimento ad una stessa tabella.
P.S.: Ti ho mandato una e-mail in privato perchè attendo quel db.
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: come confrontare 2 tabelle e vedere i record non presenti in una delle due

come confrontare 2 tabelle e vedere i record non presenti in una delle
due tabelle?
Grazie anticipatamente
PFM
--
To reply please remove from e-mail 'xyz'- Per rispondere togliere 'xyz' dall'indirizzo e-mail.

 ha scritto nel messaggio
news:3ccab7a4...@news.interbusiness.it...

Usa una query di ricerca dati non corrispondenti. In access c'è anche
l'autocomposizione.
Ciao
Salvatore
Newsgroup: it.comp.appl.access
Titolo: Access 2013 casella combinata

Salve a tutti i buoni samaritani.
 
Uso da pochissimo Access 2013, prima con access 2003 non avevo questo problema.
 
Maschera basata su query.
Inserisco nuova casella combinata.
Parte il wizard e scelgo trova i valori nella maschera basato sul valore della casella combinata (3.a opzione). Completo il tutto e provo.
 
Scelgo il nome del cliente ed è tutto ok. Access restituisce e popola i controlli della form con quelli della casella.
 
Dalla casella combinata scelgo il record successivo che però appartiene sempre a quel cliente (un cliente può avere anche molteplici record) ma access popola i controlli dela maschera sempre con i valori della prima riga della casella.
Qualunque tentativo io faccia per cambiare record (sempre di quel cliente) nella casella combinata, mi riporta sempre e solo al primo.
 
Access 2003 creava una sua sintassi VBA.
Access 2013 usa le macro che ho già provato senza successo a modificare.
Access 2013 non crea più il codice VBA (Magari!)
 
Perchè si comporta cosi?
 
grazie a chiunque sia riuscito a capirmi....
 
LoZio

Nessuno ha sperimentato un'esperienza come la mia?
 
Ho sbagliato qualcosa?
 
grazie mille...
Newsgroup: it.comp.appl.access
Titolo: Creare tabella con numereo di campi variabile

Buon giorno a tutti.
Devo crare una tbaella da vba con numero di campi variabile.
Esempio: se decido di avee una tabella con 6 mesi, avrò 6 campi, uno per ogni mese.
Se decido di avere una tabella con 12 mesi, avrò 12 campi, uno per ogni mese.
 
Come posso far sì che la tabella creata abbia il numero di campi che mi interessano semplicemente indicandoli con una variabile?
Grazie infinite.


E' contro ogni regola della normalizzazione e non è un database. Access non è excell

CrossPost... una volta era vietato anche quì...
 
http://forum.masterdrive.it/access-79/creare-tabella-numero-campi-variabile-80658/
 
 
@Alex

Il giorno martedì 18 febbraio 2014 11:04:29 UTC+1, Paolo Bolognesi ha scritto:

Avevo posto la stessa domanda su Masterdrive e ora ho visto che è stato chiuso il tread per CROSSPOSTING. Non capisco cosa sia successo: non posso porre la stessa domanda a più siti? Nel regolamento leggo: "Si incentiva invece, a fare un buon uso del crossposting: chiunque è libero di consultare più canali di informazione e ricevere lumi sullo stesso argomento; è opportuno però osservare delle regole di comportamento ben precise". Quali regole non ho applicato?


Quali sono le regole della "normalizzazione"? Dove le posso imparare?

 Quali sono le regole della "normalizzazione"? Dove le posso imparare?
 
Per commciare vedi i link qui:
http://www.donkarl.com/it?FAQ1.31
 
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 ...
 
Siccome si tratta di una media diversa non vedo un problema.
Sei solo un po' sfortunato perché Alex frequenta tutte e due. :-)
 
-- 
gd&r


 Access FAQ:  
http://www.donkarl.com/it
 
 
Ciao Karl
Il problema non si sarebbe posto se, avesse inserito i LINK incrociati come una volta era uso e costume fare... 
 
Poi sai che io sono sempre molto RIGIDO... e legato ai VECCHI metodi...
 
Saluti
@Alex

 metodi...
 
Beh, tempi passati. Oggigiorno dobbiamo quasi essere contenti
per ognuno che si fa vivo qui. ;-)
 
Frequento alcuni fori web. Persino ho un foro sul mio sito e preparo
altri su O365. Però come sempre preferisco i newsgroup per la sua
efficienza fino all'ultimo giorno che esistono. In tedesco si dice:
 
Der letzte dreht das Licht ab.
(L'ultimo spegne la luce.)
 
-- 
;-)


 (L'ultimo spegne la luce.)
....e chiude la porta  :-)
 
un caro saluto ad entrambi
 
Daniele 
 
 

Ciao Ragazzo...
Vedo che sei sempre in osservazione.
 
Mi accorgo di essere ormai troppo vecchio per questi posti... devo andare in pensione, magari in Thailandia...
 
;-)
 
Ciao
@Alex
Newsgroup: it.comp.appl.access
Titolo: Contami 10 record e incrementami il valore di un campo

Salve uso A97, Ho una tabella (Interventi) dove registro quotidianamente
degli interventi da me fatti. Ogni 10 interventi/record ho la necessità di
incrementare di 1 un valore numerico scritto in un campo di un'altra tabella
(Criticità). Il meccanismo vale solo per i record nuovi che inserirò, perchè
per i vecchi farò un calcolo a forfait. Come faccio a verificare che ogni
volta che ne faccio dieci deve aggiungere 1 al campo Aggiunte della tabella
Criticità? E' probabile che mi debba creare un campo di appoggio in tabella
Interventi dove conto i record, ma per il resto non so!
Grazie per l'aiuto.
Ciao Andrea

 ha scritto nel messaggio
news:yXBz6.3882$k53....@news1.tin.it...

Ciao Andrea.
Al volo ho fatto una funzioncina:
Public Function DivisibilePerDieci(N As Long)
    Dim nn As Long
    nn = N Mod 10
    If nn = 0 Then
'quì scrivi il tuo codice
    End If
End Function
Se nn è = 0 vuol dire che il numero passato è divisibile per dieci. Se passi
21, 22, o 57 il risultato sarà diverso da 0.
Non ti dovrebbe essere difficile scrivere il resto del codice.
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: drag'n'drop file in casella di testo

ho letto il messaggio scritto nella news
36f42c75...@news.interbusiness.it
o meglio tutto il thread trovato all'indirizzo
http://groups.google.com/groups?hl=it&lr=lang_it&ie=UTF-8&oe=UTF-8&threadm=7d5irf%24ka1%241%40fe1.cs.interbusiness.it&rnum=1&prev=/groups%3Fq%3Ddrag%2Bdrop%2Baccess%2Bfile%26hl%3Dit%26lr%3Dlang_it%26ie%3DUTF-8%26oe%3DUTF-8%26selm%3D7d5irf%2524ka1%25241%2540fe1.cs.interbusiness.it%26rnum%3D1
ma a dire il vero non ho capito molto........
riassumo il problema:
dalla gestione risorse voglio trascinare un file in una casella di
testo dando a questa il valore del percorso/nomeFile.ext di questo.
Quale codice devo inserire e a quale evento della casella di testo
devo associarlo?
-
haran banjo
ba...@tiscalinet.it
ICQ# 25468446
- you are never given a wish without also being given the power to make =
it true. - Bach

 haran banjo
Prova a vedere se può fare al caso tuo la FAQ di Stefano Bettini intitolata
"Richiamare la finestra di dialogo per la selezione di un file" e che trovi
nella  Sezione General del Sito Comune (link qui sotto).
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Roberto
purtroppo a dire il vero i files dovrebbero essere trascinati
dall'interno di email di eudora e avendo tutti lo stesso nome
(questionario1, questionario2 .....) vengono riconosciuti solo come
allegati ad un messaggio.
se pero' non si puo' fare altrimenti faro' cosi'.


Newsgroup: it.comp.appl.access
Titolo: Data in campo memo

Vorrei inserire la data corrente in un campo memo ogni volta che questo
viene aggiornato associando tale azione all'evento "su doppio click". E'
possibile farlo?
Tanti auguri a tutti
Giorgio


wrote:

me.nomecampo=me.nomecampo & date()   ?
Saluti.
Emanuele.

 Emanuele.
Perfetto, tante grazie.
Ancora auguri
Giorgio
Newsgroup: it.comp.appl.access
Titolo: La cornice del Combo Box non scompare...

In un report ho bisogno di vedere come titolo il nome del venditore i cui
dati sono nel report e che provengono da una query filtrata da un form.
Ora, creando un combo box che mi permette di selezionare tramite SQL il
nome di tale venditore, mi rimane la cornice in stampa (anche se a video e'
trasparente.
Vorrei mettere un text box come titolo ma questo non mi
permette di avere come valore il risultato di una query.. o si?
Grazie a
tutti
--------------------------------
Inviato via 
http://usenet.iol.it

On Fri, 01 Feb 2002 11:29:51 GMT, 
ildr...@freemail.it
 (Il Druido)
wrote:

ma stampi la maschera od un report?
prova con le caselle di testo e la funzione dlookup al limite...
Saluti.
Emanuele.

Newsgroup: it.comp.appl.access
Titolo: aiutatemi vi prego ;__;

Ciao a tutti.
Non ho mai scritto sul'ng ma sono ormai giorni che non riesco a risolvere un
problema.
Io ho un record che ha i campi: "Data, Settimana, Film"
L'utente inserisce la data ma poi non so calcolare a quale settimana
dell'anno corrisponde.
Una prima risoluzione l'ho fatta popolando una tabella con Numerosettimana,
DataInizio, DataFine, cosě poi utilizzando la between posso sapere in che
settimana ricade la data scelta.
Il problema č che mi serve che una volta inserita la data il campo settimana
si completi automaticamente.
E' possibile?
Spero di non aver scritto cavolate e di essere stato chiaro...
Ringrazio tutti quelli che vorranno aiutarmi!
gianpi

 ha scritto nel messaggio
news:Sjv4a.198931$0v.55...@news1.tin.it...
Sigh...
Antonio

 ha scritto nel messaggio
news:Sjv4a.198931$0v.55...@news1.tin.it...

Non serve memorizzare un campo nuovo. Basta che usi la funzione format.
=format([campodata],"ww")
ciao

 Antonio
Sigh che cosa scusa?
gianpi

 ciao
Grazie per l'aiuto perň....non ho capito :(
Potresti spiegare meglio?
Grazie comunque.
gianpi


nella query se hai una tabella TAB1 con un campo Data1 (formato data)
selezioni quel campo (in query visualizzazione struttura) e nella colonna di
fianco provi a scrivere: Steeimana: format([Data1];"ww")
In ogni caso dai un'occhiata all'help di Access cercando "format"
Ciao

 Sigh che cosa scusa?
Sigh che delle volte ho lo sconforto per dover sempre sempre sempre
sottolineare cose tipo l'uso di subject poco significativi!!!
Soprattutto alle 8 di sera...
Antonio
Newsgroup: it.comp.appl.access
Titolo: Runtime 3048

Premetto che non sono un esperto di Access, ma studiando e lurkando qua sono
riuscito a sviluppare un programma per la gestione di attività di
formazione.
Db Access 2000. Ho sviluppato il tutto in locale. Testato. Tutto ok.
Poi creo le versioni BE e FE, dato che il tutto lavorerà in rete.
A questo punto, nell'apertura di un report visualizzo l'errore di runtime
3048, "impossibile aprire altri database"
Il report in questione contiene diversi sottoreport che a loro volta ne
contengono altri.
Nel debug, l'errore  esce nell'esecuzione di un evento su formattazione del
corpo di un sottoreport, in una routine che mi serve per verificare se
alcuni sotto-sottoreport siano o meno vuoti, che nel dettaglio è questa:
Private Sub Corpo_Format(Cancel As Integer, FormatCount As Integer)
Me!a = Nz(DSum("Ore", "Appo_Print_Preventivo_E", "id_voce=" & "1")) _
+ Nz(DSum("Ore", "Appo_Print_Preventivo_E", "id_voce =" & "2")) +
....eccetera fino alla voce 13
Questa routine la eseguo su una decina di sottoreport. Ovviamente, al primo
errore di runtime la formattazione di tutti i sottoreport si blocca, ed
ottengo un report pressochè vuoto.
Se ho ben capito, stabilisco troppe connessioni al BE, ed alla fine il tutto
si incasina.
Qualcuno ha idea di cosa fare?
Grazie
Ale

"Doorman" <door.ma...@RITOGLIMIlibero.it> ha scritto nel messaggio
news:zPa7a.159675$ZE.46...@twister2.libero.it...

se le operazioni che esegui ad ogni formattazione sono sempre le stesse,
calcolati il valore nell'evento Open e lo memorizzi in una variabile a
livello di modulo poi nell'evento Format la assegni al controllo, in ogni
caso invece di eseguire una Dsum per ogni "id_voce" utilizza l'operatore
"between" oppure, se i valori non sono consecutivi, una serie di "or":
Nz(DSum("Ore", "Appo_Print_Preventivo_E", _
    "id_voce between 1 and 13"),0)
oppure
Nz(DSum("Ore", "Appo_Print_Preventivo_E", _
    "id_voce=1 or  id_voce=3 or  id_voce=7 or  _
    id_voce=13"),0)
ciao omnitow
Newsgroup: it.comp.appl.access
Titolo: Calcolo di valori ma solo di alcuni record di una maschera

Salve a tutti,
ho una maschera generata dall'origine dati di una query... la quale contiene 
i campi codice, articolo, venduto (dove venduto è il numero dei pezzi che 
sono stati venduti)
vorrei mettere in piè di maschera una casella di testo contenente la somma 
dei prodotti venduti... ma solamente alcuni ovvero attraverso un check 
box... che metterò l'utente deve spuntare quali valori sommare e la casella 
di testo sommare solo i record spuntati... Calcolate che nella maschera si 
devono vedere sia quelli spuntati che quelli non spuntati
che formula devo usare per dirgli di sommare solo i campi dei record 
flaggati?
Saluti Simone 

 wrote in message
news:4%Ncd.155987$
35.76...@news4.tin.it

La vedo dura Simone....!
Sostanzialmente sono sicuro si tratti di una Form in visualizzazione
Maschere continue...., e da quanto hai detto non hai un CAMPO
Flag nella Tabella....!!
Di conseguenza dovresti ricordare che gli Oggetti nelle Form continue
non sono gestibili Singolarmente a meno di essere Associati.....!!!
Credo di averti già fatto capire il problema...!
Forse potresti usare una ListBox a selezione Multipla per
ottenere quello che vuoi e calcolare il tutto su ItemSelected.
Non ho altre Soluzioni, poichè la Form in visualizzazione continua
permette di Selezionare solo RIGHE sequenziali.
Potresti usare un'OCX LISTVIEW(se hai licenza) oppure l'emulazione
API(se non hai LICENZA di distribuzione)....!!!!
Ciao.
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Risaluti e grazie 

 
Non è IMPOSSIBILE, ma tu hai posto un vincolo tecnico inpossibile.
Fallo con una LISTBOX...!
Ciao
@Alex.

Newsgroup: it.comp.appl.access
Titolo: Visualizzare dwg su form

Ciao! Come da oggetto: come si fa ?
Grazie

 Grazie
Probabilmente devi cercare e comprare una qualche controllo che ti permetta di
visualizzare i files formato Autocad.
-- 
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


Io ho risolto inserendo un campo come "oggetto OLE", dove poi richiamo il
disegno, se invece non hai un programma per visualizzare un DWG, trasforma
il DWG in TIF, in questo modo potrai usare anche imaging.
Ciao


    Dal sito della Autodesk (
http://www.autodesk.com
) puoi scaricare le
utility (freeware) WHIP! 4.0 o VoloView. Queste mettono a disposizione dei
controlli ActiveX mediante i quali visualizzare all'interno delle proprie
applicazioni (o delle proprie pagine web) disegni AutoCAD salvati in formato
DWF.
    Io ho usato WHIP!4.0 all'interno di pagine HTML per un lavoro che ho
dovuto effettuare, ma nel manuale di istruzioni erano riportati anche esempi
di codice per utilizzarlo all'interno di VisualBasic. Non credo che ci siano
problemi ad utilizzarlo all'interno di Access.
    VoloView e' il successore di WHIP!, ha piu' funzioni del predecessore ma
e' grande piu' del doppio (~16MB); i disegni DWF li crei da AutoCAD
semplicemente scegliendo File/SaveAs/ e selezionando (.DWF) nella casella
File Type; i file DWF non sono piu' modificabili, ma mantengono tutte le
informazioni presenti nel DWG da cui provengono (layers, colori, ...)
    Ciao.
-----------------------------------------------------
NameChanger 1.0 il cambianomi programmabile
http://www.digiland.com/SimonenomiS/


Grazie! Mi sembra un ottimo suggerimento ! Intanto io avevo risolto salvando
i dwg in formato dxf e riesco a visualizzarli sul form. Non so però la
differenza tra i due formati: sai se perdo qualcosa con i dxf rispetto ai
dwg ?
Ciao,
Massimo
Newsgroup: it.comp.appl.access
Titolo: Esperimento con Access e ADO.

Hich fatto  seKuente experimenten :
- kreata una tabella T,
- kreata maschera M su T
  (in formato foglio di laForo, ya ? (formDS))
- kreato recordset ADO disconnesso R su
  T e   dato in pasto alla M :
  set M(T).recordset = R
DopodiKe da maskera C, Tiversa da M, faccio :
R.close : Set R = nothing.
e poi ripopolo R con una nuova ricerca su T,
diversa dalla precedente (dopo aver RI-Tefinito R
tramite : R.cursortype, R.cursorlocation ecc.)
R.open "select ... from ", connessione
ICH mi sarei aspettato che la M andasse in tilt.
(praticamente gli ho completamente ammazzato
il recordset a cui essa PUNTAVA)
MAKKE' !
Tignava sfacciatamente coi suoi record come nulla fosse,
e tu potevi andare su e giu' e vederli tutti, COME
SE il recordset della M fosse una copia di R, ma
non e' cosi'. Noi sapere che non essere cosi'.
Allora ich pensare  : (unica spiegazionen razionalen) :
R persiste fintanto che esiste almeno un riferimento attivo
ad esso, anche se lo chiudi, lo setti a nothing e lo ricrei.
Questo gia' essere sufficiente per "zozpettaren" che ADO
essere leCCermente ad "azzo" di Kanen.
Ma solo leccermente, per il momento.
(e ci scommetto pure DAO, se non e' ancora peggio).
Ma c'e' di piu'.  UDITE POPOLO DELL' NG !
(e questo e' Access, Ado poveraccio non credo
c' entri molto)
Se dentro la maschera "tignante" di cui sopra gli
faccio :
if R.eof and R.bof then (mangia zucchero filato)
EBBENE dava l' errore : R chiuso, impossibile
fare il test richiesto (... altre parole, ma il concetto
essere kuellen)
Acht ! Ma come, R ezzere VIVEN solo cvando
cazzen te PARE A TE ?!?!?!?
Cvesto + cvello sopra detto significare che in
Kualke moden la maschera aveva "sotto" una rappresentazione
del recordset semi-separato dalla struttura effettiva di R,
che gli consentiva di ritenerlo "vivo" ma "ZOLO" per un sottoinsieme
di "operazioni".
Prova definitiva che chi ha progettato questo sistema, all' evidente
scopo di ottimizzare, bisognerebbe immergerlo in
una vasca di benzina e dargli fuoco. Lui, Access e palazzina.
INGESTIBILE un accrocco cosi. Ingestibile.
Roba da pazzi.
Praticamente e' una scatola NERA, che se la canta e se la sona
come gli pare a lei.
E poi dite che uno si deFe affidare ad Access ? MANKO MORTEN.
(e poi anche nella gestione dei confilitti e un 100 altre kose fa
CVELLO CHE AZZEN GLI PAREN. Verificato personalmente) :-)
Un abbraccio a tutti ! :D

Un abbraccio a tutti ! :D
Contraccambio!
-- 

Fair87 ha scritto:
[Cut]
Ma poi una domanda, una curiosità.....xchè ADO? Con Access è inutile se usi
ODBC per connetterti a qualunque motore di database......anche se non utilizzi
jet (e questo si ottiene solo in aree ODBCDirect, che non si usano più, con i
progetti Access [adp] o query PT), tutto quello che scrivi in ADO viene
tradotto in DAO dai layer + bassi dell'applicazione stessa e poi inviato al
server......a costo non proprio 0......
Ok che DAO è limitato ad Access ed ADO no, ma se usi Access come FrontEnd io
un pensierino lo farei....fosse solo per l'aiuto in scrittura.....
Se usi OLEdb allora il discorso cambia...e li nn dico nulla che nn son
pratico....
Ciauz
RobertoF
--
Newsgroup: it.comp.appl.access
Titolo: Unire Query contenenti join..

Salve..Avrei un problemino:vi faccio un esempio molto semplificato così 
vi chiarisco le idee:
Tabelle:
ORDINI                      CLIENTI                   ARTICOLI
Numero,Cliente,Articolo     Cliente,Descrizione       Articolo,Descr.
Con una query devo prendere tutti gli ordini che hanno il numero uguale 
al numero presente in un textbox di una form, facendo vedere : Numero, 
Descrizione CLiente, Descrizione Articolo..
Per far ciò Mi servo di due query:
QUERY1:
SELECT ORDINI.*,CLIENTI.Descrizione FROM ORDINI LEFT JOIN CLIENTI ON 
ORDINI.Cliente = CLIENTI.Cliente WHERE ORDINI.Numero = (Mia form!
Numero);
QUERY2
SELECT QUERY1.*,ARTICOLI.Descrizione FROM QUERY1 LEFT JOIN ARTICOLI ON 
QUERY1.Articolo=ARTICOLI.Articolo;
Così facendo QUERY2 è il risultato che voglio avere..Vorrei sapere se 
però posso in qualche modo unire le due query, ottenendo lo stesso 
risultato..Questa esigenza ultimamente mi sta diventando di vitale 
importanza per dimezzare il numero delle query!Grazie 1000!!
-- 
AA
Inviato da 
www.mynewsgate.net

[cut]
Ciao,
se non ho inteso male quanto hai scritto, essendo la query2 legata alla 
prima, a te basta semplicemente lanciare direttamente la query2 per ottenere 
il fatidico risultato...ho inteso bene?  ;o)
-- 
strano...mavero
L'universo è cambiamento; la nostra vita è il risultato dei nostri pensieri.
Marco Aurelio 

 ha scritto:

Scrivi
 SELECT ORDINI.*,CLIENTI.Descrizione,ARTICOLI.Descrizione FROM (ORDINI 
LEFT JOIN CLIENTI ON 
 ORDINI.Cliente = CLIENTI.Cliente )LEFT JOIN ARTICOLI ON 
 ORDINI.Articolo=ARTICOLI.Articolo)
WHERE ORDINI.Numero = Mia form!Numero;
Ciauz
-- 
'gnurant come una cucuzza
Inviato da 
www.mynewsgate.net
Newsgroup: it.comp.appl.access
Titolo: il turno solitario

 
sto modificando un programma per "turni lavorativi" e vorrei fare una 
interfaccia "tipo solitario"  (nel senso del gioco), ossia:
 
adesso c'e' un elenco dei date scoperte, un elenco di operatori, e una 
maschera in cui seleziono la data, il turno, seleziono l'operatore, 
premo il bottone "assegna" e mi inserisce la tripletta (data, operatore, 
tipo del turno) nella apposita tabella.
 
Mi piacerebbe una interfaccia tipo "tocco la faccia dell'operatore, 
tengo cliccato e trascino sulla data del calendario. Quando rilascio il 
pulsante del mouse, l' operatore risulta inserita nella casella". Un po' 
come succede nel solitario quando trascino le carte.
 
La scenogafia non mi interessa, ma deve funzionare il concetto 
clicco-trascino-rilascio.
 
Non ho ancora provato neanche un tentativo di prototipo, chiedo: vi 
sembra fattibile?
 
grazie
 
 
 
-- 
Per un giacobinismo in salsa padana


Fatto, a suo tempo, usando un doubleclick (nemmeno serviva "trascinare")
 
-- 
ac (x=y-1)
Aborro il Killfile
(La violenza e' l'ultimo rifugio degli incapaci -Salvor Hardin-)
 
---
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus
 
 

 Fatto, a suo tempo, usando un doubleclick (nemmeno serviva "trascinare")
 
Clicchi la prima volta e opzioni la persona
 
Clicchi la seconda volta e la scodelli nella casella del calendario?



 
Non proprio cosi'. Quello che scrivi sono 2 eventi click separati e 
richiede un po' di codice extra per essere gestito.
Non ho capito che controlli usi.
A suo tempo lo ho fatto tra 2 listbox e fra una form continua (evento 
applicato a form, tanto per capirci sul triangolino che identifica la 
riga) ed un listbox ed usavo l'evento DoubleClick.
Funzione che avevo anche sul listbox bersaglio per eliminare entrate che 
avevo inserito "accidentalmente".


 riga) ed un listbox ed usavo l'evento DoubleClick.
 
mm-mmh, ci studio

Newsgroup: it.comp.appl.access
Titolo: Chiusura e riapertura form mantenendo in memoria l'ID

In una db ho una maschera principale "Nominativi" dove inserisco di dati
personali di un soggetto, da qui tramite tasto apro un'altra maschera
"Incarico" riportando l'IDPersonale per il collegamento con questo codice:
nella maschera principale:
 DoCmd.OpenForm stDocName, , , stLinkCriteria, , , IDPersonale
nell'altra maschera:
Private Sub Form_Load()
    If Len(Me.OpenArgs) > 0 Then
        Me.IDPersonale.DefaultValue = Me.OpenArgs
        DoCmd.GoToRecord acDataForm, Me.Name, acNewRec
    End If
End Sub
Fin qui tutto bene, in questa maschera "Incarico" ho una casella di
riepilogo basata su una query:
SELECT tblIncarico.IDIncarico, tblIncarico.IDPersonale,
tblIncarico.Incarico
FROM tblIncarico
WHERE (((tblIncarico.IDPersonale)=[forms]![frmIncarico]![IDPersonale]));
sull'evento doppio click della casella di riepilogo ho utilizzato il
seguente codice per cancellare i record che non mi servono, con questo
codice:
Private Sub Elenco17_DblClick(Cancel As Integer)
'Cancella il record selezionato nella casella di riepilogo
DoCmd.SetWarnings False
  DoCmd.RunSQL "DELETE * FROM tblMovimenti" & _
    " WHERE IDMovimenti=" & Me!Elenco17
  DoCmd.SetWarnings True
 
Me!Elenco17.Requery
End Sub
Visto che il Requery non funziona perchč dopo aver camcellato un solo dato,
mi scompaiono dalla vista anche gli altri dati elencati, per visualizzarli,
devo premere su nuovo record e poi su aggiorna (Me!Elenco17.Requery) oppure
chiudere e riavviare la maschera, volevo sapere se c'č un sistema per far
si che la maschera si chiuda memorizzando l'IDPersonale e poi si riapra
sempre sullo stesso ID.
ciao
Sthepan

 sempre sullo stesso ID.
Memorizza l'IDPersonale in una variabile pubblica e utilizzala per riaprire
il form.
Ciao



ciao, grazie,
non č che potresti farmi un esempio
grazie,
Sthepan

Newsgroup: it.comp.appl.access
Titolo: Report filtrato e no

Ho un report che ha che come origine una tabella con i campi
IDTabella,data,Entrata, Uscita.
Questo report ha nel pie' di pagina la somma totale di Entrata e Uscita e
viene filtrato in base al mese.
Essendo a corto di idee vi chiedo cortesemente come come si fa' ad avere nel
report ,oltre alla somma  totale di Entrata e Uscita filtrata per mese,
anche la somma totale di Entrata e Uscita senza filtro.




Proverei con la funzione Dsum.

 wrote in message
rrhgvs80965in4km4...@4ax.com...

Grazie perfetto