Скомпилированый проект - ОШИБКА!

[Бяка]

Помогите люди!!
Я скомпилировал проект , запускаю на своей машине - идет нормально!
Но на чужой выдает такую бяку - System Error& H8007007Е (-2147024770) . Ненайден указанный модуль - библы и осхыксы все есть!

Чо за глюк?

[Ennor]

Похоже на нехватку какой-то библиотеки позднего связывания. Таки ищи, чего не хватает на второй машине. Просто открой в блокноте vbp файл и по списку зависимостей...

[Бяка]

.... а еще это может быть Автомэйшн еррор

Чё??

....Таки ищи, чего не хватает на второй машине. Просто открой в блокноте vbp файл и по списку зависимостей...(

На второй машине все есть и VB6 итот глюк!
Поевился после того как я в код добавил
єтот текСт

Код: Выделить всё

Option Explicit
Dim aw

Declare Function EnumWindows Lib "user32" (ByVal lpEnumFunc As Long, ByVal lParam As Long) As Boolean
Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hwnd As Long) As Long
Public Function EnumWindowsProc(ByVal hwnd As Long, ByVal lParam As Long) As Boolean
    Dim sSave As String, Ret As Long

    Ret = GetWindowTextLength(hwnd)
    sSave = Space(Ret)
    GetWindowText hwnd, sSave, Ret + 1
    If Len(Trim(sSave)) > 1 Then
        Form1.Text1.Text = Form1.Text1.Text + " " + sSave & vbNewLine

    End If
    EnumWindowsProc = True
End Function

[BV]

Проверь, не возвращает ли GetWindowTextLength значения более 200000000.

[Бяка]

Нашел ошибку! VB неправильно сохраняло прект!
в файле Project1.vbp

вместо
....
Module=Module1; Module1.bas
....

сохранял

....
Module=#4й`і; Module1.bas
....

просто перед открытием проекта исправил строку и всё!