Các lĩnh vực khác : ASP 3.0 / ASP Classic

Tài liệu ngôn ngữ ASP

automail-noreply@dot.net.vn — Mon, 01 Sep 2008 23:34:46 GMT

Các Bác có tài liệu ASP và đường đường link lấy tài liệu miễn phí ... thì các bác chỉ giúp với ? Bởi em chưa có tài ít tài liệu, ...

giúp mình config source bán hàng này với

automail-noreply@dot.net.vn — Tue, 26 Aug 2008 23:38:38 GMT

Mình có 1 cái source bán hàng nhưng ko biết config như thế nào

Các bạn làm ơn giúp mình nhé..

source Ashop.. download >>> http://giaitri.org/shop.rar

http://hoadep.somee.com/home/images/a-shop71.zip

Ai giúp mình config được mình xin hậu tạ

Cấu hình khi post trang web lên mạng.

automail-noreply@dot.net.vn — Tue, 15 Jul 2008 16:54:02 GMT

Tôi không biết phải làm thế nào khi cấu hình trang web asp, cơ sở dữ liệu SQL server 2000 kết nối với webserver thay vì máy chủ nội bộ. Tôi đã cài đặt thành công và chạy ứng dụng trên máy chủ nội bộ rồi. Ai biết xin chỉ giùm.

tại sao trang web asp chạy trên iis win XP lại 0 hoạt động

automail-noreply@dot.net.vn — Tue, 15 Jul 2008 16:46:37 GMT

tại sao trang web asp chạy trên iis win XP lại 0 hoạt động (cai này tôi dùng Dreamwere) thử nhưng 0 chạy bác nào biết xin chỉ giáo dúp với

day la doan code rat hay mong moi nguoi tham khao

automail-noreply@dot.net.vn — Sun, 15 Jun 2008 08:40:30 GMT

Private Function sotram2chu(socandoi) 'As String
' Khai báo dữ liệu
Dim chuso(11) 'As String
Dim shangchuc, shangtram, shangdonvi
Dim str 'As String
chuso(1) = "một"
chuso(2) = "hai"
chuso(3) = "ba"
chuso(4) = "bốn"
chuso(5) = "năm"
chuso(6) = "sáu"
chuso(7) = "bảy"
chuso(8) = "tám"
chuso(9) = "chín"
str = ""
' Kiểm tra số cần đổi có hợp lệ không
If socandoi >= 1000 Then
sotram2chu = "???"
Exit Function
End If
'Xác định 3 ký số miêu tả hàng trăm, hàng chục & đơn vị
shangtram = socandoi \ 100
socandoi = socandoi Mod 100
shangchuc = socandoi \ 10
shangdonvi = socandoi Mod 10
If shangtram >= 1 Then
str = chuso(shangtram) & " trăm"
End If
If shangchuc >= 2 Then
str = str & " " & chuso(shangchuc) & " mươi"
ElseIf shangchuc = 1 Then
str = str & " mười"
End If
If shangdonvi = 0 Then
sotram2chu = str
Exit Function
End If
If shangchuc = 0 Then
If shangtram <> 0 Then
str = str & " lẻ " & chuso(shangdonvi)
Else
str = str & " " & chuso(shangdonvi)
End If
sotram2chu = str
Exit Function
End If
If shangchuc = 1 Then
If shangdonvi <> 5 Then
str = str & " " & chuso(shangdonvi)
Else
str = str & " lăm"
End If
sotram2chu = str
Exit Function
End If
If shangdonvi = 1 Then
str = str + " mốt"
ElseIf shangdonvi = 5 Then
str = str + " lăm"
Else
str = str + " " + chuso(shangdonvi)
End If
sotram2chu = str
End Function

'------------------------------------
' Hàm đổi 1 số nguyên bất kỳ thành chuỗi phát âm tương ứng
'------------------------------------
Private Function so2chu(socandoi)
Dim idx 'As Integer
Dim ba_kyso 'As Integer
Dim str, str_tram 'As String
Dim tu_ngan_cach 'As String
Dim chu_cach(5) 'As String
chu_cach(1) = "tỷ"
chu_cach(2) = "ngàn"
chu_cach(3) = "triệu"
idx = 0 ' vi tri dau cham phan cach tung 3 ky so
str = ""
str_tram = ""
While socandoi <> 0
ba_kyso = socandoi Mod 1000
socandoi = socandoi \ 1000
str_tram = sotram2chu(ba_kyso) 'nen bo cac khoang trong dan dau
If idx = 0 Then ' vi tri don vi
str = str_tram
ElseIf Len(str_tram) <> 0 Then 'vi tri ngan, trieu, ty
tu_ngan_cach = chu_cach((idx Mod 3) + 1)
str = str_tram + " " + tu_ngan_cach + " " + str
ElseIf (idx Mod 3) = 0 Then
str = "tỷ " + str
End If
idx = idx + 1
Wend
so2chu = str
End Function

//hàm lưu thông tin về người dùng truy xuất và đếm số lượt người
Function UserCount()
'khai báo các biến cần dùng
dim MyConnection
dim MyCommand
dim MyRecordset
'tạo 1 connection đến database dung DSN
set MyConnection = Server.CreateObject("ADODB.Connection")
MyConnection.Open "DSN=MyDatabase"

'tạo đối tượng Command
set MyCommand = Server.CreateObject("ADODB.Command")
MyCommand.ActiveConnection = MyConnection
'lưu thông tin người dùng đang truy xuất vào database
MyCommand.CommandText = "INSERT INTO ClientsTab VALUES ('" & Request.ServerVariables("Remote_Addr") & "','" & Request.ServerVariables("Path_Info") & "','" & Request.ServerVariables("HTTP_User_Agent") & "')"
MyCommand.Execute()
'đọc tất cả record trong table ClientsTab
MyCommand.CommandText = "SELECT * FROM ClientsTab"
set MyRecordset = MyCommand.Execute()
clientnum = 0
'đếm số record trong table ClientsTab
Do While Not MyRecordset.EOF
clientnum = clientnum + 1
MyRecordset.MoveNext
Loop
'đổi số lượt người ra chuỗi phát âm
usercount=so2chu(clientnum)
'đóng các đối tượng đã dùng lại
MyRecordset.Close
MyConnection.Close
End Function
%>
</head>

<body>
Bạn là người truy cập thứ <b><%=UserCount()%></b> tới trang web này.
...
</body>
</html>

SQL Server does not exist or access denied.

automail-noreply@dot.net.vn — Sun, 15 Jun 2008 08:37:58 GMT

SQL Server does not exist or access denied.
Đây là lỗi nó xuất hiện khi em connect vào database
<%
connStr= "Provider =SQLOLEDB ; Data Source =localhost; User ID=sa; PWD=; Initial Catalog= YouthBank"
set conn= Server.CreateObject("ADODB.Connection")
conn.open connStr
%>
Em chả hiểu tại sao nữa??? Em đã thử cài lại SQL Server, khởi động nó. Ko biết lỗi này là do gì ạ? Có ai từng gặp thì giúp em với ạ. Em cảm ơn :)

Tạo trang gửi mail !

automail-noreply@dot.net.vn — Thu, 29 May 2008 16:17:48 GMT

Chào các pác !

Em đang gặp phải vấn đề khó khăn mong các pác chỉ giúp em với. Em thiết kế trang web bằng ASP, em chưa tạo được trang liên hệ (nghĩa là khi click vào đó thì sẻ cho ra 1 trang soạn thảo nội dung, địa chỉ mail đến sẻ được gán mặt định của webmaster, ô tiêu đề và mail của người gửi do họ tự điền vào, khi soạn xong khác viếng thăm chỉ nhấn nút sent thì thư sẻ được gửi đi, hoặc nhấn và nút soạn lại thì tất cả nội dung của người nhập sẻ được xóa và làm lại từ đầu).

Pác nào có trang tương tự như vậy cho em xin code nhé!

Cám ơn rất nhiều.

Thư viện gửi email bằng ASP

automail-noreply@dot.net.vn — Wed, 23 Apr 2008 10:39:06 GMT

Khi làm việc với ASP nói riêng, và website nói chung, chúng ta thường có nhu cầu gửi các e-mail trực tiếp từ trang web.

Trong chủ đề này, tôi xin gửi các bác một thư viện gửi email trực tiếp từ web.

Thư viện này được viết sẵn cho 3 loại components gửi email thông tin là:

CDONTS - được cài đặt sẵn trong Windows 2000
CDOSYS - được cài đặt sẵn trong Windows 2000/XP/2003
Persits ASPEmail - free component

Trong thư viện sẽ có một constant là APP_MAIL_OBJECT_NAME chỉ định ra component email sẽ sử dụng. Khi đó nội dung của constant này có thể là: CDOSYS (gửi email bằng CDOSYS), CDONTS (gửi email bằng CDONTS) và PERSITS (gửi email bằng component PERSITS ASPEmail).

Ngoài ra sẽ có một procedure là SendMail(Recipient, From, ReplyTo, CcRecipient, BccRecipient, Subject, Message) được sử dụng để gọi hàm gửi email. Procedure này sẽ dựa vào giá trị của constants APP_MAIL_OBJECT_NAME được nêu ở trên để gọi hàm gửi email tương ứng với component sẽ sử dụng.

Lưu ý: Nếu sử dụng component CDOSYS thì phải thêm dòng "" vào file global.asa của website, nếu không sẽ sinh ra lỗi.

Download source code của thư viện gửi e-mail tại đây!

Chúc các bạn vui vẻ.

xin các bạn giúp mình cái source này với

automail-noreply@dot.net.vn — Wed, 23 Apr 2008 09:10:48 GMT

mình tìm đc cái source bán sách online ... nhưng sao mình móc vào SQL mà không đc ... xin các bạn trong diễn đàn chỉ giúp mình làm mãi mà nó không chạy ... mình muốn lấy cái này làm đồ án tốt nghiệp sắp tới của mình ... mình cảm ơn các bạn nhiều lắm .. xin Mod đừng trách nếu mình post ko đúng chỗ nhé .. giờ mình đang rất luóng cuống ... đừng Del bài của mình nhé .. giúp mình với các bạn .. mình biết ơn nhiều lắm .

http://www3.webng.com/Kid2111/data/E_BookStore.rar

tạo form để kẻ bảng bằng asp

automail-noreply@dot.net.vn — Wed, 16 Apr 2008 11:23:23 GMT

bác nào làm hộ em bài này bằng asp với ,đề là tạo 1 form để nhập thông tin kích thước,số dòng,số cột của bảng,tùy chọn có viền hoặc không có,tùy chọn align cho bang và cho dòng,tạo valign cho cột,2 button submit va reset,khi click submit thì hiện ra bảng theo yêu cầu.Thank các bác nhiều

set focus một textbox

automail-noreply@dot.net.vn — Sat, 12 Apr 2008 11:48:34 GMT

Anh em làm ơn hướng dẫn mình set focus một textbox đi. Thanks

xin giúp tôi

automail-noreply@dot.net.vn — Sat, 29 Mar 2008 14:02:29 GMT

khi tôi khởi động web application thì nó bào lỗi "Visual studio.NET has detected that the specified Web server is not running ASP.net V 1.1.you will be unlable to run ASP.net web application or sevices"
không bít sửa ra sao nữa mong các pro giúp tui vụ này thank

Gui mail kich hoat tai khoan??

automail-noreply@dot.net.vn — Sat, 29 Mar 2008 08:58:30 GMT

Các huynh tỉ ui, muội muốn sau khi người dùng đăng ký vào hệ thống thì hệ thống sẽ tự động gửi Email đến người dùng để kích hoạt tài khoản. Muội gửi email được rồi, nhưng không biết làm sao để gửi cái link kích hoạt tài khoản. Các huynh tỉ có ai làm rồi thì giúp dùm em với.

co ai co chuong trinh asp de cai vao may khong ?

automail-noreply@dot.net.vn — Fri, 21 Mar 2008 08:21:02 GMT

Ban nao co chuong trinh asp de cai vao may tinh khong chi cho minh voi. Cam on cac ban nhieu