FIX: ??????? ??? ????? ???? ?? MTS ? Windows 2000 ????? ?? ?????? COM

?????? ????????? ?????? ?????????
???? ???????: 279139 - ??? ???????? ???? ????? ????? ??? ???????.
??? ????? ??? ???????. ????? "??? ??" ??? ??? ??????? ??? ????.
????? ???? | ?? ????

?? ??? ??????

???????

?????? ???? ???? Visual FoxPro ???? ???? ???? (COM) ?? ????????? ??? ????? ???? ??? ?????? ???????? ???? ????????? Microsoft "(MTS) ??? Windows 2000.

?????

???? Microsoft ?? ??? ??? ?? ?????? Microsoft ??????? ?? ????? ??? ???????. ?? ????? ??? ??????? ?? ???? ???? ???? ?? 6.0 Visual Studio.

?????? ??? ??????? ?????? ??? ??? ?????? Visual Studio ???? ??? ????? ???????? ??????? ?????? ?? "????? ??????? ?? Microsoft:
194022INFO: Visual Studio 6.0 ???? ??? ? ?? ? ??? ? ?????

194295HOWTO: ????? ?? ???? ????? ???? ??????? Studio ?????
?????? ???? ???? ???? ?? Visual Studio ?? ?????? ???? Microsoft ?????? ??? ?????:
http://msdn2.microsoft.com/en-us/vstudio/Aa718353.aspx

??????? ????

????? ????? ????? ??????

  1. ????? ???? "????? ?????? ??????" (.asp) ???? Mtstest.asp ????? ??? ????????? ???????? ???????:
    <HTML>
    <BODY>
    <%
       lnsecs = Request.QueryString("delay")
       set ox = Server.CreateObject("myserver.myclass")
       response.write ox.cnt()
    %>
    </BODY>
    </HTML>
    					
  2. ??? ?????? .asp ?? ?????? Wwwroot ??? ???? Windows 2000 ??? ???.
  3. ??? ???? ??????? C, ????? ???? ???? MTSTest.
  4. ??? ????? Visual FoxPro.
  5. ?????? ???? ???????? ????? ????????? ???????? ???????:
       CREATE TABLE C:\MTSTest\Counter FREE (count i)
       INSERT INTO counter VALUES (0)
       USE
     
    					
  6. ????? ????? ???? MyServer ?????? ???????? ???????? ??????? ??? ???????? ???????:
    DEFINE CLASS myclass AS form OLEPUBLIC
       Datasession=2	&& private datasession
       oScriptingContext=0
    
       PROCEDURE Init
          SET EXCLUSIVE OFF
          USE C:\MTSTest\Counter shared
       ENDPROC
    	
       PROCEDURE xOnStartPage(p1)
       ENDPROC
    
       PROCEDURE MyDoCmd(cCmd)
          &cCmd	&& Just execute parameter as if it were a Fox command.
       ENDPROC
    
       FUNCTION MyEval(cExpr)
          RETURN &cExpr	&& Evaluate parameter as if it were a Fox expression.
       ENDFUNC
    
       PROCEDURE cnt(p1)
          LOCAL cStr
          REPLACE Counter.count WITH Counter.count+1
          cStr = _VFP.fullname+"<br>"
          cStr = cStr + 'thread id = '+TRANS(_VFP.threadid) + "<br>"
          cStr = cStr + 'Proc id = '+TRANS(_VFP.processid)+ "<br>"
          cStr = cStr + '<font size=5 color = red>Count = TRANS(Counter.count)+'</font><br>'
          RETURN  cStr
       ENDPROC
    
    ENDDEFINE
    					
  7. ????? ???? COM.
  8. ????? ???? ???? COM ?? MTS ??? ???? ???. (????? ?? ?????????? ???? ??? "???????".)
  9. ??? ???? ?????? Mtstest.asp ?? ?????? ????? ?????? ???????? ???? ??????? ??????? ??? ?? Microsoft. (????? ?? ?????????? ???? ??? "???????".)
  10. ???? ??? ????? "???? ??????? ????? ???". ?? ??? ??? ????? ??? ?? ??????? ????? ??? ?? ??? ????? Windows.

?????

?????? ??? ??????? ??????? ???? ??? ???? ????????? ????????? ??????? ?? "????? ??????? ?? Microsoft:
231282INFO: ??????? ??????? ?????? ???? ??? ????? ??
223406HOWTO: ????? ???? MTS ????? ??? ????? ?????? ?? ASP
(?) Microsoft Corporation 2000? ???? ???? ?????. ????????? ?????? ????? Barnard ? Microsoft Corporation.

???????

???? ???????: 279139 - ????? ??? ??????: 28/???? ??????/1435 - ??????: 3.3
????? ???
  • Microsoft Visual FoxPro 6.0 Professional Edition, ????? ?????? ??:
    • the operating system: Microsoft Windows 2000
????? ??????: 
kbnosurvey kbarchive kbmt kbbug kbcodesnippet kbfix kbvs600sp5fix KB279139 KbMtar
????? ????
???: ??? ????? ??? ?????? ???????? ?????? ????? ???? ????? ?????????? ????? ?? ????????? ?????? ????. ???? ???? ?????????? ???? ?? ???????? ???????? ?????? ????????? ????? ????????? ???????? ????? ???????? ?????? ?? ?????? ??? ?? ???????? ???????? ?? ????? ??????? ?????? ??? ??????? ?????? ??. ?????? ?? ???? ??? ??????? ???????? ????? ?? ???? ????? ?????? ??? ????? ??? ????? ??????? ?? ????? ?? ?????? ??? ??? ??????? ??????? ?? ????? ????? ????? ????? ?????. ?? ????? ???? ?????????? ??????? ??? ????? ?? ??????? ?? ????? ?????? ?? ??? ????? ?? ????? ??????? ?? ???????? ?? ??? ???????. ???? ???? ?????????? ???????? ??? ????? ?????? ??????? ??????
???? ??? ????? ??????? ?????? ??????????279139

????? ???????

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com