I have created a function which must doing a sql function...
if i execute there is a error msg "424".
I dont know what is wrong...
if i execute there is a error msg "424".
I dont know what is wrong...
PHP Code:
Function pobierz_objid()
Dim conn
Dim ptype_id As Integer
ptype_id = InputBox("Podaj numer tabeli:")
Set cmd = CreateObject("ADODB.Command")
Set rs = CreateObject("ADODB.Recordset")
GetDbConnection conn
cmd.ActiveConnection = conn
cmd.CommandText = "get_next_objid"
cmd.CommandType = CommandType.StoredProcedure
Set param1 = cmd.CreateParameter("Return", adNumber, adParamReturnValue)
cmd.Parameters.Append param1
Set param2 = cmd.CreateParameter("Input", adNumber, adParamInput)
cmd.Parameters.Append param2
param2.Value = ptype_id
Set rs = cmd.Execute
If connClose Then
conn.Close
End If
pobierz_objid = cmd(0)
End Function