Geçersiz yetkilendirme belirtimi hatası

[a_self_lion]

Selam arkadaşlar.
Aşağıdaki Vba kodlarımla günlük haftalık olarak belirttiğim excel satırları arasında döngü ile satışları alıp yazdırıyordum. Ama malelsef win764 bit geçince bir hata ile karşılaştım.

Private Sub GunlukRapor2012_Click()
'günlük rapor
Dim SQLText As String
Dim I As Integer
Dim T As String
Dim s As Integer
Dim satir As Integer
Dim sonsatir As Integer
Dim RST As New ADODB.Recordset
' ********** Inputbox kullanımı ***********
satir = InputBox("Kaçıncı satırdan başlayacak", ["Satır giriş ekranı"], ["İlk Satır"], [7000], [4500])
sonsatir = InputBox("Son Satır Nosu", ["Satır giriş ekranı"], ["Son Satir"], [7000], [5000])

DATA = ""
DATA = [AE1]
Call Main
For s = satir To sonsatir Step 1
DoEvents
[B]SQLCON.Open[/B]
T = ""
T = Format(Cells(s, 28), "yyyy-mm-dd")

SQLText = "SELECT SUM(ADSDOS_NET_TLL) FROM ADSDOS WHERE ADSDOS_TAR = '" + T + "' AND" & vbCrLf
SQLText = SQLText & "ADSDOS_DEP ='38'" & vbCrLf
'" + T + "
Set RST.DataSource = SQLCON.Execute(SQLText)

Do Until RST.EOF
Cells(s, 29) = RST.Fields(0)
RST.MoveNext
Loop
'İlk for next e dönüyor ikinci tarih için
RST.Close
SQLCON.Close
Next s
Range("V2").Select
MsgBox "Raporunuz bitti Bu Rapor ÖZCAN ÖZARSLAN tarafından 19/09/2009 tarihinde geliştirilmiştir.", 64, "Bilgi"

End Sub

ikinci döngüde SQLCON.Open burada hata veriyor

run-time error '-2147217843 (80040e4d)':
Geçersiz yetkilendirme belirtimi

şeklinde bir hata alıyorum windows xp yüklüydü pc de önce çalışıyordu şimdi windows7 64 bit mevcut ondan olmasın. Ama çözümü nedir.

 

[a_self_lion]

Galiba kimsenin başına gelmedi

 

[ybilgin]

Sorun Tarih formatında gibi geldi bana.
yyyy-mm-dd
yerine
dd-mm-yyyy deneyin bakalım.

 

[merakli_72]

sql serverdenmi veri çekiyorsunuz
sql server client kurulumu bilgisayarınıza

 

[a_self_lion]

ama tarih aralığını satır aralığını tek tek verince veri geliyor sql den

 

[a_self_lion]

tarih formatında olacağını sanıyorum satır aralığını tek tek verince yani tek satırlık bir veri çekince sorun olmuyor ama iki satırlık veya daha fazla bir veri çekerken döngü sırasında bir sorun oluyor ikinci sql open açılırken sorun var.

 

[a_self_lion]

Sorunu buldum başkasının işine yarar diye burayada yazıyorum. Tarkan beye teşekkürlerimi burdan da iletiyorum.

Sqlcon.open for döngüsünden önce bir kez açmak yeterli ve next den sonrada kapanması yeterli olacakmış her seferinde aç kapat kafası karışmış.