Ciao, ho una pagina asp con un form contenente circa 80 campi.
Nel momento in cui faccio il submit richiamo una pagina in cui eseguo un ciclo sugli item del form,
all'interno di esso ho una select che mi serve per poter distinguere il tipo di campo esaminato e il
valore effettivo da estrarre.
Nel frattempo utilizzo 2 variabili "ValoreCampo" e "NomeCampo", in cui mi preparo l'elenco dei valori e dei campi
per eseguire poi la Insert in sqlserver.

Il problema è che quando eseguo in realtà mi vengono letti solo alcuni campi, me ne legge 74 anzichè 101 (inclusi quelli di appoggio, effettivi per il db sono 80).
Di questi non considera le checkbox a meno che siano checkate, poi non considera qualche altro campo sparso...
Questo dipende dal fatto che i campi sono tanti? Dovrei evitare il ciclo e fare una request.form di ogni campo manualmente, scrivendone il nome,
facendo magari una prima insert e poi un update di quel record aggiungendo gli altri campi? (in questo caso poi avrei altra domanda, prima vorrei capire questo problema)

codice:
  For Each Item In Request.Form
    strTemp = Item
    Select Case strTemp
       Case [SELECT] 'qui ho l'elenco di tutte le select del form				strDescrSelect = split(Request.Form(strTemp), "|")
  	If strDescrSelect(0) = "0" then
      	   ValoreCampo = ValoreCampo & "'',"
  	else
      	   ValoreCampo = ValoreCampo & "'" & Replace(strDescrSelect(1),"'","''") & "',"
  	End if
     	NomeCampo = NomeCampo & "," & strTemp & ","												
       Case [5 TEXT PER IMMETTERE CODICI CHE COMPONGONO UN'UNICA TEXT, QUELLA CHE INSERISCO NEL DB] 
        If strCodiceOs <> "ok" Then			
          ValoreCampo = ValoreCampo & "'" & Replace(Request.Form("codiceos"),"'","''") & "',"
          NomeCampo = NomeCampo & "codiceos" & ","			  
          strCodiceOs = "ok"
        End If
				
       Case [5 TEXT PER IMMETTERE CODICI CHE COMPONGONO UN'UNICA TEXT, QUELLA CHE INSERISCO NEL DB]
         If strCodiceOf <> "ok" Then			
           ValoreCampo = ValoreCampo & "'" & Replace(Request.Form("codiceof"),"'","''") & "',"
           NomeCampo = NomeCampo & "codiceof" & ","				     
           strCodiceOf = "ok"
        End If

       Case [5 TEXT PER IMMETTERE CODICI CHE COMPONGONO UN'UNICA TEXT, QUELLA CHE INSERISCO NEL DB]
         If strCodiceOfNot <> "ok" Then			
           ValoreCampo = ValoreCampo & "'" & Replace(Request.Form("strCodiceOfNot "),"'","''") & "',"
           NomeCampo = NomeCampo & "strCodiceOfNot " & ","	     
           strCodiceOf = "ok"
        End If

       Case [5 TEXT PER IMMETTERE CODICI CHE COMPONGONO UN'UNICA TEXT, QUELLA CHE INSERISCO NEL DB]
         If strCodiceOsNot <> "ok" Then			
           ValoreCampo = ValoreCampo & "'" & Replace(Request.Form("strCodiceOsNot "),"'","''") & "',"
           NomeCampo = NomeCampo & "strCodiceOsNot " & ","			       
           strCodiceOf = "ok"
        End If
								
       Case [CHECKBOX, IN BASE AL VALORE DEVO INSERIRE NEL DB UNA STRINGA S O N]
          If Trim(CStr(Request.form(strTemp))) = "on" then
            ValoreCampo = ValoreCampo & "'S',"
          Else
            ValoreCampo = ValoreCampo & "'N',"
          End If
          NomeCampo = NomeCampo & "," & strTemp & ","								
       Case [CHECKBOX, IN BASE AL VALORE DEVO INSERIRE NEL DB 1 o 0]		        
          If Request.form(strTemp) = "on" then
            ValoreCampo = ValoreCampo & "1,"				
          Else
            ValoreCampo = ValoreCampo & "0,"
          End If
          NomeCampo = NomeCampo & "," & strTemp & ","				

       Case "cmdInvia"
          ' non faccio nulla
				 			
       Case Else [TUTTI GLI ALTRI CAMPI TEXT DEL FORM]
         ValoreCampo = ValoreCampo & "'" & Replace(Request.Form(strTemp),"'","''") & "',"
         NomeCampo = NomeCampo & "," & strTemp & ","
    End Select
Next