求助各位大神，asp报错，显示语句未结束 - asp吧

level 1

高大威猛🌵 楼主

Dim Rss,GRss,JRss,SQL,GSQL,JSQL,vbsstr,Gvbsstr,Jvbsstr
vbsstr = ""
Gvbsstr = ""
Jvbsstr = ""
SQL = "SELECT url FROM [NC_trict] WHERE name like *"& m_strCity &"%* order by level asc"
GSQL = "SELECT gurl FROM [NC_trict] WHERE name like *"& m_strCity &"%* order by level asc"
JSQL = "SELECT jurl FROM [NC_trict] WHERE name like *"& m_strCity &"%* order by level asc"
Set Rss = NewAsp.Execute(SQL)
Set GRss = NewAsp.Execute(GSQL)
Set JRss = NewAsp.Execute(JSQL)
If Rss.BOF And Rss.EOF Then
Set Rss = Nothing
vbsstr = ""
Else
vbsstr = Rss("url")
End If
If vbsstr="" OR IsNull(vbsstr) Then
vbsstr = ""
Else
vbsstr = "<div class="abc1">"& vbsstr&"</div>"
End If
If GRss.BOF And GRss.EOF Then
Set GRss = Nothing
Gvbsstr = ""
Else
Gvbsstr = GRss("gurl")
End If
If Gvbsstr="" OR IsNull(Gvbsstr) Then
Gvbsstr = ""
Else
Gvbsstr = "<div class="abc1">"& Gvbsstr&"</div>"
End If
If JRss.BOF And JRss.EOF Then
Set JRss = Nothing
Jvbsstr = ""
Else
Jvbsstr = JRss("jurl")
End If
If Jvbsstr="" OR IsNull(Jvbsstr) Then
Jvbsstr = ""
Else
Jvbsstr = "<div class="abc1">"& Jvbsstr&"</div>"
End If

2014年09月17日 01点09分 1

level 10

lydy360

贴错误！

2014年09月17日 03点09分 2

高大威猛🌵

您好，什么错误？

2014年09月17日 05点09分

高大威猛🌵

您能详细指导一下么？非常感谢！这个问题我研究了一天了，都没解决！谢谢！

2014年09月17日 05点09分

lydy360

回复 w48225117 :这个你说asp报错了，报的什么错误呀！你贴出来，我们才好分析呀！

2014年09月22日 01点09分

level 1

高大威猛🌵 楼主

Dim Rss,GRss,JRss,SQL,GSQL,JSQL,vbsstr,Gvbsstr,Jvbsstr
vbsstr = ""
Gvbsstr = ""
Jvbsstr = ""
SQL = "SELECT url FROM [NC_trict] WHERE name like ‘"& m_strCity &"%’ order by level asc"
GSQL = "SELECT gurl FROM [NC_trict] WHERE name like ‘"& m_strCity &"%’ order by level asc"
JSQL = "SELECT jurl FROM [NC_trict] WHERE name like ‘"& m_strCity &"%’ order by level asc"
Set Rss = NewAsp.Execute(SQL)
Set GRss = NewAsp.Execute(GSQL)
Set JRss = NewAsp.Execute(JSQL)
If Rss.BOF And Rss.EOF Then
Set Rss = Nothing
vbsstr = ""
Else
vbsstr = Rss("url")
End If
If vbsstr="" OR IsNull(vbsstr) Then
vbsstr = ""
Else
vbsstr = "<div class="abc1">"& vbsstr&"</div>"
End If
If GRss.BOF And GRss.EOF Then
Set GRss = Nothing
Gvbsstr = ""
Else
Gvbsstr = GRss("gurl")
End If
If Gvbsstr="" OR IsNull(Gvbsstr) Then
Gvbsstr = ""
Else
Gvbsstr = "<div class="abc1">"& Gvbsstr&"</div>"
End If
If JRss.BOF And JRss.EOF Then
Set JRss = Nothing
Jvbsstr = ""
Else
Jvbsstr = JRss("jurl")
End If
If Jvbsstr="" OR IsNull(Jvbsstr) Then
Jvbsstr = ""
Else
Jvbsstr = "<div class="abc1">"& Jvbsstr&"</div>"
End If

2014年09月17日 05点09分 3

level 12

☞这个人叫白衣

目测没看到出来
需要错误详细说明

2014年09月17日 15点09分 4