Untitled

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include virtual="/OptimusSFA/connector/ConnessioneDBpt2.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>File Eurospin</title>
<link href="http://212.66.106.94/OptimusSFA/video.css" rel="stylesheet" type="text/css">
<script language="javascript" type="text/javascript" src="http://212.66.106.94/OptimusSFA/common/scripts.js"></script>

<script language="javascript" type="text/javascript" src="http://212.66.106.94/OptimusSFA/common/cpaint/cpaint2.inc.compressed.js"></script>
<script language="javascript" type="text/javascript" src="http://212.66.106.94/OptimusSFA/common/prototype.js"></script>
<script language="javascript" type="text/javascript" src="http://212.66.106.94/OptimusSFA/common/fat.js"></script>
<script language="javascript" type="text/javascript" src="http://212.66.106.94/OptimusSFA/common/sorttable.js"></script>

<script language="javascript" type="text/javascript">
<!--
var cal1 = new CalendarPopup();
var cal = new CalendarPopup("div_calendario");
cal.showYearNavigation();
// CPAINT vars
var response_box = '';
var cp = new cpaint();
//cp.set_debug(1);
cp.set_response_type('text');

function check_admin_form() {
    this_form = document.admin_form;
    error_msg = '';

    if (this_form.admin_agente.value == '') {
        error_msg = '- Codice agente mancante\n';
    }
    if (this_form.admin_data_inizio.value == '') {
        error_msg += '- Data di inizio mancante\n';
    }
    if (this_form.admin_data_fine.value == '') {
        error_msg += '- Data di fine mancante\n';
    }

    if (error_msg == '') { wait_image(); $('admin_filtra_btn').disabled = true; return true; } else { alert ('Si sono verificati queste errori:\n\n' + error_msg); return false; }
}


function check_search_form() {
    if ($('cerca_testo').value == '' || $('data_inizio').value == '' || $('data_fine').value == '') {
        alert ('Devi inserire il testo da cercare e l\'intervallo delle date!');
        return false;
    } else {
        Element.show('boxAttendere');
        Element.hide('cerca_btn');
        return true;
    }
}


function forza_ricerca() {
    $('data_inizio').value = '%';
    $('data_fine').value = '%';
    Element.show('boxAttendere');
    //Element.hide('cerca_btn');
    document.getElementById('cerca_form').submit();

}


function wait_image() {
    Element.show('boxAttendere');
    Element.hide('cerca_btn');
}


function ajax_admin_filter() {
    cp.call('lista-ajax.asp', 'mostra_filtro_admin', 'ajax_response', user_name);
}


function ajax_response(result) {
    document.getElementById(response_box).innerHTML = result;
}

// Popup menu
var pos_left = 0;
var pos_top = 0;

function show_menu(menu_name) {
    //alert ('Left: ' + pos_left + '\nTop: ' + pos_top);
    $(menu_name).style.left = pos_left + 'px';
    $(menu_name).style.top = pos_top + 'px';
    Element.toggle(menu_name);
}

function showPosition(e) {
    pos_left = Event.pointerX(e);
    pos_top = Event.pointerY(e);
}

Event.observe(document, "mousedown", showPosition, false);


// Funzioni AJAX di prototype
function ajax_request(action_name, params) {
    Element.show('boxAttendere');
    var myAjax = new Ajax.Request(
    'ajax.asp?act=' + action_name + '&codiceagente=<%=session("dea_agente")%>',
        {method: 'post', postBody: params, onComplete: ajax_response2}
    );
}


function ajax_response2(originalRequest) {
    Element.hide('boxAttendere');
    document.getElementById('box_ajax_response').innerHTML = '<a href="javascript:Element.hide(\'box_ajax_response\');" style="float: right;"><img src="images/btn_close_box.gif" border="0" alt="Chiudi" title="Chiudi"></a>' + originalRequest.responseText;
    Element.show('box_ajax_response');
    Fat.fade_element('box_ajax_response', '', 1000, '#FF0000', '#FFFFCC');
}


function scegli_stato(stato) {
    if (stato == 'AND (stato = [valore]) ') {
        Element.show('valori_stati');
    } else {
        Element.hide('valori_stati');
    }

    if (stato == 'AND (NumeroBolla LIKE \'%[valore]%\') ') {
        $('data_inizio').value = '%';
        $('data_fine').value = '%';
    }

    if (stato == 'AND (DataBolla = \'[valore]\') ') {
        if ($('data_inizio').value == '%' || $('data_fine').value == '%') {
            $('data_inizio').value = '';
            $('data_fine').value = '';
        }
        $('cerca_testo').value = '%';
    }

    if (stato == 'AND (LEN(nlistaprel) < 1 OR nlistaprel IS NULL) ') {
        $('cerca_testo').value = '%';
    }

    if (stato == 'AND (LEN(NumeroBolla) < 1 OR NumeroBolla IS NULL) ') {
        $('cerca_testo').value = '%';
    }
}
-->
</script>


<style>
td {
    padding: 4px;
}
tr:hover {
    background-color: #FFFF80;
}
</style>
</head>

<body>

<%
if request("rica")="si" and request("file")<>"" then
    Dim fs
    ' Creo l'oggetto FileSystemObject
    Set fs = Server.CreateObject("Scripting.FileSystemObject")

    ' Copio il file pagina.html in una ipotetica cartella di backup
    fs.CopyFile "C:\Inetpub\wwwroot\OptimusSFA\common\OrdiniEuroSpin\" & request("file"), "C:\Inetpub\wwwroot\OptimusSFA\common\OrdiniEuroSpin\ricarica\" & request("file")

    ' faccio pulizia
    Set fs = nothing
    response.Write("FILE "&(request("file"))&" MESSO IN RICARICA"):response.End()
end if
%>

<h2>File Eurospin</h2>
<table class="sortable" id="table_lista_ordini" >
    <tr>
        <th></th>
        <th>Scarica</th>
        <th>Nome del file</th>
        <th>Dimensione</th>
        <th>Ultima modifica</th>
    </tr>
<%
conta=1
'Dim filesys, demofolder, fil, filecoll, filist
Set filesys = CreateObject("Scripting.FileSystemObject")
Set demofolder = filesys.GetFolder("C:\Inetpub\wwwroot\OptimusSFA\common\OrdiniEuroSpin")
Set filecoll = demofolder.Files
For Each fil in filecoll

    if ( alternate = "alternate3" ) then
        alternate = "alternate4"
    else
        alternate = "alternate3"
    end if


    'sqlord="SELECT TOP 1 NoteOrdine FROM OrdiniTerminali WHERE NoteOrdine  LIKE '%"&(fil.name)&"%' AND codiceSD='3333' "
    'set rk_note = dbconn.execute (sqlord)
    'if rk_note.eof<>true then
        'alternate="alternate7"
    'end if


    %>
    <tr class="<%=alternate%>">
        <td><%=conta%></td>
        <td><a href="http://212.66.104.93/OrdiniEuroSpin/<%=fil.name%>" title="Scarica <%=fil.name%>" target="_blank">Scarica</a></td>
        <td><%=fil.name%></td>
        <td style="text-align: right;"><%=round( fil.size / 1024 , 2 )%> KB</td>
        <td><%=fil.DateLastModified%></td>
        <td><a href="file_eurospin.asp?file=<%=fil.name%>&rica=si" title="RICARICA <%=fil.name%>" >RICARICA</a></td>

    </tr>
    <%

    conta=conta+1
Next
Response.Write filist
%>
</table>

<script>
window.document.getElementById( 'fileZipSize' ).innerHTML = '<%=fileZipSize%>';
</script>

</body>
</html>