Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

[access 2000 o 2003] creazione stringa automatica

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

[access 2000 o 2003] creazione stringa automatica

Postdi diemes » 28/04/07 16:45

In una maschera anagrafica di access, dopo avere digitato nel campo
denominazione il cognome e nome vorrei creare automaticamente nel campo codice denominazione un codice derivante dal cognome e nome composto dai primi 4 caratteri del cognome e dai primi 4 caratteri del nome.
ad esempio.
garibaldi giuseppe vorrei ottenere il codice garigius
garibaldi giuseppe maria vorrei ottenere il codice garigiusmari
d'agati salvatore vorrei ottenere il codice dagasalv
de santis salvatore vorrei ottenere il codice desasalv
sperando di essere stato chiaro, cordialmente porgo distinti saluti
diego messina

p.s.
erroneamente nei giorni precedenti ho inviato la stesso quesito utilizzando netiquette :oops:
diemes
Newbie
 
Post: 6
Iscritto il: 26/04/07 00:01
Località: BAGHERIA

Sponsor
 

[access 2000 o 2003] creazione stringa automatica

Postdi diemes » 01/05/07 19:22

preciso che vorrei il codice in VB
inoltre, nel caso di un cognome con 2 nomi, vorrei il codice con i primi 4 caratteri del cognome e dei due nomi ottenendo un codice di 12 car.
Nel caso in cui il cognone contiene l'apostrofo nei primi 4 car (ad es. d'alessandro) l'apostrofo non deve essere considerato e quindi il codice cognome deve essere " dale ".
così pure nel caso di uno spazio es. de andre il codice cognome deve essere "dean"
sperando di avere chiarito il mio problema, cordialmente porgo distinti saluti
diego messina
diemes
Newbie
 
Post: 6
Iscritto il: 26/04/07 00:01
Località: BAGHERIA

Postdi archimede » 02/05/07 08:32

E nel caso di un cognome tipo Bo o un nome tipo Ivo? E nel caso di Della Francesca Maria Luisa? E poi parti da due campi separati (uno per il nome e uno per il cognome) oppure è una stringa unica?

Alessandro
archimede
Moderatore
 
Post: 2755
Iscritto il: 07/11/02 12:41
Località: Genova

Postdi diemes » 03/05/07 16:25

innanzitutto il cognome e nome sono memorizzati nel campo denominazione.
nel caso di cognome e nome "fo ivo aggiungere 2 zeri al cognome "fo" ottenendo "fo00" e 1 zero al nome "ivo" ottenendo "ivo0" così da creare il codice "fo00ivo0".
nel caso di cognome e nome "della francesca maria pia anna" vorrei ottenere il codice "dellafranmaripia0anna". (non ci avevo riflettuto)
chiaramente il campo codice è insufficiente a contenere la stringa generata, aumenterò lunghezza.
cordiali saluti
diego messina
diemes
Newbie
 
Post: 6
Iscritto il: 26/04/07 00:01
Località: BAGHERIA

Re: [access 2000 o 2003] creazione stringa automatica

Postdi archimede » 03/05/07 17:17

diemes ha scritto:de santis salvatore vorrei ottenere il codice desasalv
Allora questo diventerà de00santsalv.
Codice: Seleziona tutto
Function CreaCodice(denom) As String
    Dim myArray() As String, Codice As String, Nome As String

    Codice = ""
    myArray = Split(denom, " ")
    For i = 0 To UBound(myArray)
        Nome = Replace(myArray(i), "'", "")
        If Len(Nome) < 4 Then
            Nome = Nome & "0000"
        End If
        Codice = Codice & Left(Nome, 4)
    Next
    CreaCodice = Codice
End Function
HTH.

Alessandro
archimede
Moderatore
 
Post: 2755
Iscritto il: 07/11/02 12:41
Località: Genova

Postdi diemes » 15/05/07 22:21

gent.le sig. alessandro,
innanzitutto mi scuso per non avere risposto tempestivamente alla sua email che in brevissimo tempo mi ha inviato, e, nello stesso tempo, La ringrazio per la soluzione fornitami.
è quello che cercavo.
cordialmente
diego messina
diemes
Newbie
 
Post: 6
Iscritto il: 26/04/07 00:01
Località: BAGHERIA


Torna a Applicazioni Office Windows


Topic correlati a "[access 2000 o 2003] creazione stringa automatica":


Chi c’è in linea

Visitano il forum: Nessuno e 17 ospiti