出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
[4366] Re:EXCELに書き込む？？
投稿者：知則さん 2004/06/12 21:14:10
<html><body>
<head>
<title>EXCELとASP</title>
</head>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
strCon = "Driver={Microsoft Excel Driver (*.xls)};DBQ=" _
& Server.Mappath("book1.xls")
rs.Open "SELECT * FROM [Sheet1$]",strCon

Set rs2 = Server.CreateObject("ADODB.Recordset")
strCon = "Driver={Microsoft Excel Driver (*.xls)};DBQ=" _
& Server.Mappath("book2.xls") & ";ReadOnly=False"
rs2.Open "SELECT * FROM [Sheet1$]",strCon,3,3

Do until rs.EOF
Response.Write rs("ID") & rs("都道府県") & rs("間取り") & rs("家賃")
rs2.AddNew
rs2("ID") = rs("ID")
rs2("都道府県") = rs("都道府県")
rs2("間取り") = rs("間取り")
rs2("家賃") = rs("家賃")
rs2.Update
rs2.MoveNext
Loop

rs.Close
Set rs = Nothing
rs2.Close
Set rs2 = Nothing
%>
</body></html>
でした。
変数を間違えて書いてしまいましたm(__)m
FormからExcelに保存する方法はどうすれば・・・。
EXCELに書き込む？？ 　 知則さん [2004/06/11 17:57:28] [4361]
　 Re:EXCELに書き込む？？ 　 YasNet（管理人）さん [2004/06/11 19:34:18] [4362]
　 　 Re:EXCELに書き込む？？ 　 知則さん [2004/06/11 21:41:56] [4363]
　 　 　 Re:EXCELに書き込む？？ 　 YasNet（管理人）さん [2004/06/12 9:55:01] [4364]
　 　 　 　 Re:EXCELに書き込む？？ 　 知則さん [2004/06/12 18:50:17] [4365]
　 　 　 　 　 Re:EXCELに書き込む？？ 　 知則さん [2004/06/12 21:14:10] [4366]
　 　 　 　 Re:EXCELに書き込む？？ 　 通りすがりさん [2004/06/12 22:14:38] [4367]

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ