ChrisPadgham 113 Posting Whiz

please start your own thread if you have a question.

ChrisPadgham 113 Posting Whiz

if it is connected to an asynchronous port, eg Com1 then simply open it like a file

open com1 for output as #1
ChrisPadgham 113 Posting Whiz

don't think so. if you only have the exe you are in trouble.

ChrisPadgham 113 Posting Whiz
ChrisPadgham 113 Posting Whiz

you will need to provide more details to get help

ChrisPadgham 113 Posting Whiz

Why not have two listboxes one for name, one for URL, make the second listbox not visible. When they click on a row in the first, select the URL from the second.

ChrisPadgham 113 Posting Whiz

You may like to investigate the defaultValue property for the other name text boxes. When they enter the name in f.wholename set

f.FillNameBox1.defaultvalue = f.wholename.value

ChrisPadgham 113 Posting Whiz

I think you need

[player stop]

in somewhere like viewWillDisappear

ChrisPadgham 113 Posting Whiz

your use of transactionid as a sort criteria will cause you problems since the transaction you add will have a transactionid out of sequence. I suggest you use date and time rather than just date that way you can select all transactions greater that the date/time of the inserted transaction.

ChrisPadgham 113 Posting Whiz

There are basically two approaches and it is a matter of taste which you prefer.

For functions that the user does not have priveleges for you can choose to make the command buttons, text fields etc either

disabled - in which case they will still appear but greyed out
not visible - in which case they will not appear on the form

enabled and visible are both properties of each control that you can set.

ChrisPadgham 113 Posting Whiz

I think you will need two "End If"s, as one is missing that matches line 15

ChrisPadgham 113 Posting Whiz

set focus to the form

frmItem.setfocus

ChrisPadgham 113 Posting Whiz

if it is not in the source it is not on the web page, the source being the source of the web page.

ChrisPadgham 113 Posting Whiz

select table1.conkey, reg, when, [where], [type], connum from table1, table2 where table1.conkey = table2.conkey

it is not good to use keywords as field names, like where and type, consider renaming your fields. it will be worth it in the long run.

ChrisPadgham 113 Posting Whiz

Please post the code you have so far, we are not here to write your homework for you.

ChrisPadgham 113 Posting Whiz

change the first parameter to be initWithTitle (ie capitalise the W)

ChrisPadgham 113 Posting Whiz

replace the or with and (&&)

ChrisPadgham 113 Posting Whiz

well if they are an array don't you have one module that handles events for the textboxes in that array

ChrisPadgham 113 Posting Whiz

Your post contributes nothing to this thread. Please start your own thread if you have a problem you wish to discuss.

ChrisPadgham 113 Posting Whiz

Nobody has answered because you have not asked a specific technical question. The forum does not supply solutions but if you have written something that does not work someone will help you debug it.

ChrisPadgham 113 Posting Whiz

check out the instr function eg

if instr(1, stringToSearch, "b") > 0 or instr(1, stringToSearch, "d")> 0 then
   msgbox "found"
end if
ChrisPadgham 113 Posting Whiz

it would help if you indented your code.

lines 6/7 should be below line 15, you can't use the variables until you have assigned them

line 19 is wrong, drop the =0

line 23 should be else {

line 31 probably should be }

ChrisPadgham 113 Posting Whiz

if you are talking about ptr1 then it is destroyed when you exit fnCall2 and recreated the next time you enter the subroutine. You cannot rely on it retaining its value.

ChrisPadgham 113 Posting Whiz

You have created the recordset object at line 2 but you need to assign it an actual recordset using a SET statement

Set rs = ......
ChrisPadgham 113 Posting Whiz

You have too much time on your hands Jx_Man

ChrisPadgham 113 Posting Whiz

You can use the isnumeric function

do 
   MonthUsage = InputBox("Please enter a monthly usage value")
   if not isnumeric(MonthUsage) then msgbox "Please enter numbers only"
until isNumeric(MonthUsage)
MonthlyUsages(usages) += val(MonthUsage)
ChrisPadgham 113 Posting Whiz

There are some good sales and inventory systems on the market, it will end up cheaper and quicker than writing your own

ChrisPadgham 113 Posting Whiz

please post the sql that is not working

ChrisPadgham 113 Posting Whiz

line 34 should be

intGrade = intScore/intPossibleMarks*100

that will give you a score as a percentage then you will need a select case statement to assign a letter to the score. something like

SELECT CASE TRUE
   CASE intGrade > 85
        strGrade = "A"
   CASE intGrade >75
        strGrade = "B"
   CASE ELSE
        strGrade = "E"
END SELECT
ChrisPadgham 113 Posting Whiz

From memory, I think you also need to set the keypreview property on the form otherwise the keypress will be sent to the control that has focus

ChrisPadgham 113 Posting Whiz

Looks like just the spot for a bit of recursion. create yourself a subroutine that creates the upper and lower case version of an ordinal position and then have it call itself until you reach the end of the string.

ChrisPadgham 113 Posting Whiz

are you planning to embed a browser in your application or did you want to shell out.

ChrisPadgham 113 Posting Whiz

I think you should set your start up to Sub Main. Then write a main subroutine that displays your login form modally. When you have validated the user display your first form.

ChrisPadgham 113 Posting Whiz

the windows function is returning a C string. These strings indicate the end of the string with a ASC 0. The instr is finding the end of the string and retassoc is then set to the string to the left of it.

ChrisPadgham 113 Posting Whiz

You are missing an

End If

after line 9

Jx_Man commented: +1 for eagle eyes :D +14
ChrisPadgham 113 Posting Whiz

Please start your own thread if you have a problem

ChrisPadgham 113 Posting Whiz

I think it is important for you to get a start, once you have got something, if you have a bug you can't find, post it and someone will help you.

ChrisPadgham 113 Posting Whiz

Sorry I missed the additional pages

ChrisPadgham 113 Posting Whiz

I don't think this approach can handle strange charaters in the password like ( or ). Check that your password only contains alphanumeric characters.

ChrisPadgham 113 Posting Whiz

Why do you have the details in a second table. It doesn't look like you need it, just move all the fields in the details table into the Customers table. If you wish to persist with the design you have then the insert into customers table at line 7 does not include the the Details_Id. YOu need to work out the ID of the record you have inserted into the Details table and include that in the INSERT into the Customers table.

ChrisPadgham 113 Posting Whiz

oops, yes I missed that bit about the project name. I too prefer explicit joins laziness and too much time in the Oracle world must have overcome me. :-)

ChrisPadgham 113 Posting Whiz

You may choose to have a separate frontend database on each users PC that all connect to database holding the data on the server. That way each user could have their own customised screen if that is what you want. It is a bit more problematic from a maintenance point of view but it is very simple to implement.

ChrisPadgham 113 Posting Whiz

didn't you also ask this question in the VB.Net forum, which are you using.

ChrisPadgham 113 Posting Whiz

30 is pushing it a bit for MSAccess but in theory you should be OK. Just use one table and one form. Given the number of concurrent users I would be inclined not to use bound fields. Instead have a save button which builds an SQL INSERT statement to insert the row into the table. This way you are holding a lock on the table for the minimum time. This is important because Access is single threaded at points.

If you having concurrency problems you may like to consider migrating the data component to SQLServer Express (which is free) It is better at handling large numbers of concurrent users than Access

ChrisPadgham 113 Posting Whiz

have you looked at the Help for format$ that should tell you

ChrisPadgham 113 Posting Whiz

There is a format$ function that will format things for you. for example for a money amount

contents = format$(c.value,"currency")
ChrisPadgham 113 Posting Whiz
Dim contents As String
contents = ""
For Each c In Worksheets("Sheet2").Range("a1:a4").Cells
  contents = contents & ", " & c.Value
Next c
TextBox1.Text = contents
ChrisPadgham 113 Posting Whiz

Please start your own thread if you have a new question

ChrisPadgham 113 Posting Whiz

the simplest way is to go to Tools -> Macro -> Record New Macro
manually do what want, the macro will create the VBA for you, you can then go into the Visual Basic editor to look at, improve the code.

ChrisPadgham 113 Posting Whiz

In the click event of the combo box set a filter on the form

Public sub combo1_click
    me.filter = "StudentName='" & me.combo1.text
    me.filteron = true
end sub