如何在服务端提交数据?

wx_dwl 2004-07-14 10:44:02
我在vbscript服务端内求得一字符串,我现在要同时显示在网页上一表单内,应如何做?如何提交?
...全文
55 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
wx_dwl 2004-07-14
  • 打赏
  • 举报
回复
我的意思是如何把for i=1 to iCount
str=ftrs.item(i).name
next
内的str在循环结束后以连接形式显示在网页的一层(div)内?应如何存储字符串?
wx_dwl 2004-07-14
  • 打赏
  • 举报
回复
<script language=vbscript runat="server">
Function MapHandler()
On Error Resume Next

Dim x1,y1,x2,y2,x,y
Dim bResult
Dim str
Dim iZoom
Dim ftrs
Dim pItem
Dim i,iCount
str=Request.Form("tool")
bResult=ConvertScreenCoordsToMap(Request.Form("x1"), Request.Form("y1"),x1,y1)
bResult=ConvertScreenCoordsToMap(Request.Form("x2"), Request.Form("y2"),x2,y2)
select case str
case "search"
If CreateMapFeature(pItem) = True Then
pItem.Attach session(cmapxobject)
pItem.Type = miFeatureTypeSymbol
end if
pItem.Point.set x1,y1
set ftrs=Session(cMapxObject).layers(3).SearchWithinDistance(pItem,500, miUnitMile,miSearchTypeCentroidWithin)
iCount=ftrs.Count
for i=1 to iCount
str=ftrs.item(i).name
next
case "distance"
case "eye"
case "clear"
case "load"
case "print"
end select
End Function
</script>
sportdog 2004-07-14
  • 打赏
  • 举报
回复
还是不太明白!
wx_dwl 2004-07-14
  • 打赏
  • 举报
回复
我的意思是指如如何在<script language=vbscript runat="server">内提交表单,提交表单用什么命令?
skyboy0720 2004-07-14
  • 打赏
  • 举报
回复
??不是很明白,具体点!
wx_dwl 2004-07-14
  • 打赏
  • 举报
回复
没人回答吗?帮忙。

28,390

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧