Форумы

Серверы Counter-Strike :: Форумы :: Программирование :: SQL
 
Разные процедурки PL/SQL
Модераторы: kapitowka, A1exseder, McNamara, HuKuToC, Jake_One, Meranpocynep6om, Chaos2Order, FizZ
Автор Добавил
detur
07.09.2010, 11:21
Даже мартышки играют в CS



A Hax MHe team?


ID пользователя #963
Зарегистрирован: 09.05.2009, 14:04

Сообщений: 1309
Отблагодарен: 67 раза в 58 сообщениях
Репутация: 52
Репутация темы: 0 из 0 голосов

Загрузка файлов с ftp.

  1. PROCEDURE GET_ASCII_FTP(
  2.               P_FILE_NAME IN VARCHAR2, -- Входящие параменры
  3.  
  4.               P_FTP_HOST  IN VARCHAR2,
  5.               P_FTP_PORT  IN VARCHAR2,
  6.               P_FTP_LOGIN IN VARCHAR2,
  7.               P_FTP_PASS  IN VARCHAR2,
  8.               P_FTP_DIR   IN VARCHAR2
  9. )
  10. IS
  11.   l_conn  UTL_TCP.connection;
  12. BEGIN
  13.   l_conn := ftp.login(P_FTP_HOST, P_FTP_PORT, P_FTP_LOGIN, P_FTP_PASS);
  14.   ftp.ASCII(p_conn => l_conn);
  15.   ftp.GET(p_conn      => l_conn,
  16.           p_from_file => P_FILE_NAME,
  17.           p_to_dir    => 'AGENTBOINCOME', -- Пседоним директории
  18.           p_to_file   => SUBSTR(P_FILE_NAME,LENGTH(P_FTP_DIR)+1,LENGTH(P_FILE_NAME))
  19.           );
  20.   ftp.logout(l_conn);
  21.   EXCEPTION
  22.     WHEN OTHERS THEN
  23.     ftp.logout(l_conn);
  24.     /* CODE EXEPTION*/
  25. END GET_ASCII_FTP;


Выгрузка файлов на ftp.
  1. PROCEDURE PUT_ASCII_FTP (P_FILE_NAME IN VARCHAR2)
  2. IS
  3.   l_conn  UTL_TCP.connection;
  4.    
  5.   vFTP_HOST     VARCHAR2(20);
  6.   vFTP_PORT     VARCHAR2(5);
  7.   vFTP_LOGIN    VARCHAR2 (20);
  8.   vFTP_PASS     VARCHAR2 (20);
  9.   vFTP_ErrPath  VARCHAR2 (150);
  10. BEGIN
  11.   -- Загрузка переменных
  12.   vFTP_HOST :=GENERAL.GET_PARAM_FROM_VAR('ftp_host');
  13.   VFTP_PORT :=GENERAL.GET_PARAM_FROM_VAR('ftp_port');
  14.   VFTP_LOGIN:=GENERAL.GET_PARAM_FROM_VAR('ftp_login');
  15.   VFTP_PASS :=GENERAL.GET_PARAM_FROM_VAR('ftp_pass');
  16.   vFTP_ErrPath:=GENERAL.GET_PARAM_FROM_VAR('ftp_err_path');
  17.  
  18.   l_conn := ftp.login(vFTP_HOST,vFTP_PORT, vFTP_LOGIN, vFTP_PASS);
  19.   ftp.ASCII(p_conn => l_conn);
  20.   ftp.put(p_conn      => l_conn,
  21.           p_from_dir => 'AGENTBOINCOME', -- Локальная директория
  22.           p_from_file    => P_FILE_NAME,
  23.           p_to_file   => vFTP_ErrPath||'Err_'||SUBSTR(P_FILE_NAME,2,(LENGTH(P_FILE_NAME)-1))
  24.           );
  25.   ftp.logout(l_conn);
  26.   EXCEPTION
  27.     WHEN OTHERS THEN
  28.     ftp.logout(l_conn);
  29.     -- CODE EXEPTION
  30.     RAISE;
  31. END PUT_ASCII_FTP;
  32.  





Наверх
Сообщение отблагодарили: 1 раз(а)
kapitowka
08.09.2010, 10:36
FreeBSD The Power To Serve

статус Skype
STEAM_0:0:34602107

[RAT]


ID пользователя #1
Зарегистрирован: 01.01.1970, 03:00

Сообщений: 3361
Отблагодарен: 255 раза в 192 сообщениях
Репутация: 64

Кстати, это можно использовать для проверки существования папки. Пытаться залить туда чё нить и если вылетает экзепшн - значит папки нету. Через одно место конечно, но работать должно



[ Редактирование 08.09.2010, 10:37 ]


-------------------------------------------------------
Правила сервера

Банлист
Наверх
Сайт
Agnet*
14.06.2012, 13:54
Lineage Admin

633521

Lineage Admin


ID пользователя #363
Зарегистрирован: 25.02.2008, 11:37

Сообщений: 151
Отблагодарен: 12 раза в 10 сообщениях
Репутация: 1

а ни у кого не завалялся скриптик для загрузки выгрузки ексель файлов в маську?)






Странно ...
Наверх
kapitowka
15.06.2012, 05:40
FreeBSD The Power To Serve

статус Skype
STEAM_0:0:34602107

[RAT]


ID пользователя #1
Зарегистрирован: 01.01.1970, 03:00

Сообщений: 3361
Отблагодарен: 255 раза в 192 сообщениях
Репутация: 64

Agnet* написал(а) ...

а ни у кого не завалялся скриптик для загрузки выгрузки ексель файлов в маську?)

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




-------------------------------------------------------
Правила сервера

Банлист
Наверх
Сайт
Agnet*
15.06.2012, 11:21
Lineage Admin

633521

Lineage Admin


ID пользователя #363
Зарегистрирован: 25.02.2008, 11:37

Сообщений: 151
Отблагодарен: 12 раза в 10 сообщениях
Репутация: 1

ну так то да, если мне удастся вытянуть со старого движка, то там вообще шикарный, импортирует цсв,икслс и дбф)






Странно ...
Наверх
 

Перейти:     Наверх

Транслировать сообщения этой темы: rss 0.92 Транслировать сообщения этой темы: rss 2.0 Транслировать сообщения этой темы: RDF
Powered by e107 Forum System