k le pasa a esto

[yampoo]

k kieres kponga 1000 lines pondre 20:


<pre>
'## Forum_SQL - Do DB Update
strSql = &quot;UPDATE &quot; &amp; strMemberTablePrefix &amp; &quot;MEMBERS &quot;
strSql = strSql &amp; &quot; SET M_LASTHEREDATE = '&quot; &amp; DateToStr(strForumTimeAdjust) &amp; &quot;'&quot;
if strAuthType=&quot;db&quot; then
strSql = strSql &amp; &quot; WHERE &quot; &amp; strMemberTablePrefix &amp; &quot;MEMBERS.M_NAME = '&quot; &amp; UserName &amp; &quot;' &quot;
else
if strAuthType=&quot;nt&quot; then
strSql = strSql &amp; &quot; WHERE &quot; &amp; strMemberTablePrefix &amp; &quot;MEMBERS.M_USERNAME = '&quot; &amp; session(&quot;userid&quot;) &amp; &quot;' &quot;
end if
end if

my_conn.Execute (strSql)

ReadLastHereDate = DateToStr(TempLastHereDate)
end function

function getMemberID(fUser_Name) </pre>