Newsgroup: it.comp.appl.access
Titolo: "Mailto:" e "ValidationRule"

ciao!
Due problemini da risolvere:
1) Ho un campo di tipo Collegamento Ipertestuale all'interno di una maschera.
    Voglio dare la possibilità di inserirvici un indirizzo di posta elettronica standard e fare in modo
   che se l'utente ci fa click, automaticamente viene lanciato il client di posta elettronica predefinito
   di quella macchina con già pronta una email con l'indirizzo contenuto nel campo.
   Per farla breve l'effetto del tag html  "MAILTO:"
   Come si fa?
2) Ho un campo (sempre nella stessa maschera) di tipo testo nel quale è presente una
   maschera di input (che fa un po' da regola di validazione).
   Voglio fare in modo che, se l'operatore inserisce i dati senza rispettare la maschera di input,
   appaia un messaggio che NON sia il messaggio predefinito di Access ma uno personalizzato
   che spieghi un po' meglio cosa bisogna fare e perché è uscito fuori l'errore.
   Ho provato a scrivere 4 linee di codice VBA a fronte dell'evento AfterUpdate del controllo associato
   CasellaDiTesto associato a quel campo;
   in pratica ho considerato la proprietà ValidationRule del controllo CasellaDiTesto e con un ciclo
   condizionale gli ho detto che se quella proprietà non era uguale ad una certa maschera,
   faceva apparire un messaggio di errore con MsgBox... ma non ha funzionato in quanto appare inizialmente
   il msg predefinito di Access e poi quello mio... insomma un bel pasticcio!
   Come mai?
grazie 1k!  :))
	luca

 luca
inserisci il messaggio nell'opzione messaggio errore nella finestra propietà

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



Per quanto riguarda la gestione della maschera di input tramite VBA,
posso utilizzare la proprietà InputMask del controllo?
grazie,
sei gentilissimo!



Le macro non le voglio utilizzare per principio.
Il messaggio della finestra proprietà non è associabile alla  maschera di input
ma solo al campo ValidoSe...

 sei gentilissimo!


End Sub
Purtroppo non va molto bene perché dopo aver inserito l'email,
appare sia mailto: indirizzo, sia 
http://indirizzo
 che non c'entra niente...
come mai?

 ha scritto nel messaggio
news:feej8v41t8mhlm2op...@4ax.com...

Non so cosa dirti, per scrupolo ho provato la soluzione che ti ho
consigliato ed a me funziona bene; natiralmente il campo associato è di tipo
Collegamento ipertestuale.
Se l'indirizzo email è 
pi...@libero.it
 , se elimini il codice VBA e nella
casella di testo digiti:
mailto: 
pi...@libero.it
cosa succede?


cosa succede?
Togliendo il codice esce fuori un indirizzo cliccabile ed effettivamente viene creata una
nuova email con lo stesso indirizzo del campo.. quindi va bene!
Perň ho dovuto scrivere io mailto:
etc
 etc ...
Se invece c'č il codice che m'hai suggerito tu,
quando scrivo l'indirizzo ed esco dal controllo con TAB appare sia
mailto:
pi...@libero.it
, sia 
http://pi...@libero.it
 ma viene lanciato solo
Explorer con un indirizzo ovviamente non valido...
mah...

 ha scritto nel messaggio
news:mv0k8v45bcjsqb02f...@4ax.com...

Non so cosa dirti, a me funziona; capisci da solo che scrivere mailto: a
manina santa o far precedere da codice VBA l'indirizzo di posta dalla
costante "#mailto: " e falo seguire dalla costante "#" č la stessa cosa.
Per maggiori chiarimenti leggi sull'help Digitare un collegamento
ipertestuale in un campo o in una casella di testo , ma soprattuto leggi
sull'help Informazioni sugli indirizzi dei collegamenti ipertestuali nei
campi di collegamento ipertestuale e nei controlli.


 ha scritto nel messaggio
news:8Ayia.5468$mg5.1...@twister2.libero.it...
[CUT]
Ecco una soluzione con i fiocchi.. ideata e già stracollaudata da me
Questo è il modulo...
Public Function scrivi(email As String)
If Len(email) > 0 Then
DoCmd.SendObject acSendNoObject, , , email
End If
End Function
nella tua maschera ci metti un campo chiamato come vuoi (es. email)
sul doppio click del campo....routine evento
Private Sub email_dblclick()
call scrivi(me.email)
end sub
ciao

 ha scritto nel messaggio
news:b6etij$8v7$1...@grillo.cs.interbusiness.it...

Ti ringrazio, ma a me funziona anche la mia soluzione; prova a suggerirla a
Woodrov.


 Woodrov.
scusami... ho sbagliato il reply ... ;)

 ciao!


Non riesco a "dividere" un database,
 mi da questo 2 avvisi:
Indice non incluso nell'intervallo.
e di seguito :
Chiamata di routine o argomenti non validi.
Come posso risolvere ?
Succede solo con l'unico database che voglio dividere ! Per gli altri tutto
funziona a meraviglia.

 ha scritto nel messaggio

Fai un compila e salva tutti  i moduli dal menu debug.
Sib

-----
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:ofqta.43358$3M4.1...@news1.tin.it...

ho provato a fare come hai detto, anzi ho cancellato  i soli 3 moduli del
database ma continua a darmi gli stessi errori.....
altre soluzioni ?
grazie !

Ho scaricato tutto il sito comune, divorato i 2 libri su access che ho,
letto quasi tutto Google,
ma non sono riuscito a farlo :
In una query ho 4 campi
    Dal : 14/03/2003 15.00
    All : 24/03/2003  20.00            Durata Complessiva della Missione
   Dallo : 14/03/2003 12.20
   Allo :  22/03/2003 20.00         Durata Della Missione Estera
Io debbo calcolare la durata in giorni e ore  trascorsi nel paese estero, e
per differenza calcolarmi la permanenza in Italia.
Quindi uso le seguenti formule :
GiorniEstero :     Int([Allo]-[Dallo])
OreEstero      :      Round((([Allo]-[Dallo])-Int([Allo]-[Dallo]))*24)
E fin qui Ok
Poi per calcolarmi i giorni in Italia, mi calcolo prima la durata
complessiva
GiorniComplessivi : Int([All]-[Dal])    e poi
Giorni in Italia    :   Int([GiorniCompl]-[GiorniEstero])
dove mi sono completamente bloccato e su come calcolare le "benedette"
Ore in Italia         : ????????????????????????????????????????
con Excel il risultato deve essere :
Diaria in MALAYSIA 8 Giorni
Diaria in MALAYSIA 8 Ore
Diaria in Italia 2 Giorni
Diaria in Italia 21 Ore
Da tener conto che le ore vanno arrotondate : se minuti >= 30 all'ora
successiva, <30 all'ora precedente.
Mille Grazie !

 ha scritto nel messaggio
news:b9d4bt$hqd5t$1...@ID-24065.news.dfncis.de...

Fermo restando che nel tuo esempio la diaria in italia č di 1 giorno e 21
ore e non 2 giorni e 21 ore, prova cosě:
GiorniEstero: Int([Allo]-[Dallo])
OreEstero: Round((([Allo]-[Dallo])-[GiorniEstero])*24)
Giorni in Italia: Int(([All]-[Dal])-([Allo]-[Dallo]))
Ore in Italia: Round(((([All]-[Dal]) - ([Allo]-[Dallo])) - [Giorni in
Italia])*24)


 --
Mille grazie !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!