## In which forum should this be posted?

Good day,

I've created an application using VBA that takes user input, accesses a binary database to retrieve data based on the user input, performs some computations, and returns the results. I would like to do something similar with a web based application. The user would need to login with a userid and password and provide input, a database would be accessed and data returned based on the user input, calculations would be performed, and results would be returned to the browser. I am web programming ignorant. What language is best suited for such an application? I've included sample code. Thank you for any advice.

Sub GetData()
UserInput1 = 3
UserInput2 = 356
UserInput3 = 1000
UserInput4 = 1000
fname1 = "C:\database.bin"
Open fname2 For Random As #1 Len = 21
recordNumber = (UserInput1 - 1) * 1000 + UserInput2
Get #1, recordNumber, rec
avg = rec.sngMean * UserInput3
stdv = rec.sngStdev * UserInput3
OutputToUser = ProbableValue(avg, stdv, UserInput4)
Close
End Sub

Function ProbableValue(avg, stdv, UserInput4)
Set wf = WorksheetFunction
f1 = 1 / (2 * wf.Pi()) ^ 0.5
f2 = -1 * stdv ^ 2 * Exp(-18)
f3a = wf.GammaDist((3 * 2 ^ 0.5) ^ 2, 0.5, 1, True)
f3 = (avg - UserInput4) * (2 * wf.Pi()) ^ 0.5 * stdv * f3a / 2
f4 = stdv ^ 2 * Exp(-1 * (avg - UserInput4) ^ 2 / 2 / stdv ^ 2)
If cstrk >= avg Then
f5a = -1 * wf.GammaDist((2 ^ 0.5 * (avg - UserInput4) / 2 / stdv) ^ 2, 0.5, 1, True)
Else
f5a = wf.GammaDist((2 ^ 0.5 * (avg - UserInput4) / 2 / stdv) ^ 2, 0.5, 1, True)
End If
f5 = (avg - UserInput4) * (2 * wf.Pi()) ^ 0.5 * stdv * f5a / 2
f6 = f1 * (f2 + f3 + f4 + f5) / stdv
ProbableValue = f6
End Function