Connectivity Through DSN

I have written few line codes but puzzling me lot giving errors.

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open "wedding"
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "select * from Group"
rs.open sql, Conn ' Gives error this statement
Set rs = Nothing
Conn.close
Set Conn = Nothing

Connection is established successfully and recordset is also created without any problem
but when it executes rs.open line it gives me error tht

"SYNTAX ERROR NEAR FROM CLAUSE"