Få ut data i excel?

3 svar · 318 visningar · startad av SteveP 16 nov. 2006

StevePMedlem sedan mars 2003772 inlägg

Frågan16 nov. 2006 11:16#1

Har försökt med följande kod men får inte ut det i excel.
Jag har excel installerat på min dator.


<%@ Language=VBScript %>

<%

   Response.Buffer = TRUE
   Response.ContentType = "application/vnd.ms-excel"

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={SQL Server}; Provider=SQLOLEDB.1;Persist Security Info=False;User ID=xxx;Pwd=xxx;Database=xx;Data Source=xxx"

SQL = "Select * from S_CONTACT where LAST_NAME = 'Aagaard'"
SET RS = Connect.Execute(SQL)

%>

<html>

<head>
<title>test</title>
</head>

<body>

<% 
Do while not RS.EOF
%>

<%=Rs("LAST_NAME")%>

<%

Rs.MoveNext
Loop

%>

</body>

</html>

@ndersMedlem sedan juni 200032 967 inlägg

16 nov. 2006 11:19#2

Sätt contenttype och buffer överst före alla eventuella tomrader.
Skapa en vanlig enkel html-tabell, som blir något som excel kan förstå, och skriv ut datat i den.

StevePMedlem sedan mars 2003772 inlägg

16 nov. 2006 11:23#3

Går det att döpa om själva standard kolumnerna? Alltså A, B,C osv?

@ndersMedlem sedan juni 200032 967 inlägg

16 nov. 2006 11:27#4

Jag har svårt att se att det skulle gå med denna metod. Eventuellt om du skapar ett excel-objekt på servern och använder dess metoder.

edit: jag tror dock inte att det går överhuvudtaget. Eventuellt kan man sätta numrering istället för bokstäver, men mer än så vete 17 om man kan. Leta lite.