خواندن فايل اكسل در برنامه asp

[kohyar]

سلام دوستان
من ميخوام تو برنامم سلول هاي يك فايل اكسل رو بخونم


<%
Dim objConn, objRS, strSQL
Dim x, curValue
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "DRIVER={Microsoft Excel Driver (*.xls)}; IMEX=1; HDR=NO; "&_
"Excel 8.0; DBQ=" & Server.MapPath("tbl.xls") & "; "
strSQL = "SELECT * FROM A1:C4"
Set objRS=objConn.Execute(strSQL)
Response.Write("<table border=""1"">")
Response.Write("<tr>")
For x=0 To objRS.Fields.Count-1
Response.Write("<th>" & objRS.Fields(x).Name & "</th>")
Next
Response.Write("</tr>")
Do Until objRS.EOF
Response.Write("<tr>")
For x=0 To objRS.Fields.Count-1
curValue = objRS.Fields(x).Value
If IsNull(curValue) Then
curValue="N/A"
End If
curValue = CStr(curValue)
Response.Write("<td>" & curValue & "</td>")
Next
Response.Write("</tr>")
objRS.MoveNext
Loop
objRS.Close
Response.Write("</table>")
objConn.Close
Set objRS=Nothing
Set objConn=Nothing
%>


كدي كه استفاده كردم همينه
يكبار كه صفحه رو اجرا مي كنم درست فيلد ها رو نشون ميده
2 تا مشكل دارم
اول اينكه چطور ميتونم سطر اول رو نخونم البته وقتي آدرس سلول ها رو از A2 ميدم تو بعضي از خونه ها مي نويسه F3
مشكل دوم اينكه زمانيكه صفحه رو كه داره اطلاعات رو نشون ميده رفرش مي كنم خطاي 0x80004005 ميده

[kashaneh]

دوست عزیز به مقاله زیر مراجعه کنید... به احتمال فراوان با روش تعیین محدوده ای که در آنجا توضیح داده شده بتوانید مشکل خود را حل کنید

http://www.geekpedia.com/tutorial143_Extract-data-from-Excel-Spreadsheet-using-ASP.html

در مورد مشکل دوم شما یعنی پیغام خطای 0x80004005 نیز در مقاله زیر توضیحاتی داده شده است اما جواب و پاسخی قطعی برای آن هنوز وجود ندارد.

http://social.msdn.microsoft.com/forums/en-US/adodotnetdataproviders/thread/12a20f0f-3828-4f93-a000-7a2002fb2802/

[دوست عزیز پیشنهاد می کنم در صورتی که مشکلات برطرف شد یک نسخه از کدهای خود جهت کار با فایل های اکسل رو در اینجا قرار بدی تا به عنوان شروع کار و یا حداقل نمونه کاربردی ASPو Excel در دسترس سایر دوستان نیز باشد]

موفق باشی