大家看看我的false为什么就是显示不出来呢
Dim fil As String = CS.EScalar("select txt from [sys_Tguong] where id=1")
Dim txt As String = CS.EScalar("select ww from [sys_Tguong] where id=1")
Dim type As String = CS.EScalar("select type from [sys_Tguong] where id=1")
Dim file() As String = Split(fil, "\")
If type = "图片" Then
Response.Write("<a href =http://" & txt & " target=_blank><img src =" & fil & " width=720 height =60/></a>")
ElseIf type = "False" Then
Response.Write("<object classid=clsid:D27CDB6E-AE6D-11cf-96B8-444553540000 codebase=http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0 width=627 height=113>")
Response.Write("<param name=movie value=" & file(file.Length - 1) & "> ")
Response.Write("<param name=quality value=high>")
Response.Write("<embed src=" & fil & " quality=high pluginspage=http://www.macromedia.com/go/getflashplayer type=application/x-shockwave-flash width=627 height=113></embed>")
Response.Write("</object>")
ElseIf type = "视频" Then
End If
路径没有错