mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: file esempi seri

qualcuno ha qualche file creato con access serio e tosto da mettere sul news
con scopo di esempio , magari contenente trucchi, procedure particolari ecc.
si potrebbe fare una specie di graduatoria del più! non i soliti esempi
northwind che si citano anche su manuali di terze parti.
luigi

 ha scritto nel messaggio
news:oUo96.5463$pr5.2...@twister1.tin.it...

Qualche passeggiatina sul Sito Comune (link qui sotto) l'hai mai fatta?
Ed un'occhiata aldatabase di esempio Soluzioni l'hai mai aperto?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


Come mai in A2000 non è presente il datase di esempio Soluzioni. Per
importarlo in A2000 come fare?
Grazie


 > si potrebbe fare una specie di graduatoria del piů! non i soliti esempi


 Grazie
Mi dispiace, ma non uso A2000 e non so se con la sua istallazione č
possibile copiarlo; spero che ti risponda qualcun altro.



Certo che si.
Comunque ho la convinzione che coloro che hanno fatto i database di cui
parlavo sono "bravi".


luigi ha scritto:

malgrado tutto i miei non riesco a farli ridere. Sono seri?
a.cara

 luigi
Luigi, prova a sbirciare anche come si dovrebbero quotare i messaggi a cui
rispondi, grazie...
Antonio

 ha scritto nel messaggio
news:vOS96.86714$eB2.6...@news.infostrada.it...

FATTO!
PERMALOSO

 PERMALOSO
Muà?
Non mi permetterei mai...
Antonio

Newsgroup: it.comp.appl.access
Titolo: Verifica BE collegati

Quesito...
è possibile all'apertura dell' applicazione effettuare una verifica se sono 
esistenti i db di BE.
Mi spiego meglio:
ho necessità di matenere db di archivio in supporti removibili e vorrei che 
il DB.FE non si avviasse o potesse segnalare all'avvio la mancanza del 
collegamento con il 
DB.BE
.
Grazie! 

 ha scritto nel messaggio
news:RjtSd.934889$35.35...@news4.tin.it...

Ci sono diverse soluzioni:
1)Ciclare l'insieme Tabledefs e puntare alle proprietà Connect dei
singoli Oggetti(che poi sono le Tabelle) ed estrarre il PATH del BE,
verificarne l'esistenza ecc...!
2)Secondo me la più semplice, cercare di aprire un Recordset su ogni
tabella tra quelle con stringa di connessione e gestire l'errore.
Questa stringa SQL restituisce l'elenco delle sole Tabelle nel FE Collegate.
Apri un Recordset con questo costrutto come Origine e cicli il RS.
Ad ogni iterazione cerchi di leggere nella Tabella che ricavi dal RS e
se dà errore non trova il BE.
SELECT MSysObjects.Name FROM MsysObjects _
WHERE (Left$([Name],1)<>"~") AND (Left$([Name],4) <> "Msys") AND
(MSysObjects.Type)=6 _
ORDER BY MSysObjects.Name;
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 ha scritto nel messaggio 
news:421a6723$0$6300$5fc...@news.tiscali.it...

Grazie tante, farò tesoro degli insegnamenti.
sempre molto gentile e competente.
Grazie ancora!
Newsgroup: it.comp.appl.access
Titolo: stampa di report filtrato in piu copie

devo scegliere se fare stampare un report 1, 2, o 3 volte
Ho creato un gruppo di opzioni e da quello posso selezionare il numero di
copie, attivando un macro che secondo la scelta mi ripeti un'altra macro
(esegui macro) apri report (stampa) 1 ,2, o 3 volte il problema che
stampando in questa maniera la stampante laser che posseggo ci mette
parecchio tempo (infatti alla prima pagina e lenta alle seguenti no) anche
se la procedura funziona perfettamente..
Mi sono alimbiccato con printout ma non riesco a selezionare il report e a
filtrarlo con la query scelta..o cercato in vari messaggi, nel'help in
linea, la ricerca del sito comune e ' down
Chi mi aiuta ricevera' un panettone :) (virtuale)

 ha scritto nel messaggio
news:ooMU7.347494$sq5.16...@news.infostrada.it...

Ultimamente sono schizzofrenico mi domando e mi rispondo da solo, postare
sul Ng e' diventato uno cosa psicologica, dopo un po' di sbattimento questa
e' la funzione
Public Function StampaRep(rep As String)
Dim quanti
If rep = "" Then Exit Function
quanti = InputBox("Inserire numero copie", "Opzioni Stampa", "3", 3)
quanti = Val(quanti)
If quanti < 1 Then Exit Function
DoCmd.OpenReport rep, acViewPreview, "filtro fatture stampa"
DoCmd.SelectObject acReport, rep, False
'Stampa quanti copie del report
DoCmd.PrintOut , , , , quanti
DoCmd.Close acReport, rep
End Function
Presa da messaggi precedenti e cambiato un po',va bene con il 2k
Si puo richiamare aggiungendo all'evento del comando con
=nomefunzione("mioreport")

e' la funzione
CUT 
prova ad andare in ferie!
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: [?] puntare la visualizzazione ad un record specifico

Grazie per l'attenzione
Mi basta uno spunto, poi mi smazzo i manuali; è che non so proprio da
che puno partire.
Sto realizzando un indagine di consistenza di alcune infrastrutture
(quante sono e come sono fatte).
Il mio database prevede un'enormità di campi (circa 1000) ma
pochissimi record (5 o 6 massimo)
Ho organizzato il tutto con tre maschere principali, ciascuna di
queste contiene  una struttura a schede.
Ogni scheda contiene una sottomaschera che richiama una maschera
secondaria
E' verosimile che il compilatore inserirà dati in tempi diversi per
ogni record.
Problema:
Vorrei sincronizzare la visualizzazione delle sottomaschere.
Cioe', se il compilatore sta implementando dati per il record 2 vorrei
che tutte le sottomaschere, quando aperte, si aprissero visualizzando
i dati già immessi per il record 2.
di nuovo grazie
Enrico

pochissimi record (5 o 6 massimo)
intanto access prevede max 255 campi.
poi mi dici cosa ci devi fare con mille campi?
prima risolviamo questo gravissimo difetto strutturale, poi tutto il
resto.  nel frattempo documentati sulla normalizzazione di un db.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/

resto.  nel frattempo documentati sulla normalizzazione di un db.
normalizzazione?
Ok!
apprezzo l'interesse e ringrazio sentitamente.
Enrico


 >>Il mio database prevede un'enormità di campi (circa 1000) ma


mentre i dati verrebbero aggiornati, ma non aumentati.
Bhe, non è proprio cosi'.
I record finali saranno parecchie centinaia, ma perchè verranno
compilati da parecchie centinaia di persone.
Mi spiego:
ogni persona dovrà compilare uno due o al massimo 6 record, ma poi io
dovro' compattare tutto in un unico database.
Non è quindi possibile girare la struttura.
Ma sopratutto dovrà essere estremamente chiaro.
E' per questo che ho bisogno di strutturarlo molto bene ed avere le
visualizazioni "puntate" come dico io.
perchè se uno mi compila 2 record deve sapere sempre bene quale dei
due sta compialando.
grazie per l'attenzione
Enrico

una ricognizione spinta nel dettaglio. !
eh, sviluppa questo dettaglio in verticale, se no non ne uscirai mai.


ogni record.
Non esiste il compilatore .........
a parte questo se effettivamente non devi "compilare" ogni volta tutti i
1000 campi
non ti conviene certo adottare questa struttura
Carlo Ve

eh, sviluppa questo dettaglio in verticale, se no non ne uscirai mai.
bene!
faccio tesoro dei tuoi consigli e lavorero' qualche giorno in modo da
ristrutturare l'approccio.
Credo di aver capito bene quello che mi hai spiegato.
Avevo già visto qualcosa del genere in alcuni esempi...
Grazie!
Enrico

Newsgroup: it.comp.appl.access
Titolo: Aiuto db bloccato

Mi spiego non sono molto pratico quindi cerco aiuto da voi,
ho un db creato da me creato che archivio dei dati importanti adesso nel
memorizzare il dato nel campo chiave primaria ho sbagliato ed ho cercato di
rimediare il db mi diceva che era presente poi si è chiuso e non si è aperto
più usciva un messaggio con la scritta che il db doveva essere ripristinati
gli cliccavo su si e non faceva nulla
AIUTATEMI grazie
come lo posso recuperare

 ha scritto nel messaggio
news:9K9kc.119766$hc5.5...@news3.tin.it...

Ciao,
fatti una googlata e ricerca Access Recovery o addirittura tutto il tools
Office Recovery,
dovrebbe risolverti il problema.
N.B.: controlla anche nei task...magari è rimasto attivo il servizio
MsAccess.exe legato al file ldb della tua applicazione ... tentar non nuoce.
-- 
strano...mavero
la vita è un dono prezioso, apprezzala per quello che potrà offrirti
www.spammer.it

 Grazie tutto fatto sono riuscito ad aprirlo con  Office Recovery

Newsgroup: it.comp.appl.access
Titolo: Query Pass Through d'inserimento.

Salve,
è possibile tramite una query Pass Through d'inserimento ricavare ID del
record inserito.
Premetto che il DB usato è Sql Servere e la stored d'inserimento con l'id
di ritorno già è strata creata e funziona bene.
Grazie


Leggi questo articolo:
http://support.microsoft.com/kb/815629
@Alex

 wrote:

Era un'esempio per NET, anche se il concetto non cambia...
prova questo che è specifico:
http://support.microsoft.com/kb/232144
oppure questo di Luciano:
http://www.adopenstatic.com/Experiments/FastestAutonumber.asp
questo:
http://community.visual-basic.it/LucianoB/articles/16622.aspx
questo:
http://community.visual-basic.it/LucianoB/articles/16624.aspx
basta......
@Alex
Newsgroup: it.comp.appl.access
Titolo: ricerca record

Ciao a tutti,
avrei bisogno della solita mano......
ho una maschera vendite (classica).
Vorrei che su  doppio click nel controllo "cod cliente" mi si aprisse la
maschera "clienti" con visualizzato il record
corrente,ma con la possibilita' di visualizzare anche gli altri clienti!!
Io scopiazzando qua e la' sono riuscito o ad aprirla ma non al record
giusto,oppure mi visualizza solo
quel record!
Mi servirebbe una via di mezzo!
Ciao e grazie per tutte le risposte che mi avete gia' dato!!

 ha scritto nel messaggio
news:9k363r$18tha$1...@news02.it.net...

Apri la maschera "clienti" senza filtro, sposta il fuoco sul controllo di
questa maschera che contiene il codice cliente, con il metodo FindRecord
posizionati sul record cercato usando il codice cliente contenuto nel
controllo "cod cliente" della maschera chiamante.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Caro Roberto,
ti ringrazio della tempestiva risposta, ma io sono un principiante e il
fuoco non so
neppure cosa sia!!
e per quanto riguarda findrecord, ho provato a capire qualcosa con l'help in
linea,
ma il mio help č in inglese!!
cosě eccomi a ri-chiederti ulteriori chiarimenti!!
Grazie(se puoi)!!


Se la maschera chiamante si chiama Vendite.
Se il controllo della maschera Vendite che contiene il codice cliente e sul
quale farai il doppio clic si chiama CodCliente.
Se la maschera da aprire al doppio clic si hiama Clienti.
Se il controllo di maschera Clienti che contiene il codice clienti si chiama
CodCliente.
A fronte dell'evento "Su doppio clic" del controllo CodCliente della
maschera Vendite genera il seguente codice VBA:
Private Sub CodCliente_DblClick(Cancel As Integer)
DoCmd.OpenForm "Clienti"
Forms!Clienti!CodCliente.SetFocus
DoCmd.FindRecord Forms!Vendite!CodCliente, , , , , , True
End Sub

Newsgroup: it.comp.appl.access
Titolo: Query X ricerca Cognome_Nome !!

devo fare una query di ricerca che includa il Cognome_Nome...di una tabella
in cui i campi sono separati... ho provato con questa stringa ma non
funge....quale è l'istruzione SQL esatta ???
WHERE ((([Anagrafe].[Cognome] & " " & [Anagrafe].[Nome]) Like [Cognome_Nome]
& "*"))
Grazie...

 wrote in message
_cIE5.1419$Z95....@news.infostrada.it...

Strano perche' dovrebbe funzionare benissimo (a me funziona).
Sei sicuro di inserire prima il cognome quando apri la query?
Ciao, Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente

& "*"))
non č che, trattandosi di stringhe, mancano gli apici?  prova
scrivendola cosě:
WHERE (Cognome & " " & Nome) Like '" & Cognome_Nome & "*'"
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access

 WHERE (Cognome & " " & Nome) Like '" & Cognome_Nome & "*'"
Non credo, a me funziona in quel modo
Ciao, Sib


Purtroppo anche a me ..in un altro DB funziona... chiaramente cambiando i
riferimenti... ma in questo non funge.... CMQ x correttezza inserisco tutto
il codice Sql... non vorrei che non qunzionasse xchč qualcosa di inserito č
sbagliato... dove sbaglio ???
-----------------------
 SELECT Anagrafe.ID_assistito, Anagrafe.Cognome, Anagrafe.Nome,
Anagrafe.Codice_Fiscale, Anagrafe.Sesso, Anagrafe.Nascita,
Anagrafe.N_Protocollo, Anagrafe.Medico, Anagrafe.Indirizzo,
Anagrafe.Codice_regionale, Anagrafe.des_nascita, Anagrafe.des_residenza,
Esenzioni.Codice_Esenzione, Esenzioni.Prossimo_Rinnovo
FROM Anagrafe INNER JOIN Esenzioni ON Anagrafe.ID_assistito =
Esenzioni.Id_Assistito
WHERE ((([Anagrafe].[Cognome] & " " & [Anagrafe].[Nome]) Like [Cognome_Nome]
& "*"))
-------------------
Ciao e grazie....

 -------------------
Ma se non inserisci niente alla richiesta del parametro cosa compare?
Sib


----------------------
Sib... non ci crederai...non ho fatto niente... ma ora la suddetta quary
funziona egregiamente...
indubbiamente... a sbagliare siamo sempre noi ..cmq grazie.x l'aiuto...

 indubbiamente... a sbagliare siamo sempre noi ..cmq grazie.x l'aiuto...
Tutto e' bene quel che finisce bene.

Newsgroup: it.comp.appl.access
Titolo: Msaccess.exe usa al max 50% tempo cpu ?

Uso Access 2003 su Win Xp pro
Da qualche tempo sto facendo attenzione al tempo cpu che viene visualizzato 
su task manager dal processo msaccess.exe
Anche se la procedura entra in loop e teoricamente dovrebbe papparsi tutta 
la cpu, invece sembra limitarsi al max al 50%
Avete lo stesso riscontro anche voi?
E' un'impostazione modificabile?
Ciao e grazie
RobertoA

 wrote in
news:4dbee833$
1...@newsgate.x-privat.org
: 

hai un processore singolo o multicore?
-- 
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--

 Paolo opg
Un athlon X2, un dual core

 wrote in news:4dbfe055$1@newsgate.x-
privat.org
:

se per vedere l'occupazione usi il task manager di windows devi attivare la 
separazione dei due core.
su winxp mi pare che di default non sono separati; nel tuo caso vedresti 
una occupazione massima del 50% proprio perche access 'schianta' solo uno 
dei due core.


 Paolo opg
Si credo sia cosi
Sai se ci sia modo di fargli usare i due core ?
Ciao e grazie
RobertoA

 
secondo me non si puo' fare.
non ho della documentazione che lo provi, ma se non sbaglio access non 
supporta il multiprocessing; per fargli usare piu' processori, microsoft 
dovrebbe riscriverlo...


 ha scritto nel messaggio
news:4dbee833$1...@newsgate.x-privat.org...

tenendo conto che a livello vba non agisci a basso livello come magari fa un
C, non credo proprio
a me invece fa il contrario
a volte solo tenendo aperto un access, mi comincia a succhiare tutta la cpu,
bloccandomi il PC
Antonio

Newsgroup: it.comp.appl.access
Titolo: tipo non corrispondente

Salve!
ho problema con una variabile perchè
ho l'errore: tipo non corrispondente
Private Sub prdH(Pulsante As Control)
 
Dim H As Byte
 
'Pulsante.Caption mi restituisce "+" o "-" 
H = H & Pulsante.Caption  & IIf(H = 0 And Pulsante.Caption  = "-", 0, 1)
 
credo che l'errore provenga dal segno "+" o "-"
 
Grazie per l'aiuto
 

Il problema è che H la dichiari come BYTE ma la usi come STRING... concatenazione la Caption.
Ora siccome quello che hai scritto presenta parecchi errori di concetto, spiega cosa devi fare e magari evitiamo correzioni e suggeriamo qualche cosa di più funzionale. 
 
@Alex


grazie Alex
 
vorrei aggiungere ad ogni click di un pulsante +1 in un controllo
di una casella di riepilogo 
per i record selezionati
 
For Each varItm In Ctl.ItemsSelected
H = Ctl.Column(4, varItm)
H = Eval(H & Pulsante.Caption & IIf(H = 0 And Pulsante.Caption = "-", 0, 1))
 
con Eval sembra funzionare
Newsgroup: it.comp.appl.access
Titolo: Il sito del comune

Mi ha appena scritto un tale che si complimentava per una cosa che ha
scaricato dal "Sito del Comune". De che comune?
:-)
-- 
Ciao,
Giovanni

:-)
ROTFL!
Antonio

 :-)
ha scritto anche a me, un certo Carmelo!
Voleva che gli importassi in una tabella di access un file DAT, dal
tracciato record incomprensibile...
Mi sa che ha sbagliato comune :-)
--
Ciao, AntoGal
*************************************************
Home Page (area programmatori di VolFtp)
http://volftp.mondadori.com/italiani/galletta/
per scaricare un gioco di DAMA ITALIANA
*************************************************

Newsgroup: it.comp.appl.access
Titolo: Invio di record tramite email

Ho creato una query contenente "n" records proventienti da più tabelle, ai
quali è abbinato anche un Agente ed un campo contentente il suo indirizzo
di posta elettronica.
Vorrei trovare il modo di raggruppare i records in base all'agente e
spedirgli un file (txt, o xls, non ha importanza), tramite Outlook.
Chi mi può aiutare?
---------------------------------------------------------------------------
Messaggio inviato attraverso 
http://www.trucchiperpc.it
 - sezione newsgroup

Potresti usare il metodo SendObject, che permette di inviare
e-mail direttamente da codice o macro.
Per i dettagli del comando vedi l'help in linea.


 > Chi mi puň aiutare?
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.appl.access
Titolo: Access 97

Ciao a tutti;
Nelle pagine del nostro sito (
www.cidiverte.it
) utilizziamo asp per
accedere ai dati contenuti in un archivio Access 97.  Il problema
č che Access non ti permette di avere dei record piů grossi di 2kb,
ma a noi serve piů spazio.  Come si puň ovviare a questo problema?
Access 2000 si comporta alla stessa maniera o permette dei record
piů grossi? Grazie per il vostro aiuto.
Ciao, Pietro.
-----------------------------------------------------------------
Pietro Giovanni Vago
JOAG Italy Spa
Via Campo dei Fiori, 61
21013 Gallarate (VA)
Italy
www.cidiverte.it
Tel 
++39-0331226900
Fax 
++39-0331226999
-----------------------------------------------------------------

 ma a noi serve piů spazio
Scusa, dove l'hai letta questa?
Saluti.
Luciano
(DOC)

č che Access non ti permette di avere dei record piů grossi di 2kb,
wot?
forse non si potranno passare piů di 2k in un url...
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access

 addirittura 2000 bytes), esclusi ovviamente i campi memo e OLE.
Non proprio cosí ma quasi: A97 permette anche di fare 40 campi da 250
caratteri l'uno, peró ogni record non puó immagazzinare piú di 2 kbytes;
infatti un campo da 250 riempito vale 250, uno vuoto vale 0 quindi puoi
avere record che superano il limite teorico se sei sicuro che non verranno
riempiti tutti i campi.
In piú c'è un'ambigua definizione sul manuale: "records within a RECORDSET
must fit on the 2k data pages supported by the Microsoft Jet database
engine". E quando non usi un recordset? Onestamente non ho mai provato...
Paolo

 In quale ambito hai letto quella frase?
Manuale di programmazione Access, quello che viene con l'ODE97, pag. 301. Ad
occhio e croce dice esattamente il contrario di quello che tu hai
sperimentato: cioé che una query NON puó superare i 2kb (delle tabelle non
parla).
Se non ho capito male invece ti blocca a 2 kb in tabella ma ne hai aperti
tranquillamente 4 con una query.
Normale: se stiamo a dare retta a  M$... come rimpiango i bei tempi del
dbIII, dbIII+ e foxBase...
Paolo

 addirittura 2000 bytes), esclusi ovviamente i campi memo e OLE.
Aho', e nun ce lo sapevo!:-)
E pure vero che e' un limite piuttosto largo che non capita facilmente di
raggiungere,specie con DB relazionali!
Questo a mi (parziale) discolpa!:-)
Saluti.
Luciano
(DOC)

 E' cosi', vedi risposta a Luciano
Almeno sono in buona compagnia!:-))
Saluti.
Luciano
(DOC)

 Mah!
E no, la logica c'è: bisogna sempre fare il contrario di quello che dice il
manuale...
Paolo
Newsgroup: it.comp.appl.access
Titolo: record casuale

Ciao a tutti
ho una tabella tbl_domande con n campi tra cui un id (purtroppo non
consecutivo)
in una query desidero estrarre casualmente 10 domande dalla tabella
tbl_domande.
Per fare ciò, oltre ad avere SELECT TOP 10..., ho usato nella colonna ID il
criterio int(3200*rnd()+1) dove 3200 è l'ID dell'ultimo record.
il problema è che dal criterio può uscire un ID inesistente (perché
cancellato dalla tabella)
la soluzione (funzionante) è stata quella di scrivere il criterio per 50
volte con una serie di OR.
Avete una soluzione più intelligente?
Grazie
Samuele

SAM ha scritto:

Prova a creare un campo calcolato Ordina:Rnd(ID) e a ordinare in base a
quello, mantenendo la TOP 10 nella SELECT. Togli tutti i criteri, la
selezione viene già fatta dalla TOP 10, e la casualità viene data dal
campo Ordina.
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.appl.access
Titolo: Date

Ciao,
in un database ho una tabella collegata esternamente. Questi i campi:
(Articolo, Data, quantità)
Ho una query che fa un raggruppamento. Questi i campi:
(Articolo, Somma di quantità, Media mensile)
Per calcolare la media mensile dovrebbe:
1. stabilire qual è il mese della prima data (indipendentemente
dall'articolo)
2. stabilire qual è il mese dell'ultima data (indipendentemente
dall'articolo)
3. farne la differenza (considerando anche l'anno)
4. Calcolare Media mensile come (Somma di quantità per articolo)/
(differenza mesi)
Non so come fare.


Ciao, questa query risolve (se ho capito bene) il tuo problema.
Restituisce la media mensile (mese/anno) dei movimenti effettuati nel
periodo [Dalla data] ...
[Alla data].
La funzione Avg restituisce la media dei valori nell'ambito del gruppo
definito, in questo caso Anno/Mese.
SELECT Year([Data]) AS Anno, Month([data]) AS Mese, Avg
(Articoli.Quantita) AS MediaDiQuantita
FROM Articoli
WHERE (((Articoli.Data) Between [Dalla data] And [Alla data]))
GROUP BY Year([Data]), Month([data]);
Ciao.
Alberto

Scusa ma forse non mi sono spiegato bene.
Come dici tu mi fa il calcolo solo per i mesi in cui c'è quel codice.
Il numero di mesi su cui voglio farela media è l'intero intervallo
dalla prima fra tutte le date indipendentemente dal codice e lo stesso
per l'ultima data.
Una query sull'elenco completo è:
	Ultima data: data con formula Max
	Prima data: data con formula Min
	Numero mesi: ([Ultima data] - [Prima data]) / 30
Da questa ricavo il numero di mesi su cui fare la media.
Nella query finale vorrei riutilizzare il valore (Numero mesi) e
dividere la somma articoli per quel valore.


Scusa il ritardo, questa query dovrebbe andare bene:
SELECT MovMagCis.Data, MovMagCis.CodiceProdotto, Sum
(MovMagCis.Quantita) AS SommaDiQuantita, Sum([quantita])/-(Month
([dal])-Month([al])) AS Media
FROM MovMagCis
GROUP BY MovMagCis.Data, MovMagCis.CodiceProdotto
HAVING (((MovMagCis.Data) Between [dal] And [al]));
il numero di mesi considerato è la differenza tra i mesi di [Dal] e
[al], credo che vada considerato questo periodo visto che vuoi
spalmare la media sul periodo
indipendentemente dall' esistenza di movimenti.
Potrebbe essere necessario aggiungere 1 per includere sia il mese di
inizio che di fine.
Fammi sapere.
Ciao
Alberto

 wrote:

Questa considerando le date min e max dei movimenti:
SELECT MovMagCis.CodiceProdotto, Sum(MovMagCis.Quantita) AS
SommaDiQuantita, Sum([Quantita])/(Month(Max([data]))-Month(Min([data]))
+1) AS Media, Max(MovMagCis.Data) AS MaxDiData, Min(MovMagCis.Data) AS
MinDiData
FROM MovMagCis
WHERE (((MovMagCis.Data) Between [dal] And [al]))
GROUP BY MovMagCis.CodiceProdotto;
Ciao
Alberto
Newsgroup: it.comp.appl.access
Titolo: Comportamento anomalo Combobox con 5 colonne

Salve a tutti,
sto riscontrando un comportamento "anomalo" con la combobox di una maschera 
di un progetto di Access (ADP). A tale combobox è associato il seguente 
codice VBA:
Private Sub Codice_AfterUpdate()
On Error GoTo Hell
If Not IsNull(Me.Codice.Value) Then
    If Me.Codice.Value <> "" Then
        Me.Revisione.Value = Me.Codice.Column(1)
        Me.GruppoClienti.Value = Me.Codice.Column(2)
        Me.PrezzoLavorazione = Me.Codice.Column(3)
        Me.Denominazione = Me.Codice.Column(4)
    End If
End If
Exit Sub
Hell:
MsgBox "Si è verificato un errore. " & Err.Description, vbOKOnly + 
vbInformation, gstrAppTitle
End Sub
L'origine riga è la seguente
SELECT VI_PEZZI.Codice, VI_PEZZI.Revisione, VI_PEZZI.GruppoClienti, 
VI_PEZZI.PrezzoLavorazione, VI_PEZZI.Denominazione
FROM VI_PEZZI
ORDER BY VI_PEZZI.GruppoClienti, VI_PEZZI.Codice, VI_PEZZI.Revisione
Sulla maschera ci sono ovviamente 4 caselle di testo, che dovrebbero 
ricevere il valore in base alla query qui sopra, dopo che ho effettuato la 
scelta del codice nella combobox.
La cosa strana è che il tutto sembrerebbe funzionare per 3 caselle, mentre 
per la casella "PrezzoLavorazione" la cosa non funziona. Ho controllato 
decine di volte la vista VI_PEZZI, ho controllato l'ortografia, insomma 
credo di aver controllato tutto, ma la cosa continua a non funzionare, nel 
senso che nella casella PrezzoLavorazione non viene inserito alcun valore, o 
meglio viene inserito il valore Null, invece del prezzo che pure c'è nella 
tabella/vista sottostante.
Non ne sono sicuro, ma ho l'impressione che il problema sia sorto dopo che 
ho aggiunto una colonna (PrezzoLavorazione) e rinominato l'altra colonna 
preesistente in PrezzoLavorazioneVecchio.
Domanda: Access fa riferimento al nome di colonna della tabella o a che 
altro? L'attuale colonna "PrezzoLavorazione" è diversa da quella che c'era 
prima, visto che l'altra l'ho rinominata, ma esiste pur sempre una colonna 
con questo nome! Il tipo di dati (money) poi è lo stesso... boh!
A qualcuno è successo qualcosa del genere? Grazie mille in anticipo a chi 
potrà darmi qualche consiglio.
Maru

 ha scritto nel messaggio 
news:4908418f$0$1085$4faf...@reader2.news.tin.it...


Newsgroup: it.comp.appl.access
Titolo: evidenziare bottone al passaggio del mouse

Il 28.2.02 è stato postato un messaggio relativo a:
la mia esigenza è di generare del codice affinche al passaggio del mouse
l'etichetta del bottone diventi BOLD e torni allo stato normale quando il
mouse non è un quella zona.
Vorrei capire come posso fare via codice a fare una cosa del genere.
Grazie

 ha scritto nel messaggio
news:oYQ8a.175127$ZE.52...@twister2.libero.it...

Puoi usare un codice del genere:
Private Sub TuoBottone_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
    Me.TuoBottone.FontBold = True
End Sub
Poi, per far tornare normale il carattere:
Private Sub Corpo_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
    Me.TuoBottone.FontBold = False
End Sub
Ciao
Galliano

 ha scritto nel messaggio
news:u4R8a.174748$YG2.5...@twister1.libero.it...

Newsgroup: it.comp.appl.access
Titolo: Riempimento campo , forzato

Salve a tutti.Sicuramente avrete la risposta al mio problema.
Ho una maschera a schede di 3 pagine basata su una tabella e vorrei
porre un controllo condizionale in modo tale che solo ed
esclusivamente riempendo l'ultimo campo della prima pagina č possibile
accedere alle successive..Cioč in sostanza cio che vorrei non č una
semplice opzione di campo obbligatorio ,ma , scusate le pretese
,qualcosa di piů:un obbligo forzato alla compilazione di quel campo
altrimenti il blocco delle successive operazioni.
Grazie infinite.FLAVIO

 ha scritto nel messaggio
news:91d644f5.0309...@posting.google.com...

Su current devi controllare se il tuo controllo č valorizzato.
Occhio perň su current viene richiamato anche l'evento load, quindi dovrai
gestire anche quello
MAssimiliano

...

Grazie per la risposta .Ti disturbo se ti chiedo maggiori dettagli?
Intendo specifici passaggi.Grazie molte FLAVIO

 Intendo specifici passaggi.Grazie molte FLAVIO
Oppure
Setta su richiesto sì le proprietà del campo
all'uscità di questo controllo forzi il salvataggio
docmd.runcommand accmdsaverecord
sull'errore intervieni
MAssimiliano

Newsgroup: it.comp.appl.access
Titolo: access 2000 to 97 conversion problem

Can anyone help me with a converting problem? I have an access 2000
database which I need to convert to access 97. I have used the tool
under utilities to do this. The file works fine in access 2000 in both
the 97 format and the 2000 format.
When I copied the database onto a computer with access 97 I have a
problem with the format function.
=format([session date]),"dddd")
This format will not work in a query or a report.
I tried the same function in a new database on the computer with
access 97 and it worked fine. It seems to only be a problem in the
converted database file.
How can I solve this without redoing the whole database in access 97.
Help please!!!!!

 a scritto:

Sounds like a reference problem. It often happens converting a db.
So open a module and take a look at the menu tools/references.
In A97 there should be:
Visual Basic for Applications
Microsoft Access 8.0 Object Library
Microsoft DAO 3.5 Object Library
If there is any other reference or one of the 3 above is not present or
there is an error message at one of the entrys then activate the
reference. If there are all 3 and no error message try to deactivate
whatever is possible and afterwards activate it again.
If nothing else helps then create a new mdb and import all objects
from your db. That should also clear the reference problem.
BTW This is an Italian newsgroup. Questions and answers here
should be in Italian... or kind of. ;-)
--
HTH
Karl
*********
Access-FAQ (German): 
http://www.donkarl.com
Newsgroup: it.comp.appl.access
Titolo: Come realizzare menu tipo Outlook ???

Avete presente il menu comandi sulla sinistra di Outlook ?
E' possibile realizzarlo anche su Access ?
C'e' per caso qualcosa di gia' pronto ?
Ciao e grazie
RobertoA


sì
sul sitocomune
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007

 RobertoA
sě
sul sitocomune
----------------------
Ehhhh si
Bastava guardare attentamente
Io cercavo su moduli, invece erano su form
Grazie
RobertoA

Newsgroup: it.comp.appl.access
Titolo: Libri per database Access

Cordialita' a chi mi legge.
Esistono pubblicazioni che trattano Visual Basic
per Databases per Access..?
Posseggo una pubblicazione che tratta
Visual Basic per Databases, purtroppo noto
che non fa al caso mio.
Desidererei comprarne uno specifico per Access.
Sarei interessato anche a qualche pubblicazione
che tratta il linguaggio SQL.
Grazie in anticipo.
Antcim

 ha scritto nel messaggio
news:ZMj88.42568$3J1.1...@news2.tin.it...

Sul sito comune (
www.sitocomune.com
) trovi delle recensioni...
Ciao.
--
Sergio MAZZA

Antcim
Newsgroup: it.comp.appl.access
Titolo: errore runtime 2448

Ciao a tutti,
in una maschera a maschere continue ho inserito una casella combinata per 
filtrare la maschera  in base al contenuto della casella combinata.
ho scritto su evento dopo aggiornamento della casella combinata:
dim Elenco =""
If CasellaCombinata = 0 Then
    Me.Filter = ""
    Me.FilterOn = False
    Elenco = ""
Else
    If Elenco = ""  Then
        Elenco = Me!CasellaCombinata.Column(1)
    Else
        Elenco = Elenco & "," & Me!CasellaCombinata.Column(1)
    End If
    Me.Filter = " Idcomune = IN (" & Elenco & ")"
    Me.FilterOn = True
End If
Il problema č che quando vado a fare una selezione sulla casella combinata 
mi viene fuori questo errore:
"Impossibile assegnare un valore all'oggetto".. e mi seleziona questa riga:
Me.Filter = " Idcomune = IN (" & Elenco & ")"
come orgine della casella combinata ho messo una query unione :
SELECT 0 As Idcomune, "<  Tutti i gruppi >" as COMU_DESCR  FROM Comuni UNION 
SELECT DISTINCTROW Idcomune, COMU_DESCR FROM Comuni where 
(((Regione_nascita) Like "EMR"))
ORDER BY COMU_DESCR;
grazie mille per l'aiuto..
Ludo..
Newsgroup: it.comp.appl.access
Titolo: conversione da Visual Basic ad Access

>>>>>>>>>>>>>>>>>>>>>>>>>> end


Cosa vuoi ottenere? perchè via codice?
MAssimiliano 

...

Volevo semplicemente capire come poter creare un'ombra ai controlli
nella maschera e alla stessa maschera in modalità senza bordi.
Ciao.

Newsgroup: it.comp.appl.access
Titolo: [?]: DAO, come creo una query nascosta?

Dopo un CurrentDb.CreateQueryDef etc..etc..
Come faccio a dirgli che tale query è nascosta?
grazie
--
<***********************************>
Vigna Federico...CED L'Abbondanza
Email: 
in...@labbondanza.it
Http: 
www.labbondanza.it
<***********************************>

Come faccio a dirgli che tale query è nascosta?
All'indirizzo 
http://www.home.zonnet.nl/PatrickO/
 trovi un esempio per
nascondere degli oggetti tramite sendkeys.
Non credo sia una soluzione elegantissima, ma funziona.
Ciao,
Giovanni
---
Inferno e paradiso mi sembrano sproporzionati. Le azioni degli 
uomini non meritano tanto - JLBorges

Newsgroup: it.comp.appl.access
Titolo: dubbi su query d'aggiornamento

salve!
ho creato una query d'aggiornamento
che all'apparenza funziona, ma ho dei dubbi
perchč mi mostra (anche se vuoti) piu' di 800 records
che io non ho.
 
Questa č la query
UPDATE TbTestataFattura RIGHT JOIN (TbRigheOrdine LEFT JOIN 
TbDettaglioFattura ON TbRigheOrdine.IdOrdine = TbDettaglioFattura.IdOrdine) 
ON TbTestataFattura.IDTESTATAFATTURA = TbDettaglioFattura.IDTESTATAFATTURA 
SET TbRigheOrdine.nFattura = TbTestataFattura.Numero, 
TbRigheOrdine.DataFattura = TbTestataFattura.Data;
 
 
Grazie.
 
 


Ci possono essere moltiplicazioni di record a causa dei 2 JOIN
che hai nella query. In questo caso Access/JET indica che
deve aggiornare anche queste ripetizioni.
 
Di solito vedi il numero di record se cambi la stessa query
ad una query di selezione.
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 ha scritto nel messaggio 
news:9ljlm0...@mid.individual.net...

anche con la query di selezione ho lo stesso numero di records
Newsgroup: it.comp.appl.access
Titolo: Impossibile aggiornare. Database o oggetto di sola lettura.

Sto sviluppando un progetto e a volte (semre più frequentemente) capita che
durante oprezioni di modifica su record
sulla barra di stato mi appare il messaggio Recorset non aggiornabile.Sul
file di log mi viene riportato il seguente messaggio
02/07/2004 16.54.16
Errore numero [3027 ]
Testo Errore : Impossibile aggiornare. Database o oggetto di sola lettura.
Oggetto Errore = DAO.Recordset
Il progetto è diviso in FE e BE.
I due file .mdb non sono a solo lettura.
Le impostazioni sul menu opzioni sono AccessoCondiviso e nessun blocco a
livelo di record.
Il PC è il mio e non ho restrizioni di sorta.
Il fatto è che a volte lo fa ed a volte no.
Non è che mi si è sputtanato qualche file di access?
Ho già provato ad importare il FE su un nuovo file .mdb ma la situazione non
cambia.
Dimenticavo
Access 97
SO Windows 2000
Libreria DAO 3.5
Altre proprietà del progetto dove faccio notare "Updatable = Vero"
SunRex
Proprietà Database per C:\MiaCArtella\FrontEnd\Mio.mdb:
    Name = C:\MiaCartella\FrontEnd\Mio.mdb
    Connect =
    Transactions = Vero
    Updatable = Vero
    CollatingOrder = 1033
    QueryTimeout = 60
    Version = 3.0
    RecordsAffected = 0
    ReplicaID =
    DesignMasterID =
    AccessVersion = 07.53
    Build = 3512
    AppTitle = Mio
    StartUpShowDBWindow = Vero
    StartUpShowStatusBar = Vero
    AllowShortcutMenus = Vero
    AllowFullMenus = Vero
    AllowBuiltInToolbars = Vero
    AllowToolbarChanges = Vero
    AllowBreakIntoCode = Vero
    AllowSpecialKeys = Vero
    Show Values Limit = 1000
    Show Values in Indexed = 1
    Show Values in Non-Indexed = 1
    Show Values in Remote = 0

 I due file .mdb non sono a solo lettura.
Giusto per darti una strada (che non č detto sia quella giusta) a me era
capitato una cosa simile con un mdb collegato a sql server,
non mi permetteva di aggiornare per (dopo averle ricollegate perň, mi sono
accorto che lo script aveva tuttavia tolto la PK)
poi per la presenza di un campo "strano" doveva essere un ntext o un
decimal, se aggiornavo quel campo non mi permetteva l'update
di tutto il record. Se la modifica la tenti da tabella ti riesce?
Mi dispiace di non riuscire ad aiutarti di piů.
Ciao,
Massimo
-- 
web: 
www.piubelli.net
Vuoi il mio indirizzo? Togli _cut_ per rispondermi
Newsgroup: it.comp.appl.access
Titolo: Numerare record

Come faccio a numerare in ordine crescente i record di una tabella ?
Quello che vorrei fare è accompagnare gli ordini da trasmettere, da un
numero che li  identifica in modo univoco, e che a fine dell'anno posso
riazzerare.In poche parole mi necessita tipo un campo contatore ma con la
sola  funzione di numerazione ordine. (tipo un istruzione che dica parti da
1 fino all'infinito?
Grazie dell'aiuto

 wrote in message
GWXe4.29376$I3.3...@news.infostrada.it...


dicidere se deve essere univoco o no.....
NO! I campi contatore non servono per numerare i record nel senso che dice
noce, ma per identificarli in maniera univoca.
E poi lui vuole riazzerare il conteggio a fine anno, col contatore non puņ
farlo.
Deve usare delle tecniche che gli generino via codice dei valori univoci ma
"gestibili" in un campo numerico.
il modo di farlo lo trova nel sito comune!!!
Antonio


Mea culpa!

L'importante č aiutare.
Marco M.
http://members.xoom.it/it_db_access/

 wrote in message 85i309$703$1...@nslave1.tin.it...


Newsgroup: it.comp.appl.access
Titolo: togliere ripetizioni nella query

Salve!
chiedo aiuto per questa query 
per togliendo eventuali ripetizioni
mantenedo il medesimo risultato
 
 "SELECT * FROM TbDati" & _
    " WHERE Num =1 AND IdProdotto =" & CboProdotto & _
    " OR Num =2 AND IdCliente =" & Vcli & _
    " OR Num =3 AND IdCliente =" & Vcli & " AND IdProdotto =" & CboProdotto & _
    " OR Num =4 AND IdCliente =" & Vcli & " AND IdProdotto =" & CboProdotto & " AND IdFornitore =" & Vfo 
 
Grazie


che ripetizioni ottieni? com'è fatta la tabella TbDati?
Vorresti ottenere le coppie cliente-prodotto una sola volta?

 Vorresti ottenere le coppie cliente-prodotto una sola volta?
si esatto
grazie


quindi inizia con il selezionare solo i campi che ti interessano e non tutti a prescindere
e poi dopo SELECT devi aggiungere DISTINCT in modo che i record ripetuti non vengano mostrati
SELECT * FROM TbDati ... -> SELECT DISTINCT IdCliente, IdProdotto FROM TbDati ...


grazie
Newsgroup: it.comp.appl.access
Titolo: Riempire un campo numerico con zeri iniziali

Buon giorno, avrei la necessita di riempire un campo numerico con zeri 
iniziali fino al numero.. cerco di spiegarmi meglio, il campo è composto da 
6 caratteri.
Quello che dovrei riuscire a fare è questo: partendo del primo numero cioè 1 
nel campo automaticamente deve scrivere 000001, quando il numero diventera 
10 nel campo deve scrive 000010 e cosi via.. come posso fare a fare cio?
Grazie anticipatamente
Alberto


Alberto un campo Numerico non PUO' AVERE zeri iniziali se non con la
virgola...!
Quello che chiedi è sbagliato, nel senso che è fattibile solo con un campo
testo.
In sostanza la cosa è fattibile se il campo lo definisci Testo oppure se ti
accontenti di VISUALIZZARLO
come hai chiesto... a quel punto usi la funzione Format$([Campo],"000000").
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 ha scritto nel messaggio 
news:fmvdv1$8or$1...@aioe.org...

si scusami alex hai ragione mi sono espresso male.. grazie

Newsgroup: it.comp.appl.access
Titolo: Collegamenti ipertestuali

Salve a tutti,
Vorrei creare un collegamento ipertestuale utilizzando una istruzione di
Visual Basic.
Sapete come  fare?
Grazie per la risposta

 ha scritto nel messaggio
news:9vnu27$ajj$1...@pegasus.tiscalinet.it...

Me!ControlloIpertestuale = StringaPercorso & "#" & StringaPercorso & "#"
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Evitare duplicati di data

Devo inserire la variazione di prezzo di alcuni prodotti in date 
diverse. Vorrei che, se inserisco successivamente la stessa data per 
quel determinato prodotto, mi si segnalasse l'errore.
C'è un modo ?
Grazie, Marco

 ha scritto nel messaggio 
news:498da348$0$1118$4faf...@reader2.news.tin.it...

Puoi spiegarti meglio?
Quali operazioni fai?
Per ogni variazione reinserisci il prodotto e la data di variazione?
es.
prodotto1 data1
prodotto1 data2 (variazione)
Ciao
-- 
Roberto da Parma

Roberto da Parma ha scritto:

Sì, è esattamente così. Ho una maschera con la descrizione del prodotto 
e una sottomaschera dove via via inserisco i prezzi di acquisto che 
possono variare nel tempo e rispetto ai quali devo poi determinare il 
prezzo di vendita ed eventualmente la media per un certo periodo etc.
Ora vorrei evitare di inserire più volte lo stesso prezzo relativo alla 
stessa data. Spero di essermi spiegato.
Grazie per la risposta,
Ciao

 wrote in message 
news:498da348$0$1118$4faf...@reader2.news.tin.it...

Se già non hai PM (PrimaryKey) in tabella, creane una sui due campi
[Prezzo] e [Data].
Se hai già una PM, crea un campo [Prezzo_Data], Text, Required = Yes,
Indexed = Yes (NoDuplicates) e nella Form dalla quale inserisci i dati
poni in AfterUpdate:
[Prezzo_Data] = CStr([Prezzo]) & CStr([Data])
A completata eventualmente con la gestione dell'errore di duplicazione.
Bruno 

 ha scritto nel messaggio 
news:498dc624$0$830$4faf...@reader5.news.tin.it...

Le operazioni che devi fare sono
filtra articolo, filtra data, filtra prezzo, controlla se stesso prezzo.
Dalla maschera hai l'ID dell'articolo, dalla sottomaschera hai la data e il 
prezzo per  cui ti fai una query basata sulla tua sottomaschera dove 
inserisci i prezzi che come criteri avrà
Campo IDMaschera                CampoData 
Campo Prezzo
[Forms]![tuamaschera]![ID]    [Forms]![tuamaschera]![Form].[tuadata] ** 
[Forms]![tuamaschera]![Form].[prezzo]**
**qui dipende da dove fai girare la query
Da codice puoi ottenere il valore del campo per poi confrontarlo con il 
metodo .OpenRecordset usando appunto come origine la select di cui sopra
mandi poi in una variabile il valore del prezzo
rstprezzo = .field("Prezzo")
e lo confronti con quello che stai inserendo nella maschera
if rstprezzo = Me.Prezzo then
    messaggio e annulli eventualmente l'inserimento (Undo o cancel)
end if
Tutto il codice lo inserisci sull'evento Prima di aggiornare del campo 
Prezzo.


 Bruno
Bruno se la vuoi gestire cosě perň devi inserire anche l'ID dell'articolo
[Prezzo_Data] = CStr([ID]) & CStr([Prezzo]) & CStr([Data])


 Ciao
Sě certo, mi era scappato...
Bruno
Newsgroup: it.comp.appl.access
Titolo: Manuali online Access 97 per principianti?

Sto imparando ad usare Access 97.
Volevo sapere se qualcuno conosce qualche sito dove siano disponibili
manuali online, soprattutto per principianti, che insegnino insomma a
muovere i primi passi.
Stefano Zemella

 ha scritto nel messaggio
news:LDTh6.39004$eQ5.7...@twister2.tin.it...

Hai provato ad usare il Sommario dell'help in linea?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


guarda, on line non so, però se butti sti 30-40 sacchi ti puoi
comprare un bel manualetto che si chiama Laboratorio Access, o qc del
genere, che mi è sembrato fatto benino.
poi butti altri 30-40 sacchi e ti compri un altro manualetto che si
chiama Laboratorio Vba che magari ti potrà servire.
il primo che mi viene a fare storie che nun cià 30-40 sacchi e vuole
le cose gratis perché sta imparando ecc. ecc. gli sequestro le adidas,
il motorino, i cd dei lunapop (o degli u2 se è per questo), le uscite
in pizzeria ecc. ecc..
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com
Newsgroup: it.comp.appl.access
Titolo: [Asp.NET] Conversione stringa - euro

Creo un file XML con access 2000 che poi invio sul server.
Un campo nel file XML ha una stringa di testo che contiene dei dati che poi
devo convertire in euro.
Nel codice della pagina aspx ho scritto:
<script>
Sub Page_Load(sender As Object, E as EventArgs)
    Dim strURL as String = "nomefile.xml"
    'Riempie il DataSet
    Dim dsLLPP as New Dataset
    dsLLPP.ReadXml(strURL)
    'Riempie il DataGird
    dgLLPP.DataSource = new DataView(dsLLPP.Tables(1))
    dgLLPP.DataBind()
End Sub
Function subImporto(strImporto as String)
    if Microsoft.VisualBasic.Trim(strImporto)<>"" then
        Dim vImporto As Double = XmlConvert.ToDouble(strImporto)
        Dim strStringa as String
        strStringa = "Importo: <b>" & vImporto.ToString("c") & "</b><br />"
        return strStringa
    end if
End Function
</script>
Mentre nel datagrid recupero i dati in questo modo:
<asp:Datagrid ......>
    <asp:label id="lblImporto" runat="server" text='<%#
subImporto(Container.DataItem("Importo").ToString) %>' />
</asp:Datagrid>
La cosa strana è che sul mio pc funziona tutto per benino, se carico i file
sul server mi da l'importo in lire.
La valuta sul server (win 2000 server) è impostata in euro come sul mio
pc....
Qualcuno sa darmi qualche dritta?
Grazie.

 ha scritto nel messaggio
news:ZVoDa.60538$lK4.1...@twister1.libero.it...


Newsgroup: it.comp.appl.access
Titolo: Tasto SHIFT

Devo proteggere un database da copie e modifiche, come posso fare ?
Ho letto della possibilita' di creare un Be ed un Fe con le tabelle
collegate, ma se apro il Fe tenendo premuto il tasto SHIFT, posso benissimo
prendere i dati delle tabelle collegate e copiarli......come si puo' fare ?
--
Guercio
--= Beati monoculi in terra cćcorum =--
--= Dubium sapientiae initium =--


Cerca nel sito comune (
www.sitocomune.com
), menù General -
"Disabilitare/abilitare l'effetto del tasto shift all'avvio (solo
amministratori)." di Federico Luciani.
Ciao.

Newsgroup: it.comp.appl.access
Titolo: form attiva o caricata

C'è possibilita' (e come) di sapere se un form è attivo o meglio aperto?
grazie Riccardo

 C'è possibilita' (e come) di sapere se un form è attivo o meglio aperto?
Si, usi il seguente comando:
If acObjStateOpen = SysCmd(acSysCmdGetObjectState, acForm,
"NomeDellaMaschera") Then
 'fa quello che deve fare se è aperta
End If