PHP翻译成ASP该如何写？

Question

比较困难呀，asp数组不支持字符串索引．

Answer 1

经过PHP程序后出来的结果是什么？

Answer 2

没有测试环境dim  q;
q = LCase(request.QueryString("q"));
if  q != "" then
dim arr1;
dim arr2;
arr1 = Array("Great Bittern", "Little Grebe", "Black-necked Grebe", "Little Bittern");
arr2 = Array("Botaurus stellaris", "Tachybaptus ruficollis", "Podiceps nigricollis", "Ixobrychus minutus");dim pos;
for i = 0 to 10
  pos = InStr(q, "$" & LCase(arr1(i)) );
  if isNumeric(pos) && pos > 0 then 
    response.write arr1(i) & "\n";
  end if
next
end if

Answer 3

PHP转换为ASP不大好弄吧，或者说这简直是有点太...
不过只是转换一点点小代码倒是可以实现，但楼主的代码中是PHP特有的关联数组，这个问题貌似只有通过将键和值分别保存为数组，再通过对应关系来操作了，方法可以按楼上的来

Answer 4

能否告知PHP处理后出来的数据是什么样子的？
这样就可以用ASP写代码了

Answer 5

样子就是，获取get的值，然后输出包含获取值的索引的值．

Answer 6

默认的php肯定是没有输出的，修改一下：
<?php
$q = 'b';
$items = array(
"Great Bittern"=>"Botaurus stellaris",
"Little Grebe"=>"Tachybaptus ruficollis",
"Black-necked Grebe"=>"Podiceps nigricollis",
"Little Bittern"=>"Ixobrychus minutus",
"Black-crowned Night Heron"=>"Nycticorax nycticorax",
"Purple Heron"=>"Ardea purpurea",
"White Stork"=>"Ciconia ciconia",
"Spoonbill"=>"Platalea leucorodia",
"Red-crested Pochard"=>"Netta rufina",
"Madeira Little Shearwater"=>"Puffinus baroli",
"House Finch"=>"Carpodacus mexicanus",
"Green Heron"=>"Butorides virescens",
"Solitary Sandpiper"=>"Tringa solitaria",
"Heuglin's Gull"=>"Larus heuglini"
);foreach ($items as $key=>$value) {
    if (strpos(strtolower($key), $q) !== false) {
        echo "$key\n";
    }
}?>
jakey9826的asp代码经过测试多处语法错误，修正语法错误后也没有正确的结果。

Answer 7

它这个是要求以get方式传递以后才可以执行的．
比如说xxx.asp?q=xxxx

Answer 8

就是判断q变量是否是数组中的任一key的子串， 如果是就输出相应的key