Любой язык

Iska · Отправлено: **21:06, 31-10-2012** | #2

Цитата neprotiv:

(\)(.){1,}[^\(](.){1,}[^\(]\)) »

Точнее укажите, что именно Вам нужно получить. Ибо, судя по лишним скобкам, вам нужно не только найти, но и извлечь части имени (для дальнейшей работы?).

neprotiv · Отправлено: **22:30, 01-11-2012** | #3

мне нужно найти неправильные имена файлов, тоесть если файл содержит лишнюю скобу - либо ( либо )
нашел примерный выход таким образом
(\)+[^\(]+[^\(]\)|\(+[^\)]+[^\)]\()
но оно ненаходит если файл выглядит так (лишняя скобка стоит очень близко с другой)
слово1_-_слово2-(50505050)-(слово4-слово5-слово6

Iska · Отправлено: **04:19, 02-11-2012** | #4

neprotiv, если нужно просто найти файлы с потерянной скобкой — regexp не обязателен, достаточно просто посчитать количество открывающих и закрывающих скобок, затем сравнить эти количества.

Пример на WSH:

Код:

Option Explicit

Dim strFolder
Dim objFile


'strFolder = WScript.Arguments.Item(0)
strFolder = "E:\Песочница\0197"

With WScript.CreateObject("Scripting.FileSystemObject")
	If .FolderExists(strFolder) Then
		For Each objFile In .GetFolder(strFolder).Files
			If UBound(Split(objFile.Name, "(")) <> UBound(Split(objFile.Name, ")")) Then
				WScript.Echo objFile.Name
			End If
		Next
	Else
		WScript.Echo "Folder [" & strFolder & "] not found"
	End If
End With

WScript.Quit 0

↧ Возможный результат ↧

Цитата neprotiv:

если файл содержит лишнюю скобу - либо ( либо ( »

«либо ( либо (» — оригинально

. Очевидно, имелось в виду «Либо «(», либо «)»»?

neprotiv · Отправлено: **13:51, 02-11-2012** | #5

большое спасибо

Цитата Iska:

«либо ( либо (» — оригинально . Очевидно, имелось в виду «Либо «(», либо «)»»? »

да))...опечатка

Iska · Отправлено: **15:34, 02-11-2012** | #6

neprotiv, это именно то, что было потребно Вам?

neprotiv · Отправлено: **22:53, 05-11-2012** | #7

да то только вот никак не пойму как прикрутить к тотал командеру и вообще как он работает (скрипт)

Iska · Отправлено: **23:19, 05-11-2012** | #8

Цитата neprotiv:

да то только вот никак не пойму как прикрутить к тотал командеру »

Это зависит от того, что Вы хотели бы получить в нём.

Цитата neprotiv:

и вообще как он работает (скрипт) »

Для указанной папки:

Код:

strFolder = "E:\Песочница\0197"

скрипт перебирает все файлы. Имя каждого файла, представляющее собой строку символов, разбивается в массив, сначала по символу открывающей скобки, затем — закрывающей. Для каждого из двух полученных массивов получается значение верхней границы. Если полученные значения не равны — значит количество отрывающих и закрывающих скобок не одинаково.

Код:

If UBound(Split(objFile.Name, "(")) <> UBound(Split(objFile.Name, ")")) Then

neprotiv · Отправлено: **23:36, 05-11-2012** | #9

мне надо чтоб он создал список файлов с полным путем
можно ли использовать его как кнопку?

Iska · Отправлено: **00:21, 06-11-2012** | #10

1. В каком виде Вам нужен список файлов? В виде текстового файла? В виде сообщения?
2. Каких именно файлов? Из выделенных на панели?