我原来是用VB编数据库的,现在刚开始学delphi,请问学过VB的朋友,下面代码在delphi怎么实现,
用什么控件?
sql = "SELECT * FROM 登录 WHERE 用户名='" & Text1 & "' AND 密码='" & Text2 & " ' " ‘text1和text2分别表示用户名和密码
Str = "DRIVER={SQL Server};SERVER=yjdn;UID=sa;PWD=yjdn;DATABASE=图书管理"
conn.Open Str
rst.Open sql, conn, , , adCmdText
If rst.EOF = True Then
MsgBox "你输入的用户名或密码错误!"
rst.Close
conn.Close
用什么控件?
sql = "SELECT * FROM 登录 WHERE 用户名='" & Text1 & "' AND 密码='" & Text2 & " ' " ‘text1和text2分别表示用户名和密码
Str = "DRIVER={SQL Server};SERVER=yjdn;UID=sa;PWD=yjdn;DATABASE=图书管理"
conn.Open Str
rst.Open sql, conn, , , adCmdText
If rst.EOF = True Then
MsgBox "你输入的用户名或密码错误!"
rst.Close
conn.Close
用Query控件,它有一个SQL属性,直接把一个SQL语句赋予该属性即可!
Query.sql.clear;
Query.sql.text:=sql = "SELECT * FROM 登录 WHERE 用户名='" & Text1 & "' AND 密码='" & Text2 & " ' " ‘;
Query.open;
AdoConnecton的用法与Connection一样
Adodataset就是RecordSet,用法差不多
QQ33524826