<% id=request.querystring ("id_article") Dim sConnection, objConn , objRS sConnection = "DRIVER={MySQL ODBC 3.51 Driver}; SERVER=mysql911.ixwebhosting.com; DATABASE=C220421_naq1; UID=C220421_naq1;PASSWORD=sAlAm7007; OPTION=3" Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open(sConnection) Dim sql_new, id, sql_new2 sql_new="select * from object where id_obj=" Set rs_new = objConn.Execute("select * from object where id_obj=" & id) Nom_article = rs_new("title") OurArticle = rs_new("body") Author = rs_new("author") set rs_new =nothing set connstring = nothing %> :: - Naqshbandi.ca"> ">

<%response.write ""&Nom_article&""%> <%response.write ""&Author&""%>

<%=OurArticle%>