Tak for input. Jeg har tidligere lavet et simpelt excel-ark på serveren i klassisk ASP og VB-script. Kan det passe, at man ikke kan gøre det tilsvarende simpelt i ASP.NET og C#?
Ex:
<%
if request.QueryString("report") = "excel" then
'Variables
dim u_title, u_cell1, u_cell2, u_cell3, u_cell4, g_filename, fso, act
'Get all values that are needed and assign variables
if session("product") <> "" and session("product") <> "x" then
u_title=session("retailer")&" - "&session("product")
else
u_title="Navn"
end if
u_cell1="Customer "
u_cell2=session("chain") &" - "& session("retailer")
u_cell3="Product "
u_cell4=session("product")
' Varible created fo excel file name. Spaces are changed to underscores
' and later the current date is added in attempts to create a unique file
' Users are not prevented from entering characters !@#$%^&*()+= that are
' invalid file names in this example
g_filename=replace(u_title," ","_")
g_filename=replace(u_title,",",".")
set fso = createobject("scripting.filesystemobject")
' create the text (xls) file to the server adding the -ddmmyyyy after the g_title value
Set act = fso.CreateTextFile(server.mappath(""&g_filename &"_"& day(date())&"-"& month(date())&"-"& year(date()) &".xls"), true)
' write all of the user input to the text (xls) document
' The .xls extension can just as easily be .asp or .inc whatever best suits your needs
' Providing that you remove the info contained in the header and remove the xml
' reference in the html tag that starts the page/excel file. It is to add gridlines and
' a title to the excel worksheet
act.WriteLine "<html xmlns:x=""urn:schemas-microsoft-com:office:excel"">"
act.WriteLine "<head>"
act.WriteLine "<!--[if gte mso 9]><xml>"
act.WriteLine "<x:ExcelWorkbook>"
act.WriteLine "<x:ExcelWorksheets>"
act.WriteLine "<x:ExcelWorksheet>"
act.WriteLine "<x:Name>"& u_title &"</x:Name>"
act.WriteLine "<x:WorksheetOptions>"
act.WriteLine "<x:Print>"
act.WriteLine "<x:ValidPrinterInfo/>"
act.WriteLine "</x:Print>"
act.WriteLine "</x:WorksheetOptions>"
act.WriteLine "</x:ExcelWorksheet>"
act.WriteLine "</x:ExcelWorksheets>"
act.WriteLine "</x:ExcelWorkbook>"
act.WriteLine "</xml>"
act.WriteLine "<![endif]--> "
act.WriteLine "</head>"
act.WriteLine "<body>"
act.WriteLine "<table>"
act.WriteLine "<tr>"
act.WriteLine "<td>"
act.WriteLine u_cell1
act.WriteLine "</td>"
act.WriteLine "<td>"
act.WriteLine u_cell2
act.WriteLine "</td>"
act.WriteLine "</tr>"
act.WriteLine "<tr>"
act.WriteLine "<td>"
act.WriteLine u_cell3
act.WriteLine "</td>"
act.WriteLine "<td>"
act.WriteLine u_cell4
act.WriteLine "</td>"
act.WriteLine "</tr>"
act.WriteLine "</table>"
act.WriteLine "</body>"
act.WriteLine "</html>"
' close the document
act.close
%>
Ny bruger
Nybegynder
Opret
Preview
