Welcome to UScampus.com - ´M¡±ä¤j¾Ç,¡Âd¾Ç¬ü¢Xê

<%@ LANGUAGE = "VBScript" %> <% Response.Expires = 0 response.redirect "http://www.uscampus.com.tw" %> <% dim SQLHeading, rsSch, schid, schct, schno, rd, schName randomize rd = rnd(12) SQLHeading = "SELECT [Schools].[SchoolID] AS SchoolID, [Name] from Schools where ([Level] = 2 OR [Level] = 3 OR [Level] = 4 OR [Level] = 5) and [Imageenable] = 1" if not isobject(session("connC")) then Set Session("connC")=Server.CreateObject("adodb.connection") Session("connC").open "ief","uscampus","webusers" end if Set rsSch = Session("connC").Execute(SQLHeading) schct = 0 while not rsSch.eof schct = schct + 1 rsSch.movenext wend schno = int(schct*rd) i = 0 rsSch.Movefirst while i < schno i = i+1 rsSch.Movenext wend schid = rsSch(0) schName = rsSch(1) %> <% DisplayMonth = (MonthName(Month(Date))) DisplayMonth = Left(DisplayMonth,3)&"." %> <% Dim intLowerBound ' Lower bound of the random number range Dim intUpperBound ' Upper bound of the random number range Dim intRangeSize ' Size of the range Dim sngRandomValue ' A random value from 0 to intRangeSize Dim intRandomInteger ' Our final result - random integer to return If IsNumeric(Request.QueryString("lowerbound")) Then intLowerBound = CLng(Request.QueryString("lowerbound")) Else intLowerBound = 0 End If If IsNumeric(Request.QueryString("upperbound")) Then intUpperBound = CLng(Request.QueryString("upperbound")) If intLowerBound = 0 And intUpperBound = 0 Then intUpperBound = 3 Else intUpperBound = 3 End If If intLowerBound > intUpperBound Then Dim iTemp iTemp = intLowerBound intLowerBound = intUpperBound intUpperBound = iTemp End If Randomize() intRangeSize = intUpperBound - intLowerBound + 1 sngRandomValue = intRangeSize * Rnd() sngRandomValue = sngRandomValue + intLowerBound intRandomInteger = Int(sngRandomValue) %> Welcome to UScampus.com - ´M¡±ä¤j¾Ç,¡Âd¾Ç¬ü¢Xê

Taiwan Site

Åwªï¨Ó¨ì¬ü¢Xê®Õ¶éºô¡Â¸¡I¡±AY¦³Ãö©ó¡Âd¾Ç¥H¤Î¦b¬ü¥Í¬¡¤Wªº¢XÝÃD¡A¬Û«H¡±A³£¡Âà¦b³o¸Ì¡±ä¨ìµª®¡Ñ¡C½Ð¢XÑ¡PÓ¥ª¨Òªº¸ê®Æ¿ï¶µ¡A¤Àªù¡±OÃþªº¡±ä¨ì¡±A©Ò»Ýnªº¸ê¢XT¡C

¾Ç®Õ¡ÓM³X

¡±ó¶i¤@¨BÁA¸Ñ...
<%=schName%>

美國教育基金會致函美國國務院支持留學政策 (NEW!)
美國國務院鼓勵國際學生到美國來學英文 (NEW!)
2005美國教育展，即將登場！ (NEW!)
Win Cash for College, Join Essay Contest!!! (NEW!)
International Cultural Service Program！
美國教育海外諮詢中心-台北獲得 '2002 ETS Excellence Awards for Overseas Advising Center'

赴美留學的國際學生想要購得計劃佳、保費便宜的醫療保險計劃嗎？別錯過我們推出的新學生醫療保險計劃！！

¼öªù¢XÝÃD		µu´Á½Òµ{		¬ü¢Xê¡ÓÐ¨\|®i
	¡Âd¾Ç¤è¡Óªº¢XÝÃD¦h¦p¤û¤ò¡A³o¸Ì¦³¨Ç¸g¡Ó`³Q¢XÝ¤Îªº¢XÝÃD¡A¨Ì¨ä©Ê½è¤À¦C¥X¨Ó¡A¨Ñ¡±A¢XÑ¦Ò¡C		¡PQn¡±Q¥Îµu¼Èªº¢X²´Á¥R¥R¹q¡A¾Ç²ß^¤å¡A¡ÓM¡P~¶i¡Ñ¡A©Î¬O¾Ç²ß¤@¡±Þ¤¡±ªø¡C¡±ÚÌªºµu´Á½Òµ{¡A¬¢X¡Óz¶q¨q¢Xµ¡C		nÀò¡Óo¨Ó¬ü¢Xê¡Âd¾Çªº¸ê¢XT¡A³Ì¦n¢XÑ¥[¬ü¢Xê¡ÓÐ¨\|¢Xòª¡Ò¡P\|¥D¿ìªº¬ü¢Xê¡ÓÐ¨\|®i

¼ú¾Çª¡Ò¡Pj´M		¡Ó´¡ÂÁ¬ü¢Xê		¦P¾Ç¡P\|²ÕÂ´
	¼ú¾Çª¡Ò¡±Î¡±Î¦â¦â¡A¥h¨º¸Ì¡±ä¡H¦p¦ó¥Ó½Ð¡H³o¸Ìµ¹¡±A¸Ô²ÓªºµªÂÐ¡C		¬ü¢Xê¦³¤¤QÓ¦{¡A¦{¦{³£¦³¤£¿ùªº¤j¡ÓM¢X\|®Õ¤Î¡ÓH¡ÓJ¢Xª¤¤¡C¨s³º¥h¨º¸Ì¡Âd¾Ç¡H¤£¡±«¬Ý¬Ý¡±ÚÌ¬¢X¡±A¡PÇ³Æªº¦U¦{Â²¤¶¡C		³\¦h¾Ç®Õ³£¦³¨È¬w¦U¢Xê¾Ç¥Í²Õ¦¨ªº¦P¾Ç¡P\|¡A¥¦¬O¥æ´«¾Ç²ß¤ß¡Óo¡AÁA¸Ñ¡Pí¦aª¬ªp¡A¤]¬Oµ²¥æªB¤Íªº¦a¤è¡C

¾Ç¥ÍÂåÀø«OÀI	¬ü¢Xê¡ÓÐ¨\|¤j¥þ	®ü¥~¤¤¤ß
¥~¢Xê¾Ç¥Í¤@©wn¦³ÂåÀø«OÀI¤~¡Âàµù¥U¤W½Ò¡C½Ð¬Ý¬Ý¡±ÚÌ¬¢X¡±Aºë¥´²Óºâ¬D¥X¨ÓªºA¡BB¡BC¤TºØ«OÀI¡C	¡PQª¾¹D¬ü¢Xê¡ÓÐ¨\|¨t²Î¡B¾Ç®Õ»{ÃÒ¨î«¡Ñ¡BÁA¸Ñ¦ó¿¡Ñªø¬KÃÃÁp¡Pù¶Ü¡H¦b¦¹¡±Y¥i¤â¨ì¾à¨Ó¡C	¡P\|¨£¡ÓM¡P~¿Ô¸ß¦Ñ®v¡AÁA¸Ñ¼Æ¥H¤dpªº¾Ç®Õ

ÃÙ¡±UªÌ