title: Trovate routines VB per il calcolo della distanza/rotta fra due due punti di coordinate.

author: Bruno - S95

text:
In rete, cedute liberamente dall'autore, ho trovato delle routines per il
calcolo della distanza e della rotta. Spero possano essere utili anche ad
altri di voi.
Allo scopo di poterle utilizzare, volevo chiedere un aiuto.
Secondo voi che conoscete il VBA e sicuramente il VB, possono essere
utilizzate in Access o devono essere modificate?
Se sono da modificare, potete aiutarmi ? Grazie
Domanda [OT]: come devo passare alla routine le coordinate
Latitudine/Longitudine dei due punti, cioč come devo fargliele leggere dai
campi tabella/query e come.
Scusate la mia ignoranza.
Tante Grazie, Bruno
--------
Public Sub Ortho(ByVal Lg1 As Single, ByVal Lt1 As Single _
    , ByVal Lg2 As Single, ByVal Lt2 As Single _
    , Radiale As Single, Distanza As Single)
'
'   Calcola la Radiale e la Distanza del punto di coordinate (Lg2, Lt2)
'   rispetto al punto con coordinate (Lg1, Lt1) su di un arco di
'   cerchio massimo (linea ortodromica).
'   Le coordinate Lg1, Lt1, Lg2, Lt2 devono essere in radianti.
'   La Distanza e' in Nautical Miles [nm].
'   La Radiale in Gradi Decimali [Grd].
'
    Dim D As Single, A As Single
'
    D = (Sin((Lt1 - Lt2) / 2!)) ^ 2 _
    + Cos(Lt1) * Cos(Lt2) * (Sin((Lg1 - Lg2) / 2!)) ^ 2
    D = 2! * Asin(Sqr(D))
'
    If D > 0! Then
        A = Acos((Sin(Lt2) - Sin(Lt1) * Cos(D)) / (Sin(D) * Cos(Lt1)))
    Else
        A = 0!
    End If
    If Sin(Lg2 - Lg1) < 0! Then A = 2! * CSng(PI) - A
'
    Radiale = (RadToGrd(A) - Declinazione + 360!) Mod 360!
'
    Distanza = R_TERRA * D
'
'
'
End Sub
Public Sub CONV(ByVal Lg1 As Single, ByVal Lt1 As Single _
    , ByVal Lg2 As Single, ByVal Lt2 As Single _
    , Velocita As Long, Rotta As Single _
    , Distanza As Single, Tempo As Single)
'
'   Calcola la Rotta e la Distanza per raggiungere il punto di
'   coordinate (Lg2,Lt2) partendo dal punto con coordinate (Lg1,Lt1).
'   Calcola anche il Tempo necessario usando la Velocita' data.
'   Le coordinate Lg1, Lt1, Lg2, Lt2 devono essere in radianti.
'   La Velocita e' in Nodi [kts]. Se = 0 viene usata e ritornata
'   la velocita' di crociera.
'   La Rotta! in Gradi Decimali [Grd].
'   La Distanza! in Nautical Miles [nm].
'   Il Tempo! in Minuti [mn].
'
    Dim x As Single, y As Single, Angolo As Single
'
    x = (Lg2 - Lg1) * Cos((Lt1 + Lt2) / 2!)
    y = Lt2 - Lt1
    If y = 0! Then y = 0.000001
'
    Angolo = Atn(x / y)
    If y < 0! Then Angolo = Angolo + CSng(PI)
    Rotta = (RadToGrd(Angolo) - Declinazione + 360!) Mod 360!
'
    Distanza = R_TERRA * Sqr(x * x + y * y)
'
    If Velocita = 0 Then Velocita = VelCrociera
    Tempo = 60! * Distanza / CSng(Velocita)
'
'
'
End Sub
Private Function Acos(ByVal X As Double) As Double
'
'   Calcola l' ArcoCoseno di x con -1 <= x <= 1.
'   Acos e' in radianti.
'
    If 0# < X And X <= 1# Then
        Acos = Atn(Sqr(1# - X * X) / X)
    ElseIf -1# <= X And X < 0# Then
        Acos = PI + Atn(Sqr(1# - X * X) / X)
    ElseIf X = 0# Then
        Acos = PI / 2#
    Else
        Err.Raise 5, "Acos Function", "Argomento illegale per Acos"
    End If
'
'
'
End Function
Public Function Asin(ByVal X As Double) As Double
'
'   Calcola l' ArcoSeno di x con -1 <= x <= 1.
'   Asin e' in radianti.
'
    If Abs(X) < 1# Then
        Asin = Atn(X / Sqr(1# - X * X))
    ElseIf X = 1# Then
        Asin = PI / 2#
    ElseIf X = -1# Then
        Asin = -PI / 2#
    Else
        Err.Raise 5, "Asin Function", "Argomento illegale per Asin"
    End If
'
'
End Function
----------------------------------------


author: Bruno Campanini

text:
"Bruno - S95" <
mus...@virgilio.it
> wrote in message
news:493d8c3f$0$1085$4faf...@reader1.news.tin.it...
> In rete, cedute liberamente dall'autore, ho trovato delle routines per il
> calcolo della distanza e della rotta. Spero possano essere utili anche ad
> altri di voi.
>
> Allo scopo di poterle utilizzare, volevo chiedere un aiuto.
>
> Secondo voi che conoscete il VBA e sicuramente il VB, possono essere
> utilizzate in Access o devono essere modificate?
>
> Se sono da modificare, potete aiutarmi ? Grazie
>
> Domanda [OT]: come devo passare alla routine le coordinate
> Latitudine/Longitudine dei due punti, cioč come devo fargliele leggere dai
> campi tabella/query e come.
>
> Scusate la mia ignoranza.
>
> Tante Grazie, Bruno
In un foglio di Excel (16Kb) ho calcolato con due formule
la distanza ortodromica e la corda.
Ma non la rotta.
Se ti interessa...
Bruno


author: Carlo Costarella

text:
"Bruno - S95" <
mus...@virgilio.it
> ha scritto nel messaggio
news:493d8c3f$0$1085$4faf...@reader1.news.tin.it...
> In rete, cedute liberamente dall'autore, ho trovato delle routines per il
> calcolo della distanza e della rotta. Spero possano essere utili anche ad
> altri di voi.
>
> Allo scopo di poterle utilizzare, volevo chiedere un aiuto.
>
Prova a chiedere direttamente all'autore di quelle routine:
http://www.flanguasco.org/Volpian2/Volpian2.html
Ciao, Carlo


text:
"Bruno Campanini" <
B...@gmail.com
> ha scritto nel messaggio
news:493da942$0$40308$4faf...@reader5.news.tin.it...
> "Bruno - S95" <
mus...@virgilio.it
> wrote in message
> news:493d8c3f$0$1085$4faf...@reader1.news.tin.it...
>> In rete, cedute liberamente dall'autore, ho trovato delle routines per il
>> calcolo della distanza e della rotta. Spero possano essere utili anche ad
>> altri di voi.
>>
>> Allo scopo di poterle utilizzare, volevo chiedere un aiuto.
>>
>> Secondo voi che conoscete il VBA e sicuramente il VB, possono essere
>> utilizzate in Access o devono essere modificate?
>>
>> Se sono da modificare, potete aiutarmi ? Grazie
>>
>> Domanda [OT]: come devo passare alla routine le coordinate
>> Latitudine/Longitudine dei due punti, cioè come devo fargliele leggere
>> dai campi tabella/query e come.
>>
>> Scusate la mia ignoranza.
>>
>> Tante Grazie, Bruno
>
> In un foglio di Excel (16Kb) ho calcolato con due formule
> la distanza ortodromica e la corda.
> Ma non la rotta.
>
> Se ti interessa...
>
> Bruno
---------
Ciao Bruno, si sono interessato. Per quale scopo sei interessato
all'ortodromica ?
Se vuoi, il file puoi inviarmelo e sarà molto gradito.
Ciao, Bruno


text:
"Carlo Costarella" <
carloantoni...@gmail.com
> ha scritto nel
messaggio news:ghl879$8tk$1...@tdi.cu.mi.it...

-----------
Ho scritto all'autore poco fa.
Grazie, Bruno


text:
"Bruno Campanini" <
B...@gmail.com
> ha scritto nel messaggio
news:493da942$0$40308$4faf...@reader5.news.tin.it...

--------------
Gentile Bruno Campanini, ti ringrazio infinitamente per il file .xls
inviatomi e per le spiegazioni e la pazienza avuta.
Saluti, Bruno


text:
"Carlo Costarella" <
carloantoni...@gmail.com
> ha scritto nel
messaggio news:ghl879$8tk$1...@tdi.cu.mi.it...

--------------
Ho contattato l'autore che è disponibilissimo ad aiutarmi in VB, ma non con
Access, in quanto non lo conosce.
Si è offerto di scrivere due righe di codice in VB per calcolare Rotta e
distanza, ma non mi sembra il caso di dirgli di si, anche perchè a me
interessao le routine che funzionino in Access, "la mia passione".
Certo che se qualcuno che ci capisce riuscisse a modificare o riscrivere le
routines che ho trascritto nel post "Trovate routines VB per il calcolo
della distanza/rotta fra due due punti di coordinate", non sarevve niente
male.
Ciao, Bruno


text:
"S95bruno" <
mus...@virgilio.it
> ha scritto nel messaggio
news:ghs11p$kd3$1...@tdi.cu.mi.it...

Fatti mandare le routine in VB che, il più delle volte, funzionano
perfettamente anche in VBA così come sono.
Eventualmente le convertiamo.
Quando parli di Access a qualcuno del mondo VB ricorda che devi parlare di
Visual Basic for Applications (VBA) che è una versione lite di VB.
Ciao, Carlo


text:
"Carlo Costarella" <
carloantoni...@gmail.com
> ha scritto nel
messaggio news:ght69o$b0e$1...@tdi.cu.mi.it...

--------->
Ciao Carlo, ecco a seguire le 4 routine (le trovi nel mio primo post con
stesso oggetto).
Magari riuscissi nell'intento di farle funzionare. A seguire delle routine
incollo anche la formula per calcolare la rotta e distanza + qualche
coordinata compresa di rotta e distanza che estrapolo da apposito programma
di navigazione della Garmin "MapSource".
Se riesci e hai fame di riuscire nell'intento, allora basta una tabella con
4 campi; il 1° con Latitudine del punto A, il 1° con Lonfitudine del punto
A,  il 3° con Latitudine del punto B, il 4° con Lonfitudine del punto B,
infine passare i dati alle routine per restituirli in un altro campo (facile
a dirlo, però non lo so applicare con VBA). Tieni conto che una routine è
utilizzata (mi sembra) per le "radiali", cioè, in termini semplici,  un
segnale che parte da una radio assistenza aeronautica (VOR) (con riferimento
al NORD) verso una stazione ricevente (aeromobile). Esempio: un'aeromobile
passa ad Ovest (270°) dalla radioassistenza con apparato selezionato su la
relativa frequenza, girando la rosa graduata dello strumento di navigazione
dell'aeromobile, questo risulterà sulla radiale 270°.
Spero di essere stato semplice e chiaro nella spiegazione. Se hai bisogno di
altri chiarimenti o qualche file con le formule, allora basta chiedere.
Spero anche nell'interessamento di altri del News.
Grazie 1000, Bruno
--------




===============================  Formula di calcolo
=============================
NAVIGAZIONE LOSSODROMICA
Sulla sfera terrestre il percorso tra due punti, che taglia i meridiani con
angolo costante, è una linea detta lossodromia.
      L'angolo costante che il percorso forma con i meridiani si dice
     rotta   lossodromica  RV o TC
      La distanza percorsa è detta
     cammino lossodromico m
N.B.  Questa distanza m tra i due punti non è la più breve sulla sfera
La navigazione lossodromica consente di risolvere due problemi:
  a.. le soluzioni possono essere analitiche o grafiche
Il II° problema
      consente di determinare
     la rotta TC e la lunghezza del percorso m
note le coordinate del punto di partenza A e quelle del punto di arrivo B
N.B. Se la distanza tra il punto di partenza e il punto di arrivo non supera
i 350 NM e per latitudini minori di 60° la soluzione dei problemi si può
svolgere in modo approssimato. Tale approssimazione non è più valida nel
caso che i due punti appartengono ad emisferi diversi.
      II° problema lossodromico
Soluzione analitica
      Dati
     coordinate del punto di partenza
     A (?A ?A)
     e coordinate del punto di arrivo
     B (?B ?B)
      si calcolano
     la rotta TC e la lunghezza del percorso m
Si calcolano in primi le differenze di latitudine e di longitudine tra il
punto di arrivo B e quello di partenza A
      ??' = ?B - ?A
     ??' = ?B - ?A
e ricava TC espressa in modo quadratale, con la seguente relazione
      TC = arctan(??' cos ?M / ??'
     con ?M = (?A + ?B) / 2
I nomi  della rotta dipendono dai nomi di ?? e di ??.
Per calcolare la distanza lossodromica m  in NM tra i due punti si usano
m  = ??' / cos TC
Esempio guidato
Risolvere il II° problema lossodromico
      conoscendo
     le coordinate del punto di partenza
     A (15°20' N   178° 25' W)
     e le coordinate del punto di arrivo
     B (18°10' N   177° 45' E )
  a.. Determinare la rotta lossodromia TC e il cammino m
      ??' = ?B - ?A
     ??' = 2°50' N = +170'
      ??' = ?B - ?A
     ??' = 356°10' E = 3°50'W = - 230'
      ?M = (?A + ?B) / 2 = (15°20'+ 18°10')/2
     ?M = 16°45'N
      TC = arctan(??' cos ?M / ??') =arctan((230' / 170) x cos 16°45')
      TC =  N 52° W = 308°
      m = ??' / cos TC = 170' cos 52°
     m = 276 NM
 =========================== Coordinate d'esempio
======================================
Punto A
Aeroporto Elmas: N39° 15' 14"  E009° 03' 39"
Punto B
San Basilio: N39° 32' 15"  E009° 11' 57"
Rotta vera: 21°  e cammino = NM (miglia nautiche) 18.2 (2= decimi di NM)
-------------------------
Punto A
Aeroporto Elmas: N39° 15' 14"  E009° 03' 39"
Punto B
Guamaggiore: N39 34 12 E009 04 22
Rotta vera: 2°  e cammino = NM (miglia nautiche) 19.0
----------------------------------------------------------------------
Punto A
Aeroporto Elmas: N39° 15' 14"  E009° 03' 39"
Punto B
Quartucciu: N39 15 11 E9 10 42
Rotta vera: 91°  e cammino = NM (miglia nautiche) 5.5 (5= decimi di NM)
-------------------------
Punto A
Aeroporto Elmas: N39° 15' 14"  E009° 03' 39"
Punto B
Gonnesa: N39 15 57.0 E8 28 15.5 (5= decimi di decondi ")
Rotta vera: 272°  e cammino = NM (miglia nautiche) 27.5
------------------------


text:
"S95bruno" <
mus...@virgilio.it
> ha scritto
cut
>>>
>>> Ho contattato l'autore che è disponibilissimo ad aiutarmi in VB, ma non
>>> con Access, in quanto non lo conosce.
>>> Si è offerto di scrivere due righe di codice in VB per calcolare Rotta e
>>> distanza, ma non mi sembra il caso di dirgli di si, anche perchè a me
>>> interessao le routine che funzionino in Access, "la mia passione".
...
Forse non mi sono spiegato...
Voglio dire che puoi benissimo chiedere all'amico di mandarti le routine in
VB, anche perchè si potrebbe tentare di renderle compatibili in VBA.
Personalmente saro assente una settimana ...se ne riparla il 23.
Ciao, Carlo


title: [semi OT - Segnalazione] Evento Ado.NET

author: MA

text:
Salve a tutti

per gli accessisti che strizzano l'occhio a
ado.net
, i ragazzi di
dotnetwork, nostri gemellati organizzano un evento gratuito.

Per chi eè interessato
www.dotnetwork.it

--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza
Italiana Sviluppatori Access


title: esecuzione automatica a orari fissi

author: p. bianchi

text:
Ho l'esigenza di far eseguire una query di Access a una certa ora del
giorno in automatico.
Vorrei sapere se 1) esiste uno scheduler interno di Access che sia
abbastanza leggero da non appesantire la macchina che lo ospita
(workstation PII 450 MHz), o se 2) conviene cercare uno scheduler
esterno per W95, da avviare automaticamente a ogni reboot,  che a
quell'ora lanci access il quale mandi in esecuzione automatica la
suddetta query (non ho mai provato ma  A. ha la possibilita' di
partire e fare una query, passata magari come parametro, vero? Cosi'
come io esporto query e report al desktop e quando clicco li esegue).
Quale approccio consigliate e/o avete sperimentato?


title: esecuzione automatica a orari fissi

author: Orsacchi Pier Paolo

text:
Puoi sfruttare l'evento Timer di una form, magari di un database esterno,
che all'avvio si collega al database principale, ed ad intervalli specifici
esegue la query sul db collegato.
--
       ELCO
Orsacchi Pier Paolo
orsa...@elcosistemi.it
p. bianchi <p=
bia...@maxidata.it
> wrote in message
39355e15...@news.telnetwork.it...



title: Source version control, cosa usate?

author: RobertoA

text:
Piu' un progetto diventa corposo e piu' pressante si fa sentire la
necessita' di un sistema di source control version
Cosa usate voi?
Procedura realizzata in casa?
Free / Commerciale?
Personalmente uso spesso le procedure di Tim Abell

https://github.com/timabell/msaccess-vcs-integration

Permettono sostanzialmente di salvare come file di testo tutti gli
oggetti contenuti in un progetto Access
Guardando l'agenda del prossimo Access DevCon, vedo che sara' presente
il produttore di Ivercy

https://www.ivercy.com/

Qualcuno di voi lo usa?
Usate altro?
Ciao e grazie


title: Source version control, cosa usate?

author: Karl Donaubauer

text:
Salve,

Robertoa ha scritto:

Non uso SCC in pratica, solo ho provato Ivercy un po per sapere come
funziona ecc. Ma siccome non hai altri risposti, scrivo un po' di
informazione:

L'autore di Ivercy è un vecchio amico. Proprio la settimana scorsa
abbiamo lavorato insieme a Francoforte. Al momento discutiamo se alla
DevCon presenterà in breve alcune novità su Ivercy nel programma del
"DevCon Evening" e prende una tavalo "ufficiale" per discussioni sul
prodotto. Vuol dire che devi assolutamente venire per sapere e vedere in
più. ;-)

Ivercy è quasi il "newcomer". Quasi lo standard, cioè molto distributo
da tanti anni è OASIS:
http://www.dev2dev.de/

Ivercy e OASIS sono i due unici programmi commerciali/professionali in
questo rispetto che conosco e credo che esistono per Access.

4 anni fa tutti e due autori hanno presentato insieme SCC in genere ed i
loro tool alla mia conferenza tedesca. Puoi scaricare gli slide con
principi, link, prezzi, paragone dei due tool ecc.:
http://www.donkarl.com/Downloads/AEK/AEK18_Quellcodeverwaltung.zip

Certo tutto è in tedesco.

--
Ciao
Karl
*********
http://www.AccessDevCon.com

Access FAQ:
http://www.donkarl.com/it


title: Source version control, cosa usate?

text:

Si, mi piacerebbe molto partecipare (come tutti quelli che si occupano
di Access credo) ma costi, tempo, famiglia, lingua, sono tante piccole
barriere, messe insieme diventano difficili da superare
Ti ringrazio per l'indicazione di Oasis che non conoscevo e della
comparazione tra i due


title: Eseguire routine di una sottomaschera da maschera principale

author: Nick

text:
ciao a tutti ho questa struttura:
da una form (chiamiamola principale) vorrei lanciare una sub presente
nella sua sottomaschera (chiamiamola secondaria).
l'azione è un banale docmd.gotorecord , , acnext della sottomaschera.
ho provato con le seguenti funzioni:
nella sottomaschera ho creato una public sub così definita:
Public Sub AvantiREc()
'Gestione errori omissis
     DoCmd.GoToRecord , , acNext
End Sub
e nella form ho inserito questi comandi:
         Me!secondaria.SetFocus
         Me!secondaria.AvantiREc
ma restituisce l'errore 438 "proprietà non supportate"
qualche suggerimento??
Grazie
ciao
Nick


author: Alessandro Baraldi

text:
Sinceramente io preferisco non inserire, quando possibile, codice nella
subform, ma
gestisco direttamente dalla Form Principale, nel tuo caso si potrebbe
fare così:
Me!NomeSubForm.Form.RecordsetClone.Movenext
Me!NomeSubForm.Form.Bookmark=Me!NomeSubForm.Form.RecordsetCloneRecordsetClone.Bookmark
Se invece vuoi farlo con l'uso della funzione come hai richiesto
basterà
chiamarla così:
Me!NomeSubForm.AvantiREC
Ciao
@Alex


text:
Alessandro Baraldi ha detto: in data 05/04/2006 10.06:
[CUT]
> Se invece vuoi farlo con l'uso della funzione come hai richiesto
> basterà
> chiamarla così:
>
> Me!NomeSubForm.AvantiREC
>
> Ciao
> @Alex
>
non so come mai non mi funziona
cmq ho risolto (in maniera molto sporca) facendo diventare la subform
una form pop-up e richiamando la funzione così:
forms("secondaria").AvantiRec
Ciao
Nick


text:
Usa il primo metodo, quello che hai fatto non è da fare....!
@Alex


title: Icona dell'applicazione

author: Franco

text:
Salve a tutti,
in due mie applicazioni ho provato ad indicare, tramite il menu
"Strumenti/Avvio", un'icona dell'applicazione, indicandone il percorso (sul
PC del Front-End). Funziona quasi perfettamente, nel senso che vedo
effettivamente l'icona indicata (file.ico), ma con una controindicazione: la
finestra del database non viene più nascosta, anche la spunta nella finestra
"Avvio" è regolarmente tolta.
Se cancello l'indicazione dell'icona tutto funziona regolarmente.
Bisogna usare qualche altro accorgimento che non conosco? Nella finestra
"Avvio" l'unica spunta che conservo è quella relativa alla Barra di stato,
tutte le altre sono disabilitate.
Uso Access XP con Windows XP.
Saluti
Franco
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Icona dell'applicazione

text:
Franco wrote:
> in due mie applicazioni ho provato ad indicare, tramite il menu
> "Strumenti/Avvio", un'icona dell'applicazione, indicandone il
> percorso (sul PC del Front-End). Funziona quasi perfettamente, nel
> senso che vedo effettivamente l'icona indicata (file.ico), ma con una
> controindicazione: la finestra del database non viene più nascosta,
> anche la spunta nella finestra "Avvio" è regolarmente tolta.
> Se cancello l'indicazione dell'icona tutto funziona regolarmente.
> Bisogna usare qualche altro accorgimento che non conosco? Nella
> finestra "Avvio" l'unica spunta che conservo è quella relativa alla
> Barra di stato, tutte le altre sono disabilitate.
> Uso Access XP con Windows XP.
Sembra che ti manca un SP:
http://support.microsoft.com/kb/313915/en-us
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Icona dell'applicazione

text:

Ok Grazie



title: Moduli di classe e variabili

author: Valerio Valentini

text:
Se do un valore ad una variabile in un modulo di classe in una form in
questo modo:
Option....
Public strFormName As String
Private Sub Button_Click
    ........
    strFormName = Me.Name
    ...........
rtnControllaClick
    ........
End Sub
nella routine che richiamo posso usare strFormName o la devo mettere nelle
parentesi dopo rtnControllaClick() e se si dove nell'help trovo indicazioni
su questo modo di, suppongo, "passare le variabili"?
Ciao Valerio.


title: Moduli di classe e variabili

author: Antonio Biso

text:
"Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
news:2_SBc.361849$hc5.15...@news3.tin.it...

Perchč la variabile globale non la metti in un modulo normale?
Antonio


title: Moduli di classe e variabili

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:bgUBc.11015$GQ3.3...@twister2.libero.it...
> "Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
> news:2_SBc.361849$hc5.15...@news3.tin.it...
> > Se do un valore ad una variabile in un modulo di classe in una form in
> > questo modo:
> >
> > Option....
> >
> > Public strFormName As String
> >
> > Private Sub Button_Click
> >
> >     ........
> >     strFormName = Me.Name
> >     ...........
> >
> > rtnControllaClick
> >
> >     ........
> >
> > End Sub
> >
> > nella routine che richiamo posso usare strFormName o la devo mettere
nelle
> > parentesi dopo rtnControllaClick() e se si dove nell'help trovo
> indicazioni
> > su questo modo di, suppongo, "passare le variabili"?
>
> Perchè la variabile globale non la metti in un modulo normale?
>
Suppongo significa il modulo che ha dentro la mia routine rtnControllaClick?
Poi posso però scrivere nel mio modulo della Form:
     ........
     strFormName = Me.Name
     ...........
e soprattutto poi nella routine se lo prende il valore di strFormName?
> Antonio
>
Ciao Valerio.


title: Moduli di classe e variabili

author: SunRex

text:
"Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
news:o3VBc.509317$rM4.21...@news4.tin.it...
>
> "Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
> news:bgUBc.11015$GQ3.3...@twister2.libero.it...
> > "Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
> > news:2_SBc.361849$hc5.15...@news3.tin.it...
> > > Se do un valore ad una variabile in un modulo di classe in una form in
> > > questo modo:
> > >
> > > Option....
> > >
> > > Public strFormName As String
> > >
> > > Private Sub Button_Click
> > >
> > >     ........
> > >     strFormName = Me.Name
> > >     ...........
> > >
> > > rtnControllaClick
> > >
> > >     ........
> > >
> > > End Sub
> > >
> > > nella routine che richiamo posso usare strFormName o la devo mettere
> nelle
> > > parentesi dopo rtnControllaClick() e se si dove nell'help trovo
> > indicazioni
> > > su questo modo di, suppongo, "passare le variabili"?
> >
> > Perchè la variabile globale non la metti in un modulo normale?
> >
>
> Suppongo significa il modulo che ha dentro la mia routine
rtnControllaClick?
Dalla guida in linea.............
Esistono due tipi fondamentali di moduli: moduli di classe e moduli
standard.
Moduli di classe (quello che hai usato tu)
I moduli di maschera e di report sono moduli di classe associati ad una
determinata maschera o report contenenti in genere routine evento che
vengono eseguite in risposta ad un evento che si verifica sulla maschera o
sul report. È possibile utilizzare le routine evento per controllare il
funzionamento delle maschere e dei report e le risposte di questi oggetti ad
azioni dell'utente quali il clic con il mouse su un pulsante di comando.
Moduli standard (quello che intende Antonio)
I moduli standard contengono routine generali che non sono associate ad
alcun altro oggetto e routine utilizzate di frequente che è possibile
eseguire da un punto qualsiasi del database.
[CUT]
SunRex


title: Moduli di classe e variabili

text:
"SunRex" <
sunrexs...@hotmail.it
> ha scritto nel messaggio
news:WeWBc.509882$rM4.21...@news4.tin.it...
>
>
> Dalla guida in linea.............
> Esistono due tipi fondamentali di moduli: moduli di classe e moduli
> standard.
>
> Moduli di classe (quello che hai usato tu)
>
> I moduli di maschera e di report sono moduli di classe associati ad una
> determinata maschera o report contenenti in genere routine evento che
> vengono eseguite in risposta ad un evento che si verifica sulla maschera o
> sul report. Č possibile utilizzare le routine evento per controllare il
> funzionamento delle maschere e dei report e le risposte di questi oggetti
ad
> azioni dell'utente quali il clic con il mouse su un pulsante di comando.
>
> Moduli standard (quello che intende Antonio)
>
> I moduli standard contengono routine generali che non sono associate ad
> alcun altro oggetto e routine utilizzate di frequente che č possibile
> eseguire da un punto qualsiasi del database.
>
>
> [CUT]
>
> SunRex
>
... e fino a lě, piů o meno, c'ero. Ora la domanda che ancora non ho risolto
é:
Posso dichiarare una variabile in un modulo standard, poi darle un valore in
un modulo di classe ed utilizzare quel valore nel modulo standard?
--------
... modulo standard
Public strMiaStringa as String
Public Sub rtnControllaClick()
    ci_faccio_ciň_che_voglio = strMiaStringa
End Sub
--------
... modulo di classe
Private Sub Form_Open()
    strMiaStringa = Me.Name
    rtnControllaClick
End Sub
----------
spero di essermi spiegato in modo almeno discreto,
Ciao Valerio.


title: Moduli di classe e variabili

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:bgUBc.11015$GQ3.3...@twister2.libero.it...
> "Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
> news:2_SBc.361849$hc5.15...@news3.tin.it...
>
> Perchè la variabile globale non la metti in un modulo normale?
>
> Antonio
>
Allargo la richiesta:
se voglio aver disponibile un certo dato, tipo il nome utente, per tutto il
tempo in cui sta aperto il DB ed aprendo e chiudendo diverse maschere posso
farlo con una variabile o devo  scrivere il valore in una tabella?
RiCiao Valerio.


title: Moduli di classe e variabili

text:
"Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
news:ZrYBc.363667$hc5.15...@news3.tin.it...

Puoi farlo con una variabile dichiarata globale in un modulo standard
Antonio


title: Moduli di classe e variabili

author: fidirico (lavoro)

text:
"Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
news:ZrYBc.363667$hc5.15...@news3.tin.it...
>
> "Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
> news:bgUBc.11015$GQ3.3...@twister2.libero.it...
> > "Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
> > news:2_SBc.361849$hc5.15...@news3.tin.it...
> >
[CUT]
> Allargo la richiesta:
>
> se voglio aver disponibile un certo dato, tipo il nome utente, per tutto
il
> tempo in cui sta aperto il DB ed aprendo e chiudendo diverse maschere
posso
> farlo con una variabile o devo  scrivere il valore in una tabella?
>
> RiCiao Valerio.
Per cose di questo tipo io preferisco utilizzare una tabella appoggio,
magari nascosta.
Ciao
Galliano.


title: Moduli di classe e variabili

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:EDYBc.12195$c_1.3...@twister1.libero.it...

Scusa se stresso, ma il valore glielo posso dare ovunque o devo darglielo in
quel modulo perchè resti disponibile?
Globale significa quello che adesso si chiama Public o Static o esiste
ancora Global?
> Antonio
>
>
Con eterna gratitudine per la pazienza :)
Ciao Valerio.


title: Moduli di classe e variabili

text:
"Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
news:VWYBc.511060$rM4.21...@news4.tin.it...
>
> "Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
> news:EDYBc.12195$c_1.3...@twister1.libero.it...
> > "Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
> > news:ZrYBc.363667$hc5.15...@news3.tin.it...
> > >
> > > "Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
> > > news:bgUBc.11015$GQ3.3...@twister2.libero.it...
> > > > "Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
> > > > news:2_SBc.361849$hc5.15...@news3.tin.it...
> > > >
> > > > Perchè la variabile globale non la metti in un modulo normale?
> > > >
> > > > Antonio
> > > >
> > >
> > > Allargo la richiesta:
> > >
> > > se voglio aver disponibile un certo dato, tipo il nome utente, per
tutto
> > il
> > > tempo in cui sta aperto il DB ed aprendo e chiudendo diverse maschere
> > posso
> > > farlo con una variabile o devo  scrivere il valore in una tabella?
> >
> > Puoi farlo con una variabile dichiarata globale in un modulo standard
> >
>
> Scusa se stresso, ma il valore glielo posso dare ovunque o devo darglielo
in
> quel modulo perchè resti disponibile?
Appunto per questo la dichiari Public in un modulo standard per poterla
inizializzare ovunque ed usarla ovunque.
>
> Globale significa quello che adesso si chiama Public o Static o esiste
> ancora Global?
Global è desueto ma dovrebbe funzionare uguale.Io uso Public
SunRex



title: Moduli di classe e variabili

text:
"SunRex" <
sunrexs...@hotmail.it
> ha scritto nel messaggio
news:8D8Cc.513940$rM4.21...@news4.tin.it...
>
> "Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
> news:VWYBc.511060$rM4.21...@news4.tin.it...
> >
>
> Appunto per questo la dichiari Public in un modulo standard per poterla
> inizializzare ovunque ed usarla ovunque.
>
> >
> > Globale significa quello che adesso si chiama Public o Static o esiste
> > ancora Global?
>
> Global è desueto ma dovrebbe funzionare uguale.Io uso Public
>
> SunRex
> >
... e funziona :)
Ora se hai ancora un po di pazienza, mi vorresti dire dove trovo qualcosa
nell'help che spieghi come dove e quando si possono usare gli argomenti tra
parentesi nelle routine.
Ciao Valerio.


title: Moduli di classe e variabili

text:
"Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
news:CpaCc.514368$rM4.21...@news4.tin.it...
>
> Ora se hai ancora un po di pazienza, mi vorresti dire dove trovo qualcosa
> nell'help che spieghi come dove e quando si possono usare gli argomenti
tra
> parentesi nelle routine.
Se spulci l'help trovi info: per esempio alla voce
passaggio di argomenti
Antonio


title: Moduli di classe e variabili

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:qSbCc.12994$GQ3.3...@twister2.libero.it...

Ed aggiungerei
Argomenti predefiniti e facoltativi
SunRex
>
> Antonio
>
>


title: Moduli di classe e variabili

text:
"SunRex" <
sunrexs...@hotmail.it
> ha scritto nel messaggio
news:YelCc.519039$rM4.21...@news4.tin.it...

Un grazie ad Antonio ed a SunRex, non ho capito del tutto quello che c'è
scritto, ma penso che con alcune prove, presa la direzione giusta, riuscirò
ad approfondirne il modo.
Ciao Valerio.


title: query con Nz, zero, null...

author: ilaria

text:
Saluti a tutti,
non riesco a fare in modo che una query mi restituisca 0 al posto di null in
un campo; ho provato con Nz e Iif IsNull, ma niente non funziona!!!!
SELECT Nz(Sum([tEntrate].[importo]),0) AS [Somma Di tEntrate_importo],
tEntrate.tipologia
FROM tEntrate
WHERE (((tEntrate.data)<=[Forms]![mVerificaCassa]![dataVer]))
GROUP BY tEntrate.tipologia;
Ditemi perché non mi dà 0 nel campo Somma di tEntrate per favore.
Grazie
Ilaria


title: query con Nz, zero, null...

author: Govardo Libero

text:
"ilaria" <
lara_...@libero.it
> ha scritto nel messaggio
news:QuDE7.1915$sq5....@news.infostrada.it...

Ciao.
Prova a mettere Nz prima del campo che potrebbe contenere un valore nullo
es.
.... Sum(nz([tEntrate].[importo]))......
--
                     Angelo
------------------------------------------------------
Sito comune di it.comp.appl.access
http://www.sitocomune.com
------------------------------------------------------


title: query con Nz, zero, null...

author: principiante

text:
"ilaria" <
lara_...@libero.it
> ha scritto nel messaggio
news:QuDE7.1915$sq5....@news.infostrada.it...

Prova a guardare la risposta di roberto-syd al post di Simone "problema con
report e sottoreport" del 29/10/01. Se il tuo problema è simile la soluzione
funziona perfettamente
Paolo


title: query con Nz, zero, null...

author: Ilaria

text:
Govardo Libero <
gov...@libero.it
> wrote in message
news:X9EE7.2134$sq5.1...@news.infostrada.it...
> "ilaria" <
lara_...@libero.it
> ha scritto nel messaggio
> news:QuDE7.1915$sq5....@news.infostrada.it...
> > Saluti a tutti,
> > non riesco a fare in modo che una query mi restituisca 0 al posto di
null
> in
> > un campo; ho provato con Nz e Iif IsNull, ma niente non funziona!!!!
> >
> > SELECT Nz(Sum([tEntrate].[importo]),0) AS [Somma Di tEntrate_importo],
> > tEntrate.tipologia
> > FROM tEntrate
> > WHERE (((tEntrate.data)<=[Forms]![mVerificaCassa]![dataVer]))
> > GROUP BY tEntrate.tipologia;
> >
> > Ditemi perché non mi dà 0 nel campo Somma di tEntrate per favore.
> >
> > Grazie
> >
> > Ilaria
> >
>
>
> Ciao.
> Prova a mettere Nz prima del campo che potrebbe contenere un valore nullo
> es.
>
> .... Sum(nz([tEntrate].[importo]))......
>
Non funziona, ma in realtà mi sono accorta di non aver chiarito bene il mio
problema:
ho un sottoreport basato su una query che gira su altre 2 query che
incrociano i valori di 2 tabelle; io vorrei che quando non trova nessun
record (ad es. la query che avevo già postato non seleziona neppure un
record) il sottoreport venisse generato lo stesso con i valori a zero.
Grazie
Ilaria


title: query con Nz, zero, null...

text:
"Ilaria" <
ilaria....@nospam-unipr.it
> ha scritto nel messaggio
news:9s5auo$8jq$1...@localhost.localdomain...

Può darsi che io non capisca, anzi è probabile...
ma ti dico lo stesso che secondo me la soluzione è in quel famoso post di
Robert-syd che ora ti riposto
...
Purtroppo se un report non contiene neanche un record il risultato NON è
Null ma bensì è vuoto per ovviare a questo inconveniente dovresti accertarti
dell'esistenza di almeno un record e qui potresti usare la funzione DCount
che troverai ampiamente documentata sullo help, quindi l'espressione è
=IIf(DCount("NomeCampo";"NomeTabella";"Criteri")=0;0;Percorso e Nome del
controllo che contiene il valore)
Ciao Roberto - Syd


title: query con Nz, zero, null...

text:
> Può darsi che io non capisca, anzi è probabile...
> ma ti dico lo stesso che secondo me la soluzione è in quel famoso post di
> Robert-syd che ora ti riposto
In effetti hai ragione, solo che speravo di riuscire a sistemare tutto
"aggiustando" le query.
Grazie 1000
Ilaria


title: Query incongurenze

author: Hosso

text:
Ciao a tutti,
dovrei implementare una query che mi mostri le incongruenze tra due colonne.
Praticamente se un prodotto (es."A", della tabella sottostante) ha
differenti pesi, vorrei che venisse visualizzato.
Altrimenti no (es. prodotto "B" ).
Non ho molte nozioni di SQL, ho provato a cimentarmi con Select e cose del
genere ma senza risultati.. eppure non credo sia cosě complesso da fare.
Un grazie a chi riesce a darmi una dritta!
TABELLA
Prodotto    Peso
A                100
A                150
B                200
B                200
B                200
C                17
C                15
C                17
QUERY
Prodotto    Peso
A                100
A                150
C                17
C                15
C                17


title: Query incongurenze

author: Roberto dal portatile

text:
"Hosso" <
hosso77...@hotmail.com
> ha scritto nel messaggio
news:4589760a$0$20817$5fc...@news.tiscali.it...

Se la tabella che contiene i dati si chiama Tabella1 ed ha una struttura
simile a questa:
ID                    Contatore e chiave primaria
Prodotto         Testo
Peso               Numerico
prova con una query che abbia il seguente codice SQL:
SELECT Prodotto, Peso
FROM Tabella1
WHERE (((DCount("*","Tabella1","Prodotto =" & Chr$(34) & [Prodotto] &
Chr$(34) & " And Peso <>" & [Peso]))>0))
ORDER BY Prodotto;
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Query incongurenze

text:
"Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
news:Xkfih.86177$uv5.9...@twister1.libero.it...
> prova con una query che abbia il seguente codice SQL:
>
> SELECT Prodotto, Peso
> FROM Tabella1
> WHERE (((DCount("*","Tabella1","Prodotto =" & Chr$(34) & [Prodotto] &
> Chr$(34) & " And Peso <>" & [Peso]))>0))
> ORDER BY Prodotto;
>
Funziona!! grazie mille!!!
(ora devo solo trovare il modo di "introdurla" in access senza smanettare in
SQL... ammesso che sia possibile..)
Saluti,
-= Hosso =-


title: Query incongurenze

text:
"Hosso" <
hosso77...@hotmail.com
> ha scritto nel messaggio
news:45898465$0$20821$5fc...@news.tiscali.it...

Non capisco cosa intendi per " 'introdurla' in access senza smanettare in
SQL...".
>
> Saluti,
> -= Hosso =-



title: Query incongurenze

text:
"Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
news:frsih.87882$Fk1.3...@twister2.libero.it...
> Non capisco cosa intendi per " 'introdurla' in access senza smanettare in
> SQL...".
Errori da newbie..
In realtà è tutto a posto.. ho inserito il codice SQL e la struttura della
query si è aggiornata di conseguenza..
Grazie ancora..
Saluti,
-= Hosso =-


title: Creazione Tabella Automatico

author: collaborazioni

text:
Salve a tutti, volevo una dritta e sono sicuro che la troverò, vi
espongo la mia esigenza:
Devo poter creare in automatico una tabella che abbia questi campi
ID_Data  è la data da oggi fino a ????
ID_Ora   sono 10 record derivanti da un altra tabella che contiene 1 2
3 4 5 6 7 8 9 10
In pratica mi dovrebbe risultare di avere per ogni giorno di T_Orario
(ID_Data) 10 record di T_Ora (ID_Ora) da 1 a 10.
Non so se è chiaro.
Un caro saluto a tutto il ng
Ml


title: Creazione Tabella Automatico

author: Bruno Campanini

text:
"collaborazioni" <
collabo...@gmail.com
> wrote in message
news:dfcbfc9d-576d-4081...@l9g2000yqi.googlegroups.com...
> Salve a tutti, volevo una dritta e sono sicuro che la trover�, vi
> espongo la mia esigenza:
> Devo poter creare in automatico una tabella che abbia questi campi
> ID_Data  � la data da oggi fino a ????
> ID_Ora   sono 10 record derivanti da un altra tabella che contiene 1 2
> 3 4 5 6 7 8 9 10
>
> In pratica mi dovrebbe risultare di avere per ogni giorno di T_Orario
> (ID_Data) 10 record di T_Ora (ID_Ora) da 1 a 10.
> Non so se � chiaro.
Sappi che non lo �.
Bruno


title: Creazione Tabella Automatico

text:
On 15 Ott, 13:57, "Bruno Campanini" <
bruno...@libero.it
> wrote:
> "collaborazioni" <
collaborazi...@gmail.com
> wrote in message
>
> news:dfcbfc9d-576d-4081...@l9g2000yqi.googlegroups.com...
>
> > Salve a tutti, volevo una dritta e sono sicuro che la troverò, vi
> > espongo la mia esigenza:
> > Devo poter creare in automatico una tabella che abbia questi campi
> > ID_Data  è la data da oggi fino a ????
> > ID_Ora   sono 10 record derivanti da un altra tabella che contiene 1 2
> > 3 4 5 6 7 8 9 10
>
> > In pratica mi dovrebbe risultare di avere per ogni giorno di T_Orario
> > (ID_Data) 10 record di T_Ora (ID_Ora) da 1 a 10.
> > Non so se è chiaro.
>
> Sappi che non lo è.
>
> Bruno
Allora mi ri-spiego...
Devo creare una tabella che abbia dei campi:   DATA  e ORE   per ogni
DATA 01-10-2009 devo avere 10 RECORD di  ORE ora1 ora2 ora3 ecc..
Forse così è + chiaro Bruno
Grazie comunque.
Ml


title: Creazione Tabella Automatico

text:
"collaborazioni" <
collabo...@gmail.com
> wrote in message
news:3f63ba46-8bee-4664...@s31g2000yqs.googlegroups.com...
> Devo creare una tabella che abbia dei campi:   DATA  e ORE   per ogni
> DATA 01-10-2009 devo avere 10 RECORD di  ORE ora1 ora2 ora3 ecc..
> Forse cos� � + chiaro Bruno
Mica tanto.
Devi creare una tabella con due campi, diciamo:
ID_Data
ID_Ora
Fin qui tutto chiaro.
Il resto invece no.
Capirai che compilare una tabella con un certo
numero di record prendendo le date da una tabella
e le ore da un'altra � un'operazione che richiede
la conoscenza delle correlazioni che intercorrono
fra i dati e i criteri di scelta.
Puoi risparmiarti la risposta perch� non la legger�.
Bruno


title: Creazione Tabella Automatico

author: Alessandro Cara

text:
collaborazioni ha scritto:
> On 15 Ott, 13:57, "Bruno Campanini" <
bruno...@libero.it
> wrote:
>> "collaborazioni" <
collaborazi...@gmail.com
> wrote in message
>>
>> news:dfcbfc9d-576d-4081...@l9g2000yqi.googlegroups.com...
>>
>>> Salve a tutti, volevo una dritta e sono sicuro che la trover�, vi
>>> espongo la mia esigenza:
>>> Devo poter creare in automatico una tabella che abbia questi campi
>>> ID_Data  � la data da oggi fino a ????
>>> ID_Ora   sono 10 record derivanti da un altra tabella che contiene 1 2
>>> 3 4 5 6 7 8 9 10
>>> In pratica mi dovrebbe risultare di avere per ogni giorno di T_Orario
>>> (ID_Data) 10 record di T_Ora (ID_Ora) da 1 a 10.
>>> Non so se � chiaro.
>> Sappi che non lo �.
>>
>> Bruno
>
> Allora mi ri-spiego...
>
> Devo creare una tabella che abbia dei campi:   DATA  e ORE   per ogni
> DATA 01-10-2009 devo avere 10 RECORD di  ORE ora1 ora2 ora3 ecc..
> Forse cos� � + chiaro Bruno
Intendi che devi creare una tabella per ciascun giorno?
Non e' meglio una tabella sola?
A quel punto rimane solo il prblema di "popolarla".
Diciamo una decina di istruzioni ed un form con data inizio e numero di
date da creare (popolare sarebbe meglio)
--
ac


title: Creazione Tabella Automatico

author: max

text:
"collaborazioni" <
collabo...@gmail.com
> ha scritto nel messaggio
news:dfcbfc9d-576d-4081...@l9g2000yqi.googlegroups.com...
Salve a tutti, volevo una dritta e sono sicuro che la trover�, vi
espongo la mia esigenza:
Devo poter creare in automatico una tabella che abbia questi campi
ID_Data  � la data da oggi fino a ????
ID_Ora   sono 10 record derivanti da un altra tabella che contiene 1 2
3 4 5 6 7 8 9 10
In pratica mi dovrebbe risultare di avere per ogni giorno di T_Orario
(ID_Data) 10 record di T_Ora (ID_Ora) da 1 a 10.
Non so se � chiaro.
Un caro saluto a tutto il ng
Ml
ma la tabella dei giorni ce l'hai? se si basta fare una query di accodamento
a nuovatabella senza nessun join tra le due tabelle inserendo da un lato il
campo data e dall'altro il campo ora.
se invece non ce l'hai fai la stessa query ma al posto della data metti un
riferimento a forms!nuovamaschera!data3
creati una maschera con tre caselle (data1,data2,data3), nella prima come
predefinita ci metti date() e nella seconda la data a cui vuoi arrivare, nel
codice di un pulsante scriverai
x = DateDiff("d", data1, data2)
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE * FROM tuatabella;"
For i = 0 To x
Me.data3 = DateAdd("d", i, data1)
DoCmd.OpenQuery "querydiaccodamento"
Next i
ciao
Max
next i
DoCmd.SetWarnings True


title: Creazione Tabella Automatico

text:
"max" <
pi...@pippo.it
> ha scritto nel messaggio
news:hb7elq$66h$1...@news.task.gda.pl...

perdonami ho fatto un po di confusione ecco il codice
 x = DateDiff("d", data1, data2)
 DoCmd.SetWarnings False
 DoCmd.RunSQL "DELETE * FROM tuatabella;"
 For i = 0 To x
 Me.data3 = DateAdd("d", i, data1)
 DoCmd.OpenQuery "querydiaccodamento"
 Next i
 DoCmd.SetWarnings True
ciao


title: Creazione Tabella Automatico

text:
max ha scritto:
[cut]
> perdonami ho fatto un po di confusione ecco il codice
>  x = DateDiff("d", data1, data2)
>  DoCmd.SetWarnings False
>  DoCmd.RunSQL "DELETE * FROM tuatabella;"
>  For i = 0 To x
>    Me.data3 = DateAdd("d", i, data1)
>    DoCmd.OpenQuery "querydiaccodamento"
>  Next i
>  DoCmd.SetWarnings True
Uhmmmmm...... sta cosa ha un piccolo problema, come passi la data da
accodare? e ...... la delete elimina tutti i record in tabella sei
sicuro che e' quello che si vuole?
--
ac


title: Creazione Tabella Automatico

text:
"Alessandro Cara" <
al...@ay-1anetwork.it
> ha scritto nel messaggio
news:dAVBm.7423$813....@tornado.fastwebnet.it...

perdonami ma non capisco il problema hai una data1 che � predefinita ad oggi
data2 � dove vuoi arrivare, col ciclo di for data3 diventa la data da
accodare da data1 a data2
se la tabella da popolare � da svuotare usa quell'sql, se non deve svuotare
basta mettere una chiave doppia sulla tabella in modo che non ci siano
doppioni e il runsql viene tolto
ciao
Max


title: Creazione Tabella Automatico

text:
max ha scritto:
> "Alessandro Cara" <
al...@ay-1anetwork.it
> ha scritto nel messaggio
> news:dAVBm.7423$813....@tornado.fastwebnet.it...
>> max ha scritto:
>> [cut]
>>> perdonami ho fatto un po di confusione ecco il codice
>>>  x = DateDiff("d", data1, data2)
>>>  DoCmd.SetWarnings False
>>>  DoCmd.RunSQL "DELETE * FROM tuatabella;"
>>>  For i = 0 To x
>>>    Me.data3 = DateAdd("d", i, data1)
>>>    DoCmd.OpenQuery "querydiaccodamento"
>>>  Next i
>>>  DoCmd.SetWarnings True
>> Uhmmmmm...... sta cosa ha un piccolo problema, come passi la data da
>> accodare? e ...... la delete elimina tutti i record in tabella sei sicuro
>> che e' quello che si vuole?
>> --
>> ac
>
> perdonami ma non capisco il problema hai una data1 che ï¿œ predefinita ad oggi
> data2 ï¿œ dove vuoi arrivare, col ciclo di for data3 diventa la data da
> accodare da data1 a data2
Si vero. Non mi ero soffermato su Me!Data3.
Ma sei certo che openquery sia il metodo piu' appropriato?
> se la tabella da popolare ï¿œ da svuotare usa quell'sql, se non deve svuotare
> basta mettere una chiave doppia sulla tabella in modo che non ci siano
> doppioni e il runsql viene tolto
Es claro. Il giragli intorno si trova sempre.
--
ac


title: Creazione Tabella Automatico

text:
"Alessandro Cara" <
al...@ay-1anetwork.it
> ha scritto nel messaggio
news:cZXBm.7607$813....@tornado.fastwebnet.it...
> max ha scritto:
>> "Alessandro Cara" <
al...@ay-1anetwork.it
> ha scritto nel messaggio
>> news:dAVBm.7423$813....@tornado.fastwebnet.it...
>>> max ha scritto:
>>> [cut]
>>>> perdonami ho fatto un po di confusione ecco il codice
>>>>  x = DateDiff("d", data1, data2)
>>>>  DoCmd.SetWarnings False
>>>>  DoCmd.RunSQL "DELETE * FROM tuatabella;"
>>>>  For i = 0 To x
>>>>    Me.data3 = DateAdd("d", i, data1)
>>>>    DoCmd.OpenQuery "querydiaccodamento"
>>>>  Next i
>>>>  DoCmd.SetWarnings True
>>> Uhmmmmm...... sta cosa ha un piccolo problema, come passi la data da
>>> accodare? e ...... la delete elimina tutti i record in tabella sei
>>> sicuro che e' quello che si vuole?
>>> --
>>> ac
>>
>> perdonami ma non capisco il problema hai una data1 che � predefinita ad
>> oggi data2 � dove vuoi arrivare, col ciclo di for data3 diventa la data
>> da accodare da data1 a data2
> Si vero. Non mi ero soffermato su Me!Data3.
> Ma sei certo che openquery sia il metodo piu' appropriato?
>
>> se la tabella da popolare � da svuotare usa quell'sql, se non deve
>> svuotare basta mettere una chiave doppia sulla tabella in modo che non ci
>> siano doppioni e il runsql viene tolto
> Es claro. Il giragli intorno si trova sempre.
> --
> ac
caro Alessandro il discorso � sempre lo stesso e tu ne sei maestro, se qui
cerchi un'idea per risolvere il tuo problema bene, se vuoi un soluzione gia
pronta rivolgiti ad un programmatore. Nel caso specifico, se l'utente cha ha
fatto la domanda capisce cosa gli ho suggerito e come agisce il codice bene,
se vuole la zuppa pronta gli mando l'IBAN per il bonifico.
Ciao
Massimo


title: centratura stringhe di caratteri proporzionali

author: AntFast

text:
Ciao a tutti.
Qual'� il ragionamento da fare per poter centrare su varie righe
delle stringhe composte da caratteri proporzionali (es. Tahoma, 14) ?
Es.: riempire una casella di riepilogo con scelte prese automaticamente
da una variabile, in modo centrato per pura estetica.
Ho cercato un p� dappertutto ma non trovo nulla.
Supposta la larghezza della casella di riepilogo = 50, ovviamente il:
space( (50 - len(stringa))/2) & stringa     non funziona... :-(
Grazie in anticipo per l'eventuale risposta.
Antonio


author: Karl Donaubauer

text:
AntFast wrote:
> Qual'� il ragionamento da fare per poter centrare su varie righe
> delle stringhe composte da caratteri proporzionali (es. Tahoma, 14) ?
> Es.: riempire una casella di riepilogo con scelte prese
> automaticamente da una variabile, in modo centrato per pura estetica.
> Ho cercato un p� dappertutto ma non trovo nulla.
> Supposta la larghezza della casella di riepilogo = 50, ovviamente il:
> space( (50 - len(stringa))/2) & stringa     non funziona... :-(

http://www.lebans.com/justicombo.htm

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


text:
"Karl Donaubauer"  ha scritto nel messaggio
news:b55uca...@mid.individual.net...

Grazie Karl
Dal 'basso' dei miei 68 anni vedr� di capirci qualcosa...
Buone cose..
Antonio


title: refresh maschera

author: Alfonso Carfora

text:
come si fa, dopo aver cliccato
un tasto di un comando su una maschera,
effettuare un refresh sulle caselle di testo
associate a vari controlli?
In pratica una casella effettua alla apertura della
maschera una conta di record di una tabella; dopo
il comando effettuato vorrei che aggiornasse
questa conta : come fare ?
grazie in anticipo
Alfonso


title: refresh maschera

author: Ste

text:
docmd.requery
questa istruzione non funzione se esegue l'operazione passo x passo, non
devi quindi mettere blocchi nell'esecuzione.
"Alfonso Carfora" <
alfonso...@libero.it
> ha scritto nel messaggio
news:DjSH7.75872$sq5.3...@news.infostrada.it...



title: refresh maschera

text:
Su evento click:
.....Refresh
--
                     Angelo
------------------------------------------------------
Sito comune di it.comp.appl.access
http://www.sitocomune.com
------------------------------------------------------
"Alfonso Carfora" <
alfonso...@libero.it
> ha scritto nel messaggio
news:DjSH7.75872$sq5.3...@news.infostrada.it...



title: cancellazione record anomala

author: francesco

text:
Ciao a tutti ho inserito all'interno della mia maschera un evento per
puntare ad un record specifico della tabella, con FindRecord, poichè il mio
id non è contatore ma numerico, e quindi se effetuo cancellazioni non posso
puntare al record con GotoRecord. Raggiunto il record specifico, se chiudo
la maschera e poi la riapro, mi ritrovo con il primo record della tabella
cancellato; inoltre noto che una volta raggiunto il record (es. il 1236) che
ho chiesto, premendo il tasto di vai al primo record, il primo risulta
essere quello appena raggiunto (cioè il 1236) e non il numero 1. Mi sono
incasinato totalmente e non riesco a trovare l'uscita di questo labirinto
grazie
F
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: cancellazione record anomala

author: Sergio MAZZA

text:
"francesco" <
ddddd...@virgilio.it
> ha scritto nel messaggio
news:80Z182Z85Z29Y1...@usenet.libero.it...
> Ciao a tutti ho inserito all'interno della mia maschera un evento per
> puntare ad un record specifico della tabella, con FindRecord, poichè il
mio
> id non è contatore ma numerico, e quindi se effetuo cancellazioni non
posso
> puntare al record con GotoRecord. Raggiunto il record specifico, se chiudo
> la maschera e poi la riapro, mi ritrovo con il primo record della tabella
> cancellato; inoltre noto che una volta raggiunto il record (es. il 1236)
che
> ho chiesto, premendo il tasto di vai al primo record, il primo risulta
> essere quello appena raggiunto (cioè il 1236) e non il numero 1. Mi sono
> incasinato totalmente e non riesco a trovare l'uscita di questo labirinto
>
> grazie
>
> F
Per andare al primo record devi utilizzare il metodo MoveFirst (vedi
help)...
Ciao.
--
Sergio MAZZA


title: OT Traduzione FAQ 3.2

text:
*******************
3.2 Reset Autonumbers
Problem
You want to reset an autonumber field in a table to 1 or to the
next free number after records have been inserted and deleted.
Solution
Compact the database
(menu Tools/Database Utilities/Compact and Repair Database)
This usually resets all tables to the next free number.
However in versions >=A00 this often doesn't work any more.
see
http://support.microsoft.com/?kbid=287756
Generally Autonumber fields are ment for internal use,
e.g. they serve as key and relationship fields, but not to
achieve pretty numbers. The latter you should create
via programming, default values or by hand.
********************
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it
+info sulla prima Conferenza Italiana per Sviluppatori di Access (CISA1)


title: OT Traduzione FAQ 3.2

author: sv

text:
Karl Donaubauer ha scritto:
> *******************
> 3.2 Reset Autonumbers
> Problem
> You want to reset an autonumber field in a table to 1 or to the
> next free number after records have been inserted and deleted.
> Solution
> Compact the database
> (menu Tools/Database Utilities/Compact and Repair Database)
> This usually resets all tables to the next free number.
> However in versions >=A00 this often doesn't work any more.
> see
http://support.microsoft.com/?kbid=287756
> Generally Autonumber fields are ment for internal use,
> e.g. they serve as key and relationship fields, but not to
> achieve pretty numbers. The latter you should create
> via programming, default values or by hand.
> ********************
Reinizializzare Campi Contatori
Problema
In una tabella, vuoi reinizializzare un campo contatore a 1 o al numero
libero successivo, dopo che dei recordi sono stati inseriti e cancellati.
Soluzione
Compattare il database (menu Strumenti/Utilità database/Compatta e
ripristina database…). Questo, usualmente, reimposta il contatore di tutte
le tabelle al numero libero successivo.
In ogni modo, nelle versioni di Access>=00, ciò spesso non funziona più.
Vedi:
http://support.microsoft.com/?kbid=287756
In genere, i campi Contatore sono destinati per l’uso interno, p. e., essi
servono come campi chiave e di relazione, non per ottenere dei bei numeri.
Quest’ultimi dovrebbero essere creati via programmazione, quali valori
predefiniti o manualmente.
--
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: query su textbox...

author: norica

text:
è possibile in una maschera basata sulla tabella
"pippo" includere una casella di testo che ha come origine dei dati provenienti
dalla tabella "topolino" ???

(spero di essermi spiegato....)

ciaoo


title: query su textbox...

author: Liones

text:


(spero di essermi spiegato....)
ciaoo
per trovare il valore da inserire nella casella di testo usa la funzione
DLookup
non ti conviene basare la maschera su una query che mette in relazione le
due tabelle?


title: caselle di testo in una form

author: Carlo Zanatto

text:
ho due caselle combinate in un form collegate a due campi di una tabella
la prima casella ha come origine riga il primo campo di una query formata da
due colonne
ho bisogno che in automatico quando cambio la prima casella, la seconda
assuma il valore del secondo campo della query
........
un casino
esempio:
QUERY:prova
n°        NOMI
-------------------
1        carlo
3        luigi
5        marco
7        antonio
PRIMA CASELLA COMBINATA (visualizza nel suo elenco i nomi della query)
--------
casella
--------
carlo
luigi
.....
quando seleziono il nome luigi sulla prima casella vorrei che in automatico
la seconda assumesse il valore 3
grazie in anticipo
carlo


title: caselle di testo in una form

text:
"Carlo Zanatto" <
c.zanat...@operativo.net
> ha scritto nel messaggio
news:N98P6.4614$8Y1....@news2.tin.it...

Se devi trasferire il valore della prima colonna della PrimaCasellaCombinata
nella SecondaColonnaCombinata, a fronte dell'evento "Dopo aggiornamento"
della prima casella combinata genera il seguente codice VBA:
Me!SecondaCasellaCombinata = Me!PrimaCasellaCombinata
Me!SecondaCasellaCombinata.Requery
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Come inviare da form Access comando via http ?

author: RobertoA

text:
Vorrei inviare da una form Access il seguente comando:
https://myaccount.VoipCheap.com/clx/sendsms.php?username=xxxxxxxxxx&password=xxxxxxxxxx&from=xxxxxxxxxx&to=xxxxxxxxxx&text=xxxxxxxxxx
in sostanza l'effetto dovrebbe essere lo stesso del digitare il comando
sopra dentro la barra indirizzi di un browser e premere Invio
Inoltre, come risposta viene restituita una pagina che conferma o non
conferma l'avvenuto invio
Pagina che vorrei leggere (da codice) ed interpretare
Come fareste voi ?
Ciao e grazie
RobertoA


text:

Prova con:
'---
Dim oApp As Object
Set oApp = CreateObject("InternetExplorer.Application")
oApp.Navigate2 "
http://www.google.it
"
Do
    DoEvents
    If oApp.ReadyState = READYSTATE_COMPLETE Then
        Exit Do
    End If
Loop
oApp.Visible = True
'---
Ciao.
--
Sergio MAZZA


text:

Grazie per l'aiuto, interessante il ReadyState non conoscevo prima
Comunque ho risolto con altro metodo, che riporto a beneficio degli
eventuali interessati:
=======================
num_file = FreeFile()
Open nome_file_sms For Output As #num_file
Print #num_file, "wget.exe  --no-check-certificate  --output-file=" &
nome_file_log & "  --output-document=" & nome_file_txt & "
""
https://myaccount.voipcheap.com/clx/sendsms.php?username=
" &
provider_sms_username & "&password=" & provider_sms_password & "&from=" &
inviato_da & "&to=+39" & numero_cellulare & "&text=" & testo_sms & """ "
Close num_file
dummy = Shell(nome_file_sms, vbMinimizedNoFocus)
=======================
La memorizzazione del comando da inviare dentro il file  NOME_FILE_SMS trova
la sua ragione d'essere nel fatto che tale file rimane memorizzato, essendo
diverso di volta in volta (riporta data e ora nel nome file stesso)
Volendo non mantenere il comando inviato, e' possibile passare la stringa
contenente il comando direttamente alla funzione Shell
La risposta alla richiesta inviata, viene inserita nel file  NOME_FILE_TXT,
da parsare per cercare i dati interessanti
Ciao e grazie
RobertoA


title: Maschera con campi DDE

author: piojo

text:
Ho un documento aperto di un'altra applicazione (televideo con dde) come
posso fare a creare una maschera con i campi collegati via DDE al documento
aperto?
Ho provato con maschera in modalità foglio dati, ma senza successo.


title: Maschera con campi DDE

text:
"piojo" <
ppp...@serenacom.net
> ha scritto nel messaggio
news:wt00g.17385$6e2....@news.edisontel.com...

Mi sembra strano che non sia possibile operare con DDE e msaccess mentre con
Word ed Excell si opera, almeno che nessuno abbia intenzione di aiutarmi.


title: Maschera con campi DDE

author: PBsoft

text:
>> Ho un documento aperto di un'altra applicazione (televideo con dde)
>> come posso fare a creare una maschera con i campi collegati via DDE
>> al documento aperto?
>> Ho provato con maschera in modalità foglio dati, ma senza successo.
> Mi sembra strano che non sia possibile operare con DDE e msaccess
> mentre con Word ed Excell si opera, almeno che nessuno abbia
> intenzione di aiutarmi.
Non fare un processo alle intenzioni.
Se nessuno ti ha risposto in materia può darsi che nessuno che ti ha letto
abbia le risposte che stai cercando.
Se nessuno ha le risposte che stai cercando, può darsi che il problema vada
affrontato in altra maniera (non chiedermi come), oppure che nessuno abbia
mai affrontato il problema che stai cercando di gestire tu adesso.
Ti ricordo che questo è un newsgroup pubblico e nessuno qui è tenuto a rispondere
per forza ad alcuno. Chi presta il suo tempo lo fa solo per spirito di solidarietà.
Per inciso, io ho fatto una ricerca sui gruppi tramite Google ed ho trovato
diversi messaggi (molti in inglese, alcuni in tedesco) dove viene sconsigliato
l'utilizzo di DDE, visto ormai come una tecnologia che ha lasciato il passo
ad altre (non chiedermi di più perché non ho le conoscenze per approfondire).
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: Maschera con campi DDE

text:
"PBsoft" <in...@REMOVEpbsoft.it> ha scritto nel messaggio
news:875ea3551d7848...@news.tin.it...

Grazie per la cortese risposta.
Penso che usando dde su access potrei immagazzinare i dati nel database
mentre con word ed excell è un'altra cosa.


title: limitare i caratteri di una textbox non associata a 250 caratteri

text:
?
grazie a tutti


author: Alex

text:
"---------@ Simba883 @---------" <
simb...@libero.it
> wrote in message
news:ar1ekq$li5$
1...@lacerta.tiscalinet.it
> ?
>
> grazie a tutti
Molto succinto..!!
La proprietą TAG della TextBox serve per limitare il numero caratteri.
Se nella proprietą TAG=5 Nmax=5
Inserisci nell'EVENTO CHANGE della TxtBox il seguente codice:
Private Sub txtTest_Change()
     Call adhLimitChars(Me.txtTest, Val(txtTest.Tag))
End Sub
Metti in un modulo le seguenti API e FUNC....!!
Private Declare Function SendMessageLong _
 Lib "user32" Alias "SendMessageA" _
 (ByVal hWnd As Long, ByVal wMsg As Long, _
 ByVal wParam As Long, lngValue As Long) As Long
Private Declare Function GetFocus _
 Lib "user32" () As Long
Private Const EM_SETLIMITTEXT As Long = &HC5
Public Sub adhLimitChars(txt As TextBox, lngLimit As Long)
    Dim hWnd As Long
    Dim lngResult As Long
    Dim lngNewMax As Long

    ' Get the window handle for the current window.
    hWnd = GetFocus()

    lngNewMax = Len(txt.Text)
    If lngNewMax < lngLimit Then
        lngNewMax = lngLimit
    End If

    ' Send the message to the current text box
    ' to limit itself to lngNewMax characters.
    SendMessageLong hWnd, EM_SETLIMITTEXT, lngNewMax, 0
End Sub
 @Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: Sib

text:
"Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:5d503a6e65fac4efd8...@mygate.mailgate.org...
> "---------@ Simba883 @---------" <
simb...@libero.it
> wrote in message
> news:ar1ekq$li5$
1...@lacerta.tiscalinet.it
>
> > ?
> >
> > grazie a tutti
>
> Molto succinto..!!
>
> La proprietà TAG della TextBox serve per limitare il numero caratteri.
> Se nella proprietà TAG=5 Nmax=5
?
Mi spiace ma devo contraddirti.
La proprieta' Tag e' una semplice informazione aggiutniva che puoi usare
arbitrariamente.
------help in linea-------------
È possibile utilizzare la proprietà per assegnare una stringa identificativa
a un oggetto senza influenzare impostazioni di altre proprietà o provocare
altri effetti collaterali. La proprietà Tag risulta utile nel caso sia
necessario verificare l'identità di una maschera, di un report, di una
pagina di accesso ai dati, di una sezione o di un controllo passato come
variabile ad una routine
-------------------------------
> Inserisci nell'EVENTO CHANGE della TxtBox il seguente codice:
>
> Private Sub txtTest_Change()
>      Call adhLimitChars(Me.txtTest, Val(txtTest.Tag))
> End Sub
>
> Metti in un modulo le seguenti API e FUNC....!!
cut
stai scherzando?
perche' vai a scomodare le api (che pungono)?
mettere un controllo della linghezza del testo nella proprieta' su tasto
giu' mi sembra molto piu' funzionale.
Private Sub RagioneSociale_KeyDown(KeyCode As Integer, Shift As Integer)
    If Len(Me.RagioneSociale.Text) > 250 Then KeyCode = 0
End Sub
ovviamente il valore 250 puoi anche farglielo leggere dalla proprieta' tag
del controllo, ma questa e' una scelta arbitraria.
Sib


text:
"Sib" <si...@SPAMiol.it> wrote in message
news:EM1B9.14886$
Yw.6...@news2.tin.it
> >
> > La proprietą TAG della TextBox serve per limitare il numero caratteri.
> > Se nella proprietą TAG=5 Nmax=5
>
> ?
> Mi spiace ma devo contraddirti.
> La proprieta' Tag e' una semplice informazione aggiutniva che puoi usare
> arbitrariamente.
Ciao Sib.......mi hai stupito....!
Hai frainteso il mio commento, era riferito allo specifico caso
in questione, nel senso che con questa funzione la PROPRIETA'
TAG viene utilizzata per recuperare il valore al quale limitare il
numero dei caratteri....................
> stai scherzando?
> perche' vai a scomodare le api (che pungono)?
> mettere un controllo della linghezza del testo nella proprieta' su tasto
> giu' mi sembra molto piu' funzionale.
>
> Private Sub RagioneSociale_KeyDown(KeyCode As Integer, Shift As Integer)
>     If Len(Me.RagioneSociale.Text) > 250 Then KeyCode = 0
> End Sub
>
Questa mi pare una bella IDEA, che tra le altre cose mi dą lo spunto
per risolvere un altro problema che ho postato e che non
sņ risolvere.
Da quando mi anno punto le uso per non farle arrabbiare.....!!!!
Ciao



text:
"Alex" <
ik2...@libero.it
> ha scritto nel messaggio
> "Sib" <si...@SPAMiol.it> wrote in message
> > > La proprietą TAG della TextBox serve per limitare il numero caratteri.
> > > Se nella proprietą TAG=5 Nmax=5
> >
> > ?
> > Mi spiace ma devo contraddirti.
> > La proprieta' Tag e' una semplice informazione aggiutniva che puoi usare
> > arbitrariamente.
>
> Ciao Sib.......mi hai stupito....!
cut
e' che dicevi che "serve per quello".
Comunque scusa se sono stato un po' brusco, e' che in questo periodo sono un
po' reattivo per via di alcune cosiderazioni presuntuose (ed errate) su
alcuni argomenti.
Sono contento che la mia proposta ti sia sembrata interessante.
Ciao
Sib


text:
"Sib" <si...@SPAMiol.it> wrote in message
news:7j6B9.11944$
744.4...@news1.tin.it
[CUT]
>
> e' che dicevi che "serve per quello".
> Comunque scusa se sono stato un po' brusco, e' che in questo periodo sono un
> po' reattivo per via di alcune cosiderazioni presuntuose (ed errate) su
> alcuni argomenti.
Spero di non essere la causa dei tuoi patemi....!!!
Mi spiacerebbe vista la stima nei tuoi confronti...!
> Sono contento che la mia proposta ti sia sembrata interessante.
> Ciao
> Sib
Cavolo se mi è sembrata, alcune volte ci si complica la vita
inutilmente...., fino a chè qualcuno non ti riporta sulla
buona strada....!!!
Ciao.



text:
"Alex" <
ik2...@libero.it
> ha scritto nel messaggio
> "Sib" <si...@SPAMiol.it> wrote in message
> [CUT]
> >
> > e' che dicevi che "serve per quello".
> > Comunque scusa se sono stato un po' brusco, e' che in questo periodo
sono un
> > po' reattivo per via di alcune cosiderazioni presuntuose (ed errate) su
> > alcuni argomenti.
>
> Spero di non essere la causa dei tuoi patemi....!!!
No, assolutamente.
> Mi spiacerebbe vista la stima nei tuoi confronti...!
Sono commosso.
> > Sono contento che la mia proposta ti sia sembrata interessante.
>
> Cavolo se mi è sembrata, alcune volte ci si complica la vita
> inutilmente...., fino a chè qualcuno non ti riporta sulla
> buona strada....!!!
Sai, capita a tutti, me per primo, di incartarsi in cose complicatissime per
fare cose semplici.
Per questo, secondo me, nessuno puo' dirsi "cosi' preparato" da poter fare a
meno del ng, la "cosa che ti sfugge" e' sempre in agguato, anche per chi
crede di essere posseduto dallo spirito di Bill.
Io posto raramente domande perche' spesso trovo le risposte scartabellando
fra i 3d degli altri.
Sib


text:
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
cut
> la "cosa che ti sfugge" e' sempre in agguato, anche per chi
cut
non nel senso che sfugge a te, nel senso che sfugge e basta.
Sib


text:
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:Fk9B9.18380$Yw.7...@news2.tin.it...

Non ti commuovere, e non ti preoccupare, non fraintendo, quasi
mai................!!!
Ciao Sib, buon week-end
@Alex.


title: Foglio di excel importato

author: Starpur

text:
Ho un foglio di excel impostato tipo una queery a campi incrociati (righe
per colonne), dovrei importare questa query e creare una tabella con 3
campi:
Intestazione riga del foglio Excel
Intestazione colonna del foglio Excel
Valore incrociato delle due intestazioni
ES
Foglio excel :
        A        B        C
X     1         2          3
Y      4        5          6


title: CASELLA COMBINATA SUBORDINATA A CASELLA COMBINATA

author: Luigi C.

text:
Buon Giorno
A97
nella maschera CORSI ho 2 casella combinate
SEDE
CORSI
SE SELEZIONO la casella combinata SEDE (composta da DECRiZIONE SEDE ed ID
SEDE)
voglio che nalla seconda casella combinata mi appaiono
solo CORSI con l'ID SEDE uguale a quella selezionata nalla casella combinata
SEDE
LA CASELLA COMBINATA CORSI E' COMPOSTA DA: DESCRIZIONE CORSO - ID SEDE
Grazie
Luigi


author: Roberto da casa

text:
"Luigi C." <
luigic...@hotmail.com
> ha scritto nel messaggio
news:43b47797$0$1082$4faf...@reader4.news.tin.it...

Vai sul Sito Comune (link qui sotto) e nella Sezione Forma leggi queste due
mie FAQ:
1) 3.72 Sincronizzare in una maschera due o più caselle combinate tra loro
in gerarchia
2) 3.77 Sincronizzare in una maschera due o più caselle combinate ASSOCIATE
tra loro in gerarchia
>
> Grazie
Prego e Buon Anno
>
> Luigi
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: decimali su casella combinata

author: Cocc

text:
Buongiorno a tutti.
Ho una casella combinata che prende i dati da una query con un campo
con 5 decimali.
Quando vado a vedere i valori sulla casella combinata, questi vengono
arrotondati a due decimali.
Come posso risolvere il problema?
Grazie per una Vs. cortese risposta


title: decimali su casella combinata

author: Mastrobuoni Mauro

text:
"Cocc" <
a.coc...@tiscalinet.it
> ha scritto nel messaggio
news:a727a1b7.04030...@posting.google.com...

Selezioni proprietà della casella combinata e gli indichi il numero di
decimali.
Mauro


title: decimali su casella combinata

text:
> Selezioni proprietà della casella combinata e gli indichi il numero di
> decimali.
> Mauro
Non so se sbaglio qualche cosa, ma non và


title: decimali su casella combinata

text:
"Cocc" <
a.coc...@tiscalinet.it
> ha scritto nel messaggio
news:a727a1b7.04030...@posting.google.com...

Nel codice SQL che è origine riga della casella combinata per i campi che
vuoi formattare a tuo piacimento usa appunto la funzione Format (vedi help).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: rob...setu furlan ?

author: Enrico Virginio

text:
come da oggetto.....
visto che mi hai scritto mandi...
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Recordset non aggiornabile Errore 3326

author: Dàvide

text:
Ciao ragazzi, sono nel panico e chiedo un vostro suggerimento...

Database di Access 2002-2003 con back-end *.mdb sul server e in locale su vari pc (Windows 10 64bit ed Office 2013 professional o Access runtime tutto 64bit) un altro *.mdb con le maschere ecc...

Fino a questa mattina ha funzionato tutto alla perfezione.

Da questa sera su tutti i pc e in tutte le maschere basate su query dà "recordset non aggiornabile" o, nelle macro, "errore 3326"!

In particolare ho notato che nella tabella principale sul server (quella usata in tutte le query/maschere) è sparito un record tra gli ultimi inseriti (manca il record con l'Id/numerazione automatica numero 10004).

Può essere questo il problema?

Posso evitare di piangere? C'è un metodo di recupero/ripristino veloce? Sono disposto anche a modificare tutti gli id, magari accodando in una nuova tabella...

Compatta e ripristina non funziona.

Grazie mille
d.


title: Recordset non aggiornabile Errore 3326

author: GiorgioDaPrato

text:
E' PROPRIO COSI' ?

1) Database di Access 2002-2003 con back-end *.mdb sul server e in locale su vari pc un altro *.mdb con le maschere ecc...

2) --->(Office 2013 professional o Access runtime tutto 64bit) ???

considerando che fino al 2003 Access è SOLO a 32 bit
SE LE COSE STANNO COSI',
credo che la prima azione sia di FARE UNA COPIA del BE (dei dati)
E del FE (ma ne terrai comunque una da qualche parte)

SOLO come avvertimento, non saprei che fare in una situazione simile,
ma appare difficile che un mdb possa rimanere funzionante
in una collocazione come codesta


title: Recordset non aggiornabile Errore 3326

author: Bruno Campanini

text:
It happens that Dàvide formulated :
> Ciao ragazzi, sono nel panico e chiedo un vostro suggerimento...
>
> Database di Access 2002-2003 con back-end *.mdb sul server e in locale su
> vari pc (Windows 10 64bit ed Office 2013 professional o Access runtime tutto
> 64bit) un altro *.mdb con le maschere ecc...
>
> Fino a questa mattina ha funzionato tutto alla perfezione.
>
> Da questa sera su tutti i pc e in tutte le maschere basate su query dà
> "recordset non aggiornabile" o, nelle macro, "errore 3326"!
>
> In particolare ho notato che nella tabella principale sul server (quella
> usata in tutte le query/maschere) è sparito un record tra gli ultimi inseriti
> (manca il record con l'Id/numerazione automatica numero 10004).
>
> Può essere questo il problema?
Se hai verificato non aver spiriti nel sistema... il
problema è senz'altro quello.

> Posso evitare di piangere? C'è un metodo di recupero/ripristino veloce? Sono
> disposto anche a modificare tutti gli id, magari accodando in una nuova
> tabella...

Terque quaterque testiculis tactis... poi prova così:

- elimina tutti i link con la main table
- rinomina la main table e createne una copia col vecchio nome
- nella nuova converti il campo AutoNumber in Number,
  crea il record con id=10004 e ristabilisci i collegamenti
- se tutto funziona elimina nella nuova main table l'id=10004;
  ciò dovrebbe eliminare tutti i record con id=10004 nelle
  varie tabelle collegate
- elimina i collegamenti con la nuova main table, riporta la
  vecchia al suo nome originale e rifa' con essa i collegamenti.

> Compatta e ripristina non funziona.
Cosa significa non funziona? non parte o non cura il male?

Bruno


title: Recordset non aggiornabile Errore 3326

text:
GiorgioDaPrato has brought this to us :

[...]
> SOLO come avvertimento, non saprei che fare in una situazione simile,
> ma appare difficile che un mdb possa rimanere funzionante
> in una collocazione come codesta

Cazzo... l'uso del dimostrastivo "codesto" non s'era
mai sentito da queste bande.
Letterato e/o toscano?

Bruno


title: Recordset non aggiornabile Errore 3326

text:

Non cura il male :)
Ora ci provo, grazie!


title: Recordset non aggiornabile Errore 3326

text:
Il giorno venerdì 3 maggio 2019 02:59:44 UTC+2, Bruno Campanini ha scritto:
> It happens that Dàvide formulated :
> > Ciao ragazzi, sono nel panico e chiedo un vostro suggerimento...
> >
> > Database di Access 2002-2003 con back-end *.mdb sul server e in locale su
> > vari pc (Windows 10 64bit ed Office 2013 professional o Access runtime tutto
> > 64bit) un altro *.mdb con le maschere ecc...
> >
> > Fino a questa mattina ha funzionato tutto alla perfezione.
> >
> > Da questa sera su tutti i pc e in tutte le maschere basate su query dà
> > "recordset non aggiornabile" o, nelle macro, "errore 3326"!
> >
> > In particolare ho notato che nella tabella principale sul server (quella
> > usata in tutte le query/maschere) è sparito un record tra gli ultimi inseriti
> > (manca il record con l'Id/numerazione automatica numero 10004).
> >
> > Può essere questo il problema?
> Se hai verificato non aver spiriti nel sistema... il
> problema è senz'altro quello.
>
se no chiamiamo l'esorcista (in effetti tra gli utenti c'è una che pratica cose...)


title: Recordset non aggiornabile Errore 3326

text:
>
> Cazzo... l'uso del dimostrastivo "codesto" non s'era
> mai sentito da queste bande.
> Letterato e/o toscano?
>
> Bruno

beh, nato a Prato (all'epoca provincia di Firenze)
e residente a Prato (ola plovincia di Plato ...)


title: Recordset non aggiornabile Errore 3326

text:
GiorgioDaPrato pretended :

Oddio, quanti ne avete?
E quando Prato diventò provincia?
Ricordo di esserci stato una volta sola, negli anni
cinquanta.
Io sono forlivese... quivi nato quando governava Lui.

Bruno


title: Recordset non aggiornabile Errore 3326

text:
> Oddio, quanti ne avete?
> E quando Prato diventò provincia?
> Ricordo di esserci stato una volta sola, negli anni
> cinquanta.
> Io sono forlivese... quivi nato quando governava Lui.

provincia istituita nel 1992

... e chi li può contare ?
ma sono davvero molto attivi,
è troppo facile dire "attivi a modo loro",
perchè nel settore dell'abbigliamento
(confezione capi) ormai sono un passaggio obbligato.

E non si limitano all'attività artigianale conto terzi,
anzi la loro mira è la commercializzazione in proprio.


title: Recordset non aggiornabile Errore 3326

text:
GiorgioDaPrato explained on 03-05-19 :

Però lavorano, invadono il mondo coi loro prodotti, il loro
DNA porta i segni di una civiltà ultramillenaria rispetto
alla nostra.
Vuoi mettere con quelli che invadono il mondo... con le
nostre bombe???

Bruno


title: condizione primo carattere

author: Francesco

text:
In una casella di testo posso inserire sia testo che numeri; però si
verificano condizioni diverse se il primo carattere è una lettera o un
numero. se qualcuno mi può gentilmente dire quale sia l'espressione
corretta per identificare il primo carattere di un testo. Grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: condizione primo carattere

author: Alessandro Baraldi

text:
"Francesco" <
fpera...@libero.it
> wrote in message
news:bgqs6u$2fv$
1...@news.newsland.it
> In una casella di testo posso inserire sia testo che numeri; però si
> verificano condizioni diverse se il primo carattere è una lettera o un
> numero. se qualcuno mi può gentilmente dire quale sia l'espressione
> corretta per identificare il primo carattere di un testo. Grazie
Usa l'Evento KeyDown e leggi la Lunghezza con Len(TuaTextBox)
se Len=0 è il primo, poi per la gestione vedi tu....!
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: condizione primo carattere

author: Roberto dalla campagna

text:
Francesco <
fpera...@libero.it
> wrote in message
bgqs6u$2fv$1...@news.newsland.it...
> In una casella di testo posso inserire sia testo che numeri; però si
> verificano condizioni diverse se il primo carattere è una lettera o un
> numero. se qualcuno mi può gentilmente dire quale sia l'espressione
> corretta per identificare il primo carattere di un testo. Grazie
>
> --
Se la casella di testo si chiama Pippo evuoi sapere se il primo suo
carattere è un numero oppure no:
If IsNumeric(Left(Me!Pippo, 1)) Then
    ' il primo carattere è un numero
Else
    ' il primo carattere NON è un numero
End If
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: INCREDIBILE!!!

author: TM


title: INCREDIBILE!!!

author: Lbo da casa

text:
Premesso che non si puo' compilare .mdb in .exe, on Sat, 12 Feb 2000
07:52:06 +0100, "TM" <
mau...@tin.it
> wrote:
eh si'... proprio incredibile!  sembra che questo
mau...@tin.it
 abbia
trovato il famoso compilatore!
purtroppo non lo può distribuire per problemi di licenza, ma se gli
mandate i vostri db ve li rimanda compilati, ovviamente gratis, e ve
li ricompila tutte le volte che dovete fare una modifica.
mi raccomando, non li zippate prima di mandarli!  e inserite pure
immagini jpg, bitmap e pure tiff, perche' no!
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: INCREDIBILE!!!

author: Micio

text:
>mi raccomando, non li zippate prima di mandarli!  e inserite pure
>immagini jpg, bitmap e pure tiff, perche' no!
questi sono scherzi cretini...
evita di farli agli altri perché
gli altri potrebbero farli a te...
Micio


title: INCREDIBILE!!!

text:
>>mi raccomando, non li zippate prima di mandarli!  e inserite pure
>>immagini jpg, bitmap e pure tiff, perche' no!
>questi sono scherzi cretini...
hai ragione, ma queste sono le prime due frasi del sito in questione:
GET PAID TO SURF THE NET
  GUADAGNARE CON INTERNET
capita l'antifona?
allora se uno si espone in questo modo cretino non vedo perche' non
fargli scherzi cretini
>evita di farli agli altri perché gli altri potrebbero farli a te...
mah, sai, con un webmail risolvi tutto.



title: INCREDIBILE!!!

author: sergio mazza

text: ma se gli "giriamo" tutte le richieste che sono arrivate a yahoo??


title: INCREDIBILE!!!

text:
ops... non mi ero accorto che il messaggio
era del comandante......................  :-)
Micio


title: INCREDIBILE!!!

text:
be'... se uno fa uno spam, tu credi
che poi torna qui a leggere le risposte?
Bah!
Micio


title: INCREDIBILE!!!

author: ema

text:
Mio cugino mi ha detto che Lbo da casa <
l...@NOSPAM.blunet.it
> scrisse:
>>questi sono scherzi cretini...
>
> hai ragione, ma queste sono le prime due frasi del sito in questione:
>
> GET PAID TO SURF THE NET
>   GUADAGNARE CON INTERNET
>
chi ti assicura che l'email sia sua, e di non fare casini ad altri??
bye!
--
Emanuele Cesena        <
ece...@penguinpowered.com
>
http://www.penguinpowered.com/~ecesena
- Come timbrano le domande le galline?
- Con la marca da pollo.
		-- Da it.hobby.umorismo


title: INCREDIBILE!!!

author: Antonio Biso

text:
Micio <...@...> ha scritto nel messaggio <88blsd$q08$
2...@nslave1.tin.it
>...
>ops... non mi ero accorto che il messaggio
>era del comandante......................  :-)
>Micio
CHI FIGLI E CHI FIGLIASTRI ?!?!??!?!?!?
Antonio


title: query past-through

author: Giuseppe Pagano

text:
HO la necessità di eseguire delle query da sql_server 7.0  parametriche che
fanno riferimento ad un parametro di una forms di access!!!
DA access posso utilizzare la query past-through ma non riesco a passargli i
parametri.
ESEMPIO query past-through  per far eseguire la query a sql_server
SELECT IMPIEGATI.NOME
FROM Impiegati
where nome = (parametro_di_una_forms)
come faccio a passare il parametro a sql server?
grazie anticipatamente


title: query past-through

author: Emyr

text:


penso sia sufficiente creare prima la stringa sql con il solito metodo
select ... where valore= """ & forms!maschera!campo & """"
Saluti.
Emanuele.


title: Errore 3167

author: pfmarro

text:
salve
per popolare una tabella pivot di excel che come origine di dati punta a una tabella tmp_produzione di tmp.mdb
da Access ho creato una maschera per definire un filtro

nel FEnd di Access ho creato un collegamento a tmp_produzione

per popolare la tmp_produzione
1 - svuoto la tabella
2 - eseguo una query di accodamento

con 365 funziona tutto bene mentre con access 2003 mi dice errore 3167 Record Eliminato
(la query di accodamento ha solo 30 record)

eppure lo stesso procedimento ma con tabella e query differente tmp_vendita
funziona sia con 365 che con access 2003


title: Errore 3167

author: Karl Donaubauer

text:
Salve,

pfmarro:
> per popolare una tabella pivot di excel che come origine di dati punta a una tabella tmp_produzione di tmp.mdb
> da Access ho creato una maschera per definire un filtro
>
> nel FEnd di Access ho creato un collegamento a tmp_produzione
>
> per popolare la tmp_produzione
> 1 - svuoto la tabella
> 2 - eseguo una query di accodamento
>
> con 365 funziona tutto bene mentre con access 2003 mi dice errore 3167 Record Eliminato
> ...

Dove e quando esattamente? Dopo aver chiamato il filtro?
Potrebbe anche aiutare se riveli il codice VBA rilevante.

Ciao
Karl
*********
http://AccessDevCon.com

Access FAQ:
https://www.donkarl.com/it


title: Errore 3167

text:
Il giorno venerdì 27 agosto 2021 alle 12:06:14 UTC+2 Karl Donaubauer ha scritto:
> Salve,
>
> pfmarro:
> > per popolare una tabella pivot di excel che come origine di dati punta a una tabella tmp_produzione di tmp.mdb
> > da Access ho creato una maschera per definire un filtro
> >
> > nel FEnd di Access ho creato un collegamento a tmp_produzione
> >
> > per popolare la tmp_produzione
> > 1 - svuoto la tabella
> > 2 - eseguo una query di accodamento
> >
> > con 365 funziona tutto bene mentre con access 2003 mi dice errore 3167 Record Eliminato
> > ...
>
> Dove e quando esattamente? Dopo aver chiamato il filtro?
> Potrebbe anche aiutare se riveli il codice VBA rilevante.

in debug noto che è la stringa SQL
copiato e incollato in una query in 365 funziona
in access 2003 errore

INSERT INTO _pvt_qBigBagProduzione ( FromDate, ToDate, nccTSaccoOrdProduzione, BigBagData, TipoSacco, ccTSOriginal, Colore, Peso, LetSacco, NumSacco )
SELECT [Da Data] AS FromDate, [A Data] AS ToDate, IIf([TipoSacco]<>81,[TSac].[TSaccoOrdProduzione],IIf([Peso]<1000,[TSac].[TSaccoOrdProduzione],25)) AS nccTSaccoOrdProduzione, BigBag.BigBagData, BigBag.TipoSacco, IIf([TipoSacco]<>81,[TSac].[SiglaTSacco],IIf([Peso]<1000,[TSac].[SiglaTSacco],'R-PET CW ROXPET')) AS ccTSOriginal, TCol.Colore, BigBag.Peso, BigBag.LetSacco, BigBag.NumSacco FROM (BigBag LEFT JOIN TabColore AS TCol ON BigBag.Colore = TCol.IDColore) LEFT JOIN TabSacchi AS TSac ON BigBag.TipoSacco = TSac.IDTSacco WHERE (((BigBag.BigBagData) Between [à partir de la date de fabrication] And [à la date de fabrication]) AND ((TSac.SiglaTSacco)<>'PET1')) ORDER BY IIf([TipoSacco]<>81,[TSac].[TSaccoOrdProduzione],IIf([Peso]<1000,[TSac].[TSaccoOrdProduzione],25)), BigBag.BigBagData, IIf([TipoSacco]<>81,[TSac].[SiglaT
Sacco],IIf([Peso]<1000,[TSac].[SiglaTSacco],'R-PET CW ROXPET')), BigBag.LetSacco, BigBag.NumSacco



title: criptare/decriptare un MDB via codice

author: sdamy

text:
Ciao a tutti,
c'è qualcuno che conosce il modo per criptare/decripatare un MDB via codice
in A2000?
GRAZIE
SDAMY


title: criptare/decriptare un MDB via codice

text:
sdamy <
sd...@tiscalinet.it
> ha scritto:
> c'è qualcuno che conosce il modo per criptare/decripatare un MDB via
codice
> in A2000?
Da un altro MDB e possibile con il metodo CompactDatabase.
<F1> CompactDatabase
--
HTH
Karl
*********
Non meravigliarti del mio strano italiano. M'esercito qui.
Access-FAQ (tedesco):
http://www.donkarl.com


title: criptare/decriptare un MDB via codice

text:
grazie
Karl Donaubauer <
ad...@donkarl.com
> wrote in message
979kd7$o1t4g$3...@ID-46617.news.dfncis.de...



title: esportare report con immagini

author: Alcibiade

text:
Ciao a tutti, ho già controllato sul sito comune e in vecchi post ma
non ho trovato la soluzione(forse non esiste)...
Ho inserito sia un oggetto old che un'immagine in un report, ma quando
vado a salvarlo su file( con docmd.outputto ) le immagini non
compaiono...Posso fare qualcosa?
Grazie 1000


title: esportare report con immagini

author: MA

text:

O esporti in Snapshot o in pdf
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Cambiare Percorso del BE dal FE

author: Alot

text:
Ho un Db diviso in FE e BE
Il BE sta sul server
I FE sui PC collegati in rete
Siccome mi servirebbe poter accedere al Db anche da remoto (tipo da
casa), ho creato dei FE sul server (creando diversi utenti).
Problema: ogni volta che aggiorno il FE mi tocca a mano cambiare il
percorso del BE (diverso se lavoro in rete o direttamente dal server).
Esiste un qualcosa del tipo:
If nome Computer = Pincopallo ' questo credo con ENVIRON qualcosa (se
cerco trovo)
then destinazioneBE= MioPercorso  ' questo non ho idea
End if
Grazie in anticipo.
F.


title: Cambiare Percorso del BE dal FE

text:

Ho trovato questo
Può fare al caso mio?
Se quale anima pia mi batte un colpo poi me lo studio :-)
dim tdf as tabledef
for each tdf in currentdb.tabledefs
  if nz(tdf.connect,"")<>"" then
    tdf.connect=";DATABASE=C:\Documenti\TuoPercorso\TuoDB.mdb"
    tdf.refreshlink
  end if
next tdf
set tdf=nothing
F.


title: Cambiare Percorso del BE dal FE

text:
Alot ha scritto:
>On 19 Mag, 16:33, Alot <
al...@libero.it
> wrote:
>> Ho un Db diviso in FE e BE
>> Il BE sta sul server
>> I FE sui PC collegati in rete
>> Siccome mi servirebbe poter accedere al Db anche da remoto (tipo da
>> casa), ho creato dei FE sul server (creando diversi utenti).
>> Problema: ogni volta che aggiorno il FE mi tocca a mano cambiare il
>> percorso del BE (diverso se lavoro in rete o direttamente dal server).
>>
>> Esiste un qualcosa del tipo:
>> If nome Computer =3D Pincopallo ' questo credo con ENVIRON qualcosa (se
>> cerco trovo)
>> then destinazioneBE=3D MioPercorso =A0' questo non ho idea
>> End if
>>
>> Grazie in anticipo.
>>
>> F.
>
>Ho trovato questo
>Pu=F2 fare al caso mio?
>Se quale anima pia mi batte un colpo poi me lo studio :-)
>
>dim tdf as tabledef
>
>for each tdf in currentdb.tabledefs
>  if nz(tdf.connect,"")<>"" then
>    tdf.connect=3D";DATABASE=3DC:DocumentiTuoPercorsoTuoDB.mdb"
>    tdf.refreshlink
>  end if
>next tdf
>
>set tdf=3Dnothing
>
>
>F.
Memorizzi da qualche parte il percorso (relativo!!!!) del BE e poi cicli su
tutte le tabelle (che hai preventivamente scritto in una tabella....) non
usando refreslink ma relink. Trovi tutto sul sito di alessandro baraldi o sito
comune
--


title: Cambiare Percorso del BE dal FE

text:

Battuto, puoi studiarlo.
@Alex


title: Cambiare Percorso del BE dal FE

text:
@Alex ha scritto:
>On 19 Mag, 16:45, Alot <
al...@libero.it
> wrote:
>> On 19 Mag, 16:33, Alot <
al...@libero.it
> wrote:
>>
>>
>>
>>
>>
>>
>>
>>
>>
>> > Ho un Db diviso in FE e BE
>> > Il BE sta sul server
>> > I FE sui PC collegati in rete
>> > Siccome mi servirebbe poter accedere al Db anche da remoto (tipo da
>> > casa), ho creato dei FE sul server (creando diversi utenti).
>> > Problema: ogni volta che aggiorno il FE mi tocca a mano cambiare il
>> > percorso del BE (diverso se lavoro in rete o direttamente dal server).
>>
>> > Esiste un qualcosa del tipo:
>> > If nome Computer =3D Pincopallo ' questo credo con ENVIRON qualcosa (se
>> > cerco trovo)
>> > then destinazioneBE=3D MioPercorso =A0' questo non ho idea
>> > End if
>>
>> > Grazie in anticipo.
>>
>> > F.
>>
>> Ho trovato questo
>> Pu=F2 fare al caso mio?
>> Se quale anima pia mi batte un colpo poi me lo studio :-)
>>
>> dim tdf as tabledef
>>
>> for each tdf in currentdb.tabledefs
>> =A0 if nz(tdf.connect,"")<>"" then
>> =A0 =A0 tdf.connect=3D";DATABASE=3DC:DocumentiTuoPercorsoTuoDB.mdb"
>> =A0 =A0 tdf.refreshlink
>> =A0 end if
>> next tdf
>>
>> set tdf=3Dnothing
>>
>> F.
>
>Battuto, puoi studiarlo.
>
>@Alex
:)
--


title: Aiuto.... Msgbox

author: EtaBeta

text:
Aiutatemi vi prego......
all'interno di un file di access devo far apparire una fineste di messaggio
( Msgbox) con il testo cosě formattato
Sei sicuro di vole cancellare la scheda di:
ROSSI MARIO
Esempio:
 Msgbox  "Sei sicuro di vole cancellare la scheda di: " & vbcrlf  & "ROSSI
MARIO"
Per forzare access (VBA) a scrivere il nome nella seconda righa utilizzo
VBCRLF  ma se volessi far apparire il nominativo in grassetto come devo
fare????
grazie a tutti


title: Aiuto.... Msgbox

author: Pablitomf

text:
"EtaBeta" <
fpoleggi_...@alice.it
> ha scritto nel messaggio
news:47e17bfc$0$10619$4faf...@reader2.news.tin.it...
> Aiutatemi vi prego......
> all'interno di un file di access devo far apparire una fineste di
> messaggio ( Msgbox) con il testo così formattato
>
> Sei sicuro di vole cancellare la scheda di:
> ROSSI MARIO
>
> Esempio:
> Msgbox  "Sei sicuro di vole cancellare la scheda di: " & vbcrlf  & "ROSSI
> MARIO"
>
> Per forzare access (VBA) a scrivere il nome nella seconda righa utilizzo
> VBCRLF  ma se volessi far apparire il nominativo in grassetto come devo
> fare????
> grazie a tutti
>
in msgbox no...
dovresti usare un form formattato ad hoc... nel senso che neanche in un form
dove il messaggio lo metti in un unica etichetta puoi con vers < al 2007...
dovresti usare + label formattate diversamente...
cmq di certo c'è che in MSGBOX non puoi
--
---
Ciao
Pablitomf


title: Aiuto.... Msgbox

author: Etabeta

text:

Eppure sono sicuro di averlo già fatto..... e con Acces 2000 ma non ricordo
più come.....
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Aiuto.... Msgbox

author: CIDI

text:
"Etabeta" <
fpoleggi...@alic.it
> ha scritto nel messaggio
news:88Z45Z230Z10Y1...@usenet.libero.it...
> Il 20 Mar 2008, 00:39, "Pablitomf" <
pabl...@hotmail.it
> ha scritto:
>>
>> in msgbox no...
>> dovresti usare un form formattato ad hoc... nel senso che neanche in
>> un
> form
>> dove il messaggio lo metti in un unica etichetta puoi con vers < al
> 2007...
>> dovresti usare + label formattate diversamente...
>>
>> cmq di certo c'è che in MSGBOX non puoi
>>
>> Ciao
>> Pablitomf
>>
> Eppure sono sicuro di averlo già fatto..... e con Acces 2000 ma non
> ricordo
> più come.....
>
vedi se ti aiuta:
http://tinyurl.com/2wbent
Ciao
Daniele


title: Aiuto.... Msgbox

author: geppo

text:

Ma in quel modo non puo' fare uscire solo il nominativo in grassetto, ma
tutta la stringa a meno che non mette il nominativo all'inizio.
--
Ciao
Geppo


title: Aiuto.... Msgbox

author: Carlo Costarella

text:
"EtaBeta" <
fpoleggi_...@alice.it
> ha scritto nel messaggio
news:47e17bfc$0$10619$4faf...@reader2.news.tin.it...
> Aiutatemi vi prego......
> all'interno di un file di access devo far apparire una fineste di
> messaggio ( Msgbox) con il testo così formattato
>
> Sei sicuro di vole cancellare la scheda di:
> ROSSI MARIO
>
> Esempio:
> Msgbox  "Sei sicuro di vole cancellare la scheda di: " & vbcrlf  & "ROSSI
> MARIO"
>
> Per forzare access (VBA) a scrivere il nome nella seconda righa utilizzo
> VBCRLF  ma se volessi far apparire il nominativo in grassetto come devo
> fare????
> grazie a tutti
>
Forse ti riferisci a questo esempio:
http://www.datastrat.com/Download/MsgBox2K.zip
preso da questo sito molto noto:
http://www.datastrat.com/DataStrat2.html
Ciao, Carlo


title: Aiuto.... Msgbox

text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:1YpEj.271498$%k.39...@twister2.libero.it...
> Ciao CIDI wrote:
>>>>
>>> Eppure sono sicuro di averlo già fatto..... e con Acces 2000 ma non
>>> ricordo
>>> più come.....
>>>
>>
>> vedi se ti aiuta:
http://tinyurl.com/2wbent
>>
>> Ciao
>> Daniele
>
>
> Ma in quel modo non puo' fare uscire solo il nominativo in grassetto,
> ma tutta la stringa a meno che non mette il nominativo all'inizio.
Vero! non ci avevo fatto caso... ;-)
può risolvere con il consiglio di Carlo.
Ciao
Daniele


title: Aiuto.... Msgbox

text:
>> cmq di certo c'è che in MSGBOX non puoi
>
> Eppure sono sicuro di averlo già fatto..... e con Acces 2000 ma non
> ricordo
> più come.....
Imposibile.
--
---
Ciao
Pablitomf


title: Aiuto.... Msgbox

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:frtl26$dj8$1...@tdi.cu.mi.it...
>
> "EtaBeta" <
fpoleggi_...@alice.it
> ha scritto nel messaggio
> news:47e17bfc$0$10619$4faf...@reader2.news.tin.it...
>> Aiutatemi vi prego......
>> all'interno di un file di access devo far apparire una fineste di
>> messaggio ( Msgbox) con il testo cosě formattato
>>
>> Sei sicuro di vole cancellare la scheda di:
>> ROSSI MARIO
>>
>> Esempio:
>> Msgbox  "Sei sicuro di vole cancellare la scheda di: " & vbcrlf  & "ROSSI
>> MARIO"
>>
>> Per forzare access (VBA) a scrivere il nome nella seconda righa utilizzo
>> VBCRLF  ma se volessi far apparire il nominativo in grassetto come devo
>> fare????
>> grazie a tutti
>>
>
> Forse ti riferisci a questo esempio:
>
http://www.datastrat.com/Download/MsgBox2K.zip
> preso da questo sito molto noto:
>
http://www.datastrat.com/DataStrat2.html
>
> Ciao, Carlo
>
grazie..., probabilmente risolvo utilizzando una form simile a quella
dell'esempio..... grazie a tutti di nuovo....


title: Aiuto.... Msgbox

author: Filippo

text:
On Wed, 19 Mar 2008 21:47:55 +0100, "EtaBeta"
<
fpoleggi_...@alice.it
> wrote:
>Aiutatemi vi prego......
>all'interno di un file di access devo far apparire una fineste di messaggio
>( Msgbox) con il testo così formattato
>
>Sei sicuro di vole cancellare la scheda di:
>ROSSI MARIO
>
>Esempio:
> Msgbox  "Sei sicuro di vole cancellare la scheda di: " & vbcrlf  & "ROSSI
>MARIO"
>
>Per forzare access (VBA) a scrivere il nome nella seconda righa utilizzo
>VBCRLF  ma se volessi far apparire il nominativo in grassetto come devo
>fare????
>grazie a tutti
>
>
Devi usare la funzione Eval e il separatore @
Nel formato che chiedi tu però non si può fare, perché la funzione
Eval ti permette di grassettare soltanto la prima parte della stringa
e non le altre; però se ti accontenti così funziona:
XYZ= Eval("Msgbox('ROSSI MARIO @Sei sicuro di voler cancellare la
scheda? @',3,'CANCELLAZIONE SCHEDA')")
Ciao
Filippo


title: ActiveX in applicazione Access

author: ig

text:
Salve
sul mio pc sono installati sia Visual Basic 6.0 SP3 che Access 97 OSR2
con i quali normalmente sviluppo.
Ho dovuto fare una semplice applicazione Access (quindi senza VB6) e mi
sono imbattuto nella necessità di fare una chiamata ad un server
particolare quindi ho scartato l'ipotesi di usare il controllo ActiveX
INET (che Access mi permette di includere anche se deriva da VB6) ed ho
utilizzato Winsock. Tutto funziona egregiamente, ma quando vado dal
cliente, l'app. mi dice "L'oggetto ActiveX non può creare l'oggetto".
Questo comportamento è giusto in quanto il cliente ha installato solo
Access quindi:
Come faccio ad installare il Winsock presso il cliente?
Grazie
P.S: una volta avevo trovato un bel sito che trattava di Access (in
italiano)  e che avevo visto nominare su questo NG. Avete qualche
indirizzo oltre a quello del sito comune?? (ripeto era in italiano)


title: ActiveX in applicazione Access

text:
Salve (e scusate per l'eventuale messaggio doppio ma questo client di
news....)



title: ActiveX in applicazione Access

author: Tappo

text:
"ig" <
nos...@nospam.it
> ha scritto nel messaggio
news:3A66C528...@nospam.it...
> Salve
>
> sul mio pc sono installati sia Visual Basic 6.0 SP3 che Access 97 OSR2
> con i quali normalmente sviluppo.
> Ho dovuto fare una semplice applicazione Access (quindi senza VB6) e mi
> sono imbattuto nella necessità di fare una chiamata ad un server
> particolare quindi ho scartato l'ipotesi di usare il controllo ActiveX
> INET (che Access mi permette di includere anche se deriva da VB6) ed ho
> utilizzato Winsock. Tutto funziona egregiamente, ma quando vado dal
> cliente, l'app. mi dice "L'oggetto ActiveX non può creare l'oggetto".
> Questo comportamento è giusto in quanto il cliente ha installato solo
> Access quindi:
> Come faccio ad installare il Winsock presso il cliente?
    crea un progetto con vb6 che contenga l'ocx che ti serve, crea il
pacchetto di installazione.
    durante autocomposizione del pacchetto togli tutti i files che non ti
servono, cioè tutti tranne l'ocx e quelli obbligatori, e installa il tutto
sul pc del cliente.
