[ASP] Passare in array stringa dinamica

Discussione in 'Classic ASP' iniziata da djjunior, 8 Maggio 2017.

  1. djjunior

    djjunior Utente Attivo

    Registrato:
    24 Luglio 2004
    Messaggi:
    83
    Mi Piace Ricevuti:
    1
    Punteggio:
    8
    Salve,
    ho questo script:
    Codice:
    Dim myArray
    myArray = Array("fish","cat","dog","fish","bob","blue","green","red","yeller","fish","dog","weasel","snake","george")
    
    
    'unique items with Dictionary object
    Dim myDict, elem
    Set myDict = Server.CreateObject("Scripting.Dictionary")
    For Each elem In myArray
        If Not myDict.Exists(elem) Then myDict.Add elem, elem
    Next
    
    'Sample output
    Response.Write "Dictionary Values"
    For Each elem in myDict.Items
        Response.Write "" & elem & ""
    Next
    Response.Write ""
    
    alla linea MYARRAY, vorrei passare una stringa che si crea dinamicamente che stampata tramite response.write sarebbe nella forma: "GIOVANNI","MARCO","MARCO","NICOLA" etc.

    facendo così:

    nomi = "GIOVANNI","MARCO","MARCO","NICOLA"

    myarray = array(nomi)

    ma non funziona, la legge come testo senza elaborare tutto lo script
    Dove sbaglio?
    Grazie
     
  2. Paolo69

    Paolo69 Moderatore Membro dello Staff MOD

    Registrato:
    18 Febbraio 2010
    Messaggi:
    516
    Mi Piace Ricevuti:
    13
    Punteggio:
    18
    Sesso:
    Maschio
    Occupazione:
    Administrator
    Località:
    Italy
    Home Page:
    ...non capisco come vuoi che sia il risultato finale.

    Modifica il frammento di codice finale, copialo con i due esempi:
    Codice:
    
    'Sample output
    Response.Write "CODICE ORIGINALE <br />"
    For Each elem in myDict.Items
        Response.Write "" & elem & ""
    Next
    
    Response.Write "<br /><br />"
    
    'Sample output
    Response.Write "ESEMPIO 1 <br />"
    For Each elem in myDict.Items
        Response.Write "" & elem & ", "
    Next
    
    Response.Write "<br /><br />"
    
    
    'Sample output
    Response.Write "ESEMPIO 2 <br />"
    For Each elem in myDict.Items
        Response.Write "&#8220;" & elem & ",&#8221; "
    Next
    
    Response.Write "<br /><br />"
    
     
  3. djjunior

    djjunior Utente Attivo

    Registrato:
    24 Luglio 2004
    Messaggi:
    83
    Mi Piace Ricevuti:
    1
    Punteggio:
    8
    Grazie Paolo,
    sicuramente mi sono spiegato male io, nello script originale, la linea MyArray contiene le variabili già "scritte" cioè:
    myArray = Array("fish","cat","dog","fish","bob","blue","green","red","yeller","fish","dog","weasel","snake","george")

    io invece vorrei passarci dati nella stessa forma con virgolette e virgola così:

    nomi = """" & stringa & """," (dove stringa è ogni singolo nome)
    myarray = array(nomi)
     
Sto caricando...

Condividi questa Pagina