Có 28+ tài liệu thuộc chủ đề "Nghiên cứu lập trình Web ASP"
tailieu.vn Xem trực tuyến Tải xuống
Để lấy dữ liệu trong ĩừỨ recordset ta hãy xem qua các vắ dụ sau ồ. B ây giờự ta sẽ tìm hiểu một số phýõng thức của Recordset 3.3.2.1.Các phýõng thức của đối týợng Recordset. Phýõng thức Diễn giải. Close Đóng đối týợng recordset và các đối t ýợng liên quan. NextRecordset X óa đối týợng Recordset hiện hành...
tailieu.vn Xem trực tuyến Tải xuống
Set objRs = Nothing Conn.Close. objRS.Fields(ỘHOTENỢ). set conn=Server.CreateObject("ADODB.Connection") conn.Open "bangluong". sql="SELECT * FROM LUONG WHERE HOTEN LIKE 'N% Ỗ Ợ set rs=Server.CreateObject("ADODB.recordset"). rs.Open sql, conn. <%do until rs.EOF%>. <%for each x in rs.Fields%>. rs.MoveNext%>. <%loop rs.close conn.close. Vắ dụ 2 : Hiện toàn bộ nhýng Họ tên đýợc sắp xếp. set rs=Server.CreateObject("ADODB.recordset"). Th ắ dụ sau týõng đýõng với vắ...
tailieu.vn Xem trực tuyến Tải xuống
strFilename = Request.ServerVariables("SCRIPT_NAME"). rsCounter.Open strSQL, "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=". adOpenKeyset, adLockPessimistic, adCmdText If rsCounter.EOF Then. rsCounter.AddNew iCount = 0. rsCounter.Fields("page_name").Value = strFilename Else. rsCounter.MoveFirst. iCount = rsCounter.Fields("hit_count").Value End If. Ổ Tã ng gi á trị lên ử và update vào ừở rsCounter.Fields("hit_count").Value = iCount + 1 rsCounter.Update. rsCounter.Close. Lệnh Request.ServerVariables. Request.ServerVariables("REMOTE_ADDR"). Request.ServerVariables("HTTP_USER_AGENT") %>.. <TD><B>Server Variable</B></TD>. <TD><B>Value</B></TD>. <TD><FONT SIZE gt;<. Item %></FONT></TD>. Request.ServerVariables(Item)....
tailieu.vn Xem trực tuyến Tải xuống
IF NOT (Request.Form("Name". Response.Cookies("Name". Request.Form("Name") Response.Cookies("Name").Expires = "Jan . IF Request.Cookies("Name". Response.Write("<FORM Method=Post>Enter Your Name: ") Response.Write("<INPUT Type=Text Name=Name>. Response.Write("<INPUT Type=Submit></FORM>") ELSE. Response.Write("Welcome back, "&Request.Cookies("Name". Sử dụng đối týợng Application:. Đối týợng này cho phép tạo các biến kiểu ĩpplicationứ Đó l à các biến toàn cục (global) d ùng chung cho tất cả các user của cùng một ứng...
tailieu.vn Xem trực tuyến Tải xuống
<p><font face=".VnTimeH">Nh ập username và passwordỉụfontặỉụpặ <p><font face=".VnTime". size gt;</font></p>. <p><font face=".VnTime". size gt;<input type="submit". name="Login"><input type="reset". name="Clear"></font></p>. rs.Open sql, conn,2,3. if not (rs.eof or rs.bof) then. Response.write “ởạn không có quyền ðýợc truy cập trang này”. Response.write “ắhào mừng bạn ” end if. rs.close. Session( “Ổogin”ờọ”ok. if not (session( “login”ờọ”ok”ờ then. response.write “ ởạn không ðýợc quyền truy nhật...
tailieu.vn Xem trực tuyến Tải xuống
"<table cellspacing=0 cellpadding=2 border=0>". "<tr>". "<td colspan=5 align=center><font size=2>". "</td>". "<td colspan=2><font size=2>"&Year(datDate)&"</td>". "</tr>". "<td align=right><font size=2>"&Days(I)&"</td>". "<td> </td>". "<td align=center><font size=2>". "<font size=3><b>". "</b>". "</table>"
tailieu.vn Xem trực tuyến Tải xuống
METHOD="post">. <TD ALIGN="right"><B>Name:</B></TD>. <TD><INPUT TYPE="text". SIZE gt;</INPUT></TD>. <TD ALIGN="right"><B>Comment:</B></TD>. VALUE="Sign Guestbook!"></INPUT>. objFile.Write "<B>". objFile.Write Server.HTMLEncode(Request.Form("name". objFile.Write ":</B>. objFile.Write Server.HTMLEncode(Request.Form("comment". objFile.Write "<BR>". objFile.WriteLine "". objFile.Close. <A HREF="./guestbook.asp">Back to the guestbook</A>. If DateDiff("d", objFile.DateLastModified, Date. <>. 0 Or bForce <>. Set objFile = objFSO.CreateTextFile(strFile, True) objFile.Write "<B>Hello</B>. objFile.WriteLine "I hope you like this guestbook!<BR>". objFile.Close End If. strTemp = strName If strTemp...
tailieu.vn Xem trực tuyến Tải xuống
<TABLE BORDER="<. TABLE_BORDER %>". <TD COLSPAN="3". ALIGN="center"><H2><. %></H2></TD>. <TD VALIGN="center"><B><. strYAxisLabel %></B></TD>. <TD VALIGN="top">. <TD ROWSPAN gt;<IMG SRC="./images/spacer.gif". HEIGHT="<. GRAPH_HEIGHT %>"></TD>. <TD VALIGN="top". ALIGN="right"><. iMaxValue %> </TD>. <TD VALIGN="bottom". ALIGN="right">0 </TD>. </TD>. <TD>. <TD VALIGN="bottom"><IMG SRC="./images/spacer_black.gif". WIDTH="<. GRAPH_BORDER %>". HEIGHT="<%=. <TD VALIGN="bottom"><IMG SRC="./images/spacer.gif". GRAPH_SPACER %>". HEIGHT gt;</TD>. <TD VALIGN="bottom"><IMG SRC="./images/spacer_red.gif". iBarWidth %>". iBarHeight %>". ALT="<. aValues(I) %>"></A></TD>. <TD COLSPAN="<. 1 %>"><IMG SRC="./images/spacer_black.gif"....