다음을 통해 공유


RDS 자습서(VBScript)

Microsoft Visual Basic Scripting Edition으로 작성된 RDS 자습서입니다. 이 자습서의 목적에 대한 설명은 RDS 자습서참조하세요.

중요하다

Windows 8 및 Windows Server 2012부터 RDS 서버 구성 요소는 더 이상 Windows 운영 체제에 포함되지 않습니다(자세한 내용은 Windows 8 및 Windows Server 2012 호환성 쿡북 참조). RDS 클라이언트 구성 요소는 이후 버전의 Windows에서 제거됩니다. 새 개발 작업에서 이 기능을 사용하지 말고 현재 이 기능을 사용하는 애플리케이션을 수정할 계획입니다. RDS를 사용하는 애플리케이션은 WCF Data Service마이그레이션해야 합니다.

이 자습서에서는 디자인 시점에 RDS.DataControlRDS.DataSpace가 생성됩니다. 즉, 개체 태그(예: <OBJECT>...</OBJECT>)로 정의됩니다. 또는 런타임에 RDS(CreateObject 메서드) 메서드를 사용하여 만들 수 있습니다. 예를 들어 RDS.DataControl 객체는 다음과 같이 만들 수 있습니다.

Set DC = Server.CreateObject("RDS.DataControl")  
   <!-- RDS.DataControl -->  
   <OBJECT   
      ID="DC1" CLASSID="CLSID:BD96C556-65A3-11D0-983A-00C04FC29E33">  
   </OBJECT>  
  
   <!-- RDS.DataSpace -->  
   <OBJECT   
      ID="DS1" WIDTH=1 HEIGHT=1  
      CLASSID="CLSID:BD96C556-65A3-11D0-983A-00C04FC29E36">  
   </OBJECT>  
  
   <SCRIPT LANGUAGE="VBScript">  
  
   Sub RDSTutorial()  
   Dim DF1   

1단계 - 서버 프로그램 지정

VBScript는 Active Server Pages에서 사용할 수 있는 VBScript Request.ServerVariables 메서드에 액세스하여 실행 중인 IIS 웹 서버의 이름을 검색할 수 있습니다.

"https://<%=Request.ServerVariables("SERVER_NAME")%>"  

그러나 이 자습서에서는 가상 서버 "yourServer"를 사용합니다.

메모

ByRef 인수의 데이터 형식에 주의하세요. VBScript에서는 변수 형식을 지정할 수 없으므로 항상 Variant전달해야 합니다. HTTP를 사용할 경우 RDS.DataSpace 개체의 CreateObject 메서드를 사용하여 호출하면, RDS는 Variant가 아닌 것을 예상하는 메서드에 Variant를 전달할 수 있게 해줍니다. DCOM 또는 In-process 서버를 사용하는 경우 클라이언트 및 서버 쪽의 매개 변수 형식과 일치해야 합니다. 그렇지 않으면 "형식 불일치" 오류가 발생합니다.

Set DF1 = DS1.CreateObject("RDSServer.DataFactory", "https://yourServer")  

2a단계 - RDS를 사용하여 서버 프로그램을 호출합니다. DataControl

이 예제는 RDS의 기본 동작을 보여 주는 주석일 뿐입니다. DataControl 지정된 쿼리를 수행하는 것입니다.

<OBJECT CLASSID="clsid:BD96C556-65A3-11D0-983A-00C04FC29E33" ID="DC1">  
   <PARAM NAME="SQL" VALUE="SELECT * FROM Authors">  
   <PARAM NAME="Connect" VALUE="DSN=Pubs;">  
   <PARAM NAME="Server" VALUE="https://yourServer/">  
</OBJECT>  
...  
<SCRIPT LANGUAGE="VBScript">  
  
Sub RDSTutorial2A()  
   Dim RS  
   DC1.Refresh  
   Set RS = DC1.Recordset  
...  

2b단계 - RDSServer.DataFactory를 사용하여 서버 프로그램 호출

3단계 - 서버에서 레코드 집합 가져오기

4단계 - 서버에서 레코드 집합을 반환합니다.

Set RS = DF1.Query("DSN=Pubs;", "SELECT * FROM Authors")  

5단계 - 시각적 컨트롤에서 DataControl을 사용할 수 있습니다.

' Assign the returned recordset to the DataControl.  
  
DC1.SourceRecordset = RS  

6a단계 - 변경 내용이 RDS를 사용하여 서버로 전송됩니다. DataControl

이 예제는 RDS.DataControl이 업데이트를 수행하는 방법을 보여주는 주석에 불과합니다.

<OBJECT CLASSID="clsid:BD96C556-65A3-11D0-983A-00C04FC29E33" ID="DC1">  
   <PARAM NAME="SQL" VALUE="SELECT * FROM Authors">  
   <PARAM NAME="Connect" VALUE="DSN=Pubs;">  
   <PARAM NAME="Server" VALUE="https://yourServer/">  
</OBJECT>  
...  
<SCRIPT LANGUAGE="VBScript">  
  
Sub RDSTutorial6A()  
Dim RS  
DC1.Refresh  
...  
Set RS = DC1.Recordset  
' Edit the Recordset object...  
' The SERVER and CONNECT properties are already set from Step 2A.  
Set DC1.SourceRecordset = RS  
...  
DC1.SubmitChanges  

6b단계 - 변경 내용이 RDSServer.DataFactory를 사용하여 서버로 전송됩니다.

DF.SubmitChanges "DSN=Pubs", RS  
  
End Sub  
</SCRIPT>  
</BODY>  
</HTML>  

자습서의 끝입니다.

참고 항목

RDS 자습서