海鷗航際

在Oracle9i中, SQL*Plus現(xiàn)在不僅能接受文件名當(dāng)作腳本地址，還可以接受HTTP或是FTP地址當(dāng)作腳本地址來(lái)源。舉例來(lái)說(shuō)，通過(guò)“@http://www.mycorp.com/sql/setup.sql”這條命令就可以從這個(gè)網(wǎng)址裝載SQL腳本，然后在當(dāng)前的運(yùn)行環(huán)境下運(yùn)行。而“@@”命令能知道它當(dāng)前正在從一個(gè)URL上運(yùn)行，所以會(huì)從相同的位置裝載腳本。舉例來(lái)說(shuō)，如果上述裝載的腳本包含以下代碼的話，那么每個(gè)SQL腳本將根據(jù)給定的URL被裝載。

REM - setup script
@@tables.sql
@@indexes.sql
@@code.sql

有些DBA希望集中維護(hù)位于一個(gè)遠(yuǎn)程位置并且可以被不同位置的數(shù)據(jù)庫(kù)執(zhí)行的腳本，這對(duì)于他們來(lái)說(shuō)是有價(jià)值的。這對(duì)于那些因沒(méi)有SQL*Net而不能連接數(shù)據(jù)庫(kù)，但能通過(guò)HTTP使用腳本的客戶是特別有用的。

通過(guò)HTTP協(xié)議，腳本可以根據(jù)Web服務(wù)器的輸入?yún)?shù)產(chǎn)生。舉例來(lái)說(shuō)，http://www.mycorp.com/cgi-bin/setup.pl?host=bart就將參數(shù)host=bart傳遞給CGI-BIN腳本。SQL *Plus有其單獨(dú)的參數(shù)傳遞工具。

在腳本被裝載之后，這些參數(shù)被綁定起來(lái)用于定義參數(shù)。命令@@tables.sql mytablespace將從相同的相關(guān)目錄裝載“tables.sql”這個(gè)腳本，然后mytablespace 將被綁定到SQL * Plus的&1參數(shù)上。 對(duì)于@URL在功能上有一個(gè)差別，那就是.sql擴(kuò)展是不可選擇的

在Oracle8i中模擬@URL

這個(gè)特征的一個(gè)缺點(diǎn)就是他好像不支持HTTP代理。腳本只有通過(guò)直接的連接才能夠被裝載。在Oracle8i中的一個(gè)變通的通過(guò)使用代理進(jìn)入或者是模擬這個(gè)功能實(shí)現(xiàn)的腳本如下：

REM -- http_at.sql
set feedback off
set linesize 255
set serveroutput on size 64000
set trimspool on
spool test.sql
declare
    l_pieces utl_http.html_pieces;
    l_piece     varchar2(2000);
    l_url varchar2(2048) := '&1';
    l_maxline integer := 255;
    l_index integer;
    l_stub      varchar2(255);
    l_proxy varchar2(2048) := 'proxy.mycomp.com:8000';
begin
    l_pieces := utl_http.request_pieces(l_url,1000,l_proxy);
    for i in l_pieces.first .. l_pieces.last loop
        l_piece := l_pieces(i);
        while length(l_piece) > l_maxline loop
            l_stub := substr(l_piece,1,l_maxline);
            l_index := length(l_stub);
            while l_index > 0 and substr(l_stub,l_index,1) != chr(10) loop
                l_index := l_index - 1;
            end loop;
            l_stub := substr(l_piece,1,l_index-1);
            l_piece := substr(l_piece,l_index+1);
            dbms_output.put_line(l_stub);
        end loop;
        dbms_output.put_line(l_piece);
    end loop;
end;
/
spool off;