webForumDet fria alternativet

VBA mot Lotus Notes, problem med parameteriserade adodb.command frågor

2 svar · 374 visningar · startad av mrblonde

mrblondeMedlem sedan aug. 20012 349 inlägg
#1
adVarChar = 200
adParamInput = 1

Set dbConn = CreateObject("ADODB.connection")
dbConn.open DSNName, DBUserName, DBPassword

test2 = String$(300, "a")
SQLStatement = "INSERT INTO testform_2(test_2) VALUES(?) "

Set objCommand = CreateObject("ADODB.Command")

objCommand.ActiveConnection = dbConn
objCommand.CommandTimeout = 40
objCommand.CommandType = 1
objCommand.CommandText = SQLStatement
objCommand.Prepared = True
objCommand.Parameters.Append objCommand.CreateParameter("test_2", adVarChar, adParamInput, Len(test2), test2)
objCommand.Execute

Set objCommand = Nothing
dbConn.Close
set dbConn = Nothing

Koden fungerar inte, hela VBA miljön jag jobbar i kraschar och en speciell fellogg skapas i en Lotu Notes katalog. Om jag kör exakt samma kod men jag struntar i parameter raden och gör en vanlig insert går det utmärkt.

Jag vill använda parametrar för Lotus Notes ODBC driver har en begränsning på max 254 tecken på fält när man gör en INSERT eller en UPDATE vanligt, men det skall gå att komma runt om man har parametrar istället enligt IBM. Dock hittar jag inga kod exempel.

En länk till IBM:s sida om problemet som inte säger mig så mycket alls men någon annan kankse kan fatta och hjälpa mig.

Har aldrig jobbat med parametrar på det här sättet i ADODB så jag vet inte riktigt vad jag håller på med :)

mrblondeMedlem sedan aug. 20012 349 inlägg
#2

Kan ju tillägga att koden funkar utmärkt mot en Access db.... så egentligen är det väl ett Lotus Notes problem snarare än ett VBA problem har jag insett under dagen.

@ndersMedlem sedan juni 200032 969 inlägg
#3

Jag får nog lov att flytta tråden från VB-forumet, på mrblondes begäran.

I övrigt; Notes är alltid problem. ;)

131 ms totalt · 3 externa anrop · v20260731065814-full.0e50b1ef
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)