当前位置: 首页 > 图文教程 > 网络编程 > ASP.NET > 用ASP.NET实现简单的文字水印

ASP.NET
aspnet_regsql不能在sql2005下使用的解决
.NET发送邮件
让.Net验证控件与自定义验证合作无间
给.Net程序员和WEB程序员建议:.Net篇
给.Net程序员和WEB程序员建议:WEB篇
Server Application Unavailable错误解决方法
ASP.NET AJAX:UpdatePanel控件
ASP.NET教程:Ref和Out关键字异同
组件Newtonsoft.Json实现object2json转换
ASP.NET教程:Control基类清理页面状态
ASP.NET入门教程:认识ASP.NET
ASP.NET入门教程:ASP.NET和ASP区别
ASP.NET入门教程:简单的ASP.NET页面
ASP.NET入门教程:服务器控件
ASP.NET入门教程:事件句柄
ASP.NET入门教程:Web表单
ASP.NET入门教程:Web表单维持对象的ViewState
ASP.NET入门教程:TextBox控件
ASP.NET入门教程:Button控件
ASP.NET入门教程:数据绑定

用ASP.NET实现简单的文字水印


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 220 ::
收藏到网摘: n/a

FunctionUpRemoteFileToLocal(ByValUpTypeAsString,ByValRemoteUrlAsString,ByValLocalFileAsString)AsBoolean
DimTmpResultAsBoolean=False
SelectCaseUpType
Case"xmlhttp"
'WithMSXML2
DimmyXmlHttpAsNewMSXML2.XMLHTTP40
myXmlHttp.open("GET",RemoteUrl,False)
myXmlHttp.send()
DimFSAsFileStream=NewFileStream(LocalFile,FileMode.CreateNew)
DimBWAsBinaryWriter=NewBinaryWriter(FS)
BW.Write(myXmlHttp.responseBody)
BW.Close()
FS.Close()
TmpResult=True
Case"webclient"
'WithSystem.NetNameSpace
DimmyWebClientAsNewWebClient
myWebClient.DownloadFile(RemoteUrl,LocalFile)
TmpResult=True
EndSelect
EndFunction