INTECH
Chào Mừng Bạn Đã Ghé Thăm Diễn Đàn Intech.forumvi.com của chúng tôi.

Mong rằng tại đây bạn sẽ nhận được những thông tin hữu ích,, và đáp ứng được nhu cầu của bạn.

Tuy ít nhiều chúng tôi vẫn còn khá nhiều thiếu sót về nội dung và hình thức, mong nhận được ý kiến đóng góp từ các bạn để chúng tôi tự hoàn thiện.

Hiện tại, bạn có thể đăng nhập Intech thông qua Open ID Facebook, hết sức nhanh chóng và tiện lợi.

Xin lưu ý: Thông tin bạn đăng kí về Giới tính và Ngày sinh, chúng tôi khảo sát nhằm thống kê và kịp gửi lời chúc mừng đến các bạn trong các dịp lễ, sinh hoạt,...trong Diễn Đàn.

Quyền Lợi: Được tham gia giao lưu, chia sẻ kinh nghiệm cùng các thành viên, được tải các tài liệu, phần mềm hỗ trợ cần thiết,...

Các đường Link chỉ sử dụng được khi đã đăng nhập.

Xin Cảm Ơn và gửi đến các bạn lời chào Thân Ái từ Intech.forumvi.com.

Join the forum, it's quick and easy

INTECH
Chào Mừng Bạn Đã Ghé Thăm Diễn Đàn Intech.forumvi.com của chúng tôi.

Mong rằng tại đây bạn sẽ nhận được những thông tin hữu ích,, và đáp ứng được nhu cầu của bạn.

Tuy ít nhiều chúng tôi vẫn còn khá nhiều thiếu sót về nội dung và hình thức, mong nhận được ý kiến đóng góp từ các bạn để chúng tôi tự hoàn thiện.

Hiện tại, bạn có thể đăng nhập Intech thông qua Open ID Facebook, hết sức nhanh chóng và tiện lợi.

Xin lưu ý: Thông tin bạn đăng kí về Giới tính và Ngày sinh, chúng tôi khảo sát nhằm thống kê và kịp gửi lời chúc mừng đến các bạn trong các dịp lễ, sinh hoạt,...trong Diễn Đàn.

Quyền Lợi: Được tham gia giao lưu, chia sẻ kinh nghiệm cùng các thành viên, được tải các tài liệu, phần mềm hỗ trợ cần thiết,...

Các đường Link chỉ sử dụng được khi đã đăng nhập.

Xin Cảm Ơn và gửi đến các bạn lời chào Thân Ái từ Intech.forumvi.com.
Bạn có muốn phản ứng với tin nhắn này? Vui lòng đăng ký diễn đàn trong một vài cú nhấp chuột hoặc đăng nhập để tiếp tục.
Đơn vị cung cấp sản phẩm giá cạnh tranh với nhiều loại mặt hàng.Là đơn vị tài trợ hàng đầu của Forum. Liên kết: https://thanhnguyenstore.com/
Latest topics
Thích Bài viết này
Lượt Truy Cập
Bộ Đếm
Thống Kê
Hiện có 2 người đang truy cập Diễn Đàn, gồm: 0 Thành viên, 0 Thành viên ẩn danh và 2 Khách viếng thăm

Không

View the whole list


Go down
Thanh Nguyên
Thanh Nguyên
Admin
Admin
Tổng số bài gửi : 527
Được Cảm Ơn : 59
Join date : 11/10/2012
Age : 29
Đến từ : Bà Rịa-Vũng Tàu
https://thanhnguyenstore.com/

Upload Ảnh lên Server. Empty Upload Ảnh lên Server.

Sun Jan 27, 2013 2:26 pm
Hôm nay INTECH xin hướng dẫn các bạn sử dụng File Upload trong ASP.NET để upload file từ máy tính lên server (ở đây mình dùng local host)

Các bạn tạo 1 website mới, mang tên UploadAnh, sau đó làm theo các bước bên dưới:

Các bạn Click phải vào project-> New-> folder -> đặt tên cho Folder là Hinhanh:

Upload Ảnh lên Server. Ashamp41

Sau đó, các bạn thiết kế trang Upload ảnh như sau:

Upload Ảnh lên Server. Ashamp42

code upload ảnh các bạn làm như sau:

Code:
Private Function Load_file() As Boolean
        Load_file = True
        If FileHinh.FileName <> "" Then
            If IsPostBack Then
                'khai bao duong dan luu file
Dim pa As String = Server.MapPath("~/hinhanh/")
                Dim fileOk As Boolean = False
                'neu dieu khien filehinh co up file
If FileHinh.HasFile Then
                    Dim file As String
      file = System.IO.Path.GetExtension(FileHinh.FileName).ToLower()
                    Dim allowed As String() = {".jpg", ".gif"}
                    'kiem tra xem duoi mo rong cua file upload co thuoc tap tin duoi cho phep hay ko
                    For i As Integer = 0 To allowed.Length - 1
                        If file = allowed(i) Then
                            fileOk = True
                        End If
                    Next
If fileOk Then
                        Try
                            'thuc hien lua file upload vao duong dan
                    FileHinh.PostedFile.SaveAs(pa & FileHinh.FileName)
                    HINH.ImageUrl = "~/hinhanh/" & FileHinh.FileName
                    LB.text="Upload Thành Công"
                            'loi save file
                        Catch ex As Exception
                            lb.Text = "không thể save file"
                            Load_file = True
                        End Try
                    Else
                        lb.Text = "sai đường dẫn file"
                        Load_file = False
                    End If
                Else
                    lb.Text = "file không tìm thấy"
                    Load_file = False
                End If
            End If
        Else
            lb.Text = "chưa chuẩn file"
            Load_file = False
        End If
    End Function

Trong đó:
FileHinh: ID của Fileupload
Lb: ID của label thông báo
HINH: ID của 1 image

Code cho nút Upload;

Code:
Call Load_file()

Chạy thử trên trình duyệt, ta được kết quả:

Upload Ảnh lên Server. Ashamp34

Tắt trình duyêt và ngưng chương trình, ta nhấn nút refresh trong mục Solution để xem lại các file vừa upload;

Upload Ảnh lên Server. Ashamp43

Các bạn có thể áp dụng code này vào những chương trình upload file khác, ví dụ mp3, file pdf,...

Chúc Các bạn thành công.

Tài liệu từ trường ĐH Bà Rịa-Vũng Tàu

_________________
Thanh Nguyên Store

[You must be registered and logged in to see this link.]
Về Đầu Trang
Permissions in this forum:
Bạn không có quyền trả lời bài viết