ACTIVEX COMPONENT CAN'T CREATE OBJECT [Archive]

rajareds

August 8, 2001, 03:29 am

I am getting a runtime error 429 "ACTIVEX COMPONENT CAN'T CREATE OBJECT " while running the below code in line no. 9,10 in module

i am running this code in
OS: Win Nt 4.0 with Service pack 6
VB 6.0

first i add a reference for DirectX7 in my project

MODULE
-------------------------------------------------
1.Option Explicit
2.Private DirectX As DirectX7
3.Private DirectDraw As DirectDraw7
4.
5.Public running As Boolean
6.
7.Sub Main()
8.
9. Set DirectX = New DirectX7
10. Set DirectDraw = DirectX.DirectDrawCreate("")
11.
12. DirectDraw.SetCooperativeLevel frmDirectDraw.hWnd, DDSCL_EXCLUSIVE Or DDSCL_FULLSCREEN
13.
14. DirectDraw.SetDisplayMode 640, 480, 16, 0, DDSDM_DEFAULT
15.
16. running = True
17.
18. Do
19. DoEvents
20. Loop While running
21.
22. Set DirectDraw = Nothing
23. Set DirectX = Nothing
24.
25.End Sub
__________________________________________________ _____
FORM

Private Sub Form_Unload(Cancel As Integer)
running = False
End Sub
__________________________________________________ _____________________________________

I am very thankful to you if u sort out the problem
Raja.
E-mail: rajareds@rediffmail.com