|
|
用户名:evenlin 笔名:evenlin 地区: 广东-汕头 行业:其他 |
| 日 | 一 | 二 | 三 | 四 | 五 | 六 |
小网站:Flash+ASP http://www.linjimu.com.cn ASP: http://www.linjimu.com.cn/mumu 有许多往事,也有许多网事,值得我去重提!
C#转换为VB.NET
C#转换为VB.NET,类似的网站转换结果总是不太好:http://www.kamalpatel.net/ConvertCSharp2VB.aspx
http://authors.aspalliance.com/aldotnet/examples/translate.aspx
目前为止,我见过的最好的转换工具:
点击下载:
C# to Visual Basic Translation Tool
参考:
http://msdn.microsoft.com/msdnmag/issues/04/08/EndBracket/default.aspx
此工具是将整个C#工程转换为VB.NET工程,转换率为98%以上,很少的手动修改就OK!
此工具引用到了ICSharpCode.SharpRefactory.dll,需要下载SharpDevelop。
http://www.icsharpcode.net/OpenSource/SD/
http://www.icsharpcode.net/OpenSource/SD/Download/
关于SharpDevelop
SharpDevelop 是一个用于制作C#或者VB.NET的项目而设计的一个编辑器,同时,这个编辑器本身就是使用C#开发的,而且公开了全部源代码,因此这个工具本身也是学习C#以及软件开发规范的一个很好材料。
SharpDevelop 这个轻型的开发工具支持多种程序语言,包括C#、java以及VB.NET,同时还支持多种语言界面,象任何爱好者开发的工具一样,SharpDevelop经历了很多版本的更替,现在最新的是
这个编辑器的界面风格类似于Office XP以及VS.NET,这个编辑器可以支持书写C#, ASP.NET, ADO.NET, XML, HTML 等多种代码, 支持基于项目或者是文件的开发,可以对C#, HTML, ASP, ASP.NET, VBscript, VB.NET, XML 提供彩色语法显示支持,同时还可以把彩色的代码输出为HTML格式文件。你可以在代码中做标记,支持丰富的代码模版以及外接插件。
访问http://www.icsharpcode.net/OpenSource/SD/forum/可以获得SharpDevelop 的更多信息
附:Convert VB.NET to C#
http://www.developerfusion.com/utilities/convertvbtocsharp.aspx
http://www.soft32.com/download_26228.html
http://www.elegancetech.com/csvb.aspx
http://www.programmi.com/detail.asp?id=6385
参考:
http://www.4guysfromrolla.com/webtech/012702-1.shtml
好的身体胜过一切
昨天在公司上班,因前些日子感冒,所以就发高烧了,头疼又腹泻,全身发软无力,很疲惫,动都不想动。才感觉到建康的身体胜过一切的一切。
昨晚去医院看医生,输了液。今天感觉好许多了。人又有精神了。
今天公司的同事对我的身体很关心,让人感到很温暖。
一个人平静的生活
CS
我喜欢玩CS游戏!
一个星期最少要去玩两次,而且是玩个通宵达旦。不用睡眠,不知道我的精神怎样会这么好。
不过我的身体比以前消瘦多了。
为了开心,为了快乐,就去玩CS,因为我的生活很单调,我的开心,快乐在CS游戏中能够找到!
在残酷的撕杀中,我自己心灵变脆弱了,变得灰冷无色!
自己的世界,只能自己创造,自己建设!重要的是要认清自己,把握自己,加上百分百的上进心,相信自己能成功!
利用XMLHTTP优化数据传输
在Web应用中,我们经常会需要记录客户端的状态,如果浏览器支持Cookie的功能,这样很好办,但如果用户禁止了Cookie功能,该如何记录客户端的信息呢?当我们提交新录或修改的数据时,我们希望只提交录入的数据信息而不提交与之无关的其它信息,利用XML数据岛和XMLHTTP可以轻松实现。一个比较理想的方法就是把INPUT和SELECT等控件绑定到XML数据岛,实际上,如果有更复杂的表单元素时,我们还可以利用XPATH进行处理,这样可以进行更加复杂的操作。利用XMLHTTP可以只提交数据信息,这样也可以减少网络流量。
下面就是简单的例子xmlhttpTest.htm:
<body>
<XML id="xmlTest">
<?xml version="1.0"?>
<root>
<Customer>
<customerid>00001</customerid>
<name>孟子E章</name>
<phone>13910309***</phone>
<address>北京市海淀区信息路</address>
<description><![CDATA[<html><body>支持html代码</body></html>]]></description>
</Customer>
</root>
</XML>
<script>
function update()
{
var oXmlHttp = new ActiveXObject("Microsoft.XMLHTTP");
'这里换成你自己的ServerName和VirtualDir
oXmlHttp.Open("POST", "http://mengxianhui/asp/update.asp", false);
oXmlHttp.setRequestHeader("Content-Type","text/xml")
oXmlHttp.Send(xmlTest.xml);
if(oXmlHttp.status!="200")
{
alert("没有返回正确的数据类型。")
return false
}
xmlTest.loadXML(oXmlHttp.responseXML.xml);
}
</script>
<table align="center" cellspacing="6" style="font-size:11pt">
<FORM NAME="frmTest">
<tr>
<td>客户名称:</td>
<td><INPUT TYPE="text" dataSrc="#xmlTest" dataFld="name" style="width:400px"></td>
</tr>
<tr>
<td>客户电话:</td>
<td><INPUT TYPE="text" dataSrc="#xmlTest" dataFld="phone" style="width:400px"></td>
</tr>
<tr>
<td>客户地址:</td>
<td><INPUT TYPE="text" dataSrc="#xmlTest" dataFld="address" style="width:200px"></td>
</tr>
<tr>
<td>客户简介:</td>
<td>
<TEXTAREA dataSrc="#xmlTest" dataFld="description" rows="6" style="width:400px"></TEXTAREA>
</td>
</tr>
<tr>
<td colspan="2" align="center">
<INPUT TYPE="button" onclick="update()" VALUE=" 确 定 " style="background-color:#6F7EEF">
</td>
</tr>
</FORM>
</table>
</body>
这个HTML页面提供了一个数据岛来保存用户的信息,利用dataSrc和dataFld属性分别与Form表单元素进行绑定。XML数据岛将会实时反映出表单元素中数据的变化。通过点击“确定”按钮,将会调用update()函数,利用XMLHTTP把数据提交到服务器,同时利用XML数据岛的一个节点customerid来记录正在编辑的记录的状态。
下面就是简单的接收数据的代码update.asp:
<%
Dim xmldom
Set xmldom = Server.CreateObject("MSXML.DOMDocument")
Response.ContentType = "text/xml"
Response.CharSet = "GB2312"
xmldom.load Request
'可以在这里进行处理,然后返回到客户端
Response.Write "<?xml version=""1.0"" encoding=""GB2312""?>"
Response.Write xmldom.documentElement.xml
Set xmldom = Nothing
%>
如果只是测试,可以利用下面的代码update2.asp
<%
Response.ContentType = "text/xml"
Response.CharSet = "GB2312"
Response.Write "<?xml version=""1.0"" encoding=""GB2312""?>"
Response.Write "<root><Customer><customerid></customerid>"
Response.Write "<name>net_lover</name><phone>010-817939**</phone>"
Response.Write "<address>中国北京国际创业园</address>"
Response.Write "<description><![CDATA[<html><body>这种方式也支持HTML啊^_^</body></html>]]></description>"
Response.Write "</Customer></root>"
%>
一旦XML数据提交到服务器后,XML数据将保存到Request对象中,这样,我们可以把数据装载到XML DOM对象,利用XMLDOM对象的方便性进行各种处理,比如保存到数据库等,然后把结果返回到客户端。
其实,最实用的时候是把提交上来的XML数据交给Microsoft SQL Server 2000 来处理,在Microsoft SQL Server 2000 中进行数据的更新。
下面是利用Microsoft SQL Server 2000 来处理数据的例子update3.asp
Dim conn, cmd
Set conn = Server.CreateObject("ADODB.Connection")
Set cmd = Server.CreateObject("ADODB.Command")
conn.ConnectionString = "连接字符串写这里"
conn.Open
Set cmd.ActiveConnection = conn
cmd.CommandText = "update_stored_procedure" '调用存储过程
cmd.CommandType = 4
cmd.Parameters.Append cmd.CreateParameter("@xmldata", 200, 1, 8000, oXML.xml)
cmd.Properties("Output Stream") = Response 'IIS 5.0+支持
Response.Write "<root>"
cmd.Execute , ,1024
Response.Write "</root>"
在默认情况下,服务器端返回的是UTF-8格式的数据,为了避免乱码,在update.asp中,有一句Response.Write "<?xml version=""1.0"" encoding=""GB2312""?>",利用这句的输出,就可以避免因中文输出带来的乱码问题。另外,利用XMLHTTP提交,页面是不刷新的,也可以减少数据传输的流量。
通过XML中的XMLHTTP对象调用其它网站上的网页
先定义了一个函数,解释在函数中:
接着就来看看定义编码函数BytesToBstr()的主要内容
当然,还可以使用专门的函数来处理汉字:
Function bytes2BSTR(vIn)
strReturn = ""
For j = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn,j,1))
If ThisCharCode < &H80 Then
strReturn = strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn,j+1,1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
j = j + 1
End If
Next
bytes2BSTR = strReturn
End Function
lenB返回字节数而不是字符数,同理ascB返回每个字节的ascii码,大于80h,也就是128的ascii是汉字——半个汉字,把半个半个的汉字ascii码拼合再用chr函数返回字符就可以了。
应用则如下:
即表示对 http://www.w3sky.com/index.html 的内容进行“偷”行为,返回了相关该站的内容。
XMLHTTPRequest的应用
感觉生活
在你的记忆中可曾经有一个我但在我的记忆里曾有一个你.
茫茫的人海中,你我擦肩而过,却有点依依不舍,念念不忘的感觉,你我是不是有缘份.所以你我一定要好好珍惜我们的友谊和我们曾经的拥有!
什么山盟海誓,什么海枯石烂,什么天荒地老,都无法淋漓尽致地形容我们的真挚的感情. 美好的回忆只能在过去。
现在面对的是将来美好的回忆的开始.你我都知道,爱一个人和关心一个人,就是要让她开心,让她感到快乐与幸福. 不怕你说我是谁,你爱我像谁我就像谁,日子一天一天的过去,我们会慢慢理解;时光勿勿勿勿的流走,我们必须懂得去珍惜。