Αρχή :: Παραδείγματα κώδικα :: Σύνδεση και εμφάνιση εγγραφών από Excel αρχείο.     

Παραδείγματα κώδικα :: Asp: Σύνδεση και εμφάνιση εγγραφών από Excel αρχείο.

Δημιουργήστε ένα φάκελο "excel" στο C:\Inetpub\wwwroot\ όπου θα αποθηκεύσουμε το .xls αρχείο μας.

Άνοιξε το excel και δημιούργησε τρία πεδία.

Στην πρώτη σειρά δώσε: SR, NAME και EMAIL για το παράδειγμα.

Στο SR δώσε πεδία 1, 2, 3 κλπ σε κάθε σειρά.
Στο NAME δώσε ονόματα και στο Email τα emails.


Τώρα που έχουμε το αρχείο θα πρέπει να καθορίσουμε ονόματα για τα πεδία μας ώστε να δώσουμε SQL ερώτημα. ( Εδώ είναι το μυστικό)! Για την δημιουργία θα πρέπει να επιλέξετε όλες τις εγγραφές σε όλα τα πεδία και μεταβείτε στο INSERT > Name > Define... > γράψε dokimi > και OK > Αποθήκευσε το αρχείο ως excel.xls στο C:\inetpub\wwwroot\excel\excel.xls

Τώρα στο asp αρχείο μας για την σύνδεση και εμφάνιση των εγγραφών μας.

<%
' Σύνδεση προσοχή στα path για το xls αρχείο μας
Set oConn = Server.CreateObject("ADODB.connection")
oConn.Open "Driver={Microsoft Excel Driver (*.xls)};"&_
"DriverId=790;" &_
"DBQ=c:\Inetpub\wwwroot\excel\excel.xls;" &_
"DefaultDir = C:\Inetpub\wwwroot\excel\"

Set RS=Server.CreateObject("ADODB.recordset")

' Ερώτημα
RS.open "SELECT * FROM dokimi", oConn

do until RS.EOF
Response.Write ( RS("NAME") & " -- " & RS("EMAIL") & "")
RS.movenext
Loop

'Κλείσιμο

RS.Close
oConn.Close
Set RS = Nothing
%>




ΕΤΟΙΜΟ
Πιστεύω πως αυτό το παράδειγμα θα σας δώσει μια πρώτη ματιά για σύνδεση με .xls αρχεία.

K. Jusha - tip.gr







Η Εταιρία | Web Hosting | Domain names | Web Information | Υπηρεσίες | Resellers | Υποστήριξη |
Copyright © 2007–09 4GR.NETWORKS, All rights reserved.