taravasya
|
 Posted: Sat Sep 18, 2010 08:39 Post subject: Вместо двоеточия знак ^ |
 |
|
Друзья! Просто нервов не хватает...
Мне нужен скрипт, по выполнению которого, тотал командер переходил бы в папку:
A:\Orders\Date
Date - всмысле в папку, текущего дня. Я создал вот такой скрипт:
| Code: | Dim TCS, strDayOfMonth, strMonth, strYear, YYYYMMDD
Set TCS = CreateObject("TCScript.Helper")
strDayOfMonth = right("0" & day(date()),2)
strMonth = right("0" & month(date()),2)
strYear = right (year(date()),4)
YYYYMMDD = strYear & "-" & strMonth & "-" & strDayOfMonth
TCS.SendCommand "cm_EditPath"
TCS.SendKeystroke "a:\order\" & YYYYMMDD
Set TCS = Nothing |
Пустая строка осталась для Enter. Всё прекрасно работает. Вид даты отформотировался правильно(так же как и в именах папок), но вот одна ерунда, просто ни в какую не работает.... Вместо двоеточия у меня забивается знак каретки ^. Что я только не перепробовал.... Подскажите от чего так происходит? Можно ли как то решить эту проблему? Или подскажите альтернативный вариан решения задачки.
У меня кстати есть альтернативый вариант, но его не получается осуществить ввиду моей необразованности....  Прежде чем начинать править алресную строку, можно было бы перейти в корневой каталог A:\Orders\, а уж потом заходить в папку с именем текущей даты. Но к сожалению, как я сказал выше у меня это не выходит...
Last edited by taravasya on Sat Sep 18, 2010 15:44; edited 1 time in total |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
