つまづいた石ころ、ぶつかった壁

問題(と解消)の記録

ASPでExcelを編集する(ADO)

ASPからExcelを編集するとなると、値段の張るExcelCreatorなんかでゴリゴリ編集コードを書く、なんてことになりますが、
単純にデータを落とすぐらいなら、ADOでできるとのこと。


やり方

DBからデータを取得するのと同じ要領です。

'DBに接続するのと同じく、ConnectionとRecordsetを用意
Set conExl = Server.CreateObject("ADODB.Connection")
Set rsExl = Server.CreateObject("ADODB.Recordset")
'Excelへの接続文字列
conExl.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\home\myexcel.xlsx;Extended Properties=""Excel 8.0;"""
'編集したいセルをSELECT
rsExl.Open "SELECT * FROM [SHEET$B1:B13]", conExl, 3, 2
While Not rsExl.EOF
	'値を入れて、Update
	rsExl.Fields(0).Value = m_strTenpoTel
	rsExl.Update
	
	rsExl.MoveNext
Wend
rsExl.Close
conExl.Close


こんなに簡単にできるならもっと早く言ってほしいです。。