2013-09-27 116 views
-1
businessSQL = "Select orgid, organisationname, weblink, featured, logofile, shortdesc, webpage FROM directory WHERE dircatid = " & dircattouse & " AND orgtype = 1 AND delstatus <> 0 AND intapproved = 1 ORDER BY featured DESC, organisationname ASC;" 
businessRS.Open businessSQL, dbconn 

上面的一個是我的選擇查詢,如果businessRS.("logofile")不是空的,那麼我想隱藏我的div id = img,否則它是可見的。我如何使用VBScript來做到這一點?如何根據數據庫條件使用vbscript來隱藏div?

我嘗試下面的代碼隱藏的div:

<% 
Dim oElm 
oElm = businessRS("logofile") 
Dim Div 
Set Div = document.getElementById("img") 
if oElm Is Nothing then 
    Response.write("Div.style.visibility = ""hidden"" ") 
else 
    Response.write("Div.style.visibility = ""visible"" ") 
end if 
%> 

回答

1

我不是從您的代碼100%肯定是否要完全在服務器端執行,或者如果你想創業到客戶端的VBScript ,但一種解決方案可能是有條件地插入一點CSS來設置div的可見性:

<% 
    ' connect, run SQL etc 
    '... 

    if IsNull(oElm) then 
%> 
<style type="text/css"> 
    div#img { visibility: hidden; } 
</style> 
<% 
    end if 
%>