intTypePromotion=1
zunia.vn Tuyển sinh 2024 dành cho Gen-Z zunia.vn zunia.vn
ADSENSE

Giáo Trình Lập Trình Ứng Dụng CSDL Web ASP- P16

Chia sẻ: Cong Thanh | Ngày: | Loại File: PDF | Số trang:5

174
lượt xem
73
download
 
  Download Vui lòng tải xuống để xem tài liệu đầy đủ

Giáo Trình Lập Trình Ứng Dụng CSDL Web ASP- P16:Đây là những ngôn ngữ rất đơn giản và dễ sử dụng. Lưu ý rằng các script là những ngôn ngữ giới hạn, dùng để viết các chương trình đơn giản. Để thực hiện những công việc phức tạp như kết nối CSDL, lập trình đồ hoạ, giao tiếp với thiết bị phần cứng,... thì ta phải sử dụng các component (thành phần) đã được tạo trước bằng các ngôn ngữ lập trình mạnh mẽ hơn như C++, VB,... Các script của ASP chỉ có lệnh gọi đến các component này...

Chủ đề:
Lưu

Nội dung Text: Giáo Trình Lập Trình Ứng Dụng CSDL Web ASP- P16

  1. Gi¸o tr×nh lËp tr×nh øng dông CSDL Web ASP  GetFileName Phýõng thức này chỉ trả về phần tên của một tập tin hay một thý mụcứ Cú pháp: FileSystemObject.GetFileName(path) Ví dụ: Nếu path = “ắồ\ASP\Data” thì khi gọi hàm ỗetỳileẹameộpath) ta sẽ nhận ðýợc chuỗi ”ừata”ứ ẹếu path = “ắồ\ASP\Data\list.txt” thì khi gọi hàm GetFileName(path) ta sẽ nhận ðýợc chuỗi ”list”ứ  GetFolder Phýõng thức GetFolder trả về ðối týợng Folder của một thý mụcứ Cú pháp: FileSystemObject.GetFolder(path)  GetParentFolderName Phýõng thức này trả về thý mục cha của một thý mụcứ Cú pháp: FileSystemObject.GetParentFolderName(path) Ví dụ: Nếu path = “C:\ASP\Data” thì khi gọi hàm GetParentFolderName(path) ta sẽ nhận ðýợc chuỗi ĩSP”ứ Ðây là thý mục cha của thý mục ừata  GetSpecialFolder Phýõng thức này trả về ðýờng dẫn tới một số thý mục ðặc biệt của hệ ðiều hànhứ Cú pháp: FileSystemObject.GetSpecialFolder(foldername) Trong ðó foldername nhận một trong các giá trị sauồ + WindowsFolder hay 0: Nếu muốn nhận về thý mục của hệ ðiều hành ộmặc ðịnh Windows 98 ðó là thý mục Windowsự ðối với Windows ẵớớớ thì ðó là thý mục Winnt). + SystemFolder hay 1: Nếu muốn nhận về ðýờng dẫn tới thý mục System của hệ ðiều hànhứ + TemporaryFolder hay 2: Nếu muốn nhận về ðýờng dẫn tới thý mục tạm thời (TEMP) của hệ ðiều hànhứ Ví dụ: Ðoạn chýõng trình sau ðây lấy thý mục hệ thống của hệ ðiều hànhứ ẹếu dùng Windows ẵớớớ thì trên màn hình browser sẽ xuất hiện dòng “C:\WINNT\System32” === St by hoangly85 === 76 hoangly85@updatesofts.com
  2. Gi¸o tr×nh lËp tr×nh øng dông CSDL Web ASP  GetTempName Phýõng thức này trả về một tên tập tin hoặc thý mục tạm thời ðýợc phát sinh ngẫu nhiênứ Cú pháp: FileSystemObject.GetTempName Ví dụ:  MoveFile Phýõng thức này di chuyển một hoặc nhiều tập tin từ nõi này sang nõi khácứ === St by hoangly85 === 77 hoangly85@updatesofts.com
  3. Gi¸o tr×nh lËp tr×nh øng dông CSDL Web ASP Cú pháp: FileSystemObject.MoveFile (src, des) Trong ðó src là nõi chứa các tập tin cần di chuyển diự des là nõi mà các tập tin cần chép ðếnứ  MoveFolder Phýõng thức này di chuyển một hoặc nhiều thý mục từ nõi này sang nõi khácứ Cú pháp: FileSystemObject.MoveFile (src, des) Trong ðó src là nõi chứa các tập tin cần di chuyển diự des là nõi mà các tập tin cần chép ðếnứ  OpenTextFile Phýõng thức này mở một tập tin và trả về một ðối týợng TextStream ðýợc dùng ðể truy cập ðối týợng nàyứ Cú pháp: FileSystemObject.OpenTextFile(fname, mode, creat, format) Trong ðóồ + fname: là tên của tập tin cần mở + mode: dùng ðể chỉ cách thức mởứ + create: dùng ðể chỉ ðịnh rằng nếu tập tin không tồn tại thì có tạo tập tin mới hay khôngứ + format: dùng ðể chỉ ra rằng mở tập tin dùng chuẩn ĩSắỡỡ hay Unicodeứ 2.4.8.4. Ví dụ minh họa Sau ðây là một ví dụ hiển thị một cửa sổ ðãng nhập ộloginờ cho phép ngýời dùng gõ vào tên truy cập ộusernameờ và mật khẩu ộpasswordờứ ắhýõng trình sẽ kiểm tra cặp username và password này có tồn tại trong tập tin password.txt trong thý mục hiện tại của ứng dụng khôngẻ ẹếu có thì chýõng trình sẽ ðýa ngýời dùng ðến trang main.asp. Nếu không thì chýõng trình sẽ thông báo và bắt ngýời dùng ðãng nhập lạiứ Tập tin common.asp chứa các hàm mà ngýời dùng ðịnh nghĩa trong ðó có hàm CheckAccount dùng ðể kiểm tra xem username và password truyền vào có tồn tại trong tập tin passwordứtxt khôngẻ Nếu có thì hàm này trả về true. Nếu không thì hàm này sẽ trả về false. Nội dung của common.asp nhý sau:
  4. Gi¸o tr×nh lËp tr×nh øng dông CSDL Web ASP Dim uname_pass uname=CStr(uname) upass=CStr(upass) uname_pass = uname & ":" & upass CheckAccount=false ' Mac dinh ban dau path = Server.MapPath(".") & "\Password.txt" Set fso = Server.CreateObject("Scripting.FileSystemObject") Set ftxt = fso.OpenTextFile(path) While (ftxt.AtEndOfStream true) and • (CheckAccount=false) stLine = ftxt.Readline if (uname_pass = stLine) then CheckAccount= true end if Wend ftxt.Close Set ftxt=nothing Set fso=nothing End Function %> Tập tin login.asp là tập tin mô tả giao diện với ngýời dùngứ ẹội dung của login.asp nhý sauồ Login to …ỉụtitleặ Login
  5. Gi¸o tr×nh lËp tr×nh øng dông CSDL Web ASP if CheckAccount(uname, upass) = true then response.redirect ("main.asp") else response.write (" Please check username and password! ") end if elseif uname "" then response.Write (" Please enter password! ") elseif upass "" then response.Write (" Please enter username! ") end if %> Username Password === St by hoangly85 === 80 hoangly85@updatesofts.com
ADSENSE

CÓ THỂ BẠN MUỐN DOWNLOAD

 

Đồng bộ tài khoản
7=>1