| Вопрос: Помогите разобраться с ошибкой | Добавлено: 20.09.02 15:36 |
Автор вопроса:  Evgeny D
|
|
Создаю инсталляцию стандартными средствами. Устанавливаю программу на другом компе. При запуске появляется сообщение об ошибке: Run-time error 430: Class does not support Automation or does not support expected interface Из-за чего это? На моем компе все отрабатывается нормально. |
| Ответы | Всего ответов: 5 |
|
Номер ответа: 1 Автор ответа:   POST Вопросов: 14 Ответов: 269 |
Web-сайт: Профиль | | #1 | Добавлено: 20.09.02 15:56 |
|
Скорее всего ты забыл какой-нить актив икс в поставку включить..... ещё раз проверь наличие всех файлов..... |
||
|
Номер ответа: 2 Автор ответа:  MAGNUSВопросов: 12 Ответов: 430 |
Профиль | | #2 | Добавлено: 20.09.02 18:10 |
|
Судя по ошибке, ты из программы создаешь какой то обьект вроде ворда или чего то такое, а на клиентской машине он или не установлен или не та версия. Напиьи подробнее. |
||
|
Номер ответа: 3 Автор ответа:  Satrapp ICQ: 75556561 Вопросов: 8 Ответов: 80 |
Профиль | | #3 | Добавлено: 20.09.02 18:34 |
|
Всё, что у тебя указано в Components и References, должно быть и на клиентской машине... Попробуй при создании инсталлятора проставить соответствующие галочки... |
||
|
Номер ответа: 4 Автор ответа:  Evgeny DВопросов: 10 Ответов: 33 |
Профиль | | #4 | Добавлено: 23.09.02 12:33 |
|
В load формы создается подключение к SQL Server. Option Explicit public dbOP as new adodb.connection Private Sub Form_Load() Dim cmd As New adodb.Command Dim prm1 As adodb.Parameter Dim prm2 As adodb.Parameter dbOP.Open "Provider=MSDASQL.1;Password=passw;Persist Security Info=True;User ID=sa;Initial Catalog=OP Set cmd.ActiveConnection = dbOP cmd.CommandText = "get_datetime" cmd.CommandType = adCmdStoredProc Set prm1 = cmd.CreateParameter("Return", adInteger, adParamReturnValue) cmd.Parameters.Append prm1 Set prm2 = cmd.CreateParameter("Output", adDBTimeStamp, adParamOutput) cmd.Parameters.Append prm2 cmd.Execute Date = DateSerial(Year(cmd(1)), Month(cmd(1)), Day(cmd(1))) Time = TimeSerial(Hour(cmd(1)), Minute(cmd(1)), Second(cmd(1))) Set cmd = Nothing Set prm1 = Nothing Set prm2 = Nothing End Sub Вот если этот код выбросить, то форма грузится нормально. Подскажите, что отмечать в ссылках? У меня было отмечено: Microsoft activex data object 2.6 Microsoft activex data object recordsets 2.6 Microsoft OLE DB Service components 1.0 Microsoft OLE DB Simple provider 1.5 В ODBC32 подключение к серверу создано. |
||
ata Source=OP-SQL", "sa", "passw"|
Номер ответа: 5 Автор ответа: MAGNUSВопросов: 12 Ответов: 430 |
Профиль | | #5 | Добавлено: 23.09.02 13:12 |
|
Проверь есть ли в инсталюционном пакете MDAC! Если нету , то добавь его туда ручками. А вот это все , тебе ИМХО не нужно. Microsoft activex data object recordsets 2.6 Microsoft OLE DB Service components 1.0 Microsoft OLE DB Simple provider 1.5 |
||
Страница: 1 |