Question

我在此方面取得了一些进展，但仍有一些问题需要解决。

希望这个不会那么难。

我有这个：

For Each item In Request.QueryString("doc").Split(","c)
    sb.Append("http://default.html?k=")
    sb.Append(item)
    sb.Append("&p=2&o=m</p>")
Next

当我测试这段代码时：

Response.Write(sb.ToString())

我明白了：

http://default.html?k=122&p=2&o=m

http://default.html?k=123&p=2&o=m

这正是我们正在寻找的目标

当我们将它分配给变量时：

Dim linkList As String = sb.ToString()

然而，当我循环通过linkList 并将其写入屏幕，它只吐出字母h。

任何想法我做错了什么以及如果可能的话如何修复它？

Dim link As String

For Each link I linkList

    'let me know if I am still getting the links
    response.write link

    'we will save all the links later
Next

一如既往，非常感谢您的帮助

Answer 1

您好像没有关闭<a>代码

&p=2&o=m</p>

请注意</p>关闭不带<a>关闭</a>标记的段落。

尝试查看源，您可能会看到HTML格式错误。

Answer 2

您不能循环遍历字符串并获取另一个字符串（注意： linkList是一个字符串 - Dim linkList As String = sb.ToString()）。这就是为什么你得到它试图在字符串中选择字符的原因。将字符串放在一个数组中然后遍历数组。试试这个：

Dim linkArray() As String

For Each item In Request.QueryString("doc").Split(","c)
    Dim stb As New StringBuilder
    stb.Append("http://default.html?k=")
    stb.Append(item)
    stb.Append("&p=2&o=m</p>")
    linkArray.add(stb.toString())
Next

For Each link As String In linkArray
    response.write link
Next

链接被截断，任何想法为什么？

2 个答案: