SELECT
Portal_Roles.RoleName,
Portal_Roles.RoleIDFROM Portal_UserRoles
INNER JOIN
Portal_Users ON Portal_UserRoles.UserID = Portal_Users.UserID
INNER JOIN
Portal_Roles ON Portal_UserRoles.RoleID = Portal_Roles.RoleIDWHERE
Portal_Users.Email = @Email
Portal_Roles.RoleName,
Portal_Roles.RoleIDFROM Portal_UserRoles
INNER JOIN
Portal_Users ON Portal_UserRoles.UserID = Portal_Users.UserID
INNER JOIN
Portal_Roles ON Portal_UserRoles.RoleID = Portal_Roles.RoleIDWHERE
Portal_Users.Email = @Email
Portal_Roles.RoleName,
Portal_Roles.RoleIDFROM Portal_UserRoles
INNER JOIN
Portal_Users ON Portal_UserRoles.UserID = Portal_Users.UserID
INNER JOIN
Portal_Roles ON Portal_UserRoles.RoleID = Portal_Roles.RoleIDWHERE
Portal_Users.Email = [@Email]
SELECT
Portal_Roles.RoleName,
Portal_Roles.RoleIDFROM Portal_UserRoles
INNER JOIN
Portal_Users ON Portal_UserRoles.UserID = Portal_Users.UserID
INNER JOIN
Portal_Roles ON Portal_UserRoles.RoleID = Portal_Roles.RoleIDWHERE
Portal_Users.Email = '@Email'
看来你的@Email要从程序中获取了..
Dim Str as String ="SELECT Portal_Roles.RoleName,Portal_Roles.RoleID FROM Portal_UserRoles
INNER JOIN Portal_Users ON Portal_UserRoles.UserID = Portal_Users.UserID INNER JOIN Portal_Roles ON Portal_UserRoles.RoleID = Portal_Roles.RoleID WHERE Portal_Users.Email ='" + Email +"'"
Dim Conn as new OleDbConnection(ConnStr)
Dim Comm as new OleDbCommand(Str,Conn)
...
...
关键是这样写执行编译的时候就会出错,原因是最上面那句话是SQL的语法,要怎么改才能通过。
vb的语法是不是+而是&