vbamania.pl
login:
hasło:
 
  *Rejestracja *Zapomniane hasło
 Dziś jest czwartek, 02 maja 2024 roku.
Ustaw jako stronę startową Ulubione Napisz
PowrótPowrót do serwisu  RegulaminRegulamin rssRSS

  tytuł wątku:
Wątki dyskusji

[access] Problem z iINSERT INTO z poziomu VBA


otwartyotwarty rozpoczął: marsonek postów: 2



napisał: jalamas
postów: 316


umieszczony:
10 lutego 2008
17:52

  
http://www.coderscity.net/ftopic17787.html
napisał: marsonek
postów: 2


umieszczony:
8 lutego 2008
18:09

  
Witam

mam problem z errorem

podaje ponizej czesc kodu



Function kakakolwiek()

SQL = "insert into main(id,user_id,pole3) VALUES (0,'" & innazmienna & "',pole3) where main.user_id = '" & innazmienna1 & "' ;"

wykonajsql (SQL)

End function

Function wykonajsql(strSql)


Dim Db As DAO.Database
Dim lngResult As Long

' strSql = "UPDATE main SET main.user_id = 3 ;"

Set Db = CurrentDb
Db.Execute strSql, dbFailOnError
fUpdate_2 = Db.RecordsAffected

End function


Błąd pokazuje mi w linii "Db.Execute strSql, dbFailOnError"

wartosc innazmienna oraz innazmienna1 to stringi
pole 3 jest to pole ktore chcialbym aby zostalo skopiowane automatycznie z wczesniej wyszukanego wiersza przez instrukcje WHERE ......

pokazuje mi sie info o bledzie :

"Runtime error 3067 - wejście kwerendy musi zawierać co najmniej jedną tabelę lub kwerendę"

w maualu opisali to:

"In Microsoft Access database engine databases, this error occurs if you do not select a table name when you create a query. Select at least one table or query.

In ODBCDirect databases, this error occurs if you attempt to execute a query that does not contain an SQL statement. Include at least one query or stored procedure call in the QueryDef object's SQL property.

"

Moj komentarz do tego : wybrałem 3 pola z tabeli main.
Nie wiem jak ewentualnie mam je zaznaczyć

Dziekuje za podpowiedzi


<-wstecz  1  dalej->
wszystkich stron: 1


Sortuj posty: z