वीबीस्क्रिप्ट

Question

में लाइन द्वारा सीएसवी फाइल लाइन को कैसे पढ़ा जाए मैं एक एएसपी पेज का उपयोग कर रहा हूं जहां मुझे एक सीएसवी फ़ाइल पढ़नी है और इसे डीबी टेबल "कर्मचारी" में डालना है। मैं TestReader का एक वस्तु बना रहा हूँ। सीएसवी फ़ाइल की पंक्तियों/अभिलेखों की संख्या को निष्पादित करने के लिए मैं लूप कैसे लिख सकता हूं जिसे पढ़ा जा रहा है?

Answer 1

फ़ाइल को स्वयं पार्स करने का प्रयास न करें, आप केवल खुद को सिरदर्द देंगे। न्यूलाइन और कॉमा पर विभाजित होने से इसके लिए काफी कुछ है।

आप ओएलईडीबी का उपयोग किसी रिकॉर्डसेट में फ़ाइल खोलने के लिए कर सकते हैं और इसे डीबी टेबल के रूप में पढ़ सकते हैं। कुछ ऐसा:

Dim strConn, conn, rs 

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _ 
Server.MapPath("path to folder") & ";Extended Properties='text;HDR=Yes;FMT-Delimited';" 

Set conn = Server.CreateObject("ADODB.Connection") 
conn.Open strConn 

Set rs = Server.CreateObject("ADODB.recordset") 
rs.open "SELECT * FROM myfile.csv", conn 

while not rs.eof 
    ... 
    rs.movenext 
wend 

मेरा vbscript जंगली है, तो वाक्यविन्यास को सत्यापित करें।

संपादित करें: हार्पो की टिप्पणी फ़ील्ड परिभाषाओं के बारे में एक अच्छी बात लाती है। Schema.ini फ़ाइल को परिभाषित करने से आप अपेक्षित फ़ील्ड की संख्या और डेटाटाइप को परिभाषित कर सकते हैं। देखें: आप schema.ini फ़ाइल को परिभाषित करके इसे संभाल सकते हैं। देखें: http://msdn.microsoft.com/en-us/library/ms709353.aspx

Answer 2

क्यों सीएसवी डालें नहीं? उदाहरण के लिए:

SELECT * INTO MyTable FROM OPENDATASOURCE('Microsoft.JET.OLEDB.4.0', 
'Data Source=F:\MyDirectory;Extended Properties="text;HDR=No"')... 
[MyCsvFile#csv] 

से: http://coding.derkeiler.com/Archive/Delphi/borland.public.delphi.database.ado/2007-05/msg00057.html