Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Обрезать строку до указанного символа

Ответить
Настройки темы
[решено] Обрезать строку до указанного символа

Новый участник


Сообщения: 9
Благодарности: 0

Профиль | Отправить PM | Цитировать


Имеется файл вида:

61.172.246.180:80
61.172.249.94:80
61.172.249.96:80
62.233.138.180:3128
66.98.212.79:8888


Хотелось бы получить 2 файла

Первый:
61.172.246.180
61.172.249.94
61.172.249.96
62.233.138.180
66.98.212.79

Второй:
80
80
80
3128
8888


То есть необходима функция обрезающая строку до указанного символа ":" с левой стороны затем с правой..
Буду рад любой помощи..

Отправлено: 15:08, 25-09-2009

 

Аватара для Frost_Imp

Пользователь


Сообщения: 53
Благодарности: 0

Профиль | Отправить PM | Цитировать


мммм, вставить в эксель и сделать "текст по столбцам"
Руками или средствами AutoIt - дело вкуса)

Отправлено: 15:19, 25-09-2009 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Аватара для Creat0R

Must AutoIt


Сообщения: 3054
Благодарности: 1009

Профиль | Сайт | Отправить PM | Цитировать


Цитата rimm:
необходима функция обрезающая строку до указанного символа ":" с левой стороны затем с правой »
Причём у каждой строки, вот пример с использованием StringRegExp:

Код: Выделить весь код
$sInFile = @ScriptDir & "\File.txt"
$sOutFile_IPs = @ScriptDir & "\IPs.txt"
$sOutFile_Ports = @ScriptDir & "\Ports.txt"

$sReadFile = FileRead($sInFile)
$aRet = StringRegExp($sReadFile, '((?:[0-9]{1,3}\.?){4}):([0-9]{1,4})', 3)

$sOutFile_IPs_Content = ""
$sOutFile_Ports_Content = ""

For $i = 0 To UBound($aRet)-1
    If Mod($i, 2) = 0 Then ;Чётное число (или 0), пишем IP'шки
        $sOutFile_IPs_Content &= $aRet[$i] & @CRLF
    Else ;Иначе пишем порты
        $sOutFile_Ports_Content &= $aRet[$i] & @CRLF
    EndIf
Next

$hFile = FileOpen($sOutFile_IPs, 2)
FileWrite($hFile, $sOutFile_IPs_Content)
FileClose($hFile)

$hFile = FileOpen($sOutFile_Ports, 2)
FileWrite($hFile, $sOutFile_Ports_Content)
FileClose($hFile)
Цитата Frost_Imp:
вставить в эксель и сделать "текст по столбцам" »
Такие советы лучше не озвучивать, они бессмыслены.

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community

Это сообщение посчитали полезным следующие участники:

Отправлено: 16:16, 25-09-2009 | #3


Аватара для Stomper

Новый участник


Сообщения: 3
Благодарности: 2

Профиль | Отправить PM | Цитировать


Думаю, из файла сами считаете... так же как и положите. Или посмотрите примеры. Берем адрес и порт из строки таким образом:

Код: Выделить весь код
  $s="61.172.246.180:80"
  $pos=StringInStr($s,":")
  MsgBox(0,"",StringLeft($s,$pos-1));
  MsgBox(0,"",StringMid($s,$pos+1,StringLen($s)-$pos))
Это сообщение посчитали полезным следующие участники:

Отправлено: 16:20, 25-09-2009 | #4


Аватара для kaster

Старожил


Сообщения: 367
Благодарности: 91

Профиль | Отправить PM | Цитировать


ну или
Код: Выделить весь код
$aLine = StringSplit($sLine, ':')
$sIP = $aLine[1]
$sPort = $aLine[2]

-------
Русское сообщество пользователей AutoIt
autoit@conference.jabber.ru - Конференция на jabber.ru

Это сообщение посчитали полезным следующие участники:

Отправлено: 16:28, 25-09-2009 | #5


Аватара для Stomper

Новый участник


Сообщения: 3
Благодарности: 2

Профиль | Отправить PM | Цитировать


kaster, оу Признаю, у вас красивее

Отправлено: 16:32, 25-09-2009 | #6



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Обрезать строку до указанного символа

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Удаление файлов из списка указанного в txt blacks2 Вебмастеру 28 02-09-2009 20:09
[решено] Как обрезать нижнюю часть MPEG файла? seman Видео и аудио: обработка и кодирование 31 20-08-2009 15:32
[решено] чем еще можно обрезать песню? Мартиша Хочу все знать 15 03-01-2009 11:55
Интерфейс - Нужен твик -убрать в проводнике "Избранные ссылки", адресную строку и строку поиска Mishechka Microsoft Windows Vista 18 16-09-2008 16:19
[решено] Замена символа в строке, по номеру [PERL] WestBronx Вебмастеру 1 22-03-2008 14:31




 
Переход