Classic ASP - Save a retrieve data from Text file

I have a 150+ variables that need to be saved temporarily but I can not use a session or cookie. I don't want to use a database as I would have to create 150 fields. I want a copy and paste solution that will write to a simple TXT file and can be CSV or XML it does not matter and then a copy and past to retrieve these variables on another page. So one page to save the variables and then another page that retrieves the variables and the last line of this page will delete the data for the next use. ## Deliverables I need this done ASAP special consideration to someone that can get it turned back to me the fastest. Here is the Current Variables that are pulled from a FORM post. I need the first page to save all of these and then a second page that retrieves them just like below but from the text file source. 'GET VARIABLES ReportDate = request("ReportDate") Author = request("Author") MCDID4870 = request("MCDID4870") STAGEdtno1 = request("STAGEdtno1") READSTAGEdtno1 = request("READSTAGEdtno1") DISCHARGEdtno1 = request("DISCHARGEdtno1") CRESTSTAGEdtno1 = request("CRESTSTAGEdtno1") TIMINGdtno1 = request("TIMINGdtno1") CARETAKERdtno1 = request("CARETAKERdtno1") CELLPHONEdtno1 = request("CELLPHONEdtno1") MCDID5030 = request("MCDID5030") STAGEengo1 = request("STAGEengo1") READSTAGEengo1 = request("READSTAGEengo1") DISCHARGEengo1 = request("DISCHARGEengo1") CRESTSTAGEengo1 = request("CRESTSTAGEengo1") TIMINGengo1 = request("TIMINGengo1") CARETAKERengo1 = request("CARETAKERengo1") CELLPHONEengo1 = request("CELLPHONEengo1") MCDIDNA = request("MCDIDNA") STAGEfrao1 = request("STAGEfrao1") READSTAGEfrao1 = request("READSTAGEfrao1") DISCHARGEfrao1 = request("DISCHARGEfrao1") CRESTSTAGEfrao1 = request("CRESTSTAGEfrao1") TIMINGfrao1 = request("TIMINGfrao1") CARETAKERfrao1 = request("CARETAKERfrao1") CELLPHONEfrao1 = request("CELLPHONEfrao1") MCDID4970 = request("MCDID4970") STAGEgero1 = request("STAGEgero1") READSTAGEgero1 = request("READSTAGEgero1") DISCHARGEgero1 = request("DISCHARGEgero1") CRESTSTAGEgero1 = request("CRESTSTAGEgero1") TIMINGgero1 = request("TIMINGgero1") CARETAKERgero1 = request("CARETAKERgero1") CELLPHONEgero1 = request("CELLPHONEgero1") MCDID4800 = request("MCDID4800") STAGEhamo1 = request("STAGEhamo1") READSTAGEhamo1 = request("READSTAGEhamo1") DISCHARGEhamo1 = request("DISCHARGEhamo1") CRESTSTAGEhamo1 = request("CRESTSTAGEhamo1") TIMINGhamo1 = request("TIMINGhamo1") CARETAKERhamo1 = request("CARETAKERhamo1") CELLPHONEhamo1 = request("CELLPHONEhamo1") MCDID4910 = request("MCDID4910") STAGEloco1 = request("STAGEloco1") READSTAGEloco1 = request("READSTAGEloco1") DISCHARGEloco1 = request("DISCHARGEloco1") CRESTSTAGEloco1 = request("CRESTSTAGEloco1") TIMINGloco1 = request("TIMINGloco1") CARETAKERloco1 = request("CARETAKERloco1") CELLPHONEloco1 = request("CELLPHONEloco1") MCDID4840 = request("MCDID4840") STAGEmbgo1 = request("STAGEmbgo1") READSTAGEmbgo1 = request("READSTAGEmbgo1") DISCHARGEmbgo1 = request("DISCHARGEmbgo1") CRESTSTAGEmbgo1 = request("CRESTSTAGEmbgo1") TIMINGmbgo1 = request("TIMINGmbgo1") CARETAKERmbgo1 = request("CARETAKERmbgo1") CELLPHONEmbgo1 = request("CELLPHONEmbgo1") MCDID4850 = request("MCDID4850") STAGEmbgo2 = request("STAGEmbgo2") READSTAGEmbgo2 = request("READSTAGEmbgo2") DISCHARGEmbgo2 = request("DISCHARGEmbgo2") CRESTSTAGEmbgo2 = request("CRESTSTAGEmbgo2") TIMINGmbgo2 = request("TIMINGmbgo2") CARETAKERmbgo2 = request("CARETAKERmbgo2") CELLPHONEmbgo2 = request("CELLPHONEmbgo2") MCDID4820 = request("MCDID4820") STAGEmdto1 = request("STAGEmdto1") READSTAGEmdto1 = request("READSTAGEmdto1") DISCHARGEmdto1 = request("DISCHARGEmdto1") CRESTSTAGEmdto1 = request("CRESTSTAGEmdto1") TIMINGmdto1 = request("TIMINGmdto1") CARETAKERmdto1 = request("CARETAKERmdto1") CELLPHONEmdto1 = request("CELLPHONEmdto1") MCDID4990 = request("MCDID4990") STAGEmrdo1 = request("STAGEmrdo1") READSTAGEmrdo1 = request("READSTAGEmrdo1") DISCHARGEmrdo1 = request("DISCHARGEmrdo1") CRESTSTAGEmrdo1 = request("CRESTSTAGEmrdo1") TIMINGmrdo1 = request("TIMINGmrdo1") CARETAKERmrdo1 = request("CARETAKERmrdo1") CELLPHONEmrdo1 = request("CELLPHONEmrdo1") MCDIDNA = request("MCDIDNA") STAGEpiqo1 = request("STAGEpiqo1") READSTAGEpiqo1 = request("READSTAGEpiqo1") DISCHARGEpiqo1 = request("DISCHARGEpiqo1") CRESTSTAGEpiqo1 = request("CRESTSTAGEpiqo1") TIMINGpiqo1 = request("TIMINGpiqo1") CARETAKERpiqo1 = request("CARETAKERpiqo1") CELLPHONEpiqo1 = request("CELLPHONEpiqo1") MCDID5000 = request("MCDID5000") STAGEsgfo1 = request("STAGEsgfo1") READSTAGEsgfo1 = request("READSTAGEsgfo1") DISCHARGEsgfo1 = request("DISCHARGEsgfo1") CRESTSTAGEsgfo1 = request("CRESTSTAGEsgfo1") TIMINGsgfo1 = request("TIMINGsgfo1") CARETAKERsgfo1 = request("CARETAKERsgfo1") CELLPHONEsgfo1 = request("CELLPHONEsgfo1") MCDID4930 = request("MCDID4930") STAGEsido1 = request("STAGEsido1") READSTAGEsido1 = request("READSTAGEsido1") DISCHARGEsido1 = request("DISCHARGEsido1") CRESTSTAGEsido1 = request("CRESTSTAGEsido1") TIMINGsido1 = request("TIMINGsido1") CARETAKERsido1 = request("CARETAKERsido1") CELLPHONEsido1 = request("CELLPHONEsido1") MCDID4890 = request("MCDID4890") STAGEtayo1 = request("STAGEtayo1") READSTAGEtayo1 = request("READSTAGEtayo1") DISCHARGEtayo1 = request("DISCHARGEtayo1") CRESTSTAGEtayo1 = request("CRESTSTAGEtayo1") TIMINGtayo1 = request("TIMINGtayo1") CARETAKERtayo1 = request("CARETAKERtayo1") CELLPHONEtayo1 = request("CELLPHONEtayo1") MCDIDNA = request("MCDIDNA") STAGEtipo1 = request("STAGEtipo1") READSTAGEtipo1 = request("READSTAGEtipo1") DISCHARGEtipo1 = request("DISCHARGEtipo1") CRESTSTAGEtipo1 = request("CRESTSTAGEtipo1") TIMINGtipo1 = request("TIMINGtipo1") CARETAKERtipo1 = request("CARETAKERtipo1") CELLPHONEtipo1 = request("CELLPHONEtipo1") MCDID4900 = request("MCDID4900") STAGEtryo1 = request("STAGEtryo1") READSTAGEtryo1 = request("READSTAGEtryo1") DISCHARGEtryo1 = request("DISCHARGEtryo1") CRESTSTAGEtryo1 = request("CRESTSTAGEtryo1") TIMINGtryo1 = request("TIMINGtryo1") CARETAKERtryo1 = request("CARETAKERtryo1") CELLPHONEtryo1 = request("CELLPHONEtryo1") MCDIDNA = request("MCDIDNA") STAGEwesco1 = request("STAGEwesco1") READSTAGEwesco1 = request("READSTAGEwesco1") DISCHARGEwesco1 = request("DISCHARGEwesco1") CRESTSTAGEwesco1 = request("CRESTSTAGEwesco1") TIMINGwesco1 = request("TIMINGwesco1") CARETAKERwesco1 = request("CARETAKERwesco1") CELLPHONEwesco1 = request("CELLPHONEwesco1") CELLPHONE4850 = request("CELLPHONE4850") MADPETEAVG = request("MADPETEAVG") MADPETNAVG = request("MADPETNAVG") UPPERGREATMIMAIPETEAVG = request("UPPERGREATMIMAIPETEAVG") UPPERGREATMIMAIPETNAVG = request("UPPERGREATMIMAIPETNAVG") MIDDLEGMRPETEAVG = request("MIDDLEGMRPETEAVG") MIDDLEGMRPETNAVG = request("MIDDLEGMRPETNAVG") LOWERGREATPETEAVG = request("LOWERGREATPETEAVG") LOWERGREATPETNAVG = request("LOWERGREATPETNAVG") STILLWATERPETEAVG = request("STILLWATERPETEAVG") STILLWATERPETNAVG = request("STILLWATERPETNAVG") TWINCREEKPETEAVG = request("TWINCREEKPETEAVG") TWINCREEKPETNAVG = request("TWINCREEKPETNAVG") HIGHESTPETE = request("HIGHESTPETE") HIGESTPETN = request("HIGESTPETN") BSNAVGPETE = request("BSNAVGPETE") BSNAVGPETN = request("BSNAVGPETN") FIELDOP = request("FIELDOP") FIELDOPNUMBER = request("FIELDOPNUMBER") HYDROLOGIST = request("HYDROLOGIST") HYDROLOGISTNUMBER = request("HYDROLOGISTNUMBER") NOTES = request("NOTES") THEFORECAST = request("THEFORECAST") SPECIALISSUES = request("SPECIALISSUES")