Swi,
I was looking into this a bit more, and if you return a recordset rather than trying to do a SELECT INTO, you might be able to use the CopyFromRecordset method to import the data.
Kevin
Swi,
Sounds like you might need to use the IN clause of the SELECT INTO statement to accomplish this. The SELECT INTO is expecting a table name into which to place the returned records. The IN clause will allow you to specify another database (in your case, an Excel file).
Example:
SELECT...
PHV,
I believe I originally had it written without the subquery, but when I ran into problems, I experimented writing it different ways. I believe the reason I had it as a subquery was simply because I started with the simplest part of the query and began building upon it (i.e. - I started...
Thanks, r937. I was not aware of that restriction when using an aggregate expression.
PHV, is the BETWEEN operator inclusive (i.e. - If j.JobDate was 05/01/2007 or 05/30/2007 would it be included?)? Also, if I do the INNER JOIN on the whole JobInfo table, wouldn't that use more memory...
I don't work much in Access, but I have written SQL statements before for my VB programs. I am currently trying to write a query in Access, but am coming up with an error I don't quite understand, and of course, help is of no help at all.
Here's my query:
SELECT i.ClientID, SUM(d.Peices) AS...
Thanks for the effort, but I decided to avoid the mess, and just use an array of the UDT, and use a dictionary item just to point to where certain items are stored within the array.
Private Type DataInfo
fldInd As String * 1
fldName As String
fldPos As Long
fldLen As Long
fldMax As...
I'm trying to assign a variable dim'ed as a UDT to a dictionary item, but am having problems.
When I define the UDT and variable within my form module like this:
Private Type DataInfo
fldInd As String * 1
fldName As String
fldPos As Long
fldLen As Long
fldMax As Long
fldMin As Long...
Well, for one of my programs that uses a data report, I'm displaying a form so the user can select date ranges, etc. Then I'm issuing the SQL statement to get the relevant data, and performing calculations on it. I would set the properties at that point. Obviously, your program will be...
You might put something like this in your code:
If FldVal < 0 Then
rptMyReport.Sections(1).Controls("txtMyControl").ForeColor = vbRed
Else
rptMyReport.Sections(1).Controls("txtMyControl").ForeColor = vbBlue
End If
You might want to read this thread as well, lots of different things...
As the others have said, most (if not all) handheld scanners do the actual detection of symbology and just send back the data that is encoded in the barcode.
However, if you would like to learn more about the different symbologies and how to decode them, I highly recommend "The Bar Code Book"...
Hypetia,
I'm not familiar with the CopyMemory call, but I was wondering if your InsertItem subroutine could be simplified slightly to this:
[code]
Sub InsertItem(Item As String, Index As Long)
'increase the size of array
ArraySize = ArraySize + 1
'shift down the contents of array...
I don't know anything about ActiveReports, but have you checked in the object browser to make sure you're referencing the property correctly and that your constant is correct? I know if I'm using a data report, it's referenced like this:
rptName.Orientation = rptOrientLandscape
Just a...
Cubby1,
Did you make sure that you closed other apps before you tried installing again? Try installing right after a reboot, before launching any other programs. If neither of those solutions work, try cancelling/closing programs in your task tray.
Kevin
chmohan:
I wanted this program to work for any file, any reclen, and I thought I could use the RANDOM access mode if I set
the length of the string with this line:
InputData = String(RecordSize, Chr(64))
Obviously, I was wrong.
gmmastros:
Nice try, but these files won't always have...
Howdy! I hope someone can help me out here. I've got the following code that is supposed to
read in a file of fixed length records, and reverse its order.
OutFile = txtOutputFilename.Text
InFile = txtInputFilename.Text
TotalCount = fso.GetFile(InFile).Size / RecordSize
RecNum =...
I have a laptop running XP Pro on my network that the user takes home so she can work from home(via VPN). Lately, when she brings the laptop to work and plugs in at her desk, she has some problems. She logs in to the domain just fine, and can access shares on our NT4 servers, but not the...
Thanks, Swi! I was under the impression (from the help files) that I had to have an active connection during design time to assign the DataFields.
Kevin
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.