권장 : Windows 2003 설치 설정 IIS 설치 장 2003 : IIS없는 기본 설치. 설치하려면 시작 -> 관리 도구 -> 서버 마법사를 구성한 다음 단계별로 구성하십시오. 목록에서 항목을 선택할 때입니다. 목록에서 응용 프로그램 서버 (IIS, ASP.NET)를 선택하십시오
예제 시연 : 먼저 간단한 데이터베이스를 작성하고 읽을 함수를 작성하고 Dim 변수 온도를 작성하십시오.
ASP 코드
| 다음은 인용 된 내용입니다. <% 함수 displayRecords () Dim SQL, Conn, Rs sql = admin에서 select id, [szd_f], [szd_t] set conn = server.createobject (adodb.connection) Conn.open 드라이버 = {Microsoft Access Driver (*.mdb)}; dbq = & server.mappath (db.mdb) set rs = server.createobject (adodb.recordset) Rs. Open SQL, Conn, 1, 3 그렇지 않다면 그렇다면 희미한 온도 temp = <테이블 너비 = 90% 정렬 = 중심입니다 온도 = 온도 및 경계 = 1 BorderColor = Silver temp = temp & cellpacing = 2 cellpadding = 0> temp = temp & <tr bgcolor =#ccddee> <td 너비 = 5% temp = temp &> id </td> <td> 작동 </td> temp = temp & <td> value </td> </tr> rs.eof는 아닙니다 temp = temp & <tr> <td bgcolor =#ccddee> temp = temp & rs (id) & </td> <td> & rs (szd_f) Temp = temp & </td> <td> & rs (szd_t) 온도 = 온도 & </td> </tr> rs.movenext 향하게 하다 온도 = 온도 및 </table> DisplayRecords = Temp 또 다른 DisplayRecords = 데이터를 사용할 수 없습니다. 끝 If Rs.Close conn.close RS = 아무것도 설정하지 않습니다 Conn = 아무것도 설정하지 않습니다 엔드 기능 '캐시에 쓰십시오 함수 DisplayCachedRecords (SECS) Dim Retval, Datval, Temp1 retval = application (cache_demo) datval = application (cache_demo_date) datval =이면 datval = dateadd (s, secs, 지금) 끝 If temp1 = datediff (s, 지금, datval) Temp1> 0이고 retval <>라면 DisplayCachedRecords = retval '디버깅 코드 : 응답 <b> <font color = green> 캐시를 사용하여 데이터를 읽습니다 Response.write ... (& temp1 & seconds 남은) </font> </b> 응답 <br> <br> 또 다른 희미한 temp2 'DisplayRecords ()를 기능으로 변경하십시오 '캐시하려는 값 temp2 = displayRecords () application.lock 응용 프로그램 (cache_demo) = temp2 응용 프로그램 (cache_demo_date) = dateadd (s, secs, 지금) application.unlock DisplayCachedRecords = temp2 '디버깅 코드 : response.write <b> <font color = 빨간색> 새로 고침 캐시 디스플레이 ... 응답 </font> </b> <br> <br> 끝 If 엔드 기능 %> <!- response.write displayRecords () -> <html> <헤드> <title> 캐시를 사용하여 데이터베이스 </title>에서 데이터를 읽습니다 <스타일> Body, P, TD {Font-Family : Sans-Serif; 글꼴 크기 : 8pt; } TD {Padding-left : 5; } </스타일> </head> <body> <% Dim T1, T2 T1 = 타이머 Response.Write DisplayCacheDrecords (20) T2 = 타이머 %> <p align = center> 주거 시간 : < %= 왼쪽 ((cdbl ((t2 -t1) * 1000.0)), 5) %> ms </p> </body> </html> |
공유 : 기본 ASP 튜토리얼에서 ASP Adrotator 구성 요소 사용 ASP Adrotator 구성 요소 사용자가 웹 사이트를 입력하거나 페이지를 새로 고침 할 때마다 ASP Adrotator 구성 요소는 Adrotator 객체를 생성하여 다른 그림을 표시합니다. 구문 : 다음은 참조 된 내용입니다