Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Удаление файла в VBScripte

2.3K
11 сентября 2003 года
goodstas
28 / / 06.08.2003
Я пытаюсь удалить файл, пользуясь следующим кодом,
который я засунул в file.asp и запускаю его в IE из под IIS , но почему то сраничка как будто зависает и ничего не происходит(она как бы грузиться и грузиться ...).
Вопрос в том как удалять , копировать файлы на сервере использую VBScript?

Код (создаёт и удаляет) :
dim filesys, demofile
set filesys = CreateObject"Scripting.FileSystemObject")

set demofile = filesys.CreateTextFile ("c:\somefile.txt", true)

set demofile = filesys.GetFile("c:\somefile.txt")

demofile.Delete
%>

Взято с сайта: http://www.nbu.bg/webstudio/spraw4nici/VBScript/
250
11 сентября 2003 года
Joker
1.4K / / 20.02.2000
Цитата:
Originally posted by goodstas
Я пытаюсь удалить файл, пользуясь следующим кодом,
который я засунул в file.asp и запускаю его в IE из под IIS , но почему то сраничка как будто зависает и ничего не происходит(она как бы грузиться и грузиться ...).
Вопрос в том как удалять , копировать файлы на сервере использую VBScript?

Код (создаёт и удаляет) :
dim filesys, demofile
set filesys = CreateObject"Scripting.FileSystemObject")

set demofile = filesys.CreateTextFile ("c:\somefile.txt", true)

set demofile = filesys.GetFile("c:\somefile.txt")

demofile.Delete
%>

Взято с сайта: http://www.nbu.bg/webstudio/spraw4nici/VBScript/



http://design-planet.narod.ru/language/vbscript/6.htm

На вб не писал ни разу но вот еще что:

set filesys = CreateObject"Scripting.FileSystemObject")
небольшая опечаточка думую так:
set filesys = CreateObject("Scripting.FileSystemObject")

4.2K
12 сентября 2003 года
PIGorS
11 / / 10.09.2003
Привет!

Точно тебе говорю, сам так делаю:
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile Request.ServerVariables("APPL_PHYSICAL_PATH") & "\file.txt", true

Игорь.
2.3K
12 сентября 2003 года
goodstas
28 / / 06.08.2003
Цитата:
Originally posted by PIGorS
Привет!

Точно тебе говорю, сам так делаю:
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFile Request.ServerVariables("APPL_PHYSICAL_PATH") & "\file.txt", true

Игорь.



1) Может где-нибудь запятую забыл или езчё чего-нибудь?
Там после Request.ServerVariables("APPL_PHYSICAL_PATH") ни надо ничего поставить?

2) Можно указывать относительный аддресс или нет?

Выдаёт ошибку :
Error Type:
Microsoft VBScript compilation (0x800A0401)
Expected end of statement
/file.asp, line 4, column 62
fso.DeleteFile Request.ServerVariables("APPL_PHYSICAL_PATH") "D:\Inetpub\wwwroot\myapp\UsersImages\PublishedPersonalImages\247.jpg", true

4.2K
12 сентября 2003 года
PIGorS
11 / / 10.09.2003
Цитата:
Originally posted by goodstas


1) Может где-нибудь запятую забыл или езчё чего-нибудь?
Там после Request.ServerVariables("APPL_PHYSICAL_PATH") ни надо ничего поставить?

2) Можно указывать относительный аддресс или нет?

Выдаёт ошибку :
Error Type:
Microsoft VBScript compilation (0x800A0401)
Expected end of statement
/file.asp, line 4, column 62
fso.DeleteFile Request.ServerVariables("APPL_PHYSICAL_PATH") "D:\Inetpub\wwwroot\myapp\UsersImages\PublishedPersonalImages\247.jpg", true



Путь только полный.
После Request.ServerVariables("APPL_PHYSICAL_PATH") в примере стоит амперсанд :), которого в твоем вопросе нет :(

Ты хоть из какого города?

2.3K
12 сентября 2003 года
goodstas
28 / / 06.08.2003
Цитата:
Originally posted by PIGorS


Путь только полный.
После Request.ServerVariables("APPL_PHYSICAL_PATH") в примере стоит амперсанд :), которого в твоем вопросе нет :(

Ты хоть из какого города?



Я пробовал и с & и без.
В первом случае он грузит страничку .... и в какой-то момент останавливаеться на полпути и ничего не происходит(файл не удаляеться).
Во втором происходит ошибка, о которой я написал.

2.3K
13 сентября 2003 года
goodstas
28 / / 06.08.2003
Может надо какие-то дать разрешения в IIS,
хотя вроде всё что можно было для скриптов я разрешил ....

Пишите пожалуйста работающие варианты (которые у вас работают), потому что уже пробовали всякие способы с разных сайтов.
2.3K
14 сентября 2003 года
goodstas
28 / / 06.08.2003
Цитата:
Originally posted by goodstas
Может надо какие-то дать разрешения в IIS,
хотя вроде всё что можно было для скриптов я разрешил ....

Пишите пожалуйста работающие варианты (которые у вас работают), потому что уже пробовали всякие способы с разных сайтов.



Как ни странно , но проблема оказалась в Norton Antivirus. Надо было только отключить опцию
"Script Blocking". Но скорей - это частное решение проблемы ...

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог