Visualizzazione dei risultati da 1 a 2 su 2
  1. #1
    Utente di HTML.it
    Registrato dal
    Aug 2001
    residenza
    Milano
    Messaggi
    217

    Problema recupero campi con for each

    Ragazzi ho realizzato un form da cui recupero i dati con il classico ciclo for each in
    request.form

    codice:
    Dim myArray()
    ReDim MyArray(2,4)
    
    strBody = ""
    strBody1 = ""
    conteggio = Request.Form.Count
    For i = 1 To Request.Form.Count
      strBody =  Request.Form.Key(i)    
      strBody1=  Request.Form.Item(i)  
      Response.Write "Nome Campo: " &  strBody
      Response.Write " Valore: " & strBody1 &" 
    
    "
    
      IF strBody  <> ""  then
      for j = 0 to Ubound(MyArray, 2)
      MyArray (Nometipo,J) = strBody
      MyArray (IDtipo,J) = strBody1
    Next 
    end if
    
    
    next

    ed a video vedo quello che segue.
    Adesso io vorrei memorizzare in un array bidimensionale i valori relativi ai campi ST, nr, totale
    dove il campo ST sia appunto diverso da "vuoto" e i campi "nr" e "totale" siano maggiori di 0
    ma non riesco a capire come fare potresti aiutarmi?

    codice:
    Nome Campo: ST Valore: ST3MQ 
    Nome Campo: nr Valore: 1 
    Nome Campo: totale Valore: € 1.500 ,00 
    
    Nome Campo: nr1 Valore: 0 
    Nome Campo: totale1 Valore: € 0 ,00 
    
    Nome Campo: nr2 Valore: 0
    Nome Campo: totale2 Valore: € 0 ,00 
    
    Nome Campo: nr3 Valore: 
    Nome Campo: totale3 Valore: € 0 ,00 
    
    Nome Campo: BM Valore: BM10 
    Nome Campo: nr4 Valore: 1 
    Nome Campo: totale4 Valore: € 1.500 ,00 
    
    Nome Campo: nr5 Valore: 0 
    Nome Campo: totale5 Valore: € 0 ,00 
    
    Nome Campo: nr6 Valore: 0 
    Nome Campo: totale6 Valore: € 0 ,00 
    
    Nome Campo: nr7 Valore: 0 
    Nome Campo: totale7 Valore: € 0 ,00 
    
    Nome Campo: WK Valore: WK30 
    Nome Campo: nr8 Valore: 1 
    Nome Campo: totale8 Valore: € 1.000 ,00 
    
    Nome Campo: nr9 Valore: 0 
    Nome Campo: totale9 Valore: € 0 ,00 
    
    Nome Campo: nr10 Valore: 0 
    Nome Campo: totale10 Valore: € 0 ,00 
    
    Nome Campo: Riscatto  Valore: RIS
    Nome Campo: nr11 Valore: 1 
    Nome Campo: totale11 Valore: € 100 ,00 
    
    Nome Campo: scontistica Valore: € 0 ,00 
    
    Nome Campo: sommatot Valore: € 0 ,00 
    
    Nome Campo: B1 Valore: Invia

  2. #2
    Utente di HTML.it
    Registrato dal
    Aug 2001
    residenza
    Milano
    Messaggi
    217
    Ragazzi sono riuscito a creare la coppia nome/valore ma nell'arrey mi prende anche le coppie con valore 0 e questo a me non va bene come posso risolvere per fare in modo che nell'array vengano memorizzati solo i valori superiori a 0?

    codice:
    
    'creiamo un array bidimensionale, un po abbondante visto
    ' che non conosco il numero di controlli del form
    ReDim arrayForm(2, 255)
    
    intIndice = 0
    
    conteggio = Request.Form.Count
    
    For intLoop = 1 to 6
    'Request.Form(varItem).count 
    
    'se il numero di controlli del form e uguale a uno
    
    If Request.Form(intloop).count <> 0 Then
    
    'immagazzino nell'array le coppie nome-controllo/valore-controllo
    arrayForm(0, intIndice) = Request.Form.Key(intLoop) 
    arrayForm(1, intIndice) = Request.Form.Item(intLoop) 
    intIndice = intIndice + 1
    end if 
    
    
    Next
    'End If
    
    'Next
    
    'ridimensiono l'array alle giuste dimensioni, dato che ora
    ' conosco il numero di controlli del form
    ReDim Preserve arrayForm(2, intIndice - 1)
    
    'MOSTRO A VIDEO IL CONTENUTO DELL'ARRAY
    For intIndice = 0 To UBound(arrayForm, 2)
      Response.Write arrayForm(0, intIndice) & " = " & arrayForm(1, intIndice) & "
    "
      Next
    
    
    
    
    %>

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.