<% dim strBody Dim str Dim TaiKhoan Dim Pass Dim Mail Dim Ten Dim Diachi Dim DiachiWeb Dim SoDT Mail = Request.Form("txtEmail")& "" Ten= Request.Form("txtName")& "" Diachi= Request.Form("txtAddress")& "" Chude= Request.Form("txtSubject")& "" SoDT= Request.Form("txtTel")& "" NoiDung= Request.Form("txtContent")& "" strBody = "

E-MAIL LIÊN HỆ ĐƯỢC GỬI TỪ WEBSITE"&_ "<" & "BR> Thông tin người gửi:"&_ "<" & "BR>______________________________________________"&_ "<" & "BR>Thông tin cá nhân: "&Ten &_ "<" & "BR>Tel: "& SoDT &_ "<" & "BR>E-mail: "&Mail&_ "<" & "BR>Địa chỉ: "&Diachi&_ "<" & "BR> Nội dung:"&_ "<" & "BR>______________________________________________"&_ "<" & "BR>Chủ đề: "&Chude&_ "<" & "BR>Nội dung: "&NoiDung sfrom = Mail sto ="hanhgt@hoangphu.com.vn" schude = " ĐĂNG KÝ " Set webMailObj = CreateObject("CDONTS.NewMail") webMailObj.BodyFormat = 0 webMailObj.MailFormat = 0 On Error Resume Next ' catch errors webMailObj.Send sfrom, sto, schude, strBody If Err <> 0 Then ' error occurred Response.write Err.Description End If Set webMailObj = Nothing %>
 XIN VUI LÒNG LIÊN HỆ VỚI CHÚNG TÔI THEO ĐỊA CHỈ SAU:

Công ty TNHH NAB
Địa chỉ: Số 12 - Ngõ 316 Lê Trọng Tấn - Thanh Xuân - Hà Nội.

Điện thoại: +84.04.5659293
Fax...........:.+84.04.5659325
E-mail......: welcome@nabvietnam.com
Website...: www.nabvietnam.com

 

 THÔNG TIN CỦA QUÝ KHÁCH
Họ và tên Quý vị:
Địa chỉ liên lạc:
Điện thoại:
E-mail của Quý vị:
Chủ đề:
Nội dung:
   

 
Chứng khoán
Ngoại tệ
 Giá vàng
Thời tiết