Da asp a Excel

[lukeonweb]

ah ok

http://www.lukeonweb.net/leggi.asp?id=106

basta che al posto del testo statico fai una query ed inserisci i recordset nella formattazione in tabella dei vari response.write

[Lan]

ho scritto così ma mi da errore...

<%@LANGUAGE = JScript%>
<%
Set Conn = Server.CreateObject( "ADODB.Connection" )
Conn.Open "SELECT1"

' estraggo i dati
Set rs = conn.Execute("SELECT A_Select.RAG_SOCIALE FROM A_Select")
IF RS.EOF THEN

Response.Buffer = true;
Response.ContentType = "application/vnd.ms-excel";
Response.AddHeader("content-disposition", "inline; filename=esempio.xls");

with (Response)
{
Write("<table>");
Write("<tr>");
Write("<td>"& rs(A_select) & "</td>");
write("</tr>");
write("</table>");
}

Response.Flush;
Response.End;


' chiusura
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing

%>

però mi sa che ho sbagliato qualcosa??

[Roby_72]

Ok, ma devi dire l'errore....

Roby

[Lan]

Mi dice proprio...

pagina non visualizzabile...

l'errore è il 500

[lukeonweb]

visualizza l'errore 500 e dicci la riga

dal browser vai nel menu

strumenti / opzioni internet / avanzate

deseleziona la voce

mostra messaggi di errore http brevi

o qualcosa del genere...

vai

[Lan]

ecco:

Errore di compilazione di Microsoft JScript error '800a03ec'

Previsto ';'

/lms/select/prova.asp, line 3

Set Conn = Server.CreateObject( "ADODB.Connection" )

[lukeonweb]

<%@LANGUAGE = JScript%>
<%
Set Conn = Server.CreateObject( "ADODB.Connection" )
Conn.Open "SELECT1"

' estraggo i dati
Set rs = conn.Execute("SELECT A_Select.RAG_SOCIALE FROM A_Select")
IF RS.EOF THEN

Response.Buffer = true;
Response.ContentType = "application/vnd.ms-excel";
Response.AddHeader("content-disposition", "inline; filename=esempio.xls");

with (Response)
{
Write("<table>");
Write("<tr>");
Write("<td>"& rs(A_select) & "</td>");
write("</tr>");
write("</table>");
}

Response.Flush;
Response.End;


' chiusura
rs.Close
set rs = Nothing
conn.Close
set conn = Nothing

%>

ok, iniziamo a chiarirci

stai utilizzando sia vbscript che jscript

la connessione al database l'hai fatta in vb, mentre il resto è js

quele vuoi usare dei due?

[lukeonweb]

<%@LANGUAGE = JScript%>
<%
var Conn = Server.CreateObject("ADODB.Connection");
Conn.Open("stringa di connessione ");

var rs = conn.Execute("SELECT A_Select.RAG_SOCIALE FROM A_Select", Conn, 1)

Response.Buffer = true;
Response.ContentType = "application/vnd.ms-excel";
Response.AddHeader("content-disposition", "inline; filename=esempio.xls");

with (Response)
{
Write("<table>");
Write("<tr>");
Write("<td>" + rs(A_select) + "</td>");
write("</tr>");
write("</table>");
}

Response.Flush;
Response.End;


rs.Close()
Conn.Close()

%>

[Lan]

scusa ma come è la connessione in js???

[Lan]

mi da il seguente errore:

Errore di run-time di Microsoft JScript error '800a1391'

'conn' non è definito

/lms/select/prova.asp, line 6


var rs = conn.Execute("SELECT A_Select.RAG_SOCIALE FROM A_Select", Conn, 1)