Passing data between .aspx and .vb files

[vengala s reddy]

i have login.aspx, login.vb, i have my stored procedures in login.vb

in login.aspx
<%@ Page Language="vb" src="/MyTime/com/login.vb"
Inherits="Enter.MyTime"%>

in login.vb
Public Sub EnterMyTime(ByVal ID As String, ByVal PWD As String)as
dataset

Now i am trying to read the output variables data from login.aspx.
i could not do it. Is there any easy way to use sqlDataReader insted
of Returning a DataSet.

THX.

[Stanley]

Subs do not return anything so your syntax is incorrect. Show more of your
code so we can show you what to change.

-Stanley

"vengala s reddy" <re******@yahoo.com> wrote in message
news:b9**************************@posting.google.c om...

i have login.aspx, login.vb, i have my stored procedures in login.vb

in login.aspx
<%@ Page Language="vb" src="/MyTime/com/login.vb"
Inherits="Enter.MyTime"%>

in login.vb
Public Sub EnterMyTime(ByVal ID As String, ByVal PWD As String)as
dataset

Now i am trying to read the output variables data from login.aspx.
i could not do it. Is there any easy way to use sqlDataReader insted
of Returning a DataSet.

THX.

[VSKR]

Public Function EnterMyTime(ByVal ID As String, ByVal PWD As String) As
SqlDataReader
Dim msg
Dim MyConn As New SqlConnection("Password=;Persist Security
Info=True;User ID=;Initial Catalog=;Data Source=;")
Dim cmd As SqlCommand = New SqlCommand("CheckLogin", MyConn)
cmd.CommandType = CommandType.StoredProcedure

Dim userID As SqlParameter = cmd.Parameters.Add("@uid",
SqlDbType.VarChar, 50)
userID.Value = ID
userID.Direction = ParameterDirection.Input

Dim password As SqlParameter = cmd.Parameters.Add("@pwd",
SqlDbType.VarChar, 50)
password.Value = PWD
password.Direction = ParameterDirection.Input

Dim status As SqlParameter = cmd.Parameters.Add("@status",
SqlDbType.VarChar, 2)
status.Direction = ParameterDirection.Output

Dim paySchedule As SqlParameter =
cmd.Parameters.Add("@paysch", SqlDbType.VarChar, 2)
paySchedule.Direction = ParameterDirection.Output

Dim empID As SqlParameter = cmd.Parameters.Add("@id",
SqlDbType.VarChar, 2)
empID.Direction = ParameterDirection.Output

MyConn.Open()
Dim result As SqlDataReader =
cmd.ExecuteReader(CommandBehavior.CloseConnection)
'MyConn.Close()
Return result

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!