Newsgroup: it.comp.appl.access
Titolo: Re: Svuotare l'Hyperlink Address

[CUT]
Sarà mezzo buddista... ;-)

Ciao Gasp, ti posto il codice completo.
AGGIUNGI CV al record corrente:
Private Sub cmdAggiungiCV_Click()
Dim strAttach As Variant
 
    strAttach = cmdlg_file("C:\", "All files (*.*)" & Chr(0) & "*.*" &
Chr(0))
  If (strAttach <> "") Then
 
    CurriculumLink = strAttach
    ccCVAllegato = -1
 
  End If
 
End Sub
VISUALIZZA IL CV dell'utente corrente, se il CV è stato allegato
Private Sub cmdAnteprimaCV_Click()
If (CurriculumLink = "") Or IsNull(CurriculumLink) Then
    MsgBox "Nessun CV per l'utente corrente", vbInformation, "Anteprima
Curriculum"
Else
    Me.cmdAnteprimaCV.HyperlinkAddress = CurriculumLink
End If
End Sub
ELIMINA il CV dell'utente corrente, se il CV è presente
Private Sub cmdEliminaCurriculum_Click()
Dim strAttach As Variant
If (CurriculumLink <> "") Then
    If MsgBox("Sei sicuro di voler eliminare il CV di " &
UCase([Forms]![frmSchedaPrimoContatto]![Nome] & " " &
[Forms]![frmSchedaPrimoContatto]![Cognome]) & " ?", vbQuestion + vbYesNo,
"Eliminazione Curriculum") = vbYes Then
        CurriculumLink = ""
        Me.cmdAnteprimaCV.HyperlinkAddress = ""
        ccCVAllegato = 0
        MsgBox "CV eliminato", vbInformation, "Eliminazione Curriculum"
    End If
Else
    MsgBox "Nessun CV per l'utente corrente", vbInformation, "Eliminazione
Curriculum"
    Exit Sub
End If
End Sub
Come ho già detto, se il CV non è presente Access esegue correttamente il
seg. codice:
If (CurriculumLink = "") Or IsNull(CurriculumLink) Then
    MsgBox "Nessun CV per l'utente corrente", vbInformation, "Anteprima
Curriculum"
Else
    Me.cmdAnteprimaCV.HyperlinkAddress = CurriculumLink
End If
visualizzando la msgbox
"Nessun CV per l'utente corrente"
solo che poi però apre il CV dell'utente precedente. Ho provato con due
soli utenti, ma il bug c'è....e spuntano all'improvviso, quando prima
tutto filava liscio come l'olio.
Bah!
-- 
Non avere mai paura dei momenti bui perchè, facci caso, anche le stelle
hanno bisogno della notte per brillare.
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Sinceramente non capisco...
Che vuol dire che Access non capisce le mie intenzioni? Se tramite i
pulsanti di spostamento io vado in avanti Access *SA* che deve andare in
avanti, ed infatti ci va. Altrimenti che ci stanno a fare i pulsanti?
Qui il problema è diverso: il campo CurriculumLink è effettivamente
*vuoto* infatti mi appare la msgbox, ma *POI* mi si apre il CV del record
precedente. 
A me pare ovvio che se clicco in avanti si devono aggiornare *tutti* i
controlli - Nome, Cognome e via dicendo - perchè CurriculumLink, pur
aggiornato, viene riempito con il valore del record precedente?
E' questo che non capisco.
-- 
Non avere mai pura dei momenti bui perchè, facci caso, anche le stelle


[CUT]
...certo "strano" l'è strano...poi ci si mette il caldo...ed il record che 
punta sempre al cv. precedente...sono "fastidi" ...cosa ti sembra?
Alla prossima...Man of  Magazine ;-)
Gaspare 

Giulio Severini wrote:
Neanche io mai PURA dei momenti bui, anche perchè non so cosa sia avere PURA
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 ha scritto nel messaggio 
news:f7cue.20341$TR5....@news.edisontel.com...

MA -> The show must go on -> ovvero il programma di magazzino continua...ed 
il "caldo" incalza !!! :-(
Gaspare 

[CUT]
Perchè ogni volta che salvi il recordset (se posti il resto del codice che 
sta dietro al pulsantino ti accorgi da te...) ti ritrovi all'inizio (giacchè 
non comunichi ad access dove andare...) e quindi viene sovrascritto il primo 
record con lo stesos valore del path (con riferimento al  cv) inserito o 
modificato sul record corrente...prova ad inserire 3 records e fammi 
sapere -> magari ho caldo pure io ;-)
Gaspare 

[CUT]
Ciao Giulio,
tempo fà ti ho spiegato cosa succede...
Tu vorresti che il software svolgesse delle operazioni che effettivamente 
non scrivi come codice....
Ti sposti avanti e dietro con dei pulsanti ed archivi, modifichi etc.. dei 
dati -> ma effettivamente non sei posizionato su dove vorresti essere con la 
tua mente perchè access non capisce le tue intenzioni a meno che non glielo 
comunichi tramite codice che per lui è qualcosa come
MoveNext...MoveLast...MoveFirst etc....non sò se sono stato chiaro!
Praticamente a livello "sintattico" il programma (anche se "tuortuso"...) 
girerà ma a livello "semantico" non fà una piega in casi come questi...
Alla prossima...e occhio al caldo!
Gaspare

Non ci posso credere, davvero. Ciclicamente mi ritornano i problemi che
sembravano essere stati risolti. Sono sincero, non vedo l'ora di
terminare il contratto perchè non ne posso veramente più.
Ad ogni modo: ho un utente, gli allego il CV, se è allegato un
interruttore si imposta a vero, e se clicco sul commandbutton anteprima
vedo l'anteprima altrimenti mi appare un messaggio di avviso.
Problema: ho due utenti, Sara e Giulio. Allego un CV a Sara, clicco sul
pulsante dell'anteprima e mi si apre Word con il CV, tutto ok. Con i
pulsanti di spostamento passo a Giulio, record 2. Interruttore su
Falso, quindi il CV non c'è. Clicco su Anteprima, mi appare il
messaggio di avviso che mi dice che non c'è alcun CV per l'utente
corrente. Tutto ok. Come clicco OK però si apre Word con il CV di
Sara. MISTERO!!!! Vado a vedere nella tblUtenti, al campo
CurriculumLink: solo il record di Sara ha quel campo che contiene il
giusto percorso, mentre per Giulio tale campo è vuoto, come DEVE
ESSERE!
Ma allora perchè il seg. codice legge comunque un indirizzo anche se
non c'è?
CODICE:
Private Sub cmdAnteprimaCV_Click()
If (CurriculumLink = "") Or IsNull(CurriculumLink) Then
    MsgBox "Nessun CV per l'utente corrente", vbInformation, "Anteprima
Curriculum"
Else
    Me.cmdAnteprimaCV.HyperlinkAddress = CurriculumLink
End If
End Sub
Come detto CurriculumLink è un campo della tabella tblUtenti. Per
Giulio tale campo è VUOTO ed infati mi appare la msgbox, poi però mi
si apre il CV di Sara...
Help :(

[CUT]
Vedi che si scherza Giulio...posta il codice che vediamo un pò il da 
farsi... ;-) 

....mmm postato.... :)

....mmm postato.... :)

[CUT]
Ciao Carlo.
hai qualche idea di come si possa sistemare questo codice?
Gaspare 

[CUT]
Ciao Giulio,
quando ti serve questo codice?
E' incasinato di brutto 

Gasp....entro il 30....perchè poi termino il rapporto.
Cmq perchè incasinato? Funzionava prima....ma qui accadono cose
strane...problemi che ritenevo risolti riappaiono.
Oltre a questo anche il refresh del numero intervento... boh.

Ciao Giulio,
prova ad usare questa riga per salvare il record corrente
DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Dal codice leggo che dai valore di stringa vuota ai controlli etc...ma non 
aggiorni il record

Buongiorni Gasp....ma dove devo scriverla questa riga? In quale evento
di quale controllo....in quale maschera? :)