以文本方式查看主题

-  计算机科学论坛  (http://bbs.xml.org.cn/index.asp)
--  『 SVG/GML/VRML/X3D/XAML 』  (http://bbs.xml.org.cn/list.asp?boardid=21)
----  使用SVG的一个简单WebGis  (http://bbs.xml.org.cn/dispbbs.asp?boardid=21&rootid=&id=22643)


--  作者:songsgroup
--  发布时间:9/28/2005 5:10:00 PM

--  使用SVG的一个简单WebGis
感觉身体不太好,发一个以前做的WebGis软件,主要使用JavaScript通过WebService读取服务器的XML文件,然后在客户端动态生成SVG图形,这样添加删除图形的时候就不需要提交服务器重新刷新。
        软件主要实现鹰眼、放大、缩小、中心放大、指定倍数、拖拽和定位功能等等基本功能,更加深入分析的没有实现。有对SVG感兴趣和研究的可以跟我联系。

        http://www.cnblogs.com/Files/songsgroup/WebMap.rar


--  作者:wujiboy
--  发布时间:10/8/2005 12:18:00 PM

--  
很想试试,不过没有Visual Studio,无法尝试。
请教一个问题:在使用了viewBox之后,如何处理坐标?问题参见:
http://bbs.xml.org.cn/dispbbs.asp?boardID=21&ID=22821

--  作者:songsgroup
--  发布时间:10/8/2005 3:15:00 PM

--  
每次获取当前的坐标,然后根据viewbox进行偏移就可以。
--  作者:babyfish82
--  发布时间:10/18/2005 3:11:00 PM

--  
我搭建了一下,好像缺东西,运行不起来啊
--  作者:zljini
--  发布时间:10/19/2005 9:19:00 AM

--  
hao
--  作者:garylai
--  发布时间:4/4/2006 12:29:00 PM

--  
这位大哥怎么联系啊
--  作者:cindy1205
--  发布时间:4/5/2006 2:51:00 PM

--  
呵呵,我是一個SVG的初學者,對它挺感興趣的,可我不知道怎麼聯系你,我的MSN是   snowbo8@hotmai.com.你可以與我聯系喔,謝謝了!
--  作者:bluehxjing
--  发布时间:4/5/2006 9:32:00 PM

--  
TO:songsgroup
可否留下联系方式有问题请教,谢谢!我的邮箱houxj411@126.com
--  作者:cindy1205
--  发布时间:4/6/2006 10:03:00 AM

--  
我把環境搭建了一下,可是具體跑不出來,好像數據庫給的不全,給過努力查找,發現gis.mdb不可以用喔,songsgroup可否將資料庫重給一份,我的郵箱是snowbo1205@163.com,謝謝喔
--  作者:cjulian
--  发布时间:5/11/2006 3:31:00 PM

--  
楼主用的是.net framework 1.0还是1.1我找不到microsoft.web.ui
--  作者:wangjianredfox
--  发布时间:5/16/2006 3:01:00 PM

--  
我是一个初学者

希望大哥们能帮小弟一下

我做的是用DOM添加或删除节点元素数据,在通过xslt转换成svg

最终就是把一副地图(用矢量软件做的格式是(cgis))用svg格式表示在网页 里

有谁帮帮我啊,谢谢·

wangjianredfox@163.com
qq 185556875


--  作者:beijie
--  发布时间:5/21/2006 1:22:00 PM

--  
我也是一个初学者,能将你完整程序发一个吗?
邮箱:wybjie@126.com
谢谢
--  作者:yuduyue
--  发布时间:5/26/2006 11:19:00 AM

--  
[楼主用的是.net framework 1.0还是1.1我找不到microsoft.web.ui]


这个问题有没有解决阿
是不是因为是1.0的framework


--  作者:wangjianredfox
--  发布时间:6/1/2006 3:15:00 PM

--  
大哥,可不可以帮我一下


我做的从xml到svg时怎么显示图形,比如一个矩形,我用xslt了,可是显示不出啊
<?xml version="1.0" encoding="UTF-8"?>

<!-- edited with XMLSpy v2005 rel. 3 U (http://www.altova.com) by  () -->
<!DOCTYPE FigBody SYSTEM "rect.dtd">
<FigBody>
 <Rect id="rect01">
  <RPoint id="point01">
   <RPabscissa>50</RPabscissa>
   <RPordinate>50</RPordinate>
  </RPoint>
  <RWidth>200</RWidth>
  <RHeight>300</RHeight>
  <RAngle>0</RAngle>
  
 </Rect>
 <Rect id="rect02">
  <RPoint id="point02">
   <RPabscissa>80</RPabscissa>
   <RPordinate>80</RPordinate>
  </RPoint>
  <RWidth>400</RWidth>
  <RHeight>200</RHeight>
  <RAngle>0</RAngle>
 </Rect>
</FigBody>


<html>
<head>
<title>adding is sucessful!</title>
<meta http-equiv="Content-Type" content="text/html;charset=gb2312">
<style type="text/css">
<!--
input{font-size:9pt}
A:link{text-decoration:none;font-size:9pt;color:000000}
A:visited{text-decoration:none;font-size:9pt;color:000059}
A:active{text-decoration:none;font-size:9pt}
A:hover{text-decoration:none;color:red}
body,table{font-size:9pt}
tr,td{font-size:9pt}
body{background-color:#FFCCCC;}
.style1 {color:#ECE9D8}
body,td,th{
color:#009933;
}
-->
</sytle>
</head>
<%
//定义变量
Dim srect_id
Dim spoint_id
Dim spoint_x
Dim spoint_y
Dim srect_width
Dim srect_height
Dim sredt_angle
//自定义xmldom变量
Dim oDOM
Dim oRootNode
Dim oEntryNode
Dim oDetailsNode
Dim ochildsnode
//从add.htm文件中取得参数
srect_id=Request("rect_id")
spoint_id=Request("point_id")
spoint_x=Request("point_x")
spoint_y=Request("point_y")
srect_width=Request("rect_width")
srect_height=Request("rect_height")
srect_angle=Request("rect_angle")
//create dom object
Set oDOM=Server.CreateObject("Microsoft.XMLDOM")
oDOM.async=false
oDOM.load(server.mappath("rect.xml"))

//查看是否找到
If oDOM.parseError.ErrorCode<>0 Then 'not found!create an empty documen
   oDOM.loadXML "<FigBody/>"
End If
//找到插入节点
Set oEntryNode=oDOM.documentElement.AppendChild(oDOM.createElement("Rect"))
oEntryNode.setAttribute "id",srect_id

set oDetailsNode=oEntrynode.appendchild(oDOM.createElement("RPoint"))
oDetailsNode.setAttribute"id",spoint_id

set ochildsnode=oDetailsNode.appendchild(oDOM.createElement("RPabscissa"))
ochildsnode.text=spoint_x

set ochildsnode=oDetailsNode.appendchild(oDOM.createElement("RPordinate"))
ochildsnode.text=spoint_y

set oDetailsNode=oEntrynode.appendchild(oDOM.createElement("RWidth"))
oDetailsNode.text=srect_width


set oDetailsNode=oEntrynode.appendchild(oDOM.createElement("RHeight"))
oDetailsNode.text=srect_height


set oDetailsNode=oEntrynode.appendchild(oDOM.createElement("RAngle"))
oDetailsNode.text=srect_angle

oDOM.save(server.mappath("rect.xml"))
%>
<h2>增加<%=srect_id%>over</h2>
<p>
<p><a href="rect.svg" class="style1">have a look</a></p>
</html>

<?xml version="1.0" encoding="UTF-8"?>
<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform">

<xsl:output method="xml" indent="yes" encoding="UTF-16" version="1.0" standalone="no" media-type="image/svg+xml" />

<xsl:template match="/">
<svg width="500" height="500">
<g id="rects" style="stroke:#000000">
<line x1="20" x2="200" y1="150" y2="150"></line>
<line x1="200" x2="200" y1="0" y2="150"></line>
<text x="50" y="10">i think you</text>
<xsl:for-each select="FigBody/Rect">
<xsl:variable name="rect_id" select="@id"/>
<xsl:variable name="rw" select="RWidth"/>
<xsl:variable name="rh" select="RHeight"/>
<xsl:variable name="ra" select="RAngle"/>
<xsl:for-each select="FigBody/Rect/RPoint">
<xsl:variable name="px" select="RPabscissa"/>
<xsl:variable name="py" select="RPordinate"/>
<rect id="rect_id" x="{$px}" y="{$py}" rx="{$ra}" ry="{$ra}" width="{$rw}" height="{$rh}" style="fill:blue">
</rect>
</xsl:for-each>
</xsl:for-each>
</g>
</svg>
</xsl:template>
</xsl:stylesheet>

<%@ Language="VBScript"%>
<%
Response.Clear

Response.Buffer = True
Dim xmldoc
Dim xsldoc
Dim strResult
Response.ContentType = "image/svg+xml"
set xmldoc = Server.CreateObject("MSXML2.DOMDOCUMENT.4.0")
xmldoc.async = false
xmldoc.load Server.MapPath("rect.xml")

set xsldoc = Server.CreateObject("MSXML2.DOMDOCUMENT.4.0")
xsldoc.async = false
xsldoc.load Server.MapPath("rect.xsl")

strResult=xmldoc.transformNode(xsldoc)
strResult=Replace(strResult,"UTF-16","UTF-8")
Response.Write strResult

%>

在做xslt时出现问题,显示不出矩形


--  作者:whhlluo
--  发布时间:7/5/2006 10:18:00 AM

--  
以下是引用yuduyue在2006-5-26 11:19:00的发言:
[楼主用的是.net framework 1.0还是1.1我找不到microsoft.web.ui]


这个问题有没有解决阿
是不是因为是1.0的framework


这个问题好象是因为你没有安装Treeview控件。

安装后应该可以解决了。


--  作者:magiclove
--  发布时间:7/10/2006 10:40:00 AM

--  
it is wrong!
--  作者:hqs
--  发布时间:11/14/2006 2:42:00 PM

--  
你能否把你系统设计的两个svg图发给我?
coffee.he@163.com
谢谢!!
--  作者:lovemitter
--  发布时间:9/11/2007 7:32:00 PM

--  
很友好的哥们,祝福您
W 3 C h i n a ( since 2003 ) 旗 下 站 点
苏ICP备05006046号《全国人大常委会关于维护互联网安全的决定》《计算机信息网络国际联网安全保护管理办法》
203.125ms