<% '?t?@?C???I?u?W?F?N?g?I?e?` Set FileObject = Server.CreateObject("Scripting.FileSystemObject") CntFile = Server.MapPath("./") & "\counter.txt" '?J?E???^?t?@?C???C???Y Set CntStm = FileObject.OpenTextFile(CntFile,1,True,TristateFalse) If CntStm.AtEndOfStream Then AcCnt = 1 Else AcCnt = CntStm.ReadLine + 1 End If CntStm.Close '?J?E???^?t?@?C???????Y Set CntStm = FileObject.CreateTextFile(CntFile,True,False) CntStm.WriteLine(AcCnt) CntStm.Close '?J?E???^?I???l?c?cIMG?^?O?d??????E AcImg = "" AcWork = AcCnt For i = 1 to 6 Num = AcWork Mod 10 AcWork = AcWork \ 10 AcImg = "" & AcImg Next %> ƒŠƒ“ƒN

‚k‚h‚m‚j‚riÔŽš‚ª‘ŠŒÝƒŠƒ“ƒNj

>>‚ 

ƒAƒCƒ\ƒgƒjƒNƒX
ó–삶‚ë‚ñ‚c‚‰‚‡‚‰‚”‚‚Œ‚f‚‚Œ‚Œ‚…‚’‚™
ƒAƒŠƒX“°PEACHCUBE
ˆÉD‰æ–[
ˆá˜a“I“d”]‹óŠÔ
— EA-qΰÑÍß°¼Þ
ƒGƒbƒ`‚È‚â‚‚ç
‚¨‚³‚é‚È•”‰®
‚¨K‚Åi‚Õ‚è‚è‚ñj—·l‚Ì•”‰®
ƒIƒŒƒ“ƒWƒXƒNƒB[ƒY
@ @

>>‚©

‰öŠïŒ¶‘z•¶ŠwŠÙ
‰ö“ˆê–¡“‚hŽq‚Ì•”‰®
‹e‰ÔŽð˜O
ƒLˆó—Ç•i
‚­‚¾‚à‚̉·ò
@ @ @

>>‚³

ƒUE•½s–_
‘u‚â‚©ˆ—ϒɉõ‹óŠÔi‰¼‘èj
‚¶‚å‚É‚¡[_ŽÐ
‚·‚¸‚̂₺‚­‚ë‚·

>>‚½

‚½‚­‚ç‚Ü‚©‚ñ“W——‰ï
“d”]‚à‚«‚à‚«“°
’Þ‚èƒLƒ`“¯–¿
@

>>‚È

“Š‚°‚Í‚ß
–ì—Ç”Lm
@ @

>>‚Í

”s–k_ŽÐ
ƒnƒ_ƒJƒmƒRƒRƒ
I“úˆÁ
–P—œ|‚s‚d‚m

>>‚Ü

ƒ‚ƒŠƒnƒ}‚Ìf’f‘
Œ´å£’†ˆÑ”üpŠÙ
@ @

>>‚â

>>‚ç

ƒŠƒgƒ‹ƒ`[ƒg‰®
@ @ @

>>‚í

>>A-N

‚`‚y‚`‚r‚t‚j‚d‚v‚h‚m‚c
ÎްŽ¼®¯Ìßweb
‚a‚k‚v‚g
BLUEDRESS
CAFE DE WAL
‚f‚d‚`‚q‚y
HALF SERIOUS
‚k‚…‚–‚…‚Œ@‚W

LOSTRARITIES-X

Morality SlaveZ
@ @

>>O-Z

osakanafactory
Palette Enterprise
PERFECTBLUE
ROUGH SKETCH GARRERY
‚q‚o‚fƒJƒ“ƒpƒj[
TearDrop
TECENONCHI
TRAS‚gšCAN
TUNED
WonderfulDreamers
@ @

>>‘¼

ƒT[ƒtƒ@[ƒYƒpƒ‰ƒ_ƒCƒX
‚Æ‚ç‚Ì‚ ‚È
ËÞÃÞµÁ°½ÞΰÑÍß°¼Þ
‚j|‚a‚‚‚‹‚“
TINAMI
@ ‚ß‚ë‚ñ‚Ô‚Á‚­‚·
@ @
@ @ @ @
@

žu¬ì_‹{v‚̓Šƒ“ƒNƒtƒŠ[‚Å‚·B
[ http://bach.sakura.ne.jp/]

‚É‚¨Šè‚¢‚µ‚Ü‚·B
‚»‚êˆÈŠO‚̃y[ƒW‚â‰æ‘œ‚Ö‚Ì’¼ÚƒŠƒ“ƒN‚Í‹ÖŽ~‚µ‚Ä‚¨‚è‚Ü‚·B
ƒŠƒ“ƒNŽž‚Ì–¼Ì‚Íu¬ì_‹{v‚Å‚¨Šè‚¢‚µ‚Ü‚·B
u‚¨‚®v‚ÍŠ¨•Ù‚µ‚Ä‚­‚¾‚³‚¢i”šj
—L—¿‚g‚oA¤—p‚g‚o‚ւ̃Šƒ“ƒN‚ÍŠî–{“I‚É‚¨’f‚肵‚Ä‚¢‚Ü‚·B


ƒoƒi‚Å‚·B—Ç‚©‚Á‚½‚çƒhƒ]B‚±‚̃oƒi‚Ì‚Ý“]ډ‚ł·B

@