aLLigator
|
 Posted: Thu Dec 01, 2011 15:01 Post subject: |
 |
|
Можно как-нибудь в одну колонку выводить результат работы нескольких скриптов?
Добавлено спустя 10 минут:
| Anger wrote: | | Немного доработал скрипт ув.ricobautsch: |
Немного подредактировал под свои нужды:
| Code: |
const nCharStart = 24
const nCharCnt = 5
Set fso = CreateObject("Scripting.FileSystemObject")
Set oTextStream = fso.OpenTextFile(filename)
oTextStream.Skip(nCharStart)
If not oTextStream.AtEndOfStream Then
content_str = oTextStream.Read(nCharCnt)
content=Replace(content_str,Chr(0),Chr(1))
End If
oTextStream.Close
|
Подскажите как можно задать несколько промежутков? |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
