aRo` automating your e-commerce

how to create an excel file from an ASP page

The code below gives a brief example on how to create an .xls file from an asp webpage. I use this to often to export my customers data(database) to an offline version wich they can use for archiving/reporting.

To to so you have to change the contenttype of the asp file to "application/vnd.ms-excel". This code has to be at the top of you page.

From then on you can use the response.write() function to write data to the .xls file. The data must be structured in table rows("<TR>") .

You can define the fields in the .xls with TH and TD.

code snippet:

PLAIN TEXT

ASP:

1. &lt;%
2. Response.ContentType = "application/vnd.ms-excel"
3. strfilename = "Filename_" &amp; Day(Date) &amp; Month(Date) &amp; Year(Date) &amp; ".xls"
4. Response.AddHeader "Content-Disposition","filename=" &amp; strfilename
5. response.expires = -1
6. %&gt;
7. strContent =”fill this variable(strContent) the same way as an html table”
8.  
9. &lt;able border="1" cellpadding="4" cellspacing="1" width="100%" %&gt;
10. &lt;% response.write strContent %&gt;
11. &lt;/table%&gt;

Popularity: 5% [?]

sending a mail with asp on win2k3

While migrating an application from an old IIS4(NT) server to a new win2003 machine there were some errors with emails.

It's always better to use a default component over a 3th party tool. That's why you should use CDO.

CDO (Collaboration Data Objects) is a Microsoft technology that is designed to simplify the creation of messaging applications.

However there are 2 versions of CDO: CDOSYS and CDONT.

Microsoft doesn't support CDONTs anymore on win2k/XP and 2k3.

So the only thing i had to change to make it work, was to change te version.

The code below works on windows 2003.

Popularity: 3% [?]

Connection to access or MS SQL database in ASP

The best way of connecting to a database is including a separated file with the database info. Afterwards u can always check if the database connection state is open.

MS SQL
set cnn = Server.CreateObject("ADODB.Connection")
cnn.ConnectionString = "Provider=SQLOLEDB.1;User ID=User;Passwd=;Initial Catalog=ASPDB;Data Source=server"
cnn.Open

Microsoft Access
set cnn = Server.CreateObject("ADODB.Connection")
cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
cnn.ConnectionString = Server.MapPath ("/mywwwfolder") & "\database.mdb"
cnn.Open

check connection state
if cnn.State = 0 then
cnn.Open
end if

Popularity: 3% [?]