vbscript : unexpected identifier -

मेरे कोड में मुझे निम्न त्रुटि संदेश मिलता है

c: \ dpdata_copy2.vbs ( 114,13) माइक्रोसॉफ्ट VBScript संकलन त्रुटि: अपेक्षित पहचानकर्ता

पंक्ति को 114 अंकों को एक रिक्त पंक्ति में दिया जाता है इसलिए मैं यह मानता हूं कि यह एक त्रुटि निम्न पंक्ति पर फेंक रहा था:

 < कोड> अंतिमप्रॉप = f.DateLastModified  

कोड में

  strComputer = "।" सेट objWMIService = GetObject ( "winmgmts: \\" & amp; strComputer & amp; "\ जड़ \ cimv2") strFolderName = 'डी: \ 1 \ उत्पादन \ Openjobs "= objWMIService.ExecQuery _ (सेट colSubfolders की" Associators {Win32_Directory.Name = '' & amp; strFolderName & amp; " '}" _ & amp; "कहाँ AssocClass = Win32_Subdirectory" _ & amp; "ResultRole = PartComponent" पिछले पहुँचा संपत्ति मंद एफएस, च सेट FS = CreateObject प्राप्त करने के लिए)' चर ( "Scripting.FileSystemObject ") colSubfolders में प्रत्येक objFolder के लिए 'अंतिम बार संशोधित हो तिथि सेट च = fs.GetFolder (objFolder.Name) Lastprop = f.DateLastModified' MsgBox (Lastprop) अगर (DateDiff (" m "f.DateLastModified, अब ()) & gt ; 4) तो diffindates = DateDiff ( "m" f.DateLastModified, अब ()) सेट objShell = CreateObject ( "Shell.Application") सेट objCopyFolder = objShell.NameSpace (parentFolder) OutputToLog ( "रेम" & amp; f.DateLastModified & Amp; ":" & a एमपी; objFolder.Name) outputtolog ( "चाल / वाई" "" & amp; objFolder.Name & amp; "" "" & amp; parentFolder) wscript.echo (diffindates & amp; ":" & amp; objFolder.Name & amp; vbCr) खत्म करता है, तो अगला  

कोई भी विचार? या क्या मुझे पूरी लिपि को पोस्ट करना चाहिए?

क्या आप इसे विंडोज स्क्रिप्टिंग होस्ट का प्रयोग कर रहे हैं? यदि हां, तो जोड़ने // डी CSCRIPT या WScript के लिए एक पैरामीटर डिबग मोड सकता है जो आपको ढेर के माध्यम से जाने को सक्रिय करने और दृश्य स्टूडियो में सभी चर आदि या किसी विंडोज़ स्क्रिप्ट डीबगर आप स्थापित किया है। देखने पर के रूप में