473,326 Members | 2,061 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,326 software developers and data experts.

Problem with sql

Expand|Select|Wrap|Line Numbers
  1. Private Sub btnAdaugare_Click()
  2.  
  3. Dim rs As Recordset
  4.  
  5. Set rs = CurrentDb.OpenRecordset( _
  6.   "SELECT * FROM Factura_Emisa where Serie_Nr_Factura ='" & Serienr.Value & "'", dbOpenDynaset, dbReadOnly)
  7. If rs.RecordCount > 0 Then
  8.     MsgBox ("Factura existenta in baza de date !")
  9. Else
  10.     sql = "INSERT INTO Factura_Emisa (CIF_Client,Denumire_Client,Serie_Nr_Factura,
  11. Adresa_Client,Cantitate,Pret,Valoare_Fara_Tva,Valoare_Tva,Cota_Tva,Total_Valoare,Um)" & _
  12.         "VALUES (UCase(Trim(CIF.Value))," & _
  13.         "UCase(Trim(Serienr.Value))," & _
  14.         "Trim(Cantitate.Value)," & _
  15.         "Trim(Pret.Value)," & _
  16.         "Trim(Valoaref.Value)," & _
  17.         "Trim(tva.Value)," & _
  18.         "Trim(Cota.Value)," & _
  19.         "Trim(Total_v.Value)," & _
  20.         "Trim(UM.Value))"
  21.  
  22.     DoCmd.RunSQL sql
  23.  
  24.     MsgBox ("Factura a fost operata in baza de date !")
  25.  
  26.     Denumire_Client.Value = ""
  27.     CIF.Value = ""
  28.     adrs.Value = ""
  29.     Serienr.Value = ""
  30.     Cantitate.Value = ""
  31.     Pret.Value = ""
  32.     Valoaref.Value = ""
  33.     tva.Value = ""
  34.     Cota.Value = ""
  35.     Total_v.Value = ""
  36.     Um.Value = ""
  37.  
  38. End If
  39. DoCmd.Close
------------------------------------
Im getting runtime error 3061 too few parameters , expected 1

I think the problem is somewhere in the select statement
Jan 13 '11 #1
4 1685
code green
1,726 Expert 1GB
It usually means an incorrect field name.
A common error is field names with spaces.
Wrap the field names in square brackets []
Jan 14 '11 #2
mshmyob
904 Expert 512MB
I'll take a wild stab here based on what you posted.

Your INSERT sql string has no space between your columns and Values.

Try

Expand|Select|Wrap|Line Numbers
  1. sql = "INSERT INTO Factura_Emisa (CIF_Client,Denumire_Client,Serie_Nr_Factura, 
  2. Adresa_Client,Cantitate,Pret,Valoare_Fara_Tva,Valoare_Tva,Cota_Tva,Total_Valoare,Um)" & _ 
  3.         " VALUES (UCase(Trim(CIF.Value))," & _ 
  4.         "UCase(Trim(Serienr.Value))," & _ 
  5.         "Trim(Cantitate.Value)," & _ 
  6.         "Trim(Pret.Value)," & _ 
  7.         "Trim(Valoaref.Value)," & _ 
  8.         "Trim(tva.Value)," & _ 
  9.         "Trim(Cota.Value)," & _ 
  10.         "Trim(Total_v.Value)," & _ 
  11.         "Trim(UM.Value));" 
  12.  
  13.  

cheers,
Jan 14 '11 #3
@mshmyob
i don't see any difference between my string and what you wrote ,i may be mistaking though
Jan 14 '11 #4
mshmyob
904 Expert 512MB
I put in a space before the word VALUES - you need a space.

Also I assume in your actual code you have conconated the 1st and 2nd line - since it is not how it is displayed here.

cheers,
Jan 15 '11 #5

Sign in to post your reply or Sign up for a free account.

Similar topics

11
by: Kostatus | last post by:
I have a virtual function in a base class, which is then overwritten by a function of the same name in a publically derived class. When I call the function using a pointer to the derived class...
9
by: Sudesh Sawant | last post by:
Hello, We have an application which communicates using remoting. There is a server which is a Windows Service. The server exposes an object which is a singleton. The client is a Web Application...
117
by: Peter Olcott | last post by:
www.halting-problem.com
0
by: James Griffiths | last post by:
Here is a report I've written about a printing problem that is being experienced by a particular company for whom I had developed a A97 system. After upgrading to Win XP and AXP, some printing...
18
by: Ian Stanley | last post by:
Hi, Continuing my strcat segmentation fault posting- I have a problem which occurs when appending two sting literals using strcat. I have tried to fix it by writing my own function that does the...
28
by: Jon Davis | last post by:
If I have a class with a virtual method, and a child class that overrides the virtual method, and then I create an instance of the child class AS A base class... BaseClass bc = new ChildClass();...
6
by: Ammar | last post by:
Dear All, I'm facing a small problem. I have a portal web site, that contains articles, for each article, the end user can send a comment about the article. The problem is: I the comment length...
16
by: Dany | last post by:
Our web service was working fine until we installed .net Framework 1.1 service pack 1. Uninstalling SP1 is not an option because our largest customer says service packs marked as "critical" by...
2
by: Mike Collins | last post by:
I cannot get the correct drop down list value from a drop down I have on my web form. I get the initial value that was loaded in the list. It was asked by someone else what the autopostback was...
9
by: AceKnocks | last post by:
I am working on a framework design problem in which I have to design a C++ based framework capable of solving three puzzles for now but actually it should work with a general puzzle of any kind and I...
0
by: DolphinDB | last post by:
Tired of spending countless mintues downsampling your data? Look no further! In this article, you’ll learn how to efficiently downsample 6.48 billion high-frequency records to 61 million...
0
by: ryjfgjl | last post by:
ExcelToDatabase: batch import excel into database automatically...
0
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
1
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
1
by: CloudSolutions | last post by:
Introduction: For many beginners and individual users, requiring a credit card and email registration may pose a barrier when starting to use cloud servers. However, some cloud server providers now...
1
by: Defcon1945 | last post by:
I'm trying to learn Python using Pycharm but import shutil doesn't work
1
by: Shællîpôpï 09 | last post by:
If u are using a keypad phone, how do u turn on JavaScript, to access features like WhatsApp, Facebook, Instagram....
0
by: Faith0G | last post by:
I am starting a new it consulting business and it's been a while since I setup a new website. Is wordpress still the best web based software for hosting a 5 page website? The webpages will be...
0
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 3 Apr 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome former...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.