Export ข้อมูลไป Excel โดย ASP ช่วยสอนวิธี Export ข้อมูลจาก Database ไป Excel โดย ASP หน่อยนะครับ

		Dim Conn,strSQL,objRec
		Dim xlApp,xlBook,xlSheet1,FileName,intRows
		Dim Fso,MyFile

		Set Conn = Server.Createobject("ADODB.Connection")
		Conn.Open "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("MyXls/mydatabase.mdb"),"" , ""
		strSQL = "SELECT * FROM customer "
		Set objRec = Server.CreateObject("ADODB.Recordset")
		objRec.Open strSQL, Conn, 1,3