锐客网

  1. 首页 > 生活百科 > it技术 > >

vb.net注册界面 vb编程代码怎么写

IT技术密码

求一份VB.NET的注册页面的代码创建完相应的用户名，密码控件之后，输入以下代码：
Imports System.Data.OleDb
Public Class Form1
Private Sub cmdok_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdok.Click
Dim m_username As String
Dim m_userpwd As String
Dim cmd_result As MsgBoxResult
Dim m_da As New OleDbDataAdapter
Dim m_ds As New DataSet
Dim m_command As New OleDbCommand
Dim strsql As String
m_username = txtusername.Text
m_userpwd = txtuserpwd.Text
strsql = " select * from user_info where username='"m_username"' and userpwd='"m_userpwd"'"
OleDbConnection1.Open()
m_command.CommandType = CommandType.Text
m_command.CommandText = strsql
m_command.Connection = OleDbConnection1
【vb.net注册界面 vb编程代码怎么写】m_da.SelectCommand = m_command
m_da.Fill(m_ds, "user_info")
If m_ds.Tables("user_info").Rows.Count0 Then
cmd_result = MsgBox("欢迎登录", MsgBoxStyle.OKOnly, "提示")
Else
MsgBox("登录失败，请确认用户名和密码")
End If
End Sub
End Class
DW网页制作asp.net注册页面（VB语句）在站点根目录下建立bin文件夹,再在vb.net注册界面你安装dreaweaver目录（macromedia\dreamweaver
mx
2004\configuration\serverbehaviors\shared\asp.net\scripts）找到dreamweaverctrls.dll把它copy到bin下就行vb.net注册界面！
请问用VB.NET中 如何将注册窗口的用户名和密码传递给登录窗口的用户名和密码？拜托了建立一个模块vb.net注册界面，在其中定义全局变量
Public a as string
public b as string
然后在注册，登陆界面分别引用就好vb.net注册界面了
vb.net怎么写注册代码Private Sub 提交_Click()
Dim stemp As String
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
stemp = "select * from user"
rs.Open stemp, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
If Me!密码确认密码 Then
MsgBox "两次输入的密码不一致，请重新输入", vbExclamation, "Error"
Exit Sub
Else
stemp = "insert into user"
stemp = stemp"(用户名 ， 密码，身份证号)"
stemp = stemp" values('"Me!用户名"','"Me!密码"','"Me!身份证号"')"
DoCmd.RunSQL stemp1
Set rs = Nothing
End If
MsgBox "The information of register have saved already!", vbExclamation, "information"
End Sub
asp.net中用vb语言写一个用户注册页面详细代码!-- #include file="retop.asp" --
html
head
link rel="stylesheet" href="https://www.04ip.com/post/common.css" type="text/css"
script language="vbscript"
!--
Sub pass2_OnBlur
'判断两次密码是否相同
if formreg.pass1.valueformreg.pass2.value then
document.formreg.elements(2).focus()
MsgBox"两次输入的密码不一致！"
end if
end Sub
Sub btnreg_OnClick
'判断用户名是否正确
if Trim(formreg.username.value)=Empty then
document.formreg.elements(0).focus()
MsgBox"用户名不能为空！"
exit Sub
else if len(formreg.username.value)12 then
document.formreg.elements(0).focus()
MsgBox"用户名不能超过12个字符！"
exit Sub
end if
end if
'判断用户密码是否正确
if Trim(formreg.pass1.value)=Empty then
document.formreg.elements(1).focus()
MsgBox"密码不能为空！"
exit Sub
else if len(formreg.pass1.value)12 then
document.formreg.elements(1).focus()
MsgBox"密码不能超过12个字符！"
exit Sub
end if
end if
formreg.Submit
end Sub
--
/script
title同学通讯录/title
style type="text/css"
!--
.STYLE1 {color: #FF0000}
--
/style
/head
body
h4请输入注册信息h4
form method="post" name="formreg" action="register2.asp"
p用 户 名:input type="text" name="username" size="12"
(span class="STYLE1"* 必填，最长12个字符/span)/p
p用户密码:input type="password" name="pass1" size="12"
(span class="STYLE1"* 必填，最长12个字符/span)/p
p重输密码:input type="password" name="pass2" size="12"
(span class="STYLE1"* 必填，最后验证密码/span)/p
pinput type="button" name="btnreg" value="https://www.04ip.com/post/确定"
input type="reset" value="https://www.04ip.com/post/取消"
/p
/form
/body
/html
VB.NET 2008 速成版 注册页面打不开？难道防火墙阻拦？一般不会取消对VS2008的支持吧，要不再你卸载界面下卸载看看有没有注册选项 ， vs2008专业版在卸载的时候有注册选项的
关于vb.net注册界面和vb编程代码怎么写的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：海参店如何营销，海参营销模式

    下一篇：刚开始怎么写java代码，java如何开始写程序