%@ Language=VBScript %> <% 'שליפת נתוני הערך מכל הטבלות הרלוונטיות כדי להציג את נתוניו. הטבלאות הן 'value, value_user, site_search, more '(אולי גם קטגוריה) set rsMaamar=Server.CreateObject("adodb.recordset") sqlstr="select * from mim_albom where id="&killchars(Request("pic")) rsMaamar.Open sqlstr ,con,3,3 rsMaamar.MoveFirst %>