Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

MyDC.ru _ Kорзина _ Управление Текстовыми Файлами

Автор: Infernus-pro 23.8.2008, 16:39

Подскажите пожалуйста можно ли как в YnHub'e редактировать/добавлять текстовые файлы Админу/Оператору, не используя Птоху? Есть ли такой скрипт??

Автор: Infernus-pro 24.8.2008, 8:59

Никто не знает? Очень нужен просто... :(

Автор: Infernus-pro 25.8.2008, 9:31

Цитата

ЭТО Для ПТОКИ а не для ЯНХАБА

Не совсем понял о чем ты, мне нужен скрипт для PtokaX 0.4.1.1 позволяющий редактировать то что находиться в папке text, просто я хаб отдаю на выделенный сервак соотвественно мне нужен доступ,чтобы можно было редактировать и добавлять Текст.

Автор: Wariner 25.8.2008, 9:35

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

Автор: Infernus-pro 25.8.2008, 17:47

Просто скрипт для удобства хотелось, значит не вариант будем по удаленному доступу...

Автор: DEM0N 25.8.2008, 18:04

неслушайте нельсона я с ним в 1м городе живу он выражаться правильно неумеет насчёт текстовых документов создавать в папке файл с названием например abc в хабе пиши !abc и будет светиться то шо тама писал или ето нето? =)

Автор: Setuper 25.8.2008, 18:36

CODE

function ChatArrival(tUser,sData)
	sData=sData:sub(string.len(tUser.sNick)+4,-2)
	local _,_,sCmd,sArg=string.find(sData,"^[+!/](%S+)(.*)$")
	if sCmd and sArg then
		if sCmd=="changetxt" then
			local _,_,hFile=string.find(sArg,"^%s+(%S+)")
			if hFile then
				local file=io.open("texts\\"..hFile,"w")
				if file then
					local _,_,sText=string.find(sArg,"^%s+%S+%s+(.*)")
					if sText then
						file:write(tostring(sText))
					end
					file:flush()
					file:close()
					Core.SendToUser(tUser,"*** Операция выполнена")
				else
					Core.SendToUser(tUser,"*** Не найден файл: 'texts\\"..hFile.."'")
				end
			else
				Core.SendToUser(tUser,"*** Не указано название файла. Используйте команду: +changetxt [имя_файла] [текст]. Например так: +changetxt test.txt Hello world!")
			end
			return true
		elseif sCmd=="addtxt" then
			local _,_,hFile=string.find(sArg,"^%s+(%S+)")
			if hFile then
				local file=io.open("texts\\"..hFile,"a+")
				if file then
					local _,_,sText=string.find(sArg,"^%s+%S+%s+(.*)")
					if sText then
						file:write(tostring(sText))
					end
					file:flush()
					file:close()
					Core.SendToUser(tUser,"*** Операция выполнена")
				else
					Core.SendToUser(tUser,"*** Не найден файл: 'texts\\"..hFile.."'")
				end
			else
				Core.SendToUser(tUser,"*** Не указано название файла. Используйте команду: +addtxt [имя_файла] [текст]. Например так: +addtxt test.txt Hello world!")
			end
			return true
		elseif sCmd=="deletetxt" then
			local _,_,hFile=string.find(sArg,"^%s+(%S+)")
			if hFile then
				os.execute("del texts\\"..hFile)
				Core.SendToUser(tUser,"*** Операция выполнена")
			else
				Core.SendToUser(tUser,"*** Не указано название файла. Используйте команду: +deletetxt [имя_файла]. Например так: +deletetxt test.txt")
			end
			return true
		end
	end
end

Автор: Infernus-pro 26.8.2008, 9:43

Цитата

насчёт текстовых документов создавать в папке файл с названием например abc в хабе пиши !abc и будет светиться то шо тама писал или ето нето? =)

Да то

только нужно редактировать удаленно
Setuper, спасибо большое за скрипт, но он неможет найти файл:

Цитата

[12:38:51] *** Не найден файл: 'texts\gta.txt'
[12:39:16] *** Не найден файл: 'texts\reclama.txt

'
PtokaX 0.4.1.1

Автор: Setuper 26.8.2008, 10:34

не знаю с чем это может быть связано, у меня все прекрасно работает!
попробуй прописать полный путь до папки texts

Код

string.gsub(Core.GetPtokaXPath(),"/","\\").."\\texts\\"

Автор: Infernus-pro 26.8.2008, 11:14

Пробывал даже на Птохе 0.4.0.0.

Автор: Sephiroth_Lukaw 26.8.2008, 15:15

У меня тоже работает. Сколько бы ни старался указать не существующий файл на удаление или изменение он пишет -- "Операция Выполнена" -)
Не сочтите за дерзость, но ошибка "Не найден файл:" возникла только после того как я переименовал папку из "texts" в "text"

Автор: Setuper 26.8.2008, 15:50

Скрипт работает исключительно с папкой texts !!!

Пояснения:

1. Команда "+changetxt [имя_файла] [текст]" - изменяет содержимое файла, то есть полностью заменяет содержимое файла на [текст]
Примечание: Если файла с указанным именем нет, то он автоматически создается! Если параметр [текст] отсутствует, то файл становится пустым.

2. Команда "+addtxt [имя_файла] [текст]" - добавляет к содержимому файла, то есть после содержимого файла дописывает [текст]
Примечание: Если файла с указанным именем нет, то он автоматически создается! Если параметр [текст] отсутствует, то в файл ничего не добавляется.

3. Команда "+deletetxt [имя_файла]" - удаляет указанный файл.
Примечание: Данная команда выполняется всегда, даже если файла с указанным именем нет.

Автор: Infernus-pro 26.8.2008, 19:25

Тогда хз почему у меня не работает...Пробывал удалить файл пишет что Операция выполнена но не удаляет

Автор: Setuper 26.8.2008, 22:36

Я давно уже заметил, что у тебя все криво работает (обсуждал уже в теме Regme)

Автор: Infernus-pro 27.8.2008, 6:04

Цитата

Я давно уже заметил, что у тебя все криво работает (обсуждал уже в теме Regme)

Нет почему остальное все работает, кроме RegMe так и неполучилось разобраться, и с тем скриптом по текстовым файлам что ты дал

, придеться использовать удаленное подключение к их компу

Автор: Артём 12.1.2009, 22:52

Я так понял что меню не прилогаетса...

Автор: fixx 13.1.2009, 10:27

Да, теперь, по всей видимости, нужен скрипт по автоматическому созданию менюшек?