آقا تورو خدا يكي كمك كنه

[nasser]

با سلام
مي خواستم ببينم اگه كسي با brinkster و يا كلا ASP كار كرده لطفا به من بگه براي پياده كردن سايتم كه با ASP است روي brinkster چه كارهايي بايد كرد چون نمي دونم چرا هر كاري مي كنم به اين صفحه اشكال مي گيرد :

<%   
Dim okok
Dim rs      

 set okok = server.createObject("ADODB.Connection")
        Set rs = Server.CreateObject("ADODB.Recordset") 

dbconnection2 = "DRIVER=Microsoft Access Driver (*.mdb);DBQ="

dbconnection2 = dbconnection2 & Server.MapPath("/UserName/db/db1.mdb")

okok.Open dbconnection2

rsCheckUser = "SELECT * FROM Admin WHERE "
rsCheckUser = rsCheckUser & ((Admin.StrUserName)='Admin'"))
rs.Open rsCheckUser, okok, 2, 3


rs.Fields("describe") = Request.Form("S1")


rs.Update 

rs.Requery 

Session("blnIsUserGood") = True 
okok.close
Set okok = Nothing 
rs.close
Set rs = Nothing 

%>

كه UserName نام Username ام است .
آيا تنظيمات ديگري هم است ؟

ممنون مي شوم كسي جواب بده

 

[m_ghoochani]

راهنمايي اين كار فقط از دست عليرضا برمياد . بگرد پيداش كن و مشگلت رو باهاش مطرح كن . مطمين باش جواب درستي بهت مي ده

 

[mazoolagh]

CONNECTION درست است ولي در خط زير

rsCheckUser = rsCheckUser & ((Admin.StrUserName)='Admin'"))

يك " كم است! به صورت زير اصلاحش كن:

rsCheckUser = rsCheckUser & " Admin.StrUserName='Admin'"

ضمنا اول بايد recordset رو ببندي بعد connection