Can you do functions by calling filename or any other better ways?

[chong67]

I got it working the first time. It was not that hard. I just google it. I just didnt know its called 'function library'

You need to go to Resources Tab and do "Associated Function Librarys".

I dont know if this is good programming or not.

I am still learning.

=============
' I save this to a file

Code:

Dim  RndValue
Randomize
RndValue = Int(  (300-200 +1)* Rnd + 200)

Public Function OutDate()
     OD = DateAdd("d", RndValue, Date)
     OutDate = OD
End Function

Public Function ReturnDate()
    RD= DateAdd("d", RndValue+10, Date)
    ReturnDate = RD
End Function

======================
'Put this in expert view:

Code:

Browser("Delta Air Lines - Airline_2").Page("Delta - Book a flight").WebEdit("departureDate[0]").Set OutDate
Browser("Delta Air Lines - Airline_2").Page("Delta - Book a flight_14").WebEdit("departureDate[1]").Set ReturnDate