AdoDB & RecordSet & TimeOut - VB
Формулировка задачи:
люди... есть такой вот код...
Где PCol.ODBCfile - UDL файл!
такая вот проста функция для вызова Sp... НО! Timeout по дефолту стоит 15 сек! ЭТО МАЛО! ЛЮДИ ДОБРЫЕ! ПОМОГИТЕ! надо это как переписать с мин изменениями чтобы таймоут поставить сколь надо...
Решение задачи: «AdoDB & RecordSet & TimeOut»
textual
Листинг программы
Dim cn as ADODB.Connection Dim SQL as String Set cn=New ADODB.Connection cn.CommandTimeout=30 cn.ConnectionTimeout=60 cn.Open 'FILE NAME=' + PCol.AppPath + PCol.ODBCfile SQL=PCol.RemoteDB + '.' + PCol.User + '.' + PRName + ' ' + Params Set GetPR = New ADODB.Recordset Set GetPR.ActiveConnection=cn GetPR.Open SQL,,adOpenStatic, adLockReadOnly, False
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д