Active Server Pages Trung tâm phát triển phần mềm - ĐHĐN - 37 - + filename đường dẫn và tên file tạo ra. + OverWrite true: ghi đè lên một file đã tồn tại, ngược lại False. ð OpenTextFile: mở một file văn bản đã tồn tại, có thể sử dụng để đọc file hoặc thêm dữ liệu vào file Cú pháp: [Object.]OpenTextFile(Filename[,iomode[,create]]) + Object: Tên của một đối tượng FileSystemObject + Filename: đường dẫn và tên file cần mở + Iomode: dùng để đọc hoặc thêm dữ liệu, mặc định là đọc. + Create: true: tạo một file mới, false: file đã tồn tại. ð BuildPath: Thêm một tên file hay thư mục vào đường dẫn thư mục hiện hành Cú pháp: object.BuildPath(path, name) + Object: Tên của một đối tượng FileSystemObject + path: Đường dẫn đến file cần kết nối thêm. + name: tên file cần kết nối ð CopyFile: Sao chép file Cú pháp: object.BuildPath(path, name) + Object: Tên của một đối tượng FileSystemObject + path: Đường dẫn đến file cần kết nối thêm. + name: tên file cần kết nối ð CopyFolder: Sao chép thư mục Cú pháp: Object.CopyFolder source, destination, overwrite + Object: Tên của một đối tượng FileSystemObject + Source: Thư mục cần sao chép. + destination: Nơi đến của thư mục cần sao chép . + Overwrite: đây là mục chọn, thiết lập một file tồn tại có được phép chép đè hay không. True: cho phép thư mục được chép đè, ngược lại, faulse: không cho phép. True là mặc định. ð CreateFolder: Tạo thư mục Cú pháp: Object.CreateFolder(name) + Object: Tên của một đối tượng FileSystemObject + name: Tên của thư mục tạo ð DeleteFile: Xóa file Cú pháp: object.DeleteFile filename, force + Object: Tên của một đối tượng FileSystemObject + filename: Tên của file cần xóa + force: đây là mục chọn, thiết lập cho các file chỉ đọc (read-only) có bị xóa hay không. True cho phép các file chỉ đọc xóa, ngược lại faulse không cho phép xóa. Faulse là mặc định. ð DeleteFolder: Xóa thư mục Cú pháp: object.DeleteFolder foldername, force Active Server Pages Trung tâm phát triển phần mềm - ĐHĐN - 38 - + Object: Tên của một đối tượng FileSystemObject + foldername: Tên của thư mục cần xóa + force: đây là mục chọn, thiết lập cho các thư mục chỉ đọc (read-only) có bị xóa hay không. True cho phép các thư mục chỉ đọc xóa, ngược lại faulse không cho phép xóa. Faulse là mặc định ð DriveExists: Kiểm tra sự tồn tại của ổ đĩa Cú pháp: object.DriveExists(drive) + Object: Tên của một đối tượng FileSystemObject + drive: Tên ổ đĩa hoặc đường dẫn đầy đủ. ð FileExists: Kiểm tra sự tồn tại của file Cú pháp: object.FileExists(filename) + Object: Tên của một đối tượng FileSystemObject + filename: Tên file bạn muốn kiểm tra sự tồn tại ð FolderExists: Kiểm tra sự tồn tại của thư mục Cú pháp: object.FolderExists(foldername) + Object: Tên của một đối tượng FileSystemObject + foldername: Tên thư mục bạn muốn kiểm tra sự tồn tại ð GetAbsolutePathName: Trả lại đường dẫn tuyệt đối của file hoặc thư mục. Cú pháp: object.GetAbsolutePathName(pathspec) + Object: Tên của một đối tượng FileSystemObject + pathspec: Chỉ định đường dẫn đầy đủ. ð GetBaseName: Trả về đường dẫn cơ sở của file hoặc thư mục Cú pháp: object.GetBaseName(path) + Object: Tên của một đối tượng FileSystemObject + path: đường dẫn của tên file hoặc thư mục được trả về ð GetDrive: Trả về đối tượng xử lý ổ đĩa Cú pháp: Object.GetDrive(drivespec) + Object: Tên của một đối tượng FileSystemObject + drivespec: có thể là đĩa C, hoặc C:, hoặc C:\ hoặc \\coputer2\share1 ð GetDriveName: Trả về tên ổ đĩa Cú pháp: Object.GetDriveName(path) + Object: Tên của một đối tượng FileSystemObject + path: đường dẫn mà tên của ổ đĩa sẽ được trả về ð GetExtensionName: Trả về phần mở rộng của file Cú pháp: object.GetExtensionName(path) + Object: Tên của một đối tượng FileSystemObject + path: đường dẫn mà tên của phần mở rộng sẽ được trả về ð GetFile: Trả về đối tượng File Cú pháp: object.GetFile(path) + Object: Tên của một đối tượng FileSystemObject Active Server Pages Trung tâm phát triển phần mềm - ĐHĐN - 39 - + path: đường dẫn đến file ð GetFileName: Trả về tên file Cú pháp: object.GetFile(path) + Object: Tên của một đối tượng FileSystemObject + path: đường dẫn đến file ð GetFolder: Trả về đối tượng Folder dùng xử lý thư mục Cú pháp: Object.GetFolder(path) + Object: Tên của một đối tượng FileSystemObject + path: đường dẫn đến thư mục ð GetParentFolderName: Trả về tên của thư mục cha Cú pháp: Object.GetParentFolderName(path) + Object: Tên của một đối tượng FileSystemObject + path: đường dẫn của thư mục hoặc file có tên thư mục cha được trả về. ð GetSpecialFolder: Trả về thư mục được chỉ định Cú pháp: Object.GetSpecialFolder(foldername) + Object: Tên của một đối tượng FileSystemObject + foldername Thư mục được trả về: ¶ 0=WindowsFolder - Chứa các file cài đặt bởi hệ điều hành Windows ¶ 1=SystemFolder - Chứa các thư viện, font, và các thiết bị điều khiển ¶ 2=TemporaryFolder - Được sử dụng để chứa các file tạm ð MoveFile: Di chuyển hoặc đổi tên file Cú pháp: Object.MoveFile source,destination + Object: Tên của một đối tượng FileSystemObject + source: đường dẫn của file(các file) sẽ được di chuyển, có thể chứa ký tự đại diện trong thành phần cuối. + destination: nơi các file sẽ di chuyển đến, không thể chứa ký tự đại diện. ð MoveFolder: Di chuyển hoặc đổi tên thư mục Cú pháp: Object.MoveFolder source,destination + Object: Tên của một đối tượng FileSystemObject + source: đường dẫn của thư mục sẽ được di chuyển, có thể chứa ký tự đại diện trong thành phần cuối. + destination: nơi thư mục sẽ di chuyển đến, không thể chứa ký tự đại diện. ð Drives: Trả về danh sách các ổ đĩa Cú pháp: [drivecoll=]FileSystemObject.Drives Các Ví dụ: - Tạo một file mới và ghi dữ liệu vào file .txt <% set objFSO=Server.CreateObject(“Scripting.FileSystemObject”) set objNewFile=obj.CreateTextFile(“C:\myfile\file.txt”,false) Active Server Pages Trung tâm phát triển phần mềm - ĐHĐN - 40 - objNewFile.write(“Hello”) objNewFile.close %> - Thêm thư mục test vào đường dẫn c:\mydocuments <% dim fs,path set fs=Server.CreateObject("Scripting.FileSystemObject") path=fs.BuildPath("c:\mydocuments","test") response.write(path) set fs=nothing %> Kết quả: c:\mydocuments\test - Sao chép các file <% dim fs set fs=Server.CreateObject("Scripting.FileSystemObject") fs.CopyFile "c:\mydocuments\web\*.htm","c:\webpages\" set fs=nothing %> - Xoá thư mục <% dim fs set fs=Server.CreateObject("Scripting.FileSystemObject") if fs.FolderExists("c:\temp") then fs.DeleteFolder("c:\temp") end if set fs=nothing %> b. Đối tượng TextStream Đối tượng TextStream cho phép truy cập file văn bản theo thứ tự. Điều này cho phép bạn đọc, ghi hoặc gán các ký tự hoặc các dòng cào một file văn bản. Để tạo một trường hợp của đối tượng TextStream, bạn có thể sử dụng phương thức CreateTextFile hoặc phương thức OpenTextFile của đối tượng FileSystemObject , hoặc sử dụng phương thức OpenAsTextStream của đối tượng File. Đối tượng TextStream có những thuộc tính và phương thức sau: Thuộc tính Mô tả AtEndOfLine Một giá trị Boolean chỉ rõ con trỏ có ở cuối dòng hiện thời hay không. Đây là một thuộc tính chỉ đọc AtEndOfStream Một giá trị Boolean chỉ rõ bạn đã đến điểm kết thúc file văn bản hiện thời chưa. Đây là một thuộc tính chỉ đọc Colunm Một giá trị nguyên chỉ rõ số hiệu cột của vị trí hiện thời trong một file văn bản Line Một giá trị nguyên chỉ rõ số hiệu dòng trong một file văn bản Active Server Pages Trung tâm phát triển phần mềm - ĐHĐN - 41 - Phương thức Mô tả Close Đóng file văn bản hiện thời. Khi đã bị đóng, file này phải được mở lại trước khi bạn có thể đọc hoặc ghi vào nó. Read Đọc một số ký tự định tõ từ một file văn bản mở. ReadAll Đọc tất cả các ký tự từ một file văn bản mở vào một chuỗi ReadLine Đọc toàn bộ dòng văn bản từ một file văn bản mở Skip Nhảy qua một số ký tự được định rõ trong một file văn bản mở. Kết hợp với phương thức Read, phương thức Skip cho phép bạn đọc một số ký tự bắt đầu từ một vị trí cụ thể. SkipLine Nhảy qua dòng tiếp theo khi đọc một file TextStream Write Ghi một chuỗi được xác định vào một file văn bản mở tại vị trí hiện thời của con trỏ file WriteLine Ghi một giá trị của chuỗi vào một file mở ở vị trí con trỏ ngay trong file. Phương thức này cũng ghi một ký tự xuống dòng vào điểm kết thúc của chuỗi được thêm. Ví dụ: Tạo một file (.txt) và viết đoạn văn bản vào file đó <% dim fs, f set fs=Server.CreateObject("Scripting.FileSystemObject") set f=fs.CreateTextFile("c:\test.txt",true) f.WriteLine("Hello World!") f.Close set f=nothing set fs=nothing %> Active Server Pages Trung tâm phát triển phần mềm - ĐHĐN - 42 - CHƯƠNG 5 QUẢN LÝ CƠ SỞ DỮ LIỆU VỚI ASP 1. Khái niệm về ADO ADO (ActiveX Data Object ) là một tập hợp các đối tượng cho phép nhà lập trình ASP nối tới cơ sở dữ liệu. Nhiều ứng dụng của ASP cần một số loại kết nối cơ sở dữ liệu, trong khi các trang ASP không thể tự chuyển tải dữ liệu trong cơ sở dữ liệu. ADO hỗ trợ việc truy xuất cơ sở dữ liệu trong các trang ASP một cách nhanh chóng và dễ dàng. ADO cung cấp nhiều đặc tính phố biến cần để chuyển đổi các ứng dụng client - server đang tồn tại thành những ứng dụng trên web. Điểm tiện lợi của ADO là dễ sử dụng, tốc độ cao, chiếm ít dung lượng đĩa, điều này cho phép đơn giản hoá quá trình xây dựng một ứng dụng và đẩy nhanh tiến độ xây dựng các trang web có sử dụng ngôn ngữ ASP. 2. ODBC (Open DataBase Conectivity) ODBC là giao diện lập trình chuẩn cho các ứng dụng trên Windows do Microsoft đề xuất. Qua ODBC, các ứng dụng đơn sẽ truy xuất được nhiều kiểu dữ liệu khác nhau nếu có trình điều khiển tương thích được cài đặt. SQL là ngôn ngữ chuẩn mà các ứng dụng sẽ sử dụng để truy xuất cơ sở dữ liệu thông qua ODBC. ODBC cho phép ứng dụng dùng một cách truy xuất duy nhất kết nối đến mọi cơ sở dữ liệu. Nó được xem là cầu nối giữa ứng dụng và dữ liệu. Sử dụng ODBC, người lập trình không cần quan tâm đến sự khác biệt của các hệ dữ liệu Trình điều khiển ODBC thực ra là một thư viện liên kết động, chỉ thị cách gọi hàm ODBC. Các ứng dụng kích hoạt ODBC để truy xuất dữ liệu tương ứng. Bạn cần khai báo lên OBDC nguồn dữ liệu mà chương trình sẽ truy xuất và ứng dụng. Trong ứng dụng Web, phần khai báo này giúp cho việc giao tiếp giữa chương trình tại các máy trạm làm việc với dữ liệu ở máy chủ. Khai báo dữ liệu lên ODBC - Chọn Start à Settings à Control Panel à Đối với Windows98: Chọn ODBC DataSource , đối với Windows2000: Chọn AdministratorTools à DataSource - Tại Tab System DSN à Add à Cửa sổ Create New Data Source . vào file .txt <% set objFSO =Server. CreateObject(“Scripting.FileSystemObject ) set objNewFile=obj.CreateTextFile(“C:myfilefile.txt”,false) Active Server Pages Trung tâm phát triển phần. "c:mydocuments web *.htm","c:webpages" set fs=nothing %> - Xoá thư mục <% dim fs set fs =Server. CreateObject("Scripting.FileSystemObject" ;) if fs.FolderExists("c: emp" ;). World!" ;) f.Close set f=nothing set fs=nothing %> Active Server Pages Trung tâm phát triển phần mềm - ĐHĐN - 42 - CHƯƠNG 5 QUẢN LÝ CƠ SỞ DỮ LIỆU VỚI ASP 1. Khái niệm về ADO ADO (ActiveX