Wow, that's wierd. Thanks for the tip.
But yeah, I noticed it too and it was driving me nuts. I turned the date picker off, thinking that was the problem, but no.
The good news is anyone can create an Access database.
The BAD news is anyone can create an Access database.
Big Louie, you can also just do a compact and repair on your Access database. That'll shrink it back down.
Access also does that when you're doing a lot of design work. Adding and deleting forms, queries etc.
The good news is anyone can create an Access database.
The BAD news is anyone can...
Thanks Luoie. Yeah, I tired the ampersand. I really don't think it can be done. Here's what the help files says
The good news is anyone can create an Access database.
The BAD news is anyone can create an Access database.
Thanks Louie.
BTW, I WAS able to concatenate, however MAS puts an ascii chr 27 in the string for some reason.
For example, in temp01, I have AR.INVHISH:INVOICE_NUMBER+'Ty', it returns 0100033TY
The good news is anyone can create an Access database.
The BAD news is anyone can create an...
I haven't found a way to do this in an Export Job. Either combining two fields, or combining a field and a string which I define.
Louie, I'm going to class in a week so go easy on me ;)
Probably really simple, it's been years since my last install.
Anyway, I put SQL 2000 on a new box. I can view the DBs, (Temp, Noethwind, Pubs) etc but when I open enterprise manager, I get the message "SQL Server (name) is not know to be running are you sure you wish to connect ?"
I say yes...
Public Function fOSUserName() As String
' Returns the network login name
Dim lngLen As Long, lngX As Long
Dim strUserName As String
strUserName = String$(254, 0)
lngLen = 255
lngX = apiGetUserName(strUserName, lngLen)
If lngX <> 0 Then
fOSUserName =...
Pattycake, you got me close. Here's a star. Thx
Here's what worked
CASE substring([tblSearsItem].[Style],3,1)
WHEN 'B' THEN 'BOYS'
WHEN 'T' THEN 'TODDLER'
END
AS [gender]
I'm using
substring([tblSearsItem].[Style],3,1)
to strip out the third character as a field. The result will be 'B', 'M', 'J', or 'T'
When the result is B, I want to display "Boys" in the SP as the column 'Gender'
When the result is M, I want to display "Mens" in the SP as the column...
Well, the HARD way (which I have to do sometimes) is open the .dbf as a recordset, loop through it record by record and copy the fields into the table, which wouldbe a second recordset).
This is how I do it with FoxPro
On Error Resume Next
Dim strSQLFox As String
Dim rstFox As New...
Public Sub Bypass()
Application.CurrentProject.Properties.Add "AllowByPassKey", False
End Sub
Note: Make a copy of your ADP first. If you've disallowed the F11 key (which is always a good idea) and run this, you'll never get into the back end of your DB again....
Dim prm As ADODB.Parameter
Dim cmd As ADODB.Command
Set cmd = New ADODB.Command
Set cmd.ActiveConnection = CurrentProject.Connection
cmd.CommandText = "sp_860Prompt"
cmd.CommandType = adCmdStoredProc
'cmd.Parameters(0).Type = adVarChar
cmd.Parameters(1).Direction = adParamInput...
You don't use Set.
Does the stored procedure already have parameters ? If so, all you need to do is something like ths:
cmd.Parameters(1).Direction = adParamInput
cmd.Parameters(2).Direction = adParamInput
cmd.Parameters(1).Value = myStr1
cmd.Parameters(2).Value = myStr2
(This example has 2...
SELECT tblA.joinedfield, Count(tblB.joinedfield) AS CountOfWhatever
FROM tblB INNER JOIN tblA ON tblB.joinedfield = tblA.joinedfield
GROUP BY tblA.joinedfiled;
I have Combo Boxes that are based on stored procedures in an Access Data Project.
Currently, I programatically change the next combo down the tier based on the current combos value, and pass the parameter to the next combo.
I.E.
cbo_1 After_Update()
Me!cbo_2.RowSource = "EXEC sp_ColorBox'" &...
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.