2012-05-30 15 views
6

का उपयोग कर एक टेक्स्ट फ़ाइल का टाइमस्टैम्प कैसे जांचें मैं एक्सेल 2003 वीबीए (विंडोज एक्सपी) में एक कोड लिखने की कोशिश कर रहा हूं यह पता लगाने के लिए कि बाहरी TXT फ़ाइल के पास अलग-अलग टाइमस्टैम्प है या नहीं, इसलिए यदि यह बदल गया तो मैं इसे 'आयात' कर सकता हूं ।वीबीए

क्या वीबीए में कोई कार्य है जो मुझे बचा सकता है?

+0

हाँ वहाँ :) BTW जो टाइमस्टैम्प के बारे में हम बात कर रहे हैं रहा है? तिथि या संशोधित तिथि बनाई गई? –

उत्तर

10

मुझे लगता है कि आप संशोधित दिनांक चाहते हैं। यदि हां, तो यह

Debug.Print FileDateTime("C:\Sample.txt") 

प्रदर्शित दिनांक और समय का प्रारूप आपके सिस्टम की लोकेल सेटिंग्स पर आधारित है।

संपादित

का उपयोग FileSystemObject

Option Explicit 

Sub Sample() 
    Dim oFS As Object 
    Dim sFile As String 

    sFile = "C:\MyFile.txt" 

    Set oFS = CreateObject("Scripting.FileSystemObject") 

    '~~> Created Date 
    Debug.Print "Created Date : "; oFS.GetFile(sFile).DateCreated 

    '~~> Modified Date 
    Debug.Print "Modified Date : "; oFS.GetFile(sFile).Datelastmodified 

    Set oFS = Nothing 
End Sub 
+0

हां, यह समाधान है, धन्यवाद :) – MrB

+0

@Bojan, कृपया उत्तर को हल करें के रूप में चिह्नित करें। – Reafidy