title: [prob?] form e sequenza pagine multiple

author: teg

text:
salve a tutti
mi chiedo se a nessuno di voi e' mai capitato: avendo l'esigenza di fare
un'interfaccia per monitor a 800*600 sto trasformando una serie di form
singole in form multipagina...'na pizza.
Ma qualcosa non quaglia! divisa la form in due inserendo il salto pagina
necessario, se agisco sul tasto pgdown la prima volta passo giustamente alla
seconda pagina del primo record, se ripeto l'oprazione mi ritrovo non alla
prima pagina del secondo record ma alla seconda pagina del secondo record:
e' corretto? e se e' corretto come posso invece ottenere uno scorrimento
piu' ''logico''?
in pratia se R e' il record e P pagina, agendo su pgdown [,] ora ottengo la
sequenza di pagine:
R1P1, R1P2, R2P2, R3P2...
e non come vorrei:
R1P1, R1P2, R2P1, R2P2...
per completare il quadro, posso ottenere R2P1 solo con un pgup da R2P2 ma
ovviamente il pgup sucessivo non mi mostra R1P2 bensi' R1P1!...
insomma vorrei uno scorrimento piu' ''lineare'', idee al riguardo?
ciao
Teg
--------------------------------
Inviato via
http://usenet.libero.it


title: [prob?] form e sequenza pagine multiple

author: Roberto da casa

text:
"teg" <t...@rakis.gil> ha scritto nel messaggio
news:147Z162Z76Z21Y...@usenet.libero.it...

Invece di dividere le maschere in pagine per usare un monitor con
risoluzione 800x600, prova ad andare sul Sito Comune (link qui sotto) e
nella Sezione Forms a leggere la FAQ di Alberto Marchi intitolata
"Ridimensionamento automatico dei controlli di una maschera".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: [prob?] form e sequenza pagine multiple

text:
> Invece di dividere le maschere in pagine per usare un monitor con
> risoluzione 800x600, prova ad andare sul Sito Comune (link qui sotto) e
> nella Sezione Forms a leggere la FAQ di Alberto Marchi intitolata
> "Ridimensionamento automatico dei controlli di una maschera".
dunque, grazie della dritta, avevo visto sul sito la procedura che hai
suggerito ma non l'avevo presa in considerazione... cmq l'ho provata ma con
risultati nulli :(
inserisco il codice come modulo, aggiungo i controlli sulle proprieta' della
maschera come indicato ma non ottengo nessun riaggiustamento al variare
della risoluzione (e neppure messaggi d'errore). Uso Access 2002. Dove
sbagliero' stavolta?
Tornando alla questione dei salti pagina, non pensavo che ''sequenziare'' le
pagine correttamente fosse cosi' ostico...



title: [prob?] form e sequenza pagine multiple

text:
> dunque, grazie della dritta, avevo visto sul sito la procedura che hai
> suggerito ma non l'avevo presa in considerazione... cmq l'ho provata ma
con
> risultati nulli :(
forse ho trovato l'inghippo: la procedura funziona solo se la form e'
ridimensionabile e con dimensioni automatiche (ed ho tutte le form senza
bordo :\)...
Forse per risolvere il mio problema non e' l'ideale: vedro' se trovo qualche
soluzione decente ai salti pagina...



title: [prob?] form e sequenza pagine multiple

text:
"teg" <t...@rakis.gil> ha scritto nel messaggio
news:147Z162Z76Z21Y1...@usenet.libero.it...
> > dunque, grazie della dritta, avevo visto sul sito la procedura che hai
> > suggerito ma non l'avevo presa in considerazione... cmq l'ho provata ma
> con
> > risultati nulli :(
>
> forse ho trovato l'inghippo: la procedura funziona solo se la form e'
> ridimensionabile e con dimensioni automatiche (ed ho tutte le form senza
> bordo :\)...
> Forse per risolvere il mio problema non e' l'ideale: vedro' se trovo
qualche
> soluzione decente ai salti pagina...
>
> ciao
> Teg
Beh, se non rendi dimensionabili le maschere non solo non è l'ideale, ma è
del tutto inefficace; sta a te decidere se è meglio rendere le maschere
dimensionabili o rifarle suddividendole in pagine: io non avrei dubbi, ma
ognuno la pensa come crede.



title: Duplicare un risultato

author: Ghepardo

text:
Ciao!
Sto lavorando al mio solito programma sulle partite di calcio.
Vorrei fare un report che mi dia le ultime 6 partite giocate dalle squadre
che scelgo in una maschera.
La query funziona regolarmente ma se c'è stato uno scontro diretto tra due
squadre selezionate non riesco a visualizzarlo per entrambe le squadre. Mi
spiego facendo vedere quel che mi succede nel report:
JUVENTUS
Juve - Modena 1-1
Milan - Juve 1-1
Roma - Juve 1-1
INTER
Bologna - Inter 1-1
Inter - Como 1-1
Juve - Inter 1-1
Inter - Lazio 1-1
Come vedete sotto INTER c'è la partita con la Juve che nella query,
ovviamente, appare una volta sola!
Come posso fare?
Grazie mille a cercherà di aiutarmi!


title: Duplicare un risultato

author: Roberto dalla campagna

text:
Ghepardo <pippocalippo@TOGLI QUESTA PARTEtiscalinet.it> wrote in message
_pd99.3722$pX1....@news2.tin.it...

A prima vista direi che dovresti crearti un report che contiene due
sottoreport, uno che visualizza le partite della prima squadra (la Juventus)
ed il secondo che visualizza le partite della seconda squadra (l'Inter).
I due sottoreport dovrebbero avere come origine record due query di
selezione differenti.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Duplicare un risultato

text:
> A prima vista direi che dovresti crearti un report che contiene due
> sottoreport, uno che visualizza le partite della prima squadra (la
Juventus)
> ed il secondo che visualizza le partite della seconda squadra (l'Inter).
> I due sottoreport dovrebbero avere come origine record due query di
> selezione differenti.
>
> --
> Roberto
Innanzitutto ti ringrazio per la tua solita puntualità e gentilezza.
Purtroppo avevo pensato anche io ad una soluzione di questo tipo ma siccome,
nonostante nell'esempio abbia messo solo due squadre, vorrei fare questo
report per tutte le 18 squadre del campionato e fare 18 query non mi sembra
una soluzione elegante anche xè le stesse cose mi servono per il campionato
di serie B, la liga spagnola, la bundesliga ecc...
Vi viene in mente qualcos'altro? Grazie ancora, CIAO!!


title: Duplicare un risultato

text:
Ghepardo <pippocalippo@TOGLI QUESTA PARTEtiscalinet.it> wrote in message
vNv99.8510$pX1.2...@news2.tin.it...

Se la tabella tblPartite ha una struttura simile a questa:
IDPartite            Contatore e chiave primaria
IDSquadra1       Numerico
GolSquadra1     Numerico
IDSquadra2       Numerico
GolSquadra2     Numerico
Potresti crearti una tabella di comodo tblPartiteDoppie che abbia una
struttura simile a questa:
ID                      Contatore e chiave primaria
IDSquadra         Numerico
IDSquadra1       Numerico
GolSquadra1     Numerico
IDSquadra2       Numerico
GolSquadra2     Numerico
In tblPartiteDoppie copia i record di tblPartite due volte: la prima volta
inserendo in IDSquadra il valore di IDSquadra1 e la seconda volta quello di
IDSquadra2.
Metti in relazione uno-a-molti la tabella tblPartiteDoppie con la tabella
tblSquadre (che sicuramente hai definito) in base ai campi IDSquadra.
Ora fai in modo che il tuo report abbia come origine record tblSquadra; nel
corpo del report inserisci un sottoreport che abbia come origine record la
tabella tblPartiteDoppie.
Dovrebbe funzionare.



title: Duplicare un risultato

text:
--
> Roberto
FUNZIA!!! Grazie mille, come sempre...


title: [OT] [NAPOLI SALERNO] LAVORO

author: GruppoIT

text:
Gruppo IT
ricerca per lavoro da svolgere presso la sede di Napoli, un programmatori
senior-junior Java ASP VBASIC VISUAL C++
Spedire vostro curriculum presso
grup...@hotmail.com
 oppure
contattare telefonicamente la nostra sede operativa al numero 089-956169
dgt. tasto 1.
--
Posted from [151.21.75.103] by way of
dav63.law15.hotmail.com
 [64.4.22.198]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Scrivere dati in tabella via codice

text:
Salve a tutti
volevo sapere quale è il codice per scrivere dati in tabella.
Vorrei cioè evitare l'associazione dei campi di una maschera ad una
tabella sottosctante , e invece andare a scrivere i record
direttamente in tabella via codice VBA.
Per favore qualcuno mi può aiutare ?
grazie


title: Scrivere dati in tabella via codice

author: Alessandro Cara

text:
deve...@aruba.it
 ha scritto:

1) chi te lo fa fare!
2)
dim rs as variant
set rs = currentdb.openrecordset("tab")
2a) inserimento
	rs.addnew
    	rs!Campo= me!controllo
	rs.update
oppure
  la classica insert (spl)
2b) Aggiornamento
rs findfirst "chiave=" & valore
se trovato (not Nomatch)
	rs.edit
    	rs!Campo= me!controllo
	rs.update
oppure
la classica update (sql)
2c) eliminazione
	rs findfirst "chiave=" & valore
	se trovato (not Nomatch)
	rs.delete
oppure
la classica delete (sql)
quando: immagino sul click di un pulsante
Nota: Riimmagino che usi DAO. Se e' una form con inserimenti e/o
variazioni e/o cancellazioni multiple conviene aprire il recordset sulla
open della form e chiuderlo sull'unload
3) chi te lo fa fare! esiste il dirty e l'undo
--
ac


title: Scrivere dati in tabella via codice

text:
Alessandro Cara ha scritto:
>developer@aruba,it  ha scritto:

Adesso mi sasserete.......e se invece di una tabella fai una SELECT SQL e imponi me.recordsetsource=TuoSQL? Praticamente lavori disconnesso e ti eviti una valanga di problemi nella multiutenza....concorrenza nell'apertura della form.......nell'update e nelle cancellazioni......e via così......
--
Questo articolo e` stato inviato dal sito web
http://www.nonsolonews.it


title: Scrivere dati in tabella via codice

author: IgnazioC

text:
Fair8 ha usato la sua tastiera per scrivere :

personalmente odio le maschere associate :)
bisogna stare attenti alla rotellina del mouse..al salvataggio
automatico..poi se passi ad una subform ti salva il record della form
madre...
preferisco un
rs = currentdb.openrecordset(SQL) e poi
me.miatextbox = rs("nomecampo")
--
IgnazioC


title: Scrivere dati in tabella via codice

text:
IgnazioC ha scritto:
[cut]
> personalmente odio le maschere associate :)
> bisogna stare attenti alla rotellina del mouse..al salvataggio
> automatico..poi se passi ad una subform ti salva il record della form
> madre...
> preferisco un
> rs = currentdb.openrecordset(SQL) e poi
> me.miatextbox = rs("nomecampo")
Ognuno ha diritto di eleggere tempi e modo della propria distruzione
(cit R.H. Heinlein)
--
ac


title: Scrivere dati in tabella via codice

text:
Fair87 ha scritto:

Uhmmm..... cosa cambia oltre il fatto che non definisci il tuo rs
poiche' usi quello messo a disposizione dal form? A occhio sempre
"spostamenti" dal form  al recordset devi fare.Tra l'altro perche'
dovrei fare una select? Non e' sufficiente imputare la tabella (o query)
al recordsource? Questo se ho capito la questione. Inoltre non vedo come
cio' possa evitare i problemi da te citati, sempre che esistano, a meno
che non usi un unico FE e magari sotto terminal server. Dico sempre che
esistano perche', al momento, non mi sembra di avere  mai avuto "guai"
di alcun tipo.
--
ac


title: Scrivere dati in tabella via codice

text:
Alessandro Cara ha scritto:

Ciao Alessandro, come sempre colpa mia che spiego male......la SELECT stà per una query via codice, non memorizzata in ACCESS. Praticamente è una maschera dissociata, che io uso sempre quando devo fare azioni non in sola lettura (tipo appunto inserimenti, cancellazioni e via così). Come già postato in questo NG ho sempre avuto problemi di 'concorrenza' utilizzando il mio archivio (mdb) in multiutenza (BE+FE nessun terminal service). In questa maniera, oppure scrivendo una tabella locale e impostando la source sulla tabella x risultati molto 'pesanti', sono riuscito (almeno all'apparenza) a avviare tali problemi. X quanto riguarda le modifiche e le cancellazioni, ok che c'è undo e dirty, ma se lavoro sul record diretto mi espongo a bloccaggi di Access e possibili 'sporcature' che se lavoro in form 'dissociate' mi evito...anche il controllo dell'inserimento mi risulta + facile e sicuro......ovviamente è tutto IMO. Qualunque considerazione è sempre beneaccetta
Ciao e AUGURI!!!!!!!!!!!!!!



title: Scrivere dati in tabella via codice

text:
Sto scrivendo piccolo codice per scrivere dati in tabella,di una
textbox di una maschera che viene aggiornata automaticamente :
Sull'evento onTimer
DoCmd.SetWarnings (False)
DoCmd.RunSQL "INSERT INTO nome_tabella(nome_campo) VALUES('" _
& me.miaLabel.caption & "')"
DoCmd.SetWarnings (True)
Se volessi scrivere su più colonne(campi) dello stesso record dati di
più textbox della stessa maschera , quale sarebbe la sintassi esatta ?
Grazie a tutti per l'aiuto


title: Scrivere dati in tabella via codice

author: Karl Donaubauer

text:

DoCmd.RunSQL _
"INSERT INTO nome_tabella(campo1, campo2, campo3)" & _
" VALUES('" & Me!Label1.caption & "', '" & Me!Label2.caption & "', '" & _
Me!Label3.caption & "')"
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: calendario e maschera tipo foglio excel ... vi prego, chi lo sa?

author: Mia

text:
devo creare una maschera così:
 un calendario infinito di giorno in giorno per ogni nome in maschera
continua:
              |01/01/01|02/01/01|03/01/01| ... eccetera
---------|----------|-------------------------------------
nome1   | presente | presente |assente   | ... eccetera
---------|----------|----------------------------------------
nome2   | presente | presente |assente   | ...ecc.
---------|----------|--------------------------------------
nome3   | presente | presente |presente | ...ecc
---------|----------|--------------------------------------
nome4   | presente | presente |assente   | ...ecc
era un foglio excel. Da notare che presente o assente (e altri valori che
non sto a elencare ora) vengono inseriti automaticamente da un'altra
maschera (registro) e devo poterli modificare manualmente da qui. Come posso
ricostruirla con access?
chi sa aiutarmi? Non so da che parte cominciare! Non so né se sia possibile
né eventualmente cosa cercare (sitocomune o help) per capire come procedere.
Ho provato con query a campi incrociati ma non mi lascia modificare i valori
e non so nemmeno come costruire la tabella : non dovrò mica costruire una
tabella con 365 campi per ogni giorno dell'anno vero? O SI?
spero nel vostro aiuto
grazie
smak
Mia


title: Scorpora nome e cognome

author: Fabio P.

text:
Cari amici, vi sottopongo un problema al quale non so dare una soluzione.
Ho un campo in access di una tabella che contiene il nome e il cognome
insieme
ES.
Marco Rossi
 L'obbiettivo è quello di creare due campi in una nuova tabella, uno che
conterrà il nome e l'altro il cognome.
Si tenga conto che potrebbero esserci uno o più nomi per campo e addirittura
un cognome composto
 ES.
Marco De Pascalis
oppure
Marco Giovanni De Pascalis
Come procedere?
Ringrazio anticipatamente!!!!
Fabio


title: Scorpora nome e cognome

author: MA

text:

Su
www.sitocomuen.com
 sez query c'è quello che cerchi
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:
www.donkarl.com/it


title: Scorpora nome e cognome

text:
CHE VELOCITA'!!!
Funziona, grazie, adesso cerco di imparare come è stato creato.
Grazie
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:7BIle.12732$TR5....@news.edisontel.com...



title: Scorpora nome e cognome

author: Bruno Campanini

text:
" Fabio P." <
ll...@tin.it
> wrote in message
news:WGIle.951224$b5.41...@news3.tin.it...
> CHE VELOCITA'!!!
> Funziona, grazie, adesso cerco di imparare come è stato creato.
Purché non si chiami
Carlo Maria Giovanni Rossi
Sarebbe buona norma usare nella compilazione
del campo nominativo della tabella la regola
di far precedere il cognome (composto da
qualsivoglia numero di parole), seguito da virgola,
seguita dal nome (composto da qualsivoglia
numero di parole).
Rossi Aleardi Boncompagni, Francesco Giuseppe.
Tutte le ambiguità sarebbero così evitate.
Bruno


title: Scorpora nome e cognome

author: ALESSANDRO Baraldi

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:C_Xle.953646$b5.41...@news3.tin.it...

Ciao Bruno.
Meglio ancora 2 campi separati come prevedono tutti i
SW fiscali....!
Poi te la giochi con un Merge di stringhe i un campo calcolato
qualora servisse.
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Access 2003 + form basata su stored procedure con tre parametri

author: PBsoft

text:
In un ADP ho una form basata sul una stored procedure che prende tre parametri
in input.
Purtroppo i tre parametri vengono da tre diverse combo e la loro combinazione
può essere una qualsiasi.
Per questo motivo, ho avuto dei problemi nell'utilizzare direttamente del
codice SQL, quindi ho fatto ricorso al Dynamic T-SQL per creare dinamicamente
la stringa di WHERE (che potrebbe anche essere vuota). Ecco di seguito la
stored procedure:
=================================================
ALTER PROCEDURE dbo.sp_VisualizzaStampantiLogica
(
@IDProgramma int = NULL,
@IDServizio int = NULL,
@IDUfficio int = NULL
)
AS
DECLARE @strWhere nvarchar(1000)
DECLARE @strSQL nvarchar(1000)
SELECT @strWhere = ''
IF @IDProgramma IS NOT NULL
  SELECT @strWhere = @strWhere + '(dbo.tblProgrammi.IDProgramma = ' + CAST(@IDProgramma
AS nvarchar) + ') AND '
IF @IDServizio IS NOT NULL
  SELECT @strWhere = @strWhere + '(dbo.tblServizi.IDServizio = ' + CAST(@IDServizio
AS nvarchar) + ') AND '
IF @IDUfficio IS NOT NULL
  SELECT @strWhere = @strWhere + '(dbo.tblUffici.IDUfficio = ' + CAST(@IDUfficio
AS nvarchar) + ') AND '
IF @strWhere <> ''
  SELECT @strWhere = ' WHERE ' + LEFT(@strWhere, LEN(@strWhere) - 4)
SELECT @strSQL =
  N'SELECT dbo.tblMarche.Marca + '' '' + dbo.tblModelli.Modello AS ModelloStampante,
dbo.tblStampanti.Codice ' +
  N'FROM dbo.tblProgrammi INNER JOIN dbo.tblServizi ' +
  N'     ON dbo.tblProgrammi.IDProgramma = dbo.tblServizi.IDProgramma ' +
  N'     INNER JOIN dbo.tblUffici ' +
  N'     ON dbo.tblServizi.IDServizio = dbo.tblUffici.IDServizio ' +
  N'     INNER JOIN dbo.tblStampanti ' +
  N'     ON dbo.tblUffici.IDUfficio = dbo.tblStampanti.IDUfficio ' +
  N'     INNER JOIN dbo.tblModelli ' +
  N'     ON dbo.tblStampanti.IDModello = dbo.tblModelli.IDModello ' +
  N'     INNER JOIN dbo.tblMarche ' +
  N'     ON dbo.tblModelli.IDMarca = dbo.tblMarche.IDMarca ' +
  @strWhere +
  N' ORDER BY dbo.tblMarche.Marca, dbo.tblModelli.Modello, dbo.tblStampanti.Codice'
EXEC sp_executesql @strSQL
=================================================
L'utente filippo non ha alcuna autorizzazione sulle tabelle, mentre ha l'autorizzazione
SELECT su una valanga di stored procedure, compresa quella sopra riportata.
Per il funzionamento della stored procedure non ci sono problemi se sono
collegato a SQL Server come utente sa, mentre se provo ad eseguire la form
con un diverso utente(chiamiamolo filippo), ottengo il seguente errore di
autorizzazione negata:
"L'autorizzazione SELECT è stata negata per l'oggetto 'tblStampanti', database.....,
proprietario dbo"
Come utente filippo non ho alcun problema ad utilizzare tutte le altre form
del progetto ADP, ma devo dire che nessuna delle altre stored procedure manda
in esecuzione una seconda stored procedure, come invece accade in questo
caso.
Aggiungo che ho anche provato ad assegnare all'utente filippo tutti i diritti
sulla tblStampanti, ma l'errore si ripresenta di nuovo.
Sembra che la stored procedure sp_executesql venga eseguita con un altro
profilo, quindi con diverse autorizzazioni.
Potete aiutarmi?
Grazie.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


author: giorgio rancati

text:
"PBsoft" <in...@REMOVEpbsoft.it> ha scritto nel messaggio
news:875ea355361c98...@news.tin.it...
> In un ADP ho una form basata sul una stored procedure che prende tre
parametri
> in input.
> Purtroppo i tre parametri vengono da tre diverse combo e la loro
combinazione
> puň essere una qualsiasi.
>
> Per questo motivo, ho avuto dei problemi nell'utilizzare direttamente del
> codice SQL, quindi ho fatto ricorso al Dynamic T-SQL per creare
dinamicamente
> la stringa di WHERE (che potrebbe anche essere vuota). Ecco di seguito la
> stored procedure:
>
[CUT]
>
> L'utente filippo non ha alcuna autorizzazione sulle tabelle, mentre ha
l'autorizzazione
> SELECT su una valanga di stored procedure, compresa quella sopra
riportata.
>
> Per il funzionamento della stored procedure non ci sono problemi se sono
> collegato a SQL Server come utente sa, mentre se provo ad eseguire la form
> con un diverso utente(chiamiamolo filippo), ottengo il seguente errore di
> autorizzazione negata:
>
> "L'autorizzazione SELECT č stata negata per l'oggetto 'tblStampanti',
database.....,
> proprietario dbo"
>
> Come utente filippo non ho alcun problema ad utilizzare tutte le altre
form
> del progetto ADP, ma devo dire che nessuna delle altre stored procedure
manda
> in esecuzione una seconda stored procedure, come invece accade in questo
> caso.
il fatto č che esegui un sql dinamico.
Qui viene spiegato il perchč
----
PRB: Security Context of Dynamic SQL Statements Inside a Stored Procedure
http://support.microsoft.com/kb/301299/en-us
----
> Aggiungo che ho anche provato ad assegnare all'utente filippo tutti i
diritti
> sulla tblStampanti, ma l'errore si ripresenta di nuovo.
devi assegnare il diritto *GRANT SELECT* per tutte le tabelle presenti nella
clausola From ma a questo punto cade il tuo castello di protezioni
> Sembra che la stored procedure sp_executesql venga eseguita con un altro
> profilo, quindi con diverse autorizzazioni.
il motivo č spiegato sopra.
> Potete aiutarmi?
io farei cosě:
------
ALTER PROCEDURE dbo.sp_VisualizzaStampantiLogica
(
@IDProgramma int = NULL,
@IDServizio int = NULL,
@IDUfficio int = NULL
)
AS
SET NOCOUNT ON
SELECT @IDProgramma=IsNull(@IDProgramma,-1),
       @IDServizio=IsNull(@IDServizio,-1),
       @IDUfficio=IsNull(@IDUfficio,-1)
SELECT dbo.tblMarche.Marca + ' ' + dbo.tblModelli.Modello AS
ModelloStampante,
       dbo.tblStampanti.Codice
FROM   dbo.tblProgrammi
 INNER JOIN
       dbo.tblServizi ON dbo.tblProgrammi.IDProgramma =
dbo.tblServizi.IDProgramma
 INNER JOIN
       dbo.tblUffici  ON dbo.tblServizi.IDServizio =
dbo.tblUffici.IDServizio
 INNER JOIN
       dbo.tblStampanti ON dbo.tblUffici.IDUfficio =
dbo.tblStampanti.IDUfficio
 INNER JOIN
       dbo.tblModelli ON dbo.tblStampanti.IDModello =
dbo.tblModelli.IDModello
 INNER JOIN
       dbo.tblMarche ON dbo.tblModelli.IDMarca = dbo.tblMarche.IDMarca
WHERE  @IDProgramma=CASE WHEN @IDProgramma=-1
                    THEN -1 ELSE dbo.tblProgrammi.IDProgramma END
   AND @IDServizio=CASE WHEN @IDServizio=-1
                    THEN -1 ELSE dbo.tblServizi.IDServizio END
   AND @IDUfficio=CASE WHEN @IDUfficio=-1
                    THEN -1 ELSE dbo.tblUffici.IDUfficio END
ORDER BY dbo.tblMarche.Marca,
         dbo.tblModelli.Modello,
         dbo.tblStampanti.Codice
----
Ciao
--
Giorgio Rancati
[Office Access MVP]


text:
> il fatto č che esegui un sql dinamico.
> Qui viene spiegato il perchč
> ----
> PRB: Security Context of Dynamic SQL Statements Inside a Stored
> Procedure
>
http://support.microsoft.com/kb/301299/en-us
> ----
Caspiterina!! Avrei potuto cercare per mesi su Google senza trovare niente.
Io credevo che il problema fossero le stored procedure annidate :-(
> devi assegnare il diritto *GRANT SELECT* per tutte le tabelle presenti
> nella clausola From ma a questo punto cade il tuo castello di
> protezioni
Infatti devo evitare questa soluzione.
> io farei cosě:
> ------
> ALTER PROCEDURE dbo.sp_VisualizzaStampantiLogica
(omissis)
Funziona alla perfezione!!!!
Ti ringrazio tantissimo!!!!
Ma quando č che passi dalle parti di Viareggio cosě ti porto a mangiare del
buon pesce, cucinato bene?!?!?



text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:44c0d186$0$989$5fc...@news.tiscali.it...
per la cronaca:
la Where proposta inibisce l'eventuale uso degli indici sui campi di filtro,
l'alternativa sarebbe quella di fare 8 stored procedure a seconda delle
condizioni, se hai tabelle con milioni di record puoi percorrere questa
strada.
Personalmente ho delle procedure con 20 parametri di filtro in ingresso dove
l'utente puo selezionare da nessuno a tutti i parametri.
Queste Sp eseguite su tabelle di piccole dimensioni (400.000-500.000 record)
rendono il risultato in 1/4 di secondo.
E' ovvio che non ho considerato l'idea di fare 2^20=1048576 store procedure
per ottimizzare i tempi di esecuzione.
:-)



text:
"PBsoft" <in...@REMOVEpbsoft.it> ha scritto nel messaggio
news:875ea355362478...@news.tin.it...
>
> Funziona alla perfezione!!!!
> Ti ringrazio tantissimo!!!!
> Ma quando è che passi dalle parti di Viareggio così ti porto a mangiare
del
> buon pesce, cucinato bene?!?!?
guarda che me lo segno :-)



text:
> la Where proposta inibisce l'eventuale uso degli indici sui campi di
> filtro
Bella questa: me la potresti spiegare meglio?
> l'alternativa sarebbe quella di fare 8 stored procedure a
> seconda delle condizioni, se hai tabelle con milioni di record puoi
> percorrere questa strada.
Ti ringrazio per il suggerimento, ma si tratta di pochissimi record.
> Personalmente ho delle procedure con 20 parametri di filtro in
> ingresso dove
> l'utente puo selezionare da nessuno a tutti i parametri.
Azz.....
> Queste Sp eseguite su tabelle di piccole dimensioni (400.000-500.000
> record)
Ri-azz.....e queste sarebbero di "piccole dimensioni"?!?!?
Si vede proprio che il tuo target č completamente diverso dal mio.
> rendono il risultato in 1/4 di secondo.
Be', allora direi proprio che degli indici posso anche fregarmene :-)
> E' ovvio che non ho considerato l'idea di fare 2^20=1048576 store
> procedure per ottimizzare i tempi di esecuzione.
Magari sarą una futura ottimizzazione da far pagare oro colato :-)



text:
"PBsoft" <in...@REMOVEpbsoft.it> ha scritto nel messaggio
news:875ea355362df8...@news.tin.it...
> > la Where proposta inibisce l'eventuale uso degli indici sui campi di
> > filtro
>
> Bella questa: me la potresti spiegare meglio?
perchè nel caso che il parametro è uguale a -1 è necessario fare una
scansione dell'indice, il query optimizer sceglie la soluzione che va bene
in entrambi i casi.
fai una semplice prova, incolla questo in SSMS
----
DECLARE @IDProgramma int
SET @IDProgramma=100
SELECT IDProgramma
FROM   dbo.tblProgrammi
WHERE  @IDProgramma=IDProgramma
SELECT IDProgramma
FROM   dbo.tblProgrammi
WHERE  @IDProgramma=CASE WHEN @IDProgramma=-1
                   THEN -1 ELSE IDProgramma END
----
premi il pulsante "Includi piano di esecuzione effettivo* e esegui il batch.
La prima query effettuerà un *Index Seek* quindi punterà direttamente alla
sua pagina
La seconda query effettuerà un *Index Scan* quindi dovrà passarsi le pagine
dell'indice prima di trovare la sua pagina, se la tabella è di piccole
dimensioni (nel senso di Byte per riga) potrebbe decidere di fare un *Table
Scan*
> > Personalmente ho delle procedure con 20 parametri di filtro in
> > ingresso dove
> > l'utente puo selezionare da nessuno a tutti i parametri.
>
> Azz.....
>
> > Queste Sp eseguite su tabelle di piccole dimensioni (400.000-500.000
> > record)
>
> Ri-azz.....e queste sarebbero di "piccole dimensioni"?!?!?
no, anche per me sono tanti, ma sull' Ng di sql server sento parlare di Db
di 30Gb :-]
> Si vede proprio che il tuo target è completamente diverso dal mio.
penso di no :-) quelle sono le righe di 12 anni di database, i primi 8
gestiti con Access e poi convertiti.



title: File di guida

text:
Ciao a tutti voi e grazie per quello che fate
Ho scritto una routine che funziona senza problemi, però volevo dare
all'utente finale un File di guida che spiega meglio ciò che stà facendo e
le conseguenze dirette alla sua azione.
voilà la funzione
Function Importa_SPVR_Trasferimento_SPVR()
Dim Msg, Style, Title, Ctxt, Help, Response, MyString
Msg = "Procedura per importare i pagamenti ricevuti. Vuoi continuare  ?"   '
Definisce il messaggio.
Style = vbYesNoCancel + vbCritical + vbDefaultButton2 ' Definisce i
pulsanti.
Title = "                     Importazione dei nuovi pagamenti"  ' Definisce
il titolo.
Help = "importazione dei nuovi pagamenti.rtf"   ' Definisce il file della
Guida.
Response = MsgBox(Msg, Style, Help, Title, Ctxt)
If Response = vbYes Then    ' L'utente sceglie il pulsante Sì.
MyString = "Sì" ' Esegue un'azione.
'Else    ' L'utente sceglie il pulsante No.
'    MyString = "No" ' Esegue la routine che segue.
'End If
    DoCmd.SetWarnings False
    Beep
    MsgBox "Come da tuo desiderio, stò importando i nuovi pagamenti.",
vbInformation, "                    Importazione pagamenti"
    DoCmd.TransferText acImportFixed, "croce rossa", "pagamenti nuovi",
"c:\access\program\croce rossa\gestione soci\gestione membri e donatori
(nuovo italiano)\programma\dati esterni\testtest.v11", False, ""
    DoCmd.OpenQuery "importa spvr (collette)", acNormal, acEdit
    DoCmd.OpenQuery "importa spvr (quote sociali)", acNormal, acEdit
    DoCmd.OpenQuery "importa spvr (esporta dati prisma)", acNormal, acEdit
    DoCmd.OpenReport "importa spvr (stampa)", acPreview, "", ""
    DoCmd.OpenReport "Cambiamento categoria non socio persfisica",
acPreview, "", ""
    DoCmd.OpenReport "Cambiamento categoria non socio persgiuridica",
acPreview, "", ""
    DoCmd.TransferText acExportDelim, "", "dati pagamenti da esportare",
"c:\access\program\croce rossa\gestione soci\gestione membri e donatori
(nuovo italiano)\programma\dati esterni\prova.txt", True, ""
    DoCmd.OpenQuery "modifica da non socio a socio persfisica", acNormal,
acEdit
    DoCmd.OpenQuery "modifica da non socio a socio persgiuridica", acNormal,
acEdit
    DoCmd.OpenQuery "modifica da non socio a socio persfisica1", acNormal,
acEdit
    DoCmd.OpenQuery "modifica da non socio a socio persgiuridica1",
acNormal, acEdit
    DoCmd.SetWarnings True
    Beep
    MsgBox "     Importazione nuovi pagamenti terminata ......pensate alle
stampe!!!!", vbCritical, "                       P e n s a t e  a l l e  s t
a m p e"
Else    ' L'utente sceglie il pulsante No.
    MyString = "No" ' Esce dalla routine.
End If
End Function
Nel messaggio che esce c`è beninteso  OK, NO, Annulla, Help
Se pigio sia su Ok, No, Annulla  tutto è OK
se pigio su Help non riesco ad aprire il File che ho creato?
Il file è stato scritto tramite Word, salvato con il formato RTF.
cosa sbaglio?
vi ringrazio anticipatamente.
saluti
Giova


title: File di guida

author: sv

text:
giovanni.matasci ha scritto:
> Ciao a tutti voi e grazie per quello che fate
> Ho scritto una routine che funziona senza problemi, però volevo dare
> all'utente finale un File di guida che spiega meglio ciò che stà facendo e
> le conseguenze dirette alla sua azione.
> voilà la funzione
> Function Importa_SPVR_Trasferimento_SPVR()
> Dim Msg, Style, Title, Ctxt, Help, Response, MyString
> Msg = "Procedura per importare i pagamenti ricevuti. Vuoi continuare  ?"   '
> Definisce il messaggio.
> Style = vbYesNoCancel + vbCritical + vbDefaultButton2 ' Definisce i
> pulsanti.
> Title = "                     Importazione dei nuovi pagamenti"  ' Definisce
> il titolo.
> Help = "importazione dei nuovi pagamenti.rtf"   ' Definisce il file della
> Guida.
> Response = MsgBox(Msg, Style, Help, Title, Ctxt)
Dovrebbe essere
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
Ctxt è obbligatorio se esiste Help (nr. contesto file guida), ma
non lo leggo nella tua routine.
>If Response = vbYes Then    ' L'utente sceglie il pulsante Sì.
> MyString = "Sì" ' Esegue un'azione.
> 'Else    ' L'utente sceglie il pulsante No.
> '    MyString = "No" ' Esegue la routine che segue.
> 'End If
>     DoCmd.SetWarnings False
>     Beep
>     MsgBox "Come da tuo desiderio, stò importando i nuovi pagamenti.",
> vbInformation, "                    Importazione pagamenti"
>     DoCmd.TransferText acImportFixed, "croce rossa", "pagamenti nuovi",
> "c:accessprogramcroce rossagestione socigestione membri e donatori
> (nuovo italiano)programmadati esternitesttest.v11", False, ""
>     DoCmd.OpenQuery "importa spvr (collette)", acNormal, acEdit
>     DoCmd.OpenQuery "importa spvr (quote sociali)", acNormal, acEdit
>     DoCmd.OpenQuery "importa spvr (esporta dati prisma)", acNormal, acEdit
>     DoCmd.OpenReport "importa spvr (stampa)", acPreview, "", ""
>     DoCmd.OpenReport "Cambiamento categoria non socio persfisica",
> acPreview, "", ""
>     DoCmd.OpenReport "Cambiamento categoria non socio persgiuridica",
> acPreview, "", ""
>     DoCmd.TransferText acExportDelim, "", "dati pagamenti da esportare",
> "c:accessprogramcroce rossagestione socigestione membri e donatori
> (nuovo italiano)programmadati esterniprova.txt", True, ""





> cosa sbaglio?

--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: lentezza esasperante da client con windows 8

author: BFS

text:
Ciao a tutti
FE file adp Xp (lo stesso problema cmq si verifica con acc 2003)
collaudatissimo da anni
BE MSDE 2000 su un "server" con windows xp

Su tutti i client da win 2000 a win 7 il client ADP ï¿œ un fulmine nel
aprire le maschere, fare ricerche etc

Solo il client con windows 8 ï¿œ di una lentezza esasperante..si parla di
decine di secondi per popolare una banale maschera fatture che negli
altri client impiega mezzo secondo

Sul client il problema si presenta sia con il runtime, sia con AccessXP
completo sia con Access 2003 Completo.

Come test ho provato ad installare MSDE/SQL Server anche nel client con
windows 8, per farlo lavorare in locale...e con gli archivi in locale il
client ï¿œ un fulmine.

A questo punto quindi penso sia un problema di rete...ma cosa???
I firewall su entrambi i pc sono disattivati come pure l'antivirus

Task manager alla mano si notano solo dei picchi al 100% di utilizzo
della rete...ram e cpu nella norma.

Ho provato allora debuggare la parte di codice che va a popolare la
maschera...e vedo che si ferma a pensare 4-5 secondi su istruzioni tipo
me.dataentry=false  oppure su exit sub

Avevo dato per scontato che potesse essere un problema di rete interno
di quel cliente ma ora che ho sotto mano un portatile con windows 8 ho
potuto appurare che il problema si verifica anche da me

Sottolineo che con gli archivi in locale il problema svanisce

ben accetti suggerimenti :-)

BFS


author: Bisio

text:
> A questo punto quindi penso sia un problema di rete...ma cosa???

scambia l'attuale posizione in rete del pc W8 con un altro pc ( cioč scambi
il jack di connessione della presa di rete) per escludere problemi nel cavo
di rete e nella porta di rete presente sullo switch a cui sono collegati i
pc.

Inoltre dovresti disinstallare l'antivirus su W8, a volte non basta
disattivarlo in quanto alcuni componenti sono sempre attivi in background(
mi č capitato con Norton) . Poi lo reinstalli se necessario.


author: Pablitomf

text:
> ben accetti suggerimenti :-)
>
> BFS

mmmm... ma se le tabelle del BE sono source dirette di Form (senza passare
per alcuna ricerca, codice o altro), il problema di lentezza te lo da lo
stesso?

--
------------
Pablitomf
Napoli sempre nel "Q"uore!
"mammasantissima" si nasce, non si diventa.

TheSpaceCowboy :
Britos deve recuperare per arrivare in forma al prossimo
infortunio - 24/10/12


text:
Il 28/12/2012 22:38, Bisio ha scritto:
>> A questo punto quindi penso sia un problema di rete...ma cosa???
>
>
> scambia l'attuale posizione in rete del pc W8 con un altro pc ( cioè scambi
> il jack di connessione della presa di rete) per escludere problemi nel cavo
> di rete e nella porta di rete presente sullo switch a cui sono collegati i
> pc.
>
la rete non centra... visto che il problema lo fa sia dal cliente sia su
un notebook di prova qui da me

> Inoltre dovresti disinstallare l'antivirus su W8, a volte non basta
> disattivarlo in quanto alcuni componenti sono sempre attivi in background(
> mi è capitato con Norton) . Poi lo reinstalli se necessario.
>
>
>

provo

ciao


text:
Il 28/12/2012 23:17, Pablitomf ha scritto:
>> ben accetti suggerimenti :-)
>>
>> BFS
>
> mmmm... ma se le tabelle del BE sono source dirette di Form (senza passare
> per alcuna ricerca, codice o altro), il problema di lentezza te lo da lo
> stesso?
>

no. le form che poggiano direttamente su tabelle senza codice sono
velocissime

BFS


text:
Il 28/12/2012 14:17, BFS ha scritto:
> Ciao a tutti
> FE file adp Xp (lo stesso problema cmq si verifica con acc 2003)
> collaudatissimo da anni
> BE MSDE 2000 su un "server" con windows xp
>
> Su tutti i client da win 2000 a win 7 il client ADP è un fulmine nel
> aprire le maschere, fare ricerche etc
>
> Solo il client con windows 8 è di una lentezza esasperante..si parla di
> decine di secondi per popolare una banale maschera fatture che negli
> altri client impiega mezzo secondo
>
> Sul client il problema si presenta sia con il runtime, sia con AccessXP
> completo sia con Access 2003 Completo.
>
> Come test ho provato ad installare MSDE/SQL Server anche nel client con
> windows 8, per farlo lavorare in locale...e con gli archivi in locale il
> client è un fulmine.
>
> A questo punto quindi penso sia un problema di rete...ma cosa???
> I firewall su entrambi i pc sono disattivati come pure l'antivirus
>
> Task manager alla mano si notano solo dei picchi al 100% di utilizzo
> della rete...ram e cpu nella norma.
>
> Ho provato allora debuggare la parte di codice che va a popolare la
> maschera...e vedo che si ferma a pensare 4-5 secondi su istruzioni tipo
> me.dataentry=false  oppure su exit sub
>
> Avevo dato per scontato che potesse essere un problema di rete interno
> di quel cliente ma ora che ho sotto mano un portatile con windows 8 ho
> potuto appurare che il problema si verifica anche da me
>
> Sottolineo che con gli archivi in locale il problema svanisce
>
> ben accetti suggerimenti :-)
>
> BFS

se può essere utile a qualcuno ho risolto il problema.
eseguendo la connessione al server non con il nome del pc ma con il suo
indirizzo ip il problema scompare.
non capisco cosa possa centrale con il fatto che  una istruzione tipo
me.dataentry=true ci impieghi 15 secondi quando il client è connesso con
il nome e un fulmine quando è connesso con l'ip

ciao
BFS


text:
> se puï¿œ essere utile a qualcuno ho risolto il problema.
> eseguendo la connessione al server non con il nome del pc ma con il suo
> indirizzo ip il problema scompare.
> non capisco cosa possa centrale con il fatto che  una istruzione tipo
> me.dataentry=true ci impieghi 15 secondi quando il client ï¿œ connesso con
> il nome e un fulmine quando ï¿œ connesso con l'ip

sara' un problema legato ai diritti LAN nella risoluzione del NomePC di rete.



text:
Il 02/01/2013 14:20, Pablitomf ha scritto:
>> se puï¿œ essere utile a qualcuno ho risolto il problema.
>> eseguendo la connessione al server non con il nome del pc ma con il suo
>> indirizzo ip il problema scompare.
>> non capisco cosa possa centrale con il fatto che  una istruzione tipo
>> me.dataentry=true ci impieghi 15 secondi quando il client ï¿œ connesso con
>> il nome e un fulmine quando ï¿œ connesso con l'ip
>
> sara' un problema legato ai diritti LAN nella risoluzione del NomePC di rete.
>

un eventuale errore nella risoluzione dei nomi non mi farebbe neppure
connettere a sql server. ï¿œ un bel mistero che solo alcune form e solo
alcune istruzioni generino questa lentezza incredibile.

vabbï¿œ l'importante era per me risolvere o me la sarei vista brutta con
windows 8

BFS


text:
BFS <B...@BFSBFS.it> ha scritto:

non errore nel senso letterario della parola, nel nostro caso lentezza di
risoluzione nome ma esclusivamente da vba, non in generale...

Facciamo cosï¿œ... crea un nuovo DB e chiamalo PING.

Crei 3 moduli di classe.

**** Il primo lo chiami "clsFBISocket" (sotto il codice da incollare)

Option Compare Database
Option Explicit

Private Const WSADESCRIPTION_LEN = 256
Private Const WSASYS_STATUS_LEN = 128

Private Type WSADATA
    bVersionL As Byte
    bVersionH As Byte
    bHighVersionL As Byte
    bHighVersionH As Byte
    szDescription(0 To WSADESCRIPTION_LEN) As Byte
    szSystemStatus(0 To WSASYS_STATUS_LEN) As Byte
    wMaxSockets As Integer
    wMaxUDPDG As Integer
    dwVendorInfo As Long
End Type

    Private Const SocketSuccess = 0
    Private Const SocketErrNotResponding = 1
    Private Const SocketErrUnsupportedVer = 2
    Private Const SocketErrNotEnoughSockets = 3
    Private Const SocketErrOnCleanUp = 4

Private Declare Function WSAStartup Lib "WSOCK32.DLL" (ByVal wVersionRequired
As Long, lpWSADATA As WSADATA) As Long
Private Declare Function WSACleanup Lib "WSOCK32.DLL" () As Long

Private WSAD As WSADATA
Private m_MinSockets As Integer
Private m_LastError As Long
Private m_IgnoreErrors As Boolean
Private m_WSAInitialized As Boolean

Public Event Error(ByVal ErrorCode As Long, ByVal Description As String, ByRef
Cancel As Boolean)

Private Sub Class_Initialize()
    m_MinSockets = 1
    m_IgnoreErrors = False
    Call RequestVersion(1, 1)
End Sub

Private Sub Class_Terminate()
    If m_WSAInitialized Then Call CleanUp
End Sub
Public Function ErrorDescription(ByVal ErrorCode As Long) As String
    Select Case ErrorCode
        Case SocketSuccess: ErrorDescription = "Nessun errore"
        Case SocketErrNotResponding: ErrorDescription = "L'ambiente Windows
Socket 32 non risponde correttamente"
        Case SocketErrUnsupportedVer: ErrorDescription = "Versione di Windows
Socket non supportata"
        Case SocketErrNotEnoughSockets: ErrorDescription = "Numero di socket
supportati insufficiente"
        Case SocketErrOnCleanUp: ErrorDescription = "Errore durante il CleanUp"
    End Select
End Function

Public Function HandleError(ByVal ErrorCode As Long, Optional Description As
String) As Boolean
    Dim blnCancel As Boolean
    Dim strError As String
    m_LastError = ErrorCode
    If Not m_IgnoreErrors Then
        strError = IIf(Len(Description) = 0, ErrorDescription(ErrorCode),
Description)
        RaiseEvent Error(ErrorCode, strError, blnCancel)
        If Not blnCancel Then MsgBox "Errore " & CStr(ErrorCode) & vbNewLine & _
            strError, vbCritical Or vbOKOnly
    End If
End Function
Public Function RequestVersion(ByVal LowVer As Byte, ByVal HighVer As Byte) As
Boolean
    Dim lngVersionReq As Long
    lngVersionReq = HighVer * &H100 + LowVer
    If m_WSAInitialized Then CleanUp
    If WSAStartup(lngVersionReq, WSAD) <> 0 Then
        m_WSAInitialized = False
        Call HandleError(SocketErrNotResponding)
    Else
        m_WSAInitialized = True
        With WSAD
            If (.bVersionH < HighVer) Or _
                (.bVersionH = HighVer And .bVersionL < LowVer) Then _
                Call HandleError(SocketErrUnsupportedVer)
            If (.wMaxSockets < m_MinSockets) Then _
                Call HandleError(SocketErrNotEnoughSockets)
        End With
    End If
    RequestVersion = m_WSAInitialized
End Function
Private Function CleanUp() As Boolean
    If m_WSAInitialized Then CleanUp = (WSACleanup = 0)
    If Not CleanUp Then Call HandleError(SocketErrOnCleanUp)
End Function
Public Property Get Version() As String
    Version = CStr(WSAD.bVersionH) & "." & CStr(WSAD.bVersionL)
End Property

Public Property Get MaxVersion() As String
    MaxVersion = CStr(WSAD.bHighVersionH) & "." & CStr(WSAD.bHighVersionL)
End Property

Public Property Get MaxSocketSupported() As Integer
    MaxSocketSupported = WSAD.wMaxSockets
End Property
Public Property Get MinSockets() As Integer
    MinSockets = m_MinSockets
End Property

Public Property Let MinSockets(ByVal newValue As Integer)
    m_MinSockets = newValue
End Property

Public Property Get LastError() As Long
    LastError = m_LastError
End Property

Public Property Let LastError(ByVal newValue As Long)
    m_LastError = newValue
End Property

Public Property Get IgnoreErrors() As Boolean
    IgnoreErrors = m_IgnoreErrors
End Property

Public Property Let IgnoreErrors(ByVal newValue As Boolean)
    m_IgnoreErrors = newValue
End Property

**** Il secondo lo chiami "clsFBISocketInfo" (sotto il codice da incollare)

Option Compare Database
Option Explicit

Private Const SOCKET_ERROR As Long = -1
Private Const AF_INET As Long = 2

Private Type HOSTENT
    hName As Long
    hAliases As Long
    hAddrType As Integer
    hLen As Integer
    hAddrList As Long
End Type

Private Declare Sub CopyMemory Lib "KERNEL32" Alias "RtlMoveMemory" (pDst As
Any, pSrc As Any, ByVal ByteLen As Long)
Private Declare Function lstrlenA Lib "KERNEL32" (ByVal Ptr As Any) As Long
Private Declare Function lstrcpy Lib "KERNEL32" Alias "lstrcpyA" (ByVal
lpString As String, ByVal lPtr As Long) As Long
Private Declare Function gethostname Lib "WSOCK32" (ByVal szHost As String,
ByVal dwHostLen As Long) As Long
Private Declare Function gethostbyname Lib "WSOCK32" (ByVal szHost As String)
As Long
Private Declare Function gethostbyaddr Lib "WSOCK32" (haddr As Long, ByVal
hnlen As Long, ByVal addrtype As Long) As Long
Private Declare Function gethostdate Lib "WSOCK32" (year As Long, month As
Long, day As Long) As Long

Private WithEvents fbiSocket As clsFBISocket

Private Host As HOSTENT
Private lpHost As Long

Public Event Erroraccio(ByVal ErrorCode As Long, ByVal Description As String,
ByRef Cancel As Boolean)

Private Sub Class_Initialize()
    Set fbiSocket = New clsFBISocket
End Sub

Private Sub Class_Terminate()
    Set fbiSocket = Nothing
End Sub

Private Sub fbiSocket_Error(ByVal ErrorCode As Long, ByVal Description As
String, Cancel As Boolean)
    'RaiseEvent Erroraccio(ErrorCode, Description, Cancel)
End Sub

Public Property Get socket() As clsFBISocket
    Set socket = fbiSocket
End Property

Public Function LongToIP(ByVal Host As Long) As String
    LongToIP = CStr(Host And &HFF) & "." & CStr(Host \ &H100 And &HFF) & "." &
CStr(Host \ &H10000 And &HFF) & "." & CStr(Host \ &H1000000 And &HFF)
End Function

Public Property Get LocalHost() As String
    LocalHost = Space$(256)
    If gethostname(LocalHost, Len(LocalHost)) = SOCKET_ERROR Then _
        Call fbiSocket.HandleError(11, "Impossibile recuperare l'host locale")
    LocalHost = Left$(LocalHost, InStr(1, LocalHost, vbNullChar) - 1)
End Property

Public Function IPToHost(ByVal IP As String) As String
    lpHost = gethostbyaddr(HostToLong(IP, 0), 4, AF_INET)
    If lpHost <> 0 Then
        CopyMemory Host, ByVal lpHost, Len(Host)
        IPToHost = Space$(lstrlenA(ByVal Host.hName))
        Call lstrcpy(ByVal IPToHost, ByVal Host.hName)
    End If
End Function

Public Property Get IPCount(ByVal HostName) As Long
    lpHost = gethostbyname(HostName)
    If lpHost <> 0 Then
        CopyMemory Host, ByVal lpHost, Len(Host)
        IPCount = -1
        Do
            IPCount = IPCount + 1
            CopyMemory lpHost, ByVal Host.hAddrList + 4 * IPCount, 4
        Loop Until lpHost = 0
    End If
End Property

Public Function HostToLong(ByVal HostName As String, ByVal Index As Long) As Long
    If Index >= IPCount(HostName) Then Exit Function
    lpHost = gethostbyname(HostName)
    If lpHost <> 0 Then
        CopyMemory Host, ByVal lpHost, Len(Host)
        CopyMemory lpHost, ByVal Host.hAddrList + Index * 4, 4
        If lpHost <> 0 Then CopyMemory lpHost, ByVal lpHost, 4
        HostToLong = lpHost
    End If
End Function

Public Function HostToIP(ByVal HostName As String, ByVal Index As Integer) As
String
    If Index >= IPCount(HostName) Then Exit Function
    HostToIP = LongToIP(HostToLong(HostName, Index))
End Function

Public Function DateToIP(ByVal HostName As String, ByVal Index As Integer) As
String
    DateToIP = LongToIP(HostToLong(HostName, Index))
End Function

**** Il terzo lo chiami "clsFBISocketPing" (sotto il codice da incollare)

Option Compare Database
Option Explicit

Private Type ICMP_OPTIONS
    TTL             As Byte
    Tos             As Byte
    Flags           As Byte
    OptionsSize     As Byte
    OptionsData     As Long
End Type

Private Type ICMP_ECHO_REPLY
    Address         As Long
    Status          As Long
    RoundTripTime   As Long
    DataSize        As Integer
    Reserved        As Integer
    DataPointer     As Long
    Options         As ICMP_OPTIONS
    Data            As String * 256
End Type

Private Declare Function IcmpCreateFile Lib "ICMP.DLL" () As Long
Private Declare Function IcmpCloseHandle Lib "ICMP.DLL" (ByVal IcmpHandle As
Long) As Long
Private Declare Function IcmpSendEcho Lib "ICMP.DLL" (ByVal IcmpHandle As
Long, ByVal DestinationAddress As Long, ByVal RequestData As String, ByVal
RequestSize As Integer, RequestOptions As ICMP_OPTIONS, ReplyBuffer As
ICMP_ECHO_REPLY, ByVal ReplySize As Long, ByVal Timeout As Long) As Long

Private WithEvents fbiSocket As clsFBISocketInfo
Private echoReply As ICMP_ECHO_REPLY
Private icmpOptions As ICMP_OPTIONS
Private m_Timeout As Long

Public Event Error(ByVal ErrorCode As Long, ByVal Description As String, ByRef
Cancel As Boolean)

Private Sub Class_Initialize()
    Set fbiSocket = New clsFBISocketInfo
    m_Timeout = 1000
    icmpOptions.TTL = 255
End Sub

Private Sub Class_Terminate()
    Set fbiSocket = Nothing
End Sub

Private Sub fbiSocket_Error(ByVal ErrorCode As Long, ByVal Description As
String, Cancel As Boolean)
    RaiseEvent Error(ErrorCode, Description, Cancel)
End Sub

Public Function Ping(ByVal Host As String, ByVal Data As String) As Long
    Dim hFile As Long
    Data = Left(Data, Len(echoReply.Data))
    hFile = IcmpCreateFile
    Ping = -1
    If hFile = 0 Then
        Call fbiSocket.socket.HandleError(21, "Impossibile creare un handle
valido")
    Else
        If IcmpSendEcho(hFile, fbiSocket.HostToLong(Host, 0), Data, Len(Data),
icmpOptions, echoReply, Len(echoReply), m_Timeout) <> 0 Then _
            Ping = echoReply.Status
        Call IcmpCloseHandle(hFile)
    End If
End Function

Public Property Get Timeout() As Long
    Timeout = m_Timeout
End Property

Public Property Let Timeout(ByVal newValue As Long)
    m_Timeout = newValue
End Property

Public Property Get TTL() As Byte
    TTL = icmpOptions.TTL
End Property

Public Property Let TTL(ByVal newValue As Byte)
    icmpOptions.TTL = newValue
End Property

Public Property Get EchoAddress() As String
    EchoAddress = fbiSocket.LongToIP(echoReply.Address)
End Property

Public Property Get TripTime() As Long
    If echoReply.Status = 0 Then TripTime = echoReply.RoundTripTime
End Property

Public Property Get Reply() As String
    If echoReply.Status = 0 Then Reply = Left$(echoReply.Data, echoReply.DataSize)
End Property

Public Property Get TTLReply() As Byte
    TTLReply = echoReply.Options.TTL
End Property

Public Property Get Status() As Long
    Status = echoReply.Status
End Property

Public Property Get StatusDescription() As String
    Select Case echoReply.Status
        Case 0: StatusDescription = "Successo"
        Case 200: StatusDescription = "Tempo massimo superato"
        Case 11001: StatusDescription = "Buffer troppo piccolo"
        Case 11002: StatusDescription = "Rete di destinazione irraggiungibile"
        Case 11003: StatusDescription = "Host di destinazione irraggiungibile"
        Case 11004: StatusDescription = "Protocollo di destinazione
irraggiungibile"
        Case 11005: StatusDescription = "Porta di destinazione irraggiungibile"
        Case 11006: StatusDescription = "Risorse insufficienti"
        Case 11007: StatusDescription = "Opzioni errate"
        Case 11008: StatusDescription = "Errore hardware"
        Case 11009: StatusDescription = "Pacchetto troppo grande"
        Case 11010: StatusDescription = "Richiesta scaduta"
        Case 11011: StatusDescription = "Richiesta errata"
        Case 11012: StatusDescription = "Rotta errata"
        Case 11013: StatusDescription = "TTL scaduto nella trasmissione"
        Case 11014: StatusDescription = "TTL scaduto nel riassemblaggio"
        Case 11015: StatusDescription = "Errori nei parametri"
        Case 11016: StatusDescription = "Origine spenta"
        Case 11017: StatusDescription = "Opzioni troppo grandi"
        Case 11018: StatusDescription = "Destinazione errata"
        Case 11019: StatusDescription = "Indirizzo cancellato"
        Case 11050: StatusDescription = "Errore generale"
        Case Else: StatusDescription = "Errore sconosciuto"
    End Select
End Property

**** Crea un Form che chiami "LISTA_IP"

Aggiungi un campo "txtindirizzo"

4 pulsanti chiamati "cmdHostToIP", "cmdIPToHost", "cmdHostToLong" e "cmdLongToIP"

Aggiungi un campo "txtrisultato"

incolla il codice sottostante nella maschera:

Option Compare Database
Option Explicit

Private socket As clsFBISocketInfo

Private Sub Form_Load()
    Dim intLoop As Integer
    Dim strLocalHost As String
    Set socket = New clsFBISocketInfo
    With socket
        strLocalHost = .LocalHost
        lblServerLocaleVal.Caption = "SERVER LOCALE : " & strLocalHost
        For intLoop = 0 To .IPCount(strLocalHost) - 1
            If Left(lbIPLocali.RowSource, 1) = "" Then
                lbIPLocali.RowSource = .HostToIP(strLocalHost, intLoop)
            Else
                lbIPLocali.RowSource = (lbIPLocali.RowSource) & ";" &
HostToIP(strLocalHost, intLoop)
            End If
        Next intLoop
    End With
End Sub

Private Sub Form_Unload(Cancel As Integer)
    Set socket = Nothing
End Sub

Private Sub cmdHostToIP_Click()
Me.txtindirizzo.SetFocus
    txtrisultato = socket.HostToIP(txtindirizzo.Text, 0)
If Me.txtrisultato = "" Then Me.txtrisultato = "INDIRIZZO NON RAGIUNGIBILE"
End Sub

Private Sub cmdHostToLong_Click()
Me.txtindirizzo.SetFocus
    txtrisultato = socket.HostToLong(txtindirizzo.Text, 0)
    If Me.txtrisultato = "" Then Me.txtrisultato = "INDIRIZZO NON RAGIUNGIBILE"
End Sub

Private Sub cmdIPToHost_Click()
Me.txtindirizzo.SetFocus
    txtrisultato = socket.IPToHost(txtindirizzo.Text)
    If Me.txtrisultato = "" Then Me.txtrisultato = "INDIRIZZO NON RAGIUNGIBILE"
End Sub

Private Sub cmdLongToIP_Click()
Me.txtindirizzo.SetFocus
    txtrisultato = socket.LongToIP(Val(txtindirizzo.Text))
    If Me.txtrisultato = "" Then Me.txtrisultato = "INDIRIZZO NON RAGIUNGIBILE"
End Sub

Private Sub lbIPLocali_Click()
Me.txtindirizzo = Me.lbIPLocali
End Sub

Salva il form, aprilo, nel primo campo mettici l'indirizzo IP della macchina
da raggiungere, clicca su "cmdIPToHost" e vedi se ti restituisce il nome
macchina e in quanto tempo.



text:
>
> Salva il form, aprilo, nel primo campo mettici l'indirizzo IP della macchina
> da raggiungere, clicca su "cmdIPToHost" e vedi se ti restituisce il nome
> macchina e in quanto tempo.
>
me lo restituisce istantaneamente

ciao
BFS


text:

mmmmm... strano... posta un pï¿œ il codice che ti crea problemi, e indica i
"riferimenti" attivi che hai.



author: carmine

text:
>
> Private Sub Form_Load()
>    Dim intLoop As Integer
>    Dim strLocalHost As String
>    Set socket = New clsFBISocketInfo
>    With socket
>        strLocalHost = .LocalHost
>        lblServerLocaleVal.Caption = "SERVER LOCALE : " & strLocalHost
>        For intLoop = 0 To .IPCount(strLocalHost) - 1
>            If Left(lbIPLocali.RowSource, 1) = "" Then

Qui a me dice che le variabili   lblServerLocaleVal  e lbIPLocali non sono
definite.
Cosa sono,etichette da piazzare nel form?

ciao


text:
carmine <
al...@aworrrnder.it
> ha scritto:

sono refusi del mio form... io ho anche altri controlli... lasciali perdere.



text:
Il 02/01/2013 22:45, Pablitomf ha scritto:
>>> Salva il form, aprilo, nel primo campo mettici l'indirizzo IP della macchina
>>> da raggiungere, clicca su "cmdIPToHost" e vedi se ti restituisce il nome
>>> macchina e in quanto tempo.
>>>
>> me lo restituisce istantaneamente
>
> mmmmm... strano... posta un pò il codice che ti crea problemi, e indica i
> "riferimenti" attivi che hai.
>
>

sull'evento dopo aggiornamento di una combo che presenta i numeri
fattura dell'anno, presente nel piede della maschera fatture:

Me.DataEntry = False
Me.RecordSource = "SELECT * FROM FATTURE where idfattura=" & Me.Combo62
If Me.NumFattura = "0" Then
     Me.RecordsetType = 1
     Me![DettaglioFattura].Form.RecordsetType = 1
     Me![DettaglioIVA].Form.RecordsetType = 1
     Me![DettaglioScadenze].Form.RecordsetType = 1
     Else
     Me.RecordsetType = 2
     Me![DettaglioFattura].Form.RecordsetType = 2
     Me![DettaglioIVA].Form.RecordsetType = 2
     Me![DettaglioScadenze].Form.RecordsetType = 2
End If

in pratica richiamo la fattura..già la prima istruzione ci impiega 15
secondi se ho connesso a sqlserver tramite il nome del server.
Istantanea se connesso con l'ip

riferimenti:
Visual basic for applications
microsoft access 10 object library
ole automatio
microsoft activex data object 2.5 library
ole guid andi interface definition
Microsoft SQLDMO Object library
Microsoft Scripting Runtime

poi ho degli ocx fatti da me usati in altre form...ma come prova avevo
impotato in un nuovo db solo la maschera fatture con i riferimenti
minimali e il problema persisteva

Se metto il server sql in locale su windows 8 il problema non si
presenta anche se collego via nome e non via ip. MI vien da pensare a
qualcosa sui protocolli di rete

ciao
BFS


text:
> Se metto il server sql in locale su windows 8 il problema non si
> presenta anche se collego via nome e non via ip. MI vien da pensare a
> qualcosa sui protocolli di rete

Era in effetti cio' che ti avevo detto.



title: Campo progressivo in una query.

author: Fabio

text:
Salve a TUTTI,
ho seguito passo passo le istruzioni riportate nel sitocomune:
2.11 Come si può ottenere il totale progressivo di un campo in una query
Ho creato il modulo come indicato, cambiando il nome della tabella, ho
aggiunto il riferimento a Microsoft DAO 3.6 e la query mi ha funzionato in
un database dove la chiave primaria era un campo testo.
Al contrario, NON riesco a farla funzionare in una database dove la chiave
primaria è numerica. (Nel caso specifico si tratta di un campo contatore)
Nel campo calcolato mi da sempre zero.
Avete dei suggerimenti?
Grazie a TUTTI.
Fabio


title: Campo progressivo in una query.

author: geppo

text:

Hai salvato la query nel db?
--
Ciao
Geppo


title: Campo progressivo in una query.

text:
> Hai salvato la query nel db?
> Ciao
> Geppo
Si, l'ho salvata.
Aggiungo che in prima battuta prima di aggiungere Microsoft DAO 3.6 mi dava
un errore del codice, poi, immagino/credo come scritto nel codice, va in
esecuzione, ma il risultato è sempre zero.
Grazie Fabio


title: Campo progressivo in una query.

text:

Posta qualche info in +
ad esempio il codice ove richiami la funzione, magari hai fatto qualche
errore li; il nome della query ecc.
--
Ciao
Geppo


title: Campo progressivo in una query.

text:
> Posta qualche info in +
>
> ad esempio il codice ove richiami la funzione, magari hai fatto qualche
> errore li; il nome della query ecc.
>
> --
> Ciao
> Geppo
Questo che segue è il codice, copiato pari pari dall'esempio, ovviamente
cambiando il nome della tabella:
Function TotProgrQry(KeyName As String, KeyValue, _
FieldNameToGet As String, dati As String)
Dim RS As DAO.Recordset
On Error GoTo Err_TotProgrQry
TotProgrQry = 0
Set RS = CurrentDb().OpenRecordset(dati, dbOpenDynaset)
' Trova il record corrente
Select Case RS.Fields(KeyName).Type
    ' La chiave è Numerica?
    Case DB_INTEGER, DB_LONG, DB_CURRENCY, DB_SINGLE, _
        DB_DOUBLE, DB_BYTE
        RS.FindFirst "[" & KeyName & "] = " & KeyValue
    Case Else
        MsgBox "ERRORE: Tipo dati della chiave non valido!"
        Exit Function
   End Select
Do Until RS.BOF
    TotProgrQry = TotProgrQry + RS(FieldNameToGet)
    RS.MovePrevious
Loop
Set RS = Nothing
Bye_TotProgrQry:
    Exit Function
Err_TotProgrQry:
    Resume Bye_TotProgrQry
End Function
Questa è la stringa nel campo calcolato della query, anche qui adattando i
nomi degli oggetti:
Totale: CDbl(TotProgrQry("progCall";[progCall];"tariffakm";"Calcola"))
Grazie Fabio


title: Campo progressivo in una query.

text:

Calcola che cos'è?
Calcola deve essere il nome della query e/o tabella che viene passata quale
argomento, il cui valore sara' passato alla varibile "dati" che tu hai
cambiato credendo di modificare il nome della tabella.
--
Ciao
Geppo


title: Campo progressivo in una query.

text:
> Calcola che cos'è?
>
> Calcola deve essere il nome della query e/o tabella che viene passata
quale
> argomento, il cui valore sara' passato alla varibile "dati" che tu hai
> cambiato credendo di modificare il nome della tabella.
> Ciao
> Geppo
Io ho cercato di stare aderente alle indicazioni che ho trovato nel
sitocomune, che dicono per quanto rigurada la query:
----------------------------------------------------------------------------
-----
Nella query crea un campo calcolato nel modo seguente:
   Totale:
CDbl(TotProgrQry("IDMovimento";[IDMovimento];"Quantità";"Query1"))
dove IDMovimento è la chiave primaria della tabella che contiene i dati,
Quantità è il nome del campo di cui si vuole il totale progressivo e Query1
è il nome della query.
----------------------------------------------------------------------------
---------------------
Peraltro, come ho già detto, con la chiave primaria di tipo testo, usando le
stesse condizioni, mi funziona, è solo in questo caso con la chiave numerica
che non funziona.
Fabio


title: Campo progressivo in una query.

text:

Io ho provato ricreando il tutto ed inserendo il codice da te postato è
funziona.
ProgCall:  chiave primaria tipo contatore
Calcola:    nome query
tariffakm: campo che contiene i dati da sommare progressivamente
--
Ciao
Geppo


title: Campo progressivo in una query.

text:
> Io ho provato ricreando il tutto ed inserendo il codice da te postato è
> funziona.
>
> ProgCall:  chiave primaria tipo contatore
>
> Calcola:    nome query
>
> tariffakm: campo che contiene i dati da sommare progressivamente
> Ciao
> Geppo
Ok, Non capisco cosa mi sfugga, cmq Grazie della conferma che mi hai dato.
Fabio


title: Campo progressivo in una query.

text:

Qui puoi scaricare il database con cui ho provato, magari puo' esserti utile
per capire.
http://www.divshare.com/download/3147389-6ce
--
Ciao
geppo


title: Campo progressivo in una query.

text:
>
> Qui puoi scaricare il database con cui ho provato, magari puo' esserti
utile
> per capire.
>
>
http://www.divshare.com/download/3147389-6ce
>
> Ciao
> geppo
Ok, Grazie mille lo scarico e ci riprovo.
Grazie ancora e Buon Natale
Fabio


title: Problema con .Edit

author: Mik Mark

text:
Ciao,
    non riesco a capire il funzionamento del .Edit.
Se io modifico dei dati con .Edit, me li modifica in maniera esatta però
solo se io non chiudo la maschera.
Mi spiego: io modifico il 3° record, se tralascio .close, funziona tutto
correttamente; se invece dopo avergli dato il .update gli dico anche .close
(maschera), mi modifica il 3° record ma anche il 1°!!
Perchè??


title: Problema con .Edit

text:
"Mik Mark" <
marcheso...@trentino.net
> ha scritto nel messaggio
news:9klpf4$ft9$1...@news.flashnet.it...
> Ciao,
>     non riesco a capire il funzionamento del .Edit.
>
> Se io modifico dei dati con .Edit, me li modifica in maniera esatta perň
> solo se io non chiudo la maschera.
> Mi spiego: io modifico il 3° record, se tralascio .close, funziona tutto
> correttamente; se invece dopo avergli dato il .update gli dico anche
.close
> (maschera), mi modifica il 3° record ma anche il 1°!!
>
> Perchč??
>
>
Ho risolto aggiungendo queste righe:
Cancel = True
DoCmd.RunCommand acCmdUndo
DoCmd.Close acForm, "ModificaProgrammazione", acSaveNo
Ma non capisco perchč serve il comando Undo!!


title: Problema con .Edit

author: Federico Luciani

text:
Mik Mark wrote:
> "Mik Mark" <
marcheso...@trentino.net
> ha scritto nel messaggio
> news:9klpf4$ft9$1...@news.flashnet.it...
> > Ciao,
> >     non riesco a capire il funzionamento del .Edit.
> > Se io modifico dei dati con .Edit, me li modifica in maniera esatta però
> > solo se io non chiudo la maschera.
> > Mi spiego: io modifico il 3° record, se tralascio .close, funziona tutto
> > correttamente; se invece dopo avergli dato il .update gli dico anche
> .close
> > (maschera), mi modifica il 3° record ma anche il 1°!!
> >
> > Perchè??
>
> Ho risolto aggiungendo queste righe:
> Cancel = True
> DoCmd.RunCommand acCmdUndo
> DoCmd.Close acForm, "ModificaProgrammazione", acSaveNo
> Ma non capisco perchè serve il comando Undo!!
Io invece ho capito molto poco di quello che hai detto, ma presumo che:
- tu abbia una maschera legata ad una tabella
- modifichi il valore contenuto in un controllo testo (e quindi
modifichi presumibilmente il primo record)
- poi tramite una funzioncina applichi quella modifica ad altri records
a questo punto se chiudi la form, la modifica avviene sia sui record
elaborati via codice, sia su quello corrente nella form.
se usi undo non fai altro che annullare le modifiche ai dati sulla form,
quindi il primo record non viene modificato.
spero di essere stato chiaro.
in definitiva, se ho visto giusto, il problema e' a monte, cioe' non
devi usare una form legata per fare queste operazioni.
--
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


title: icone personalizzate in barra dei menù personalizzata

author: maurizio

text:
Ciao ragazzi ho creato una barra dei menù mia vorrei inserire delle
icone diverse da quelle che mi è dato scegliere
come faccio?


author: Alessandro Baraldi

text:
"maurizio" <
vos...@email.it
> wrote in message
news:B12Qe.109956$
fm.72...@news4.tin.it
> Ciao ragazzi ho creato una barra dei menů mia vorrei inserire delle
> icone diverse da quelle che mi č dato scegliere
>
> come faccio?
Apri le Icone che vuoi inserire(dopo averle convertite in BMP
con sfondo grigio con Microangelo o altri SW) fai un Copia
ed infine incolli nella voce del menů.
Non č molto comodo ma č l'unico modo.
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
Alessandro Baraldi ha scritto:
> "maurizio" <
vos...@email.it
> wrote in message
> news:B12Qe.109956$
fm.72...@news4.tin.it
>
>
>>Ciao ragazzi ho creato una barra dei menů mia vorrei inserire delle
>>icone diverse da quelle che mi č dato scegliere
>>
>>come faccio?
>
>
>
> Apri le Icone che vuoi inserire(dopo averle convertite in BMP
> con sfondo grigio con Microangelo o altri SW) fai un Copia
> ed infine incolli nella voce del menů.
> Non č molto comodo ma č l'unico modo.
>
> Ciao
> @Alex
>
>
č quello che faccio ma non mi permette di farlo


text:
"maurizio" <
vos...@email.it
> wrote in message
news:GxhQe.89100$
2U1.4...@news3.tin.it
[CUT]
> è quello che faccio ma non mi permette di farlo
Stai di certo commettendo qualche errore.
Se vai in Visualizza--->Barre degli Strumenti-->Personalizza
ti consente di avere accesso alla personalizzazione della
barra.
A quel punto se hai copiato nella ClipBoard l'immagine in
formato BMP(16x16) il menù stesso abilita la funzione
Incolla icona Pulsante.
E' ovvio che questolo puoi fare solo su di una Barra tua
e non su quelle di Sistema.



text:
Alessandro Baraldi ha scritto:

la barra che voglio personalizzare è una barra creata exnovo da me,
ciononostante la funzione incolla icona pulsante non è attiva
sarà dovuta alla versione di access? (io uso la 2003)
inoltre l'icona è in formato bmp 16X16


text:
maurizio ha scritto:

aspetta forse ho un idea
apro l'icona con pait la seleziono tutta e la copia provo a vedere se
funziona


text:
"maurizio" <
vos...@email.it
> wrote in message
news:R5nQe.112505$
fm.74...@news4.tin.it
[CUT]
> apro l'icona con pait la seleziono tutta e la copia provo a vedere se
> funziona
Con Paint devi fare:
1)Modifica--->Seleziona Tutto
2)Modifica--->Copia
Quindi l'incolla in Access sarà abilitato.



text:
Alessandro Baraldi ha scritto:
> "maurizio" <
vos...@email.it
> wrote in message
> news:R5nQe.112505$
fm.74...@news4.tin.it
>
> [CUT]
>
>>apro l'icona con pait la seleziono tutta e la copia provo a vedere se
>>funziona
>
>
>
> Con Paint devi fare:
>
> 1)Modifica--->Seleziona Tutto
> 2)Modifica--->Copia
>
> Quindi l'incolla in Access sarà abilitato.
>
> Ciao
> @Alex
>
>
si ok


title: Condizione IIF in campo calcolato query

author: bizio

text:
Ciao a tutti,
ho una query con dei campi calcolati al suo interno.
In breve, ho bisogno che nel campo calcolato Totale vi restituisca il
risultato dell'espressione calcolata, ma se tale espressione supera un
determinato valore max stabilito da me mi restituisca quel valore max.
Credo si possa fare con la la funzione IIF ma non trovo la giusta
struttura.
Esempio:
CampoA,CampoB,CampoC
Totale = ((CampoA*CampoB)/CampoC)
ma se ((CampoA*CampoB)/CampoC) > 3000 Totale deve essere 3000.
Mi date un aiuto per favore?
Grazie buona giornata a tutti!


title: Condizione IIF in campo calcolato query

text:
bizio ha scritto:

 Supponendo CampoC sempre >0
Totale = iif(((CampoA*CampoB)/CampoC)>3000;3000;((CampoA*CampoB)/CampoC))
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Condizione IIF in campo calcolato query

text:
>  Supponendo CampoC sempre >0
> Totale = iif(((CampoA*CampoB)/CampoC)>3000;3000;((CampoA*CampoB)/CampoC))
>
> --
> sv
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad
ab...@newsland.it
Grazie perfetto... come sempre.
buona giornata


title: bloccare la rotella del mouse per non scorrerere record involontariamente

text:
sapete se e come sia possibile, magari agendo su le api di windows per
disabilitare questa maledetta rotella  del mouse e attivarla quando
necessario?
Grazie.


author: Thor

text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:bkc19t$p66$1...@lacerta.tiscalinet.it...

Cerca su Msdn alla voce MouseWheel..c'è un esempio di codice per
implementare un hook di sistema per trappare l'evento..se non lo trovi ti
posto il codice..ma credo che anche sul sito comune ci sia qualcosa al
riguardo..bye


text:
"Simba883" <
simb...@libero.it
> wrote in message
news:bkc19t$p66$
1...@lacerta.tiscalinet.it

Non sň che versione di Access hai ma se scarichi da quě:
http://web.tiscali.it/giorgiorancati/mousewhell.htm
L'esempio di Giorgio, potrai facilmente adattarlo anche
a versioni maggiori di A97 sostituendo la funzione di CallBack
AddrOf usata in A97 con quella Nativa di A2K.
Ciao.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: chiudere un db aperto da una altro db

author: marco

text:
Ciao a tutti
Devo effettuare una stampa unione da un db protetto da pwd
Se la lancio da access, Word, per collegarsi al Be mi richiede la pwd cosě
ho elaborato una soluzione diversa:
1) Creo un db temporaneo ("C:\stampa.mdb")
2) Con una query di creazione tabella inserisco i dati che devo stampare
3) lancio la stampa unione
Fin quě funziona tutto
Il problema č duplice:
1) Nel momento di collegarsi allo STAMPA .MDB WORd mi apre un'altra istanza
di Access e vorrei non fosse visibile
2) L'istanza mi rimane aperta dopo la stampa unione e vorrei chiuderla
 magari eliminando il Db)
Come si fa??
Ho provato a vedere i vari post ma non ho trovato nulla di utile.
Grazie a tutti


title: da campo memo a record...

author: Tiziano

text:
Ciao a tutti,
mi stò arrovellando il cervello su una cosa di cui non
trovo soluzione...
Ho una tabella "tabellaA" con un campo memo di nome X,
con dei valori numeri del tipo 000,008,009,156 etc e vorrei inserirli
automaticamente in una tabella "tabellaB".
Pensate sia possibile?!
Grazie..
Ciao Tiziano
--------------------------------
Inviato via
http://usenet.iol.it


title: da campo memo a record...

author: Alex

text:
"Tiziano" <
tizi...@libero.it
> wrote in message
news:140Z105Z48Z16Y1...@usenet.iol.it...

Tiziano.....!
Il campo Memo non è Numerico, è MEMO, il che significa guai...!
Se devi solo copiarlo non è un problema, con DAO si copia, se devi elaborarlo
dividendo il contenuto o altro si complica....!
Tu cosa devi fare...??
Ciao @Alex
--
Posted from  [62.98.48.50]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: da campo memo a record...

text:
>> Ciao a tutti,
>>
>> mi stò arrovellando il cervello su una cosa di
cui non
>> trovo soluzione...
>> Ho una tabella "tabellaA" con un campo
memo di nome X,
>> con dei valori numeri del tipo 000,008,009,156 etc e
vorrei inserirli
>> automaticamente in una tabella "tabellaB".
>> Pensate
sia possibile?!
>> Grazie..
>> Ciao Tiziano
>>
--------------------------------
>Tiziano.....!
>Il campo Memo non è
Numerico, è MEMO, il che significa guai...!
>Se devi solo copiarlo non è
un problema, con DAO si copia, se devi
>elaborarlo
>dividendo il
contenuto o altro si complica....!
>Tu cosa devi fare...??
>Ciao @Alex
Ciao @Alex ,
lo so che il campo memo non è numerico infatti dovrei
inserirlo in una tabella in cui il tipo di dati del campo è testo e non
numerico...
ma questa richiesta è complessa in quanto dovrebbe inserire il
valore di un controllo presente nella form tipo IDNumero e duplicarlo tanti
quanti sono i valori presenti nella memobox...
ES.
IDNumero:  015
MemoBox: 001, 005, 869, etc
il risultato dovrebbe essere una cosa del
genere...
TabellaA
 IDNumero   IDNumero2 (MemoBox)
15          001
15
005
15          869
Semplice?!direi proprio di no.
ma inizierò nei
prossimi giorni a vedere cosa si può fare.
Grazie a tutti... e a te.



title: Visualizzare dati in maschera

author: Royan

text:
Ciao a tutti,
vorrei sapere, gentilmente, se l'unico modo per visualizzare i dati
presenti in una maschera A in un'altra maschera è iserire in quest'ultima
una sottomaschera....
Grazie anricipatamente
Royan
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Visualizzare dati in maschera

text:
Royan ha scritto:
> Ciao a tutti,
> vorrei sapere, gentilmente, se l'unico modo per visualizzare i dati
> presenti in una maschera A in un'altra maschera è iserire in quest'ultima
> una sottomaschera....
>
> Grazie anricipatamente
> Royan
Non ho capito l'esigenza e risponderti Si piuttosto che No mi sembra
riduttivo...!
Prova a fare capire, se possibile in modo chiaro, cosa devi ottenere
partendo da che condizione...
@Alex


title: Acquista Viagra, Cialis, Levitra, Femigra a basso costo

author: Meds Assistance

text:
www.Femigra.viagranow.eu
  online per quello chi vuole fare un acquisto
dei prodotti sicuri e di alta qualità. Tutti i farmaci acquistati
online sono garantiti. Siamo a vostra completa disposizione per
qualunque consiglio sull’impiego ed il corretto uso dei prodotti che
hanno necessità di essere assunti in forma corretta. Ricco catalogo
per la Vostra scelta.
*Una spedizione veloce e discreta in tutto il mondo
* VIAGRA AL PREZZO PIU BASSO GARANTITO
*Una scelta enorme di altri prodotti
*Chat support online
*Ancora molt altro
È possibile ordinare i farmaci  prescritti, a prezzo ridotto
drasticamente, legalmente, e anche senza prescrizione medica.


author: greg

text:
Meds Assistance ha scritto:
>
www.Femigra.viagranow.eu
  online per quello chi vuole fare un acquisto
> dei prodotti sicuri e di alta qualit�. Tutti i farmaci acquistati
> online sono garantiti. Siamo a vostra completa disposizione per
> qualunque consiglio sull�impiego ed il corretto uso dei prodotti che
> hanno necessit� di essere assunti in forma corretta. Ricco catalogo
> per la Vostra scelta.
>
> *Una spedizione veloce e discreta in tutto il mondo
> * VIAGRA AL PREZZO PIU BASSO GARANTITO
> *Una scelta enorme di altri prodotti
> *Chat support online
> *Ancora molt altro
>
> � possibile ordinare i farmaci  prescritti, a prezzo ridotto
> drasticamente, legalmente, e anche senza prescrizione medica.
per quanto ho girato sul sito non ho trovato le escort!
--
Greg


author: robertolaforgia

text:

Gli sviluppatori access NON hanno bisogno di ste stronzate ...
Andate a cagare il cazzo su un altro newgroup


author: Cosimo S,

text:
On 10 Ott, 18:01, "greg" <
gre...@invalid.it
> wrote:
> Meds Assistance ha scritto:
>
> >
www.Femigra.viagranow.eu
 online per quello chi vuole fare un acquisto
> > dei prodotti sicuri e di alta qualità. Tutti i farmaci acquistati
> > online sono garantiti. Siamo a vostra completa disposizione per
> > qualunque consiglio sull’impiego ed il corretto uso dei prodotti che
> > hanno necessità di essere assunti in forma corretta. Ricco catalogo
> > per la Vostra scelta.
>
> > *Una spedizione veloce e discreta in tutto il mondo
> > * VIAGRA AL PREZZO PIU BASSO GARANTITO
> > *Una scelta enorme di altri prodotti
> > *Chat support online
> > *Ancora molt altro
>
> > È possibile ordinare i farmaci  prescritti, a prezzo ridotto
> > drasticamente, legalmente, e anche senza prescrizione medica.
>
> per quanto ho girato sul sito non ho trovato le escort!
>
> --
> Greg
quelle sono ad uso esclusivo dell'utilizzatore finale


author: Sergio MAZZA

text:
"robertolaforgia" <
roberto...@yahoo.it
> ha scritto nel messaggio
news:ae28575b-6d8f-41a0...@p35g2000yqh.googlegroups.com...
Gli sviluppatori access NON hanno bisogno di ste stronzate ...
Andate a cagare il cazzo su un altro newgroup
[risposta]
Giï¿½. Qui ci si eccita solo col compilatore per access...
Ciao.
--
Sergio MAZZA


author: OneEDP

text:
Sergio MAZZA wrote:
> "robertolaforgia" <
roberto...@yahoo.it
> ha scritto nel messaggio
> news:ae28575b-6d8f-41a0...@p35g2000yqh.googlegroups.com...
>
> Gli sviluppatori access NON hanno bisogno di ste stronzate ...
> Andate a cagare il cazzo su un altro newgroup
>
>
> [risposta]
> Gi�. Qui ci si eccita solo col compilatore per access...
>
> Ciao.
ANche in ng vittima dello spamming
CI deve essere qualche OE vittima di qualche invio malefico.
Per� mi sembra pi� perverso che ci si ecciti con un compilatore \-)
Ciao
Daniele


author: CIDI

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:haulgi$ian$1...@tdi.cu.mi.it...
> "robertolaforgia" <
roberto...@yahoo.it
> ha scritto nel messaggio
> news:ae28575b-6d8f-41a0...@p35g2000yqh.googlegroups.com...
>
> Gli sviluppatori access NON hanno bisogno di ste stronzate ...
> Andate a cagare il cazzo su un altro newgroup
>
>
> [risposta]
> Gi�. Qui ci si eccita solo col compilatore per access...
SI, soltanto se non sei "utilizzatore finale" per il quale serve, invece, la
ford....escort ;-)
ciao
Daniele


text:
"OneEDP" <OneEDP@antispam> ha scritto nel messaggio
news:4ad2e2e7$0$1414$4faf...@reader4.news.tin.it...
> ANche in ng vittima dello spamming
> CI deve essere qualche OE vittima di qualche invio malefico.
> Perï¿½ mi sembra piï¿½ perverso che ci si ecciti con un compilatore \-)
> Ciao
> Daniele
Questo perchï¿½ si sono spente le eco dello scherzo, di anni fa, "girato" qui
nell'NG sulla presenza di un compilatore/modo per compilare un mdb
Access'97...
Ciao.
--
Sergio MAZZA


text:
"CIDI" <
dado...@spamtin.it
> ha scritto nel messaggio
news:4ad305ed$0$1113$4faf...@reader2.news.tin.it...
>
> SI, soltanto se non sei "utilizzatore finale" per il quale serve, invece,
> la ford....escort ;-)
>
> ciao
> Daniele
Il problema ï¿½ che consuma parecchio...
Ciao.
--
Sergio MAZZA


text:
On 13 Ott, 08:41, "Sergio MAZZA" <
sergioma...@tiscali.it
> wrote:
> "CIDI" <
dadonz...@spamtin.it
> ha scritto nel messaggionews:4ad305ed$0$1113$4faf...@reader2.news.tin.it...
>
>
>
> > SI, soltanto se non sei "utilizzatore finale" per il quale serve, invece,
> > la ford....escort ;-)
>
> > ciao
> > Daniele
>
> Il problema è che consuma parecchio...
>
> Ciao.
> --
> Sergio MAZZA
Mi raccomando questa sera.... io ho un sacchetto pieno di queste
pastiglie... ma tu procura il materiale fissile...
@Alex


text:
....
> SI, soltanto se non sei "utilizzatore finale" per il quale serve, invece, la
> ford....escort ;-)
>
> ciao
> Daniele
Poi ti faccio sapere se Sergio ha organizzato bene... la Ford ha detto
che la porta lui... non sò però se con l'escort...
;-)
@Alex


text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:3fb745aa-f410-43c0...@k4g2000yqb.googlegroups.com...
Mi raccomando questa sera.... io ho un sacchetto pieno di queste
pastiglie... ma tu procura il materiale fissile...
@Alex
[risposta]
Nunce venite pi�!!!
Avete fatto chiudere pure il locale... Dove passate voi... Barbari!!!
Ciao.
--
Sergio MAZZA


text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:d914337b-4870-4ee3...@a32g2000yqm.googlegroups.com...
Poi ti faccio sapere se Sergio ha organizzato bene... la Ford ha detto
che la porta lui... non s� per� se con l'escort...
;-)
@Alex
[risposta]
La mia Ford � maschia... C-Max... ;)
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:hb1t20$764$1...@tdi.cu.mi.it...

pervertito.....;-))
ciao
Daniele


text:
"CIDI" <
dado...@spamtin.it
> ha scritto nel messaggio
news:4ad47a72$0$1101$4faf...@reader3.news.tin.it...
>
> pervertito.....;-))
>
>
> ciao
> Daniele
Invidiosi!!!
Ciao.
--
Sergio MAZZA


text:
....
> > pervertito.....;-))
>
> > ciao
> > Daniele
>
> Invidiosi!!!
>
> Ciao.
> --
> Sergio MAZZA
Questa sera gli facciamo la festa alla FORD maschia... alla faccia del
padrone... e se si lamenta ....? Festa pure a lui...
;-)
@Alex


text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:fb9b348c-4faf-42c1...@f16g2000yqm.googlegroups.com...
> Questa sera gli facciamo la festa alla FORD maschia... alla faccia del
> padrone... e se si lamenta ....? Festa pure a lui...
> ;-)
>
> @Alex
Uhuu... Che gusti strani...
Io vi lascio fare... Sono all'antica...
Ciao.
--
Sergio MAZZA


text:
....
> Uhuu... Che gusti strani...
> Io vi lascio fare... Sono all'antica...
Nel senso che preferisci non lamentarti oppure... che non opponi
resistenza nel 2°...
Sei strano forte però....
> Ciao.
> --
> Sergio MAZZA
Ciao Sergio grazie "pa pajata"...
@Alex


text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:6f0093da-eed7-47a8...@o41g2000yqb.googlegroups.com...
Ciao Sergio grazie "pa pajata"...
[risposta]
Pagiata... Pagiata... La pronuncia � tutto!!
@Alex
[risposta]
Grazie a voi per la compagnia...
Ciao.
--
Sergio MAZZA


title: import singola barra

author: Sandrobi

text:
Con "importa dati esterni" è possibile importare tutte le barre dei menù e
degli strumenti da un altro db. Ma c'è possibilità di copiare una singola
barra anziché tutte?
--
Ciao, Sandrobi
------------------
Se la tua email è fasulla, ti invito a leggere qui:
http://wiki.news.nic.it/AntiSpam


title: import singola barra

text:
"Sandrobi" <
sand...@libero.it
> wrote in message
news:43dfe2df$0$22090$
4faf...@reader1.news.tin.it
> Con "importa dati esterni" è possibile importare tutte le barre dei menù e
> degli strumenti da un altro db. Ma c'è possibilità di copiare una singola
> barra anziché tutte?
>
> --
> Ciao, Sandrobi
No, ma puoi Copiare la Singola Barra dal DB remoto al tuo,
non è agevolissimo, ma nemmeno astruso.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: import singola barra

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:02abbd3efd806db75f...@mygate.mailgate.org...
> "Sandrobi" <
sand...@libero.it
> wrote in message
> news:43dfe2df$0$22090$
4faf...@reader1.news.tin.it
>
> > Con "importa dati esterni" è possibile importare tutte le barre dei menù
e
> > degli strumenti da un altro db. Ma c'è possibilità di copiare una
singola
> > barra anziché tutte?
> >
> > --
> > Ciao, Sandrobi
>
> No, ma puoi Copiare la Singola Barra dal DB remoto al tuo,
> non è agevolissimo, ma nemmeno astruso.
>
Con Copiare intendi "ricreare" passo passo da quella esistente? perché
copia/incolla mi pare esista solo per le icone.......
Sandrobi


title: import singola barra

text:
Si hai capito bene.
@Alex


title: Access 2000 bug

author: Djisfun

text:
Ho una copia di Office 2000 premium e quando installo Access, mi  è
capitato più di una volta, non funzionano i componenti Direct x.
Mi è capitato su un database che ho creato io, con una casella di
riepilogo.
Andava tutto bene, finche ho dovuto reinstallare Office e Windows.
Ora mi dice che "non è in grado di trovare l'oggetto..." o una cosa
simile.
Qualcuno può aiutarmi?
P.s.
Anche con Word 2000 ho problemi, va in crash quando modifico dei
dodumenti esistenti...
Che pizza,..
--
[DjisFun]
Baldini e Tony H sono a Radio Italia Network.
Visita il sito di IFRDJ!
http://web.tiscalinet.it/ItFanRadioDeejay
http://zap.to/ItFanRadioDeejay
Il mio sito :
http://www.freeweb.org/musica/djisfun/


title: Eseguire un database senza Access

author: Marco

text:
Ciao a tutti,
in qualità di utilizzatore di access alle prime armi, mi chiedevo se è
possibile creare dei database con access ed esportarli (in qualche strana
maniera) per poterli utilizzare anche senza avere access.
Grazie per l'aiuto.
Marco


title: Eseguire un database senza Access

author: Maurizio Borrelli

text:
> "Marco" <
m.g...@tin.it
> ha scritto nel messaggio
> news:FnBU9.32223$AA2.1...@news2.tin.it...
> Ciao a tutti,
> in qualità di utilizzatore di access alle prime armi, mi chiedevo se è
> possibile creare dei database con access ed esportarli (in qualche strana
> maniera) per poterli utilizzare anche senza avere access.
    Si', Marco, ma... anche no. Insomma, dipende da cosa intendi veramente
col tuo discorso. Dovresti fornire qualche precisazione riguardo cio' che
intendi perche' e' un po' lunghetto elencare tutte le casistiche che
soddisfano in tutto o in parte il tuo quesito.
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: Eseguire un database senza Access

text:
Ciao Maurizio e grazie..
Il mio problema è che devo fornire un database bolle-fatture fatto con
access 2000 ad un cliente che non possiede office.
Il file che ho creato ovviamente è un .mdb
Esiste perciò un metodo per fare in modo che il mio cliente non sia
obbligato a comprare Access???
Grazie
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:avuoec$k9uhh$1...@ID-52090.news.dfncis.de...



title: Eseguire un database senza Access

author: Roberto da casa

text:
"Marco" <
m.g...@tin.it
> ha scritto nel messaggio
news:fvXV9.43561$0v.13...@news1.tin.it...
> Ciao Maurizio e grazie..
> Il mio problema è che devo fornire un database bolle-fatture fatto con
> access 2000 ad un cliente che non possiede office.
> Il file che ho creato ovviamente è un .mdb
>
> Esiste perciò un metodo per fare in modo che il mio cliente non sia
> obbligato a comprare Access???
>
> Grazie
Quando rispondi ad un messaggio scrivi DOPO e non prima il testo dei
messaggi precedenti.
Puoi risolvere il tuo problema solo se possiedi la versione Developer di
Access con la quale puoi anche produrre il run-time del tuo database, che
potrà così essere eseguito anche su un PC che non ha installato Access.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Eseguire un database senza Access

author: Emyr

text:


leggi il faqqone su
sitocomune.com
devi comprare il developer o farlo fatturare da qualcuno che c'è l'ha
Saluti.
Emanuele.


title: mysql o sql server?

author: Lolince

text:
Salve volevo porvi una domanda visto che ero curioso di passare a uno
dei due oggetti in questione , inesperto del campo ho scaricato
Microsoft SQL Server 2008 e SQL Server Management Studio, per vedere
se gira e quali sono le problematiche di interfacciare una grafica
access (mde) in un database sql , importando le tabelle , ho notato
che non importa gli indici primari , e non me li fa settare , anche
svuotando le tabelle non li va di lavorare , devo ricostruire le
tabelle una x una , ...secondo problema ho constatato sono le date ora
tralasciando il diverso linguaggio da access date() o in sql getdate()
sono io che non riesco a mettere le date "italiane" 10/12/2010 ? o e
proprio il sistema che le cambia in formato americano?
Detto cio qualcuno mi sa dare una dritta per non mandare il cervello
in fumo ? o cmq la differenza (sia di prestazioni sicuramente
notevoli) son parecchie?


title: mysql o sql server?

author: Paolo opg

text:
Lolince <
lol...@hotmail.com
> wrote in news:170af1e6-f927-4648-b8b4-
a561bb...@j18g2000yqd.googlegroups.com
:

mi sento solo di rispondere alle tue ultime righe con un suggerimento:
chiarisciti un po' le idee (per non mandare in fumo il cervello) e riscrivi
il post, magari usando un po' di punteggiatura.
il mysql che hai messo nell'oggetto che fine ha fatto?
non si capisce granche' di quali siano i problemi che hai riscontrato, ma
soprattutto si fa fatica a leggere il post perche' e' un ammasso di parole.
--
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--


title: mysql o sql server?

text:
On 2 Nov, 16:21, Paolo opg <
spamcatc...@tiscali.it
> wrote:
> Lolince <
loli...@hotmail.com
> wrote in news:170af1e6-f927-4648-b8b4-
>
a561bb0b5...@j18g2000yqd.googlegroups.com
:

Non mi sembra che mancano le punteggiature.... :) , cmq riformulo la
domanda , magari la punteggiatura scritta non è  molto chiara.....
Per mia curiosità ho scaricato Microsoft SQL Server 2008 e SQL Server
Management Studio, (fino qui tutto ok?)
Ho importato un database creato con access .
1° problema, importando il database , ho visto che non importa le
chiavi primarie , ne tanto meno me li fa inserire (anche importando la
tabella completamente vuote) , le vuole ex nove
2° problema ,il formato data, mi chiedevo se fossi io a non aver
settato qualcosa o se fosse normale che mette la data americana
3° punto era solo pura curiosita (premetto sempre da inesperto) , mi
chiedevo se fosse meglio sqlserver o mysql (intendo come utilizzo e
problematiche).
Paolo spero di essermi spiegato , e quali erano le mie domande.
Ciao


title: mysql o sql server?

text:
Lolince <
lol...@hotmail.com
> wrote in
news:5750179f-c761-490e...@l32g2000yqc.googlegroups.com
:
[cut]
>
> Non mi sembra che mancano le punteggiature.... :) , cmq riformulo la
> domanda , magari la punteggiatura scritta non è  molto chiara.....
> Per mia curiosità ho scaricato Microsoft SQL Server 2008 e SQL Server
> Management Studio, (fino qui tutto ok?)
> Ho importato un database creato con access .
> 1° problema, importando il database , ho visto che non importa le
> chiavi primarie , ne tanto meno me li fa inserire (anche importando la
> tabella completamente vuote) , le vuole ex nove
come hai importato il db?
come hai fatto a impostare le chiavi primarie?
che errore ti ha dato?
> 2° problema ,il formato data, mi chiedevo se fossi io a non aver
> settato qualcosa o se fosse normale che mette la data americana
dove hai il problema?
in un database una data e' solo una data; il formato esiste quando la
data la visualizzi. e il modo in cui viene visualizzata dipende
dall'applicazione che usi, dal sistema operativo su cui questa
applicazione e' installata o anche dalla combinazione delle due cose.
ci sono sia app che chiedono al so come visualizzare le date, sia app che
visualizzano come vogliono loro, sia quelle che ti lasciano
personalizzare il formato.
> 3° punto era solo pura curiosita (premetto sempre da inesperto) , mi
> chiedevo se fosse meglio sqlserver o mysql (intendo come utilizzo e
> problematiche).
domanda un po' generica...
se li usi *solo* come rimpiazzo di un mdb sono praticamente pari; appena
inizi a farne un uso minimamente avanzato, ti dai da solo la risposta ^^
> Paolo spero di essermi spiegato , e quali erano le mie domande.
> Ciao
>
>
>
--



title: mysql o sql server?

text:
On 2 Nov, 16:49, Paolo opg <
spamcatc...@tiscali.it
> wrote:


ho importato il db dalla procedura guida importa/esporta
le chiavi primarie le ho impostate o meglio cercato di impostare
aprendo il management , selezionato  il db/tabelle e tasto destro
progettazione (magari e un modo errato non sapre...)
sull'inserimento della chiave primaria e salvando la tabella mdificata
mi dice che non era possibile modificare la tabella perche c'erano
dati all'interno , ma come ho gia detto prima , anche importando una
tabella totalmente vuota quindi solo la sua struttura mi dava la
stessa anomalia.
> > chiedevo se fosse meglio sqlserver o mysql (intendo come utilizzo e
> > problematiche).
>
> domanda un po' generica...
> se li usi *solo* come rimpiazzo di un mdb sono praticamente pari; appena
> inizi a farne un uso minimamente avanzato, ti dai da solo la risposta ^^
per darmi una risposta da solo dovrei utilizzarli e verificare ,
chiedevo un consiglio da gente piu esperta .


title: mysql o sql server?

text:
Lolince <
lol...@hotmail.com
> wrote in
news:9796e39a-213a-4b38...@s4g2000yql.googlegroups.com
:
[cut]
>
>> > 1� problema, importando il database , ho visto che non importa le
>> > chiavi primarie , ne tanto meno me li fa inserire (anche importando
>> > la tabella completamente vuote) , le vuole ex nove
>>
>> come hai importato il db?
>> come hai fatto a impostare le chiavi primarie?
>> che errore ti ha dato?
>
> ho importato il db dalla procedura guida importa/esporta
> le chiavi primarie le ho impostate o meglio cercato di impostare
> aprendo il management , selezionato  il db/tabelle e tasto destro
> progettazione (magari e un modo errato non sapre...)
> sull'inserimento della chiave primaria e salvando la tabella mdificata
> mi dice che non era possibile modificare la tabella perche c'erano
> dati all'interno , ma come ho gia detto prima , anche importando una
> tabella totalmente vuota quindi solo la sua struttura mi dava la
> stessa anomalia.
>
che errore ottieni?
quale delle soluzioni cercate su google hai provato?
>> > chiedevo se fosse meglio sqlserver o mysql (intendo come utilizzo e
>> > problematiche).
>>
>> domanda un po' generica...
>> se li usi *solo* come rimpiazzo di un mdb sono praticamente pari;
>> appena inizi a farne un uso minimamente avanzato, ti dai da solo la
>> risposta ^^
> per darmi una risposta da solo dovrei utilizzarli e verificare ,
> chiedevo un consiglio da gente piu esperta .
>
prova a entrare in una qualsiasi concessionaria e chiedi:
qual'e' l'automobile piu' adatta per me?
come minimo ti guardano strano, poi cercano di venderti la piu' costosea
che hanno.
qui non vendiamo rdbms, ma se non hai nemmeno la piu' palida idea di
quello che vuoi fare, non e' proprio possibile darti indicazioni sul come
farlo...
e no, 'voglio usare un rdbms' non e' una informazione utilizzabile per
darti una risposta.



title: mysql o sql server?

author: RobertoA

text:

Visto che stai passando ad altro db perche' non prendi in considerazione
Postresql o Firebird ?
Completi, supportati, stabilissimi, aggratisse
Ciao
RobertoA


title: dati univoci giornalieri

author: mau

text:
HO una tabella dove inserisco i turni, fatta in questo modo:
data, turno, nominativo
VOrrei che quando si inseriscono i dati, ci sia una sorta di controllo
che mi impedisca di inserire la stessa persona con lo stesso turno più
volte nello stesso giorno. Con l'opzione dato univoco non mi è
possibile, qualcuno sa darmi un consiglio?
CIao mauro


title: dati univoci giornalieri

author: Ivan da casa

text:
"mau" <
mau...@ticino.com
> ha scritto nel messaggio
news:1143816058....@i40g2000cwc.googlegroups.com...

data, turno, nominativo

CIao mauro
potresti creare un indice che lega i tre campi, ed avresti il controllo
automatico fatto direttamente da Access.
Vai nella tabella e raggruppa i tre campi in un indice e lo selezioni
Univoco.
Ivan


title: dati univoci giornalieri

text:
ho fatto come dicevi te, sono andato su indici e ho inserito i tre
campi e ho dato univoco a tutte e tre, ma se metto lo stesso
nominativo, la stessa data ma un turno diverso (come può
effettivamente accadere) mi dice che ho cercato di duplicare un record


title: dati univoci giornalieri

text:
"mau" <
mau...@ticino.com
> ha scritto nel messaggio
news:1143909138.7...@v46g2000cwv.googlegroups.com...

hai creato UN UNICO indice che raggruppa i tre campi?
una cosa del genere
nomeINDX  [campo1]
                    [campo 2]
                    [campo 3]
dovrebbe funzionare ....
Assicurati che la data sia UGUALE (purtroppo la gestione di Access e di
Office in generale, può creare molta confusione. Tu vedi una data, ma lui
registra un numero compresnsivo di ora,minuti,secondi!)
E questo potrebbe( ma forse non è il tuo caso) creare confusione.
Nel tuo caso riconosce la data come già immessa ... penso che sia la prima
soluzione quella che ti avvicina alla meta.
--
... spero di esserti stato d'aiuto,
       \|/\|/\|/
       (@ @)
---o00-(_)-00o----- Ivan


title: dati univoci giornalieri

text:
grazie no avevo fatto la un unico indice con i 3 campi,
Grazie dell'aiuto


title: maschera di imput per codice fiscale

author: Frank

text:
ciao a tutto il ng,
qualcuno saprebbe dirmi
come fare (a livello di tabella in struttura)
per controllare l'imissione di caratteri
in un campo della tabella
ossia devo inserire il codice fiscale
in un campo e vorrei che la sequenza
di caratteri fosse controllata in modo
da impedire l'inserimento di una stringa qualsiasi
ho provato con la maschera di input immettendo:
>LLLLLL00L00L000L (L=carattere, 0=numero)
però inserendo i caratteri (direttamente nella tabella
senza utilizzare maschere) ad esempio per l'ultimo
carattere mi accetta sia una cifra che una lettera
grazie
saluti
              franco
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: maschera di imput per codice fiscale

author: sv

text:
Frank ha scritto:




> grazie
> saluti
>               franco
In A2K l'ho risolto in questo modo:
 ??????00?00?000?;;_
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: maschera di imput per codice fiscale

author: TheMax

text:
"Frank" <
eff...@tiscalinet.it
> ha scritto nel messaggio
news:05d059048edffea401a...@mygate.mailgate.org...

Mi risulta sia un baco, in inserimento diretto dalla tabella non funziona
correttamente.
Limita l'inserimento del dato con l'utilizzo di una maschera.
Ciao,
Massimo
--
web:
www.piubelli.net
Vuoi il mio indirizzo? Togli _cut_ per rispondermi


title: Convertire progetto Visual Basic

author: Tiscali

text:
Esistono programmi che permettono di convertire un progetto VB in Access?
Dove reperirli?
Grazie, Angelo.


title: Convertire progetto Visual Basic

author: Alessandro

text:
"Tiscali" <
a_br...@yahoo.it
> wrote in message
news:a5e272$itg$1...@pegasus.tiscalinet.it...
> Esistono programmi che permettono di convertire un progetto VB in Access?
> Dove reperirli?
>
> Grazie, Angelo.
Qualcuno ti dirà che esiste, ed effettivamente c'è un programma
di P.Puglisi che fa qualcosa di simile, ma è impossibile da gestire
senza una BUONA conoscenza di ACCESS e VISUAL BASIC, perchè molto
non viene riprodotto, un esempio può essere l'utilizzo delle SUB_Form,
tutti i comandi DoCmd....., e molte alre cose.
In pratica costa di più sistemarlo che rifarlo.....!
Il sito in cui trovi il tutto è:
http://www.mauro.sistel.it/ocx/activex.htm
Ciao
Alessandro....!
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Convertire progetto Visual Basic

author: Gian Felice S.

text:
"Tiscali" <
a_br...@yahoo.it
> ha scritto nel messaggio
news:a5e272$itg$1...@pegasus.tiscalinet.it...
> Esistono programmi che permettono di convertire un progetto VB in Access?
> Dove reperirli?
>
> Grazie, Angelo.
Prova AccessToVB 4.7 e' sul cd di Io Programmo di questo mese!!!
Ciao