Народ, подскажите, в чем ошибка:

Имеется база на SQL2000 + приложение на VB6.

Из VB я подключаюсь к SQL VIEW or SP вот таким способом

Private Sub month1_Click(Area As Integer)

Dim rst As New ADODB.Recordset
Dim cn As New ADODB.Connection
dim month1 as int
month1=Me.month12.Text /month12 - DBCombo/
cn.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=axe2;Initial Catalog=AXE2"

cn.Open
cn.CommandTimeout = 0
strSQL = "exec axe2_vb_sp_view_lica_zagruz_m_gorod " & month1
rst.Open strSQL, cn, adOpenKeyset, adLockBatchOptimistic, adCmdText

Set grd_data.DataSource = rst /grd_data - Data_Grid/
Это используется у меня во многих формах.

На одной машине, все прекрасно работет, но когда программы одновременно запущены на разных ПК
одна запускается нормально, а вторая, при запуски запроса или ХП выдает сообщение "General network error".
Это происходит даже тогда, когда я запускаю разные формы в программе.

Та ХП достаточно большая, но очень похожа на эту.

CREATE PROCEDURE [dbo].[axe2_vb_sp_all_sredn_m_gorod]
(
@month1 int
)

as
SELECT ROUND(AVG(abs_time), 2) AS sredn, SUM(abs_time) AS summa, COUNT(abs_time) AS kol_vo
FROM dbo.all_count_tarif
where month1=@month1 and (len(kuda) >= 9) AND (kuda NOT LIKE '810' + '%')
GO


Сорри, но я незнаю что такое QA