This project includes a Crystal Report. Crystal Reports 10 and VB 6 are on my workstation. When I try to run the project I get the error on the rs.Open.
Dim rpt As CRAXDRT.Report
Dim db As CRAXDRT.Database
Dim rs As New ADODB.Recordset
Dim WithEvents sect As CRAXDRT.Section
Private Sub Form_Load()
Screen.MousePointer = vbHourglass
Set rpt = crx.OpenReport("C:\...
I am having a similar problem. I am able to display an MS Access Database using the ADODB connection with the following SQL statement:
Select * from [table] Where [column] = ''Value"
I tried to use:
Select * from [table] Where [column] LIKE ''*Value*"
This Query works in MS Access, but brings no results on my results web page.
So I tried:
Select * from [table] Where [column] LIKE ...
Quote:
Select * from [table] Where [column] LIKE "%Value%"
Are you trying to filter a string?
if String you should use ( ' ) .
Code:
Select * from table Where column LIKE ' %Value% '
I've tried that syntax, and the & symbol does not work with MS Access, and times out my connection (ultimately crashing my server). I mis-wrote it up there, but I had single quotes around the Value
Select * from [table] Where [column] LIKE '*Value*'
The select statement above brings back results when I query it in MS Access; does not time out the connection, but brings back no results.
1. Why you put * on LIKE statement?
- % will do since you are using MSACCESS.
Quote:
I've tried that syntax, and the & symbol does not work with MS Access, and times out my connection (ultimately crashing my server). I mis-wrote it up there, but I had single quotes around the Value
2. Where are you trying to code this...
This may sound odd, but I want to be able to dynamically access a variable value.
I have a bunch of variables that correspond to bookmarks in word templates. Not all bookmarks are in all of the templates and some bookmarks are deleted under different circumstances. Well, instead of writing 4 lines of code for each book mark, I would like to be able to pull the list of bookmarks from a table...
Hey all, i must be thinking too hard because i can not figure out how to conbine my duplicate itemnames & soldItems together instead of having them list separately.
Here is my table data:
Quote:
itemName
============
Fujifilm Cd-rs
Lysol Disinfectant
Lysol Disinfectant
Lysol Disinfectant
Linksys Wireless-g
Skittles Candys...
Are you trying to get the sum of each itemName?
What kind of database are you using?
For MSACCESS:
Code:
SELECT itemName, Sum(itemsSold) FROM productr
WHERE itemRUDate = '31/08/2009' Group By itemName;
I have not test it but i should work.
Good Luck
Jerome and Gail
Quote:
Originally Posted by jerome_gail26
Are you trying to get the sum of each itemName?
What kind of database are you using?
For MSACCESS:
Code:
SELECT itemName, Sum(itemsSold) FROM productr
WHERE itemRUDate = '31/08/2009' Group By itemName;
I have not test it but i should work.
Good Luck
Jerome ...
Oops! Spoke to soon!
I cant seem to get it working when extracting the values in VB6 using Mysql 5.x:
Code:
DataArray(x) = Val(!itemsSold & "")
Gives me the error of:
Quote:
Item cannot be found in the collection corresponding to the requested name or ordinal.
If i take the Sum(itemsSold) out of the query then it works fine.
...
This is really bugging me!
I just want a simple app that displays a dynaset in an MSflexgrid (using DAO). Putting in the values at run time, and using the old data control, with everything hooked up properly displays in the flexgrid just fine. Trouble is, I need to access a different DB each time, so I got rid of the data control, and have a file box which sends the file name as a string to ...
In the database, you should STORE the data in the appropriate data type. Then, format it as needed for presentation. This way, ordering, comparisons, etc., work as expected.
I want say beforehand that I don't use this method, however, the best way should be 'thinking to performance': 1) open recordset as ReadOnly and ForwardOnly mode: emp.Open "Select Id_empl From Empleados", cnn, adForwardOnly, adReadOnly, adCmdText 2) if you want a ComboBox use a ComboBox not a TextBox (txtnclave), then Code: Public Sub FillComboEmployed() 'open recordset emp cboEmpl.Clear Do While Not...
I tried the ADO (Active X Data objects) blob version using postgres server version 8.4 (postgres ODBC client 8.04.01) with a table in two variants * table (main integer, object oid) * table (main integer, object bytea) but got back the error message: "Type lo does not exist" when executing with Set rs = cmd.Execute So, either this page is outdated or I am doing something wrong: Is there a third binary type in postgresql that...
Go to the relevant forum, in this case it's Database and Reporting: http://www.xtremevbtalk.com/forumdisplay.php?f=16 Look for the "New Thread" buttons above and below the thread list. Click it.
Terrific, Thanks for the "INSERT" insight, It's working!! Thanks for you help and patience. I did determine that if there is a field being inserted that is too large than what the field is set to recieve, truncation does not occur, no records get inserted. But I accomodated for that. Thanks again, Steve
Thread profile page for "Run time error 3709 Access 2000 format" on http://www.xtremevbtalk.com.
This report page is a snippet summary view from a single thread "Run time error 3709 Access 2000 format", located on the Message Board at http://www.xtremevbtalk.com.
This thread profile page shows the thread statistics for: Total Authors, Total Thread Posts, and Thread Activity