Driver={Microsoft Excel Driver (*.xls)} を 使った ソースコードを紹介する表示色の説明：ASP VBScriptは <% 〜 %>
キーワードはDriver={Microsoft Excel Driver (*.xls)} です。
<%@LANGUAGE=VBScript%>
<html>
<head>
<title>ASPからADOを使用してExcel(*.xls)に接続してみた</title>
</head>
<body>
<h1>ASPからADOを使用してExcel(*.xls)に接続してみた</h1>
Driver={Microsoft Excel Driver (*.xls)}をADOで使ってみました。
<hr>
test053-1.asp<br>
ASPからADOを使用してExcel(*.xls)に接続するテストを行う<br>
<hr>
<%
'ADO DB Recordset オブジェクトを作成する、英文そのままじゃん
Set rs=Server.CreateObject("ADODB.Recordset")
strSQL = "select * from DATA_RANGE"
Con = "Driver={Microsoft Excel Driver (*.xls)};DBQ=" & _
Server.MapPath("test053.xls") & ";"
Response.Write "作った、使った接続文字列は<br>"
Response.Write "<CODE>" & Con & "</CODE><hr>"
'接続文字列、SQLを渡して、レコードセットを開く
Rs.Open strSQL, Con, 0 '0=adOpenForwardOnly
strOUT = ""
Do While Rs.EOF = False
For Each FieA In Rs.Fields
strOUT = strOUT & FieA.Name & " -- " & FieA.Value & "<BR>"
Next
Rs.MoveNext '次のレコードへ移動
Loop
Rs.Close
Set Rs = Nothing
Response.Write strOUT '結果を表示
%>
<hr>
[<a Href="test053.xls" TARGET="_blank">test053.xlsを開く</a>]<br>
<img src="http://www.ken3.org/backno/gif/asp053-01.gif"><br>
↑が表のイメージです。
</body>
</html>
| 最近発売の雑誌を紹介する
女性誌を紹介します。数少ない女性プログラマー向けの広告でした(笑)
- sweet (スウィート) 2008年 06月号
- JILLE (ジル) 2008年 06月号
- 私の時間 2008年 06月号
- ELLE girl (エル・ガール) 2008年 06月号
- CUTiE (キューティ) 2008年 06月号
- BAILA (バイラ) 2008年 06月号
- RUSSH JAPAN (ラッシュジャパン) 2008年 06月号
- ar (アール) 2008年 06月号
- FRaU (フラウ) 2008年 06月号
|
