main.asp 로 정보를 전달하는 코드는 아래의 코드입니다.
name이라는 변수를 home 이라는 변수에 다시 넣고 이 변수를 main.asp 페이지에서
<%=home%> 으로 변수값을 받아 출력시키게 됩니다.
<%
home = Request.QueryString("name")
%>
===========
※ Write 메쏘드(브라우저 화면에 어떤 값을 출력할때) : <% Response.Write 내용 %>과 또는 <%=내용%>
※ Redirect 메쏘드(현재 페이지에서 다른 페이지로 화면전환) : <% Response.Redirect "http://..." %>
============
유의할 것은 변수를 " " 로 둘러싸게 되면 문자로 인식해 버립니다. <%"=home"%> == home 문자로 출력.
하나 이상의 복합 정보들을 넘길때에도 마찬가지이지만 개별 정보의 구분은 & 으로 구분지어 놓습니다.
Private Sub form_Load()
'각 이미지를 개체배열 grim()에 대입..
set grim(0) = Loadpicture("/images/ijg1.jpg")
set grim(0) = Loadpicture("/images/ijg1.jpg")
set grim(0) = Loadpicture("/images/ijg1.jpg")
set grim(0) = Loadpicture("/images/ijg1.jpg")
End Sub
Private Sub Timer1_Timer()
Staric n '정적변수
'n을 4로 나눈 정수의 나머지(0,1,2,3)
Img.Picture = grim(n Mod 4)
n = n+1
End Sub
Private Sub VScroll_Change()
'이동줄 값에 따라 타이머 사건 발생간격을 변경,
Timer1_Interval = 1000 - Vscroll.Vlaue
End Sub
※ value 값이 100이라면 시스템의 타이머에 의해 100/1000초 간격으로 Timer1_Timer() 프로시저가 호출되어 실행.