Jump to content
  • 0

Не работает скрипт


SergeyKorotun
 Share

Question

Запускаю скрипт.. выводит сообщение "привет", а потом - синтаксическую ошибку.. вот собственно листинг:

[list]
function driveInfo(dpath) {
var fso=ActiveXObject("Scripting.FileSystemObject")
var disk=fso.GetDriveName(dpath)
var dinfo=new Array(7)
if (fso.DriveExists(disk)) {
var d=fso.GetDrive(disk)
dinfo[0]=d.DriveLetter
dinfo[l]=d.IsReady
dinfo[2]=d.DriveType
if (d.IsReady) {
dinfo[3]= d.VolumeName
dinfo[4]= d.SerialNumber
dinfo[5]= d.TotalSize
dinfo[6]= d.FreeSpace
}
}
return dinfo
}


WScript.echo("Привет!")

WScript.Echo(driveInfo("A"))
WScript.Echo(driveInfo("C"))
WScript.Echo(driveInfo("D") )
WScript.Echo(driveInfo("E") )
WScript.Echo(driveInfo("C:\\Мои документы"))
var x=driveInfo("C")
WScript.Echo("Свободно: "+x[5])
[/list]

Link to comment
Share on other sites

3 answers to this question

Recommended Posts

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue. See more about our Guidelines and Privacy Policy