SQL to Mysql conversion(repost)

I need the following ms sql stored procedure converted to mysql stored procedure: \---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|- CREATE PROCEDURE [dbo].[User_Add] @FirstName varchar(255), @LastName varchar(255), @Email varchar(255), @Password varchar(255), @NewID int output AS INSERT INTO [dbo].[User] ([Email] ,[Password] ,[FirstName] ,[LastName] ) VALUES (@Email, @Password, @FirstName, @LastName) IF @@ERROR <> 0 BEGIN ROLLBACK TRAN RETURN @@ERROR END SET @NewID=@@IDENTITY \---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---|\---| ## Deliverables I also need the following classic asp functions to work with mysql: Function AddUpdateUser( oUserData ) Dim cmd Set cmd = [login to view URL]("[login to view URL]") [login to view URL] = "dbo.User_Add" [login to view URL] = adCmdStoredProc [login to view URL] = GetDBConnection ' Append stored proc parameters [login to view URL] [login to view URL]("@FirstName", adVarchar, adParamInput, 255, oUserData("FirstName")) [login to view URL] [login to view URL]("@LastName", adVarchar, adParamInput, 255, oUserData("LastName")) [login to view URL] [login to view URL]("@Email", adVarchar, adParamInput, 255, oUserData("Email")) [login to view URL] [login to view URL]("@Password", adVarchar, adParamInput, 255, oUserData("Password")) ' Output parameter [login to view URL] [login to view URL]("NewID",adInteger,adParamOutput,4) 'On Error Resume Next [login to view URL] ,,adExecuteNoRecords Dim oErrors, oError, strErrors Set oErrors = [login to view URL] If ([login to view URL] > 0) Then [login to view URL] 'There were errors, report them For Each oError in oErrors strErrors = strErrors & "<b>Error:</b> " & [login to view URL] & "<br>" & _ "<b>Source:</b> " & [login to view URL] & "<br>" & _ "<b>Description:</b> " & [login to view URL] & "<br><br>" Next Else Session("UserID") = CLng ( [login to view URL]("NewID").Value ) End If On Error GoTo 0 Set cmd = Nothing AddUpdateUser = strErrors End Function Function GetDBConnection() Dim strServer, strDB, strUser, strPassword strServer = "(local)" strDB = "mydb" strUser = "mydb" strPassword = "password" ' USING SQL OLEDB GetDBConnection = "Provider=SQLOLEDB;" _ & "Data Source=" & strServer & ";" _ & "Initial Catalog=" & strDB & ";" _ & "User ID=" & strUser & ";" _ & "Password=" & strPassword & ";" End Function