有代码有什么用呢?你还不照样得自己做表单<form>的布局 cnn为数据源连接 1.你判断一下用户名和密码是否一致,如果一致则执行更改。 也就是先"select username from 数据表 where 用户名=''" if not 记录集.eof then if 记录集(password)=trim(text2.text) then if trim(text3.text)=trim(text4.text) then sql="update 数据表 set 密码='"+trim(text3.text)+"'" cnn.execute sql else Temp=msgbox("对不起,二次密码输入不一致!"); text3.text="" text4.text="" text3.setfcous end if else temp=msgbox("身份验证码不正确") text2.text="' text2.setfcous end if end if........ 随意写的,大概就这个思想吧...
cnn为数据源连接
1.你判断一下用户名和密码是否一致,如果一致则执行更改。
也就是先"select username from 数据表 where 用户名=''"
if not 记录集.eof then
if 记录集(password)=trim(text2.text) then
if trim(text3.text)=trim(text4.text) then
sql="update 数据表 set 密码='"+trim(text3.text)+"'"
cnn.execute sql
else
Temp=msgbox("对不起,二次密码输入不一致!");
text3.text=""
text4.text=""
text3.setfcous
end if
else
temp=msgbox("身份验证码不正确")
text2.text="'
text2.setfcous
end if
end if........
随意写的,大概就这个思想吧...