Trang chủ
Bài viết mới
Diễn đàn
Bài mới trên hồ sơ
Hoạt động mới nhất
VIDEO
Mùa Tết
Văn Học Trẻ
Văn Học News
Media
New media
New comments
Search media
Đại Học
Đại cương
Chuyên ngành
Triết học
Kinh tế
KHXH & NV
Công nghệ thông tin
Khoa học kĩ thuật
Luận văn, tiểu luận
Phổ Thông
Lớp 12
Ngữ văn 12
Lớp 11
Ngữ văn 11
Lớp 10
Ngữ văn 10
LỚP 9
Ngữ văn 9
Lớp 8
Ngữ văn 8
Lớp 7
Ngữ văn 7
Lớp 6
Ngữ văn 6
Tiểu học
Thành viên
Thành viên trực tuyến
Bài mới trên hồ sơ
Tìm trong hồ sơ cá nhân
Credits
Transactions
Xu: 0
Đăng nhập
Đăng ký
Có gì mới?
Tìm kiếm
Tìm kiếm
Chỉ tìm trong tiêu đề
Bởi:
Hoạt động mới nhất
Đăng ký
Menu
Đăng nhập
Đăng ký
Install the app
Cài đặt
Chào mừng Bạn tham gia Diễn Đàn VNKienThuc.com -
Định hướng Forum
Kiến Thức
- HÃY TẠO CHỦ ĐỀ KIẾN THỨC HỮU ÍCH VÀ CÙNG NHAU THẢO LUẬN Kết nối:
VNK X
-
VNK groups
| Nhà Tài Trợ:
BhnongFood X
-
Bhnong groups
-
Đặt mua Bánh Bhnong
CÔNG NGHỆ
Công Nghệ Thông Tin
Web Development
Cách gửi dữ liệu nhị phân từ ASP
JavaScript is disabled. For a better experience, please enable JavaScript in your browser before proceeding.
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an
alternative browser
.
Trả lời chủ đề
Nội dung
<blockquote data-quote="hoangphuong2003" data-source="post: 68537" data-attributes="member: 1882"><p style="text-align: center"><img src="https://thanglong-aptech.com/wp-content/uploads/2010/12/asp2203.jpg" alt="" class="fr-fic fr-dii fr-draggable " data-size="" style="" /></p><p></p><p><strong>Phần lớn thao tác của chúng ta thường chỉ đến một tập tin đã tồn tại và thường dùng phương thức Response.Redirect. Về phía client, phần lớn các loại tập tin nhận được là loại thường gặp như Adobe Acrobat (.pdf), Microsoft Word (.doc) và PKZip (.zip).</strong></p><p>Tuy nhiên để bảo mật chúng ta cần một cách khác để gửi các loại tập tin đến cho client. Chúng ta thử xem cách này</p><p>Tạo một hàm để đọc tập tin</p><p>Code:</p><p>?</p><p>Function ReadBinaryFile(ByVal sFileName As String) As Variant</p><p>Dim FileLength As Long</p><p>Dim FileNo As Long</p><p>Dim aBytes() As Byte</p><p>On Error GoTo ErrHandler</p><p>FileNo = FreeFile()</p><p>Open sFileName For Binary Access Read As #FileNo</p><p>FileLength = FileLen(sFileName)</p><p>ReDim aBytes(FileLength)</p><p>Get #FileNo, , aBytes</p><p>Close #FileNo</p><p>ReadFile = aBytes</p><p>End Function</p><p>Bây giờ chúng ta có một mảng dữ liệu trong ASP</p><p>Code:</p><p>?</p><p><%</p><p>Response.Buffer = True</p><p>Response.Clear</p><p>Response.AddHeader ''content-disposition'', ''attachment; filename='' & FileName</p><p>Response.ContentType = ''application/pdf''</p><p>vStream = oUtility.ReadBinaryFile(Server.MapPath(PathName))</p><p>Response.BinaryWrite(vStream)</p><p>Set oUtility = Nothing</p><p>Response.End</p><p>%></p><p>Sưu tầm</p><p><strong>Nguồn</strong>: <strong><em>Cách gửi dữ liệu nhị phân từ ASP</em></strong></p><p>________________________</p><p>Thuận vợ thuận chồng , con đông mệt quá!!!</p><p>https://thegioi-congnghe.blogspot.com/</p><p>Kiến thức tự học lập trình ASP</p><p>Học lập trình dot net</p></blockquote><p></p>
[QUOTE="hoangphuong2003, post: 68537, member: 1882"] [CENTER][IMG]https://thanglong-aptech.com/wp-content/uploads/2010/12/asp2203.jpg[/IMG][/CENTER] [B]Phần lớn thao tác của chúng ta thường chỉ đến một tập tin đã tồn tại và thường dùng phương thức Response.Redirect. Về phía client, phần lớn các loại tập tin nhận được là loại thường gặp như Adobe Acrobat (.pdf), Microsoft Word (.doc) và PKZip (.zip).[/B] Tuy nhiên để bảo mật chúng ta cần một cách khác để gửi các loại tập tin đến cho client. Chúng ta thử xem cách này Tạo một hàm để đọc tập tin Code: ? Function ReadBinaryFile(ByVal sFileName As String) As Variant Dim FileLength As Long Dim FileNo As Long Dim aBytes() As Byte On Error GoTo ErrHandler FileNo = FreeFile() Open sFileName For Binary Access Read As #FileNo FileLength = FileLen(sFileName) ReDim aBytes(FileLength) Get #FileNo, , aBytes Close #FileNo ReadFile = aBytes End Function Bây giờ chúng ta có một mảng dữ liệu trong ASP Code: ? <% Response.Buffer = True Response.Clear Response.AddHeader ''content-disposition'', ''attachment; filename='' & FileName Response.ContentType = ''application/pdf'' vStream = oUtility.ReadBinaryFile(Server.MapPath(PathName)) Response.BinaryWrite(vStream) Set oUtility = Nothing Response.End %> Sưu tầm [B]Nguồn[/B]: [B][I]Cách gửi dữ liệu nhị phân từ ASP[/I][/B] ________________________ Thuận vợ thuận chồng , con đông mệt quá!!! https://thegioi-congnghe.blogspot.com/ Kiến thức tự học lập trình ASP Học lập trình dot net [/QUOTE]
Tên
Mã xác nhận
Gửi trả lời
CÔNG NGHỆ
Công Nghệ Thông Tin
Web Development
Cách gửi dữ liệu nhị phân từ ASP
Top
