웹마스터 팁
page_full_width" class="col-xs-12" |cond="$__Context->page_full_width">
[re] 아래 행복한고니님의 할아버지 소스의 업글(?) 버젼입니다.
2002.12.02 01:15
제가 관리하는 홈페이지에 사용한 ms agent의 소스입니다...
그리고 자바가 아닌 VBScript 입니다. 그리고 <head>와 </head> 사이에 삽입하시면 링크에러가 날 것입니다.
<body> 부분에 넣어서 사용하세요..
<Script Language="VBScript">
' * Character Objects
Dim Genie
'+ ' * Variables
Dim UsedChars
Dim GenieID
Dim GenieACS
Dim GenieURL
Dim GenieStates
Dim GenieAnimations
Dim GenieReq
Dim GenieStatesReq
Dim GenieAnimationsReq
Dim GenieLoaded
Dim HideReq
Dim Req
' * Initialize
UsedChars = "Genie"
' * Genie
Genie = "Genie"
GenieACS = "Genie.acs"
GenieURL = "http://agent.microsoft.com/agent2/chars/genie/genie.acf"
GenieStates = "Showing, Hiding, Speaking, Moving, Gesturing"
GenieAnimations = "GestureRight, DoMagic1, DoMagic2, Idle1_1, Idle1_2, Idle1_3, Idle1_4, Idle1_5, Idle1_6, Idle2_1, Idle2_2, Idle2_3, Idle3_1, Process, GetAttentionReturn, Greet"
GenieLoaded = False
' * Prevent Auto-Download of Microsoft Agent if not already installed
If AgentInstalled() Then
Document.WriteLn "<Object ID=""AgentControl"" Width=0 Height=0"
Document.WriteLn " ClassID=""CLSID:D45FD31B-5C6E-11D1-9EC1-00C04FD7081F"""
Document.WriteLn " CodeBase=""#VERSION=2,0,0,0"">"
Document.WriteLn "</Object>"
Document.WriteLn "<Object ID=""L&HTruVoice"" Width=0 Height=0"
Document.WriteLn " ClassID=""CLSID:B8F2846E-CE36-11D0-AC83-00C04FD97575"""
Document.WriteLn " CodeBase=""#VERSION=6,0,0,0"">"
Document.WriteLn "</Object>"
End If
Function AgentInstalled()
' Purpose: Returns True if Agent 2.0 is installed, else False
On Error Resume Next
Dim AgentControl
Dim ScriptVersion
ScriptVersion = GetScriptVersion()
If ScriptVersion > 1 Then
Set AgentControl = CreateObject("Agent.Control.2")
AgentInstalled = IsObject(AgentControl)
Else
AgentInstalled = False
End If
End Function
Function GetScriptVersion()
' Purpose: Returns major version of the Scripting Engine
On Error Resume Next
Dim Ver
Ver = 0
Ver = ScriptEngineMajorVersion
If Ver = 0 Then Ver = 1
GetScriptVersion = Ver
End Function
Sub Window_OnLoad()
' Purpose: Runs automatically when page is loaded
On Error Resume Next
' * INSERT ANY NON-AGENT RELATED SCRIPTING HERE
If Not AgentInstalled() Then
Exit Sub
End If
AgentControl.Connected = True
GenieLoaded = LoadLocalAgent(GenieID, GenieACS)
If GenieLoaded Then
Call SetCharObj
End If
Call CheckLoadStatus
End Sub
Function LoadLocalAgent(ByVal CharID, ByVal CharACS)
' Purpose: Attempts to load the specified character
' Returns: True if successful, False if not
On Error Resume Next
AgentControl.Characters.Load CharID, CharACS
If Err = 0 Then
LoadLocalAgent = True
Exit Function
End If
LoadLocalAgent = False
End Function
Sub SetCharObj()
' Purpose: Sets the character reference and TTS Language ID
On Error Resume Next
Set Genie = AgentControl.Characters(GenieID)
Genie.LanguageID = &H412
End Sub
Sub CheckLoadStatus()
' Purpose: Determines if required characters have been loaded.
' If not, issue request to load next character
' else run the AgentIntro routine
If Not GenieLoaded Then
Window.Status = "Loading " & GenieID & " Character. Please Wait..."
Set GenieReq = AgentControl.Characters.Load(GenieID, GenieURL)
Exit Sub
End If
Window.Status = ""
Call AgentIntro
End Sub
Sub AgentControl_RequestComplete(ByVal RequestObject)
' Purpose: Take action on completion or failure of requests
On Error Resume Next
Select Case RequestObject
Case GenieReq
If RequestObject.Status = 0 Then
Call SetCharObj
If GenieStates <> "" Then
Window.Status = "Loading " & GenieID & " States. Please Wait..."
Set GenieStatesReq = AgentControl.Characters(GenieID).Get("State", GenieStates, True)
ElseIf GenieAnimations <> "" Then
Window.Status = "Loading " & GenieID & " Animations. Please Wait..."
Set GenieAnimationsReq = AgentControl.Characters(GenieID).Get("Animation", GenieAnimations, True)
Else
GenieLoaded = True
Call CheckLoadStatus
End If
Else
Call LoadError
End If
Exit Sub
Case GenieStatesReq
If RequestObject.Status = 0 Then
If GenieAnimations <> "" Then
Window.Status = "Loading " & GenieID & " Animations. Please Wait..."
Set GenieAnimationsReq = AgentControl.Characters(GenieID).Get("Animation", GenieAnimations, True)
Else
GenieLoaded = True
Call CheckLoadStatus
End If
Else
Call LoadError
End If
Exit Sub
Case GenieAnimationsReq
If RequestObject.Status = 0 Then
GenieLoaded = True
Call CheckLoadStatus
Else
Call LoadError
End If
Exit Sub
Case HideReq
AgentControl.Characters.Unload GenieID
End Select
End Sub
Sub LoadError()
Dim strMsg
Window.Status = ""
strMsg = "Error Loading Character: " & GenieID
strMsg = strMsg & Chr(13) & Chr(13) & "This Microsoft Agent Script requires the character(s):"
strMsg = strMsg & Chr(13) & UsedChars
MsgBox strMsg, 48
End Sub
Sub AgentControl_Click(ByVal CharacterID, ByVal Button, ByVal Shift, ByVal X, ByVal Y)
End Sub
Sub AgentControl_DblClick(ByVal CharacterID, ByVal Button, ByVal Shift, ByVal X, ByVal Y)
' Purpose: Stop and Hide all characters on double-click
On Error Resume Next
Genie.StopAll
If Not GenieID.HasOtherClients Then
If Genie.Visible Then
Set HideReq = Genie.Hide()
Else
AgentControl.Characters.Unload GenieID
End If
End If
End Sub
Function GetDay()
' Purpose: Returns current weekday name
Dim aDay
aDay = Array("","Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday")
GetDay = aDay(WeekDay(Now()))
End Function
Function GetDate()
' Purpose: Returns current long date
Dim aMon
Dim sDay
aMon = Array("","January","February","March","April","May","June","July","August","September","October","November","December")
sDay = Day(Now())
If sDay = "11" Or sDay = "12" Or sDay = "13" Then
sDay = sDay & "th"
Else
Select Case Right(sDay, 1)
Case "1": sDay = sDay & "st"
Case "2": sDay = sDay & "nd"
Case "3": sDay = sDay & "rd"
Case Else
sDay = sDay & "th"
End Select
End If
GetDate = aMon(Month(Now())) & " " & sDay & ", " & Year(Now())
End Function
Function GetTime()
' Purpose: Returns current time
On Error Resume Next
Dim sTime
sTime = Left(Time(), 5)
If Right(sTime, 1) = ":" Then
sTime = Left(sTime, Len(sTime) - 1)
End If
sTime = sTime & Mid(Time(), InStr(Time(), " "))
GetTime = sTime
End Function
Function GetTimeOfDay()
' Purpose: Returns current time of day
Dim TimeOfDay
Dim h
h = Hour(Now())
If h < 12 Then
TimeOfDay = "Morning"
ElseIf h < 17 Then
TimeOfDay = "Afternoon"
Else
TimeOfDay = "Evening"
End If
GetTimeOfDay = TimeOfDay
End Function
Sub InitAgentCommands()
' Purpose: Initialize the Commands menu
On Error Resume Next
Genie.Commands.RemoveAll
Genie.Commands.Caption = "My Menu Name"
Genie.Commands.Add "ACO", "Advanced Character Options", "Advanced Character Options"
End Sub
Sub AgentControl_Command(ByVal UserInput)
' Purpose: Determine Command that was selected either by menu or voice
' and run the applicable Command Script
On Error Resume Next
Dim BadConfidence
BadConfidence = 10
If (UserInput.Confidence <= -40) Then
' Bad Recognition
Exit Sub
ElseIf (UserInput.Alt1Name <> "") And Abs(Abs(UserInput.Alt1Confidence) - Abs(UserInput.Confidence)) < BadConfidence Then
' Bad Confidence - too close to another command
Exit Sub
ElseIf (UserInput.Alt2Name <> "") And Abs(Abs(UserInput.Alt2Confidence) - Abs(UserInput.Confidence)) < BadConfidence Then
' Bad Confidence - too close to another command
Exit Sub
Else ' High Confidence
' *** BEGIN MASH USER COMMANDS ***
Select Case UserInput.Name
Case "ACO"
AgentControl.PropertySheet.Visible = True
End Select
' *** END MASH USER COMMANDS ***
End If
End Sub
Sub AgentControl_Bookmark(ByVal BookmarkID)
On Error Resume Next
End Sub
Sub AgentIntro()
On Error Resume Next
Call InitAgentCommands
' *** BEGIN MASH USER SCRIPT ***
Genie.Show
Genie.MoveTo 870, 170
Genie.Play "MoveDown"
Genie.Play "Greet"
Genie.Speak "안녕하세요 Good " & GetTimeOfDay() & "! 지니입니다. 오늘은 " & GetDay() & ", " & GetDate() & "."
Genie.Speak "소리사랑 홈페이지를 방문해주셔서 감사합니다."
Genie.Play "Process"
Genie.MoveTo 30, 170
Genie.Speak "원하는 메뉴를 선택하세요!! "
Genie.Play "Gestureleft"
Genie.Play "Acknowledge"
Genie.Play "Confused"
Genie.Play "Process"
Genie.MoveTo 800, 280
Genie.Play "DoMagic1"
Genie.Play "DoMagic2"
Genie.Speak "참 먼저 로그인을 해주세요!! "
Genie.Play "GestureRight"
Genie.Speak "그리고 회원은 소리사랑가족만 받습니다!!"
Genie.Speak "그리고 비밀번호 혹은 아이디를 잊어 먹었을때는 비밀번호찾기를.. ^^ "
Genie.MoveTo 800, 480
Genie.Play "Congratulate"
Genie.Speak "박수 박수"
Genie.Speak "생일도 축하해줍시다. "
Genie.MoveTo 870, 170
Genie.Play "Idle1_1"
Genie.Play "Idle1_2"
Genie.Play "Idle1_3"
Genie.Play "Idle1_4"
Genie.Play "Idle1_5"
Genie.Play "Idle1_6"
Genie.Play "Idle2_1"
Genie.Play "Idle2_2"
Genie.Play "Idle2_3"
Genie.Play "Idle1_1"
Genie.Play "Idle1_2"
Genie.Play "Idle1_3"
Genie.Play "Idle1_4"
Genie.Play "Idle1_5"
Genie.Play "Idle1_6"
Genie.Play "Idle1_1"
Genie.Play "Idle1_2"
Genie.Play "Idle1_3"
Genie.Play "Idle1_4"
Genie.Play "Idle1_5"
Genie.Play "Idle1_6"
Genie.Play "Idle2_1"
Genie.Play "Idle2_2"
Genie.Play "Idle2_3"
Genie.Play "Idle3_1"
Genie.Play "Process"
Genie.Play "GetAttentionReturn"
Genie.Speak "앗 저의 주인님이 부르시는군요!!"
Genie.Speak "급히 가봐야겠습니다."
Genie.MoveTo 490, 350
Genie.Play "Greet"
Genie.Speak "Good bye 먼저 갑니다..."
Genie.hide
' *** END MASH USER SCRIPT ***
End Sub
</Script>
그리고 자바가 아닌 VBScript 입니다. 그리고 <head>와 </head> 사이에 삽입하시면 링크에러가 날 것입니다.
<body> 부분에 넣어서 사용하세요..
<Script Language="VBScript">
' * Character Objects
Dim Genie
'+ ' * Variables
Dim UsedChars
Dim GenieID
Dim GenieACS
Dim GenieURL
Dim GenieStates
Dim GenieAnimations
Dim GenieReq
Dim GenieStatesReq
Dim GenieAnimationsReq
Dim GenieLoaded
Dim HideReq
Dim Req
' * Initialize
UsedChars = "Genie"
' * Genie
Genie = "Genie"
GenieACS = "Genie.acs"
GenieURL = "http://agent.microsoft.com/agent2/chars/genie/genie.acf"
GenieStates = "Showing, Hiding, Speaking, Moving, Gesturing"
GenieAnimations = "GestureRight, DoMagic1, DoMagic2, Idle1_1, Idle1_2, Idle1_3, Idle1_4, Idle1_5, Idle1_6, Idle2_1, Idle2_2, Idle2_3, Idle3_1, Process, GetAttentionReturn, Greet"
GenieLoaded = False
' * Prevent Auto-Download of Microsoft Agent if not already installed
If AgentInstalled() Then
Document.WriteLn "<Object ID=""AgentControl"" Width=0 Height=0"
Document.WriteLn " ClassID=""CLSID:D45FD31B-5C6E-11D1-9EC1-00C04FD7081F"""
Document.WriteLn " CodeBase=""#VERSION=2,0,0,0"">"
Document.WriteLn "</Object>"
Document.WriteLn "<Object ID=""L&HTruVoice"" Width=0 Height=0"
Document.WriteLn " ClassID=""CLSID:B8F2846E-CE36-11D0-AC83-00C04FD97575"""
Document.WriteLn " CodeBase=""#VERSION=6,0,0,0"">"
Document.WriteLn "</Object>"
End If
Function AgentInstalled()
' Purpose: Returns True if Agent 2.0 is installed, else False
On Error Resume Next
Dim AgentControl
Dim ScriptVersion
ScriptVersion = GetScriptVersion()
If ScriptVersion > 1 Then
Set AgentControl = CreateObject("Agent.Control.2")
AgentInstalled = IsObject(AgentControl)
Else
AgentInstalled = False
End If
End Function
Function GetScriptVersion()
' Purpose: Returns major version of the Scripting Engine
On Error Resume Next
Dim Ver
Ver = 0
Ver = ScriptEngineMajorVersion
If Ver = 0 Then Ver = 1
GetScriptVersion = Ver
End Function
Sub Window_OnLoad()
' Purpose: Runs automatically when page is loaded
On Error Resume Next
' * INSERT ANY NON-AGENT RELATED SCRIPTING HERE
If Not AgentInstalled() Then
Exit Sub
End If
AgentControl.Connected = True
GenieLoaded = LoadLocalAgent(GenieID, GenieACS)
If GenieLoaded Then
Call SetCharObj
End If
Call CheckLoadStatus
End Sub
Function LoadLocalAgent(ByVal CharID, ByVal CharACS)
' Purpose: Attempts to load the specified character
' Returns: True if successful, False if not
On Error Resume Next
AgentControl.Characters.Load CharID, CharACS
If Err = 0 Then
LoadLocalAgent = True
Exit Function
End If
LoadLocalAgent = False
End Function
Sub SetCharObj()
' Purpose: Sets the character reference and TTS Language ID
On Error Resume Next
Set Genie = AgentControl.Characters(GenieID)
Genie.LanguageID = &H412
End Sub
Sub CheckLoadStatus()
' Purpose: Determines if required characters have been loaded.
' If not, issue request to load next character
' else run the AgentIntro routine
If Not GenieLoaded Then
Window.Status = "Loading " & GenieID & " Character. Please Wait..."
Set GenieReq = AgentControl.Characters.Load(GenieID, GenieURL)
Exit Sub
End If
Window.Status = ""
Call AgentIntro
End Sub
Sub AgentControl_RequestComplete(ByVal RequestObject)
' Purpose: Take action on completion or failure of requests
On Error Resume Next
Select Case RequestObject
Case GenieReq
If RequestObject.Status = 0 Then
Call SetCharObj
If GenieStates <> "" Then
Window.Status = "Loading " & GenieID & " States. Please Wait..."
Set GenieStatesReq = AgentControl.Characters(GenieID).Get("State", GenieStates, True)
ElseIf GenieAnimations <> "" Then
Window.Status = "Loading " & GenieID & " Animations. Please Wait..."
Set GenieAnimationsReq = AgentControl.Characters(GenieID).Get("Animation", GenieAnimations, True)
Else
GenieLoaded = True
Call CheckLoadStatus
End If
Else
Call LoadError
End If
Exit Sub
Case GenieStatesReq
If RequestObject.Status = 0 Then
If GenieAnimations <> "" Then
Window.Status = "Loading " & GenieID & " Animations. Please Wait..."
Set GenieAnimationsReq = AgentControl.Characters(GenieID).Get("Animation", GenieAnimations, True)
Else
GenieLoaded = True
Call CheckLoadStatus
End If
Else
Call LoadError
End If
Exit Sub
Case GenieAnimationsReq
If RequestObject.Status = 0 Then
GenieLoaded = True
Call CheckLoadStatus
Else
Call LoadError
End If
Exit Sub
Case HideReq
AgentControl.Characters.Unload GenieID
End Select
End Sub
Sub LoadError()
Dim strMsg
Window.Status = ""
strMsg = "Error Loading Character: " & GenieID
strMsg = strMsg & Chr(13) & Chr(13) & "This Microsoft Agent Script requires the character(s):"
strMsg = strMsg & Chr(13) & UsedChars
MsgBox strMsg, 48
End Sub
Sub AgentControl_Click(ByVal CharacterID, ByVal Button, ByVal Shift, ByVal X, ByVal Y)
End Sub
Sub AgentControl_DblClick(ByVal CharacterID, ByVal Button, ByVal Shift, ByVal X, ByVal Y)
' Purpose: Stop and Hide all characters on double-click
On Error Resume Next
Genie.StopAll
If Not GenieID.HasOtherClients Then
If Genie.Visible Then
Set HideReq = Genie.Hide()
Else
AgentControl.Characters.Unload GenieID
End If
End If
End Sub
Function GetDay()
' Purpose: Returns current weekday name
Dim aDay
aDay = Array("","Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday")
GetDay = aDay(WeekDay(Now()))
End Function
Function GetDate()
' Purpose: Returns current long date
Dim aMon
Dim sDay
aMon = Array("","January","February","March","April","May","June","July","August","September","October","November","December")
sDay = Day(Now())
If sDay = "11" Or sDay = "12" Or sDay = "13" Then
sDay = sDay & "th"
Else
Select Case Right(sDay, 1)
Case "1": sDay = sDay & "st"
Case "2": sDay = sDay & "nd"
Case "3": sDay = sDay & "rd"
Case Else
sDay = sDay & "th"
End Select
End If
GetDate = aMon(Month(Now())) & " " & sDay & ", " & Year(Now())
End Function
Function GetTime()
' Purpose: Returns current time
On Error Resume Next
Dim sTime
sTime = Left(Time(), 5)
If Right(sTime, 1) = ":" Then
sTime = Left(sTime, Len(sTime) - 1)
End If
sTime = sTime & Mid(Time(), InStr(Time(), " "))
GetTime = sTime
End Function
Function GetTimeOfDay()
' Purpose: Returns current time of day
Dim TimeOfDay
Dim h
h = Hour(Now())
If h < 12 Then
TimeOfDay = "Morning"
ElseIf h < 17 Then
TimeOfDay = "Afternoon"
Else
TimeOfDay = "Evening"
End If
GetTimeOfDay = TimeOfDay
End Function
Sub InitAgentCommands()
' Purpose: Initialize the Commands menu
On Error Resume Next
Genie.Commands.RemoveAll
Genie.Commands.Caption = "My Menu Name"
Genie.Commands.Add "ACO", "Advanced Character Options", "Advanced Character Options"
End Sub
Sub AgentControl_Command(ByVal UserInput)
' Purpose: Determine Command that was selected either by menu or voice
' and run the applicable Command Script
On Error Resume Next
Dim BadConfidence
BadConfidence = 10
If (UserInput.Confidence <= -40) Then
' Bad Recognition
Exit Sub
ElseIf (UserInput.Alt1Name <> "") And Abs(Abs(UserInput.Alt1Confidence) - Abs(UserInput.Confidence)) < BadConfidence Then
' Bad Confidence - too close to another command
Exit Sub
ElseIf (UserInput.Alt2Name <> "") And Abs(Abs(UserInput.Alt2Confidence) - Abs(UserInput.Confidence)) < BadConfidence Then
' Bad Confidence - too close to another command
Exit Sub
Else ' High Confidence
' *** BEGIN MASH USER COMMANDS ***
Select Case UserInput.Name
Case "ACO"
AgentControl.PropertySheet.Visible = True
End Select
' *** END MASH USER COMMANDS ***
End If
End Sub
Sub AgentControl_Bookmark(ByVal BookmarkID)
On Error Resume Next
End Sub
Sub AgentIntro()
On Error Resume Next
Call InitAgentCommands
' *** BEGIN MASH USER SCRIPT ***
Genie.Show
Genie.MoveTo 870, 170
Genie.Play "MoveDown"
Genie.Play "Greet"
Genie.Speak "안녕하세요 Good " & GetTimeOfDay() & "! 지니입니다. 오늘은 " & GetDay() & ", " & GetDate() & "."
Genie.Speak "소리사랑 홈페이지를 방문해주셔서 감사합니다."
Genie.Play "Process"
Genie.MoveTo 30, 170
Genie.Speak "원하는 메뉴를 선택하세요!! "
Genie.Play "Gestureleft"
Genie.Play "Acknowledge"
Genie.Play "Confused"
Genie.Play "Process"
Genie.MoveTo 800, 280
Genie.Play "DoMagic1"
Genie.Play "DoMagic2"
Genie.Speak "참 먼저 로그인을 해주세요!! "
Genie.Play "GestureRight"
Genie.Speak "그리고 회원은 소리사랑가족만 받습니다!!"
Genie.Speak "그리고 비밀번호 혹은 아이디를 잊어 먹었을때는 비밀번호찾기를.. ^^ "
Genie.MoveTo 800, 480
Genie.Play "Congratulate"
Genie.Speak "박수 박수"
Genie.Speak "생일도 축하해줍시다. "
Genie.MoveTo 870, 170
Genie.Play "Idle1_1"
Genie.Play "Idle1_2"
Genie.Play "Idle1_3"
Genie.Play "Idle1_4"
Genie.Play "Idle1_5"
Genie.Play "Idle1_6"
Genie.Play "Idle2_1"
Genie.Play "Idle2_2"
Genie.Play "Idle2_3"
Genie.Play "Idle1_1"
Genie.Play "Idle1_2"
Genie.Play "Idle1_3"
Genie.Play "Idle1_4"
Genie.Play "Idle1_5"
Genie.Play "Idle1_6"
Genie.Play "Idle1_1"
Genie.Play "Idle1_2"
Genie.Play "Idle1_3"
Genie.Play "Idle1_4"
Genie.Play "Idle1_5"
Genie.Play "Idle1_6"
Genie.Play "Idle2_1"
Genie.Play "Idle2_2"
Genie.Play "Idle2_3"
Genie.Play "Idle3_1"
Genie.Play "Process"
Genie.Play "GetAttentionReturn"
Genie.Speak "앗 저의 주인님이 부르시는군요!!"
Genie.Speak "급히 가봐야겠습니다."
Genie.MoveTo 490, 350
Genie.Play "Greet"
Genie.Speak "Good bye 먼저 갑니다..."
Genie.hide
' *** END MASH USER SCRIPT ***
End Sub
</Script>
댓글 2
-
Mahican
2002.12.02 01:17
참 참고로 미리보기는 없습니다. 에러 없이 동작하는것 확인하고 올리는 것입니다. -
완전범죄
2002.12.02 17:33
저희집만 그런지 로딩시간이 약간 있네요..^^
제목 | 글쓴이 | 날짜 |
---|---|---|
제로보드 data 디렉토리에 링크방지 걸기..(울트라 허접팁) [5] | 무꾸 | 2003.06.27 |
2차도메인을 이용한 내컴퓨터 자료실로 이용하기 [3] | 무꾸 | 2003.06.27 |
스팸메일 유의 하십시오... [1] | Dopesoul | 2003.07.03 |
저만의 보안 방법. (리눅스) [12] | Blainfo | 2003.07.04 |
쉘상에서 사용자 계정과 DB계정 간단하게 생성하기. | NOP_0x90 | 2003.07.05 |
쉘상에서 DB 간단하게 생성하기.. 수정입니다. [1] | NOP_0x90 | 2003.07.05 |
NOP_0x90 Document No.1(APM연동 Mysql-4.0.13편) | NOP_0x90 | 2003.07.06 |
NOP_0x90 Document No.2(APM연동 Mysql-DB설정편) | NOP_0x90 | 2003.07.06 |
NOP_0x90 Document No.3(APM연동 apache-2.0.46편) | NOP_0x90 | 2003.07.06 |
NOP_0x90 Document No.4(APM연동 php-4.3.2편) [2] | NOP_0x90 | 2003.07.06 |
우리호스트 DNS 활용하기 [4] | HoYa™ | 2003.07.08 |
Windows 2003 엔터프라이즈 에서 FTP 사용하기..(이미지첨부버젼) [10] | 무꾸 | 2003.07.26 |
apache 다운받기 - 그림설명 [2] | 이성헌 | 2003.07.27 |
php 다운 받기 - 그림설명 [1] | 이성헌 | 2003.07.27 |
phpzendoptimizer 다운받기 - 그림설명 [7] | 이성헌 | 2003.07.27 |
mysql 다운받기 - 그림설명 [3] | 이성헌 | 2003.07.27 |
색다른 리눅스 배포판.. [2] | Dopesoul | 2003.08.02 |
리눅스 환경에서 APM+Tomcat의 개발환경 만들기 | 굿스피드 | 2003.08.04 |
긴급 - mysql 설치때 주의점(window xp 에서) [3] | 이성헌 | 2003.08.11 |
Windows2000 Ad Server 계열쓰시는분들의 보안. [7] | 씨파개 | 2003.08.12 |