I used this fuction and its working fine.
Public Function test(strToTest As String) As Integer
Dim strTest As String
Dim ara() As String
Dim I As Integer
Dim Count As Integer
strTest = strToTest
ara = Split(strTest, ";")
Count = 0
For I = 0 To UBound(ara)
If ara(I) = "0 " Or ara(I) = ";0 " Or ara(I) = "" Then
Else...
User Profile
Collapse
Profile Sidebar
Collapse
billa856
Last Activity: Jul 28 '08, 05:14 PM
Joined: Nov 19 '07
Location: USA
-
There is an error missing list operator.can u plz check its format?...Leave a comment:
-
Count Nos in string
Hi,
I have string like below and i wanna count nos in that string
1st string ;0;80;0;0;39;0; 0;0;81;42;5;100 ;0;0 in this string there are 6 Nos.
2nd string ;11;0;5;2;0;0;0 ;0;89;65;0;26;0 ;2;5 in this line there are 8 Nos.
3rd string ;0;0;0;0;50;41; 20;30;0;50;0 in this line there are 5 Nos.
I can count total nos in string
1st string -14 Nos.... -
billa856 started a topic Insert null value in column-type is date/time & format is ShortDate ,in Access 2002in AccessInsert null value in column-type is date/time & format is ShortDate ,in Access 2002
Hi,
I am trying to insert Null value in column(ShipDate ) in my table.That column(ShipDate )'s type id date/time and format is short date.
I am using "" to insert Null in that column(ShipDate ) but it shows warning that
customer can't append all the records in the append query.
Customer set 1 field(s) to Null due to a type conersion failure,and it didn't add 0 record(s) to the table due to key violation,... -
I found this one and its simple
Total = Eval(Replace(St ringName, ";", "+"))Leave a comment:
-
add numbers in string
String=1000;200 0;3000;4000
how can i add this nos?
i need this
total = 1000+2000+3000+ 4000=10000 -
I solve the previous problem.
But now there is another one coming
List is like this in Listbox(Me.Pall etIDOrTrackingN o_ListBox)
LONO----|PalletNo|Descr iption-----------|BatchNO--|CRTN|Pcs|Total |Remain|Locatio n
->1------|2---------|3----------------------------|4-------------|5----|6----|7-----|8-----|9--------
->7807 | 21102 | DKNY BE DELICIOUS | 79658BV1 | 20 | 10 | 200 | 200 | 256BA...Leave a comment:
-
Now I am using this function again in another form.
In that I have one ListBox(PalletI DOrTrackingNo_L istBox) and one textbox(LONO_Te xt).
Now when I select an item from ListBox then it will check using these function that it is already in that TextBox or not?if not then it will enter the value in Textbox and if it is already in that then leave it as it is.
for that I am using this code
...Leave a comment:
-
i just want to know the method how can i put check box in my report.I already change that check box to toggle buttons, u are telling me.
Thanks for ur reply....Leave a comment:
-
I made very silly mistake but now I got the problem.
i was using
Exit For
, in funtion(ReturnP alletNo) itself.But i have to use it after function return the value.So i replace the code of functions to origanl code given by u before ,and Now finaly its working in very properly manner I want.
Thanks a lot for ur help....Leave a comment:
-
Problem with function.
Hi, my project is in MS Access 2002.
In that I have one form.In that thare are couple of textboxes and a combobox.
now at first i select perticular number from combobox(AutoNo )
then it will fetch the value of PalletNo from table and set it as the value of textbox(PalletN o)
In my table there entries like
AutoNo PalletNo
1 | 21400
2 | 21401
3 | 21402
1 ... -
checkbox in report
Hi,
My Project is in MS Access 2002.
In that i have one form in which I am using several textboxes,combo boxes and (three) checkboxes.
in that form I have BillTo address and ShipTo address and Thirdparty BillTo address.
Now I have to enter BillTo address.
Case 1:
If BillTo and ShipTo addresses are same then i click on first checkbox then it will automatically enter the ShipTo Address same as BillTo address.... -
-
-
Problem in ur case, caused bcz both comboboxes' values are fetched from two different tables.
Now there are two options for U.
First Case
U have to use subreport in ur main report.
For that U have to set the FirstTableName( tblTitle) as RecordSource of Main Report and set SecondTableName (tblArtist) as RecordSource of SubReport.Also in SubReport U have to set the Foreign Key(Common Field in Both Tables,...Leave a comment:
-
for loop problem
Hi,
My project is in MS Access 2002.
In that I have one form. In that I want to put For or Do While loop.
I want thing like this in Access.
This is in C++ format.
Code:for(int i=1,j=17;i<=26,j<=32;i++,j++) { If ((Me.ItemNo[i+1] = Me.ItemNo[i]) And (Me.NoOfCartons[i+1] = Me.NoOfCartons[i]) And (Me.NoOfPiecesPerPartialCartons[i+1] = 0) And (Me.BatchOrLotNo[i+1] = Me.BatchOrLotNo[i]) And (Me.LONo[i+1]
-
or instead of me u can use FormName.
This one I used in my project....Leave a comment:
-
I used the same thing in my coding.
The problem was that the text box I want to set focus to, already has the focus. Therefore, the command is not carried out. The way to handle this is to put a transparent command button immediately following the text box of interest in the tab order. Then a bit of code in its GotFocus event can set the focus back to the text box.
And Now its working Properly.
Thanks For Ur ...Leave a comment:
-
I modify ur code as per my requirement.its working but I only want to know in Acces is there any function like FLAG or Label.I don't know its name properly.
But in C or C++ we use this function to jump at perticular line in code.
this is just example code is not working.this is just sample to show what i want?.
How can I jump to line 5 to line 20?...Leave a comment:
-
set focus on TextBox.
Hi,
My Project is in MS Access 2002.
In that I have one form which I am using for data entry.
Now in that I have some TextBoxes like
PalletNo,TotalP allets,ItemNo,L ONo,PONo,BatchN o,LotNo,Cartons ,PcsPerCarton etc.
Now when person scan a barcode from paper it will automatically enter Number(Like 24914) in first PalletNo TextBox.
In the AfterUpdate event of PalletNo TextBox I put some code so it will search the...
No activity results to display
Show More
Leave a comment: