devxlogo

Export SQL Data to a Comma-Separated Value File

Export SQL Data to a Comma-Separated Value File

Why Trust Us

Use this code to create a comma-separated value (CSV) file from a recordset based on a SQL query. A number of applications, including Excel and Access, can read CSV files:

 Function CSVExport(sSQL As String, sDest As _	String) As BooleanOn Error goto Err_Handler	Set snpExport = db.OpenRecordset(sSQL, dbOpenSnapshot)	Open App.Path & "" & sDest For Output As #1	For iLoop = 0 To snpExport.Fields.Count _		 - 1     'Export Field Names 		sFieldText = "" & _			(snpExport.Fields(iLoop).Name)		Write #1, sFieldText;	Next	Write #1,	snpExport.MoveFirst	Do While snpExport.EOF = False		For iLoop = 0 To snpExport.Fields.Count - 1			sFieldText = "" & (snpExport.Fields(iLoop))			Write #1, sFieldText;		Next		Write #1,		snpExport.MoveNext	Loop	CSVExport = True	Exit FunctionErr_Handler	MSGBOX("Error: " & Err.Description)	CSVExport=FalseEnd Function
See also  Professionalism Starts in Your Inbox: Keys to Presenting Your Best Self in Email
devxblackblue

About Our Editorial Process

At DevX, we’re dedicated to tech entrepreneurship. Our team closely follows industry shifts, new products, AI breakthroughs, technology trends, and funding announcements. Articles undergo thorough editing to ensure accuracy and clarity, reflecting DevX’s style and supporting entrepreneurs in the tech sphere.

See our full editorial policy.

About Our Journalist

Charlie Frank

Charlie has over a decade of experience in website administration and technology management. As the site admin, he oversees all technical aspects of running a high-traffic online platform, ensuring optimal performance, security, and user experience.
View Author
Show More