Download .exe Non Riconosciuto Come Applicazione Exe

[alexis73]

grazie innanzittutto

uso il linguaggio VBScript

bonifici è un aggiornamento al programma una fix che c'è ogni tanto e volevo fare in modo di metterla on line in modo che gli utenti che usano il programma di contabilità se la scaricano da soli cliccando sull'icona floppy rosso.

Così ho creato un database dove con password di protezione anche da un pannello di controllo si possa caricare in primis il file da rendere a disposizione per il download.

Il pannello mi serve per fare in modo che si carichi il percorso al file che verrà successivamente caricato in sincronizzazione all'occorenza con Dreamweaver.

Grazie, provo dopo le 22, prima ahimè non so se riesco.

Ciao.

[Prozac]

Se non riuscissi a risolvere i tuoi problemi, mandami il codice ASP della pagina in questione e la struttura della tabella da interrogare per recuperare le immagini che vedo dove sta l'inghippo ;-)

[alexis73]

ciao

mi sono accorta che la mia tabella si chiama GESTIONE BONIFICI BANC così ho corretto e non avevo capito di mettere il +

ma non ci sono ancora

mi da questo errore

Microsoft VBScript compilation error '800a0401'

Expected end of statement

/download_bonifici.asp, line 226

var sql = "SELECT * FROM [GESTIONE BONIFICI BANC] WHERE ID=" + ID;

-----------------------------------------------------------------^

così vedo di farti avere quello che mi dici ciao

ho pensato anche di mettere la tabella tra le quadre

ma come è possibile

se ogni record è identificato dal campo ID perchè non capisce che l'ID è l'ID.

;-)

[alexis73]

Questa è la struttura del recordset dentro alla mia pagina

<%

Dim rs_bonifici

Dim rs_bonifici_numRows

Set rs_bonifici = Server.CreateObject("ADODB.Recordset")

rs_bonifici.ActiveConnection = MM_Conn_Emera_STRING

rs_bonifici.Source = "SELECT * FROM [GESTIONE BONIFICI BANC] ORDER BY ID DESC"

rs_bonifici.CursorType = 0

rs_bonifici.CursorLocation = 2

rs_bonifici.LockType = 1

rs_bonifici.Open()

rs_bonifici_numRows = 0

%>

Questa è la tabella che contiene l'associazione al recordset

<table width="764" border="1" cellpadding="2" cellspacing="1" bordercolor="#CCFFFF">

<tr bgcolor="#0066CC">

<td width="465" bgcolor="#003366"> <div align="center"><font color="#CCFFFF"><strong>Descrizione

Prodotto</strong></font></div></td>

<td width="184" height="40" bgcolor="#003366"> <div align="center"><font color="#CCFFFF"><strong>Versione</strong></font></div></td>

<td width="85" valign="middle" bgcolor="#CC0000"> <div align="center"><font color="#CCCCCC"><font color="#FFFFFF">

<strong>Download</strong> </font></font></div></td>

</tr>

<%

While ((Repeat1__numRows <> 0) AND (NOT rs_bonifici.EOF))

%>

<tr>

<td width="465">

<div align="center"><strong><font color="#0066CC" size="3" face="Geneva, Arial, Helvetica, sans-serif"><%=(rs_bonifici.Fields.Item("DESCRIZIONE_PRODOTTO").Value)%></font></strong></div></td>

<td width="184"><div align="center"><font color="#0066CC" size="3" face="Geneva, Arial, Helvetica, sans-serif"><strong><%=(rs_bonifici.Fields.Item("VERSIONE").Value)%></strong></font></div></td>

<td valign="middle" bgcolor="#CCFFFF">

<div align="center">

<%

var sql = "SELECT * FROM [GESTIONE BONIFICI BANC] WHERE ID=" + ID;

var rs_bonifici = conn.Execute(sql);

while (rs_bonifici.EOF) {

%>

<a href='<%=rs_bonifici.Fields("nome_file").Value'%>' type='application/octect-stream'><img src="icone_Emera/floppy_rosso.jpg" align="middle" width="40" height="40" border="0"></a><br>

<%

ris.MoveNext();

}

conn.Close();

%>

</div></td>

</tr>

<%

Repeat1__index=Repeat1__index+1

Repeat1__numRows=Repeat1__numRows-1

rs_bonifici.MoveNext()

Wend

%>

</table>

invece la tabella GESTIONE BONIFICI BANC

ID

DESCRIZIONE

VERSIONE

NOME_FILE

grazie

[Prozac]

Domani gli do un'occhiata e ti faccio sapere ;-)

[alexis73]

grazie

[Prozac]

<%
 Dim rs_bonifici
 Dim rs_bonifici_numRows

 Set rs_bonifici = Server.CreateObject("ADODB.Recordset")
 rs_bonifici.ActiveConnection = MM_Conn_Emera_STRING
 rs_bonifici.Source = "SELECT * FROM [GESTIONE BONIFICI BANC] ORDER BY ID DESC"
 rs_bonifici.CursorType = 0
 rs_bonifici.CursorLocation = 2
 rs_bonifici.LockType = 1
 rs_bonifici.Open()

 rs_bonifici_numRows = 0
%>
<table width="764" border="1" cellpadding="2" cellspacing="1" bordercolor="#CCFFFF">
 <tr bgcolor="#0066CC">
<td width="465" bgcolor="#003366"><div align="center"><font color="#CCFFFF"><strong>Descrizione Prodotto</strong></font></div></td>
<td width="184" height="40" bgcolor="#003366"> <div align="center"><font color="#CCFFFF"><strong>Versione</strong></font></div></td>
		<td width="85" valign="middle" bgcolor="#CC0000"> <div align="center"><font color="#CCCCCC"><font color="#FFFFFF"><strong>Download</strong> </font></font></div></td>
 </tr>
<%
 While ((Repeat1__numRows <> 0) AND (NOT rs_bonifici.EOF))
%>
  <tr>
		<td width="465">
			  <div align="center"><strong><font color="#0066CC" size="3" face="Geneva, Arial, Helvetica, sans-serif"><%=(rs_bonifici.Fields.Item("DESCRIZIONE_PRODOTTO").Value)%></font></strong></div>
		</td>
		<td width="184"><div align="center"><font color="#0066CC" size="3" face="Geneva, Arial, Helvetica, sans-serif"><strong><%=(rs_bonifici.Fields.Item("VERSIONE").Value)%></strong></font></div>
</td>
<td valign="middle" bgcolor="#CCFFFF">
			 <div align="center">
				   <a href="<%=rs_bonifici.Fields.Item("NOME_FILE").Value%>" type="application/octect-stream"><img src="icone_Emera/floppy_rosso.jpg" align="middle" width="40" height="40" border="0"></a>
			 </div>
		</td>
  </tr>
<%
Repeat1__index=Repeat1__index+1
Repeat1__numRows=Repeat1__numRows-1
rs_bonifici.MoveNext()
 Wend
%>
</table>

[alexis73]

grazie, provo subito

[alexis73]

G r a z i e!

Grande! Funziona e lo riconosce anche come .exe, grazie grazie sei un grande!

[Prozac]

:P

Troppo gentile