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