上一篇博客已经介绍了WebService的简单实例,现在讲述如何利用WebService实现简单的注册登录
首先在数据库中创建一个Users表,我设置为主键自增:
其实注册登录就只是对表进行增加查找,于是在此过程中肯定要连接数据库,在WebService中添加如下代码:
'连接数据库
Public conn As New SqlConnection("server=CNALCLUOD001242\SQLSERVER;database=RegisterAndLogin;user ID=sa;password=5201314.qaz")
<WebMethod(Description:="用户注册方法")> _
Public Function UserAdd(ByVal userName As String, ByVal password As String) As Integer
Dim a As Integer = 0
Try
conn.Open() '打开数据库连接
Dim sql As String = "insert into Users(userName,password) values(@userName,@password)"
Dim cmd As New SqlCommand(sql, conn) 'SqlCommand方法是构造函数,参数为一个执行的SQL语句,一个为连接对象
cmd.CommandText = sql '获取要执行的T-sql语句
cmd.Parameters.Add(New SqlParameter("@userName", userName)) '实体的UserName参数
cmd.Parameters.Add(New SqlParameter("@password", password))
If cmd.ExecuteNonQuery() > 0 Then a = 1
Catch ex As Exception
Finally
conn.Close()
End Try
Return a
End Function
<WebMethod(Description:="用户登录方法&#