asp读取图片或flash高宽

asp读取图片或flash高宽,

Function GetFlashAndPic(url,height,width)
 Dim sExtName,ExtName,strTemp
 sExtName = Split(url, ".")
 ExtName = sExtName(UBound(sExtName))
 If LCase(ExtName) = "swf" Then
  strTemp = "<embed src=""" & url & """ width=" & width & " height=" & height & ">"
 Else
  strTemp = "<img src=""" & url & """ width=" & width & " height=" & height & " border=0>"
 End If
 GetFlashAndPic = strTemp
End Function
Function Html2Ubb(str)//把html代码转换成ubb代码
 If Str<>"" And Not IsNull(Str) Then
  Dim re,tmpstr
  Set re=new RegExp
  re.IgnoreCase =True
  re.Global=True
  re.Pattern = "(<STRONG>)":Str = re.Replace(Str,"<b>")
  re.Pattern = "(<\/STRONG>)":Str = re.Replace(Str,"</b>")
  re.Pattern ="(<TBODY>)":Str = re.Replace(Str,"")
  re.Pattern ="(<\/TBODY>)":Str = re.Replace(Str,"")
  re.Pattern ="(<TABLE)":Str = re.Replace(Str,"<table")
  re.Pattern ="(TABLE>)":Str = re.Replace(Str,"table>")
  re.Pattern ="(<TR)":Str = re.Replace(Str,"<tr")
  re.Pattern ="(TR>)":Str = re.Replace(Str,"tr>")
  re.Pattern ="(<TD)":Str = re.Replace(Str,"<td")
  re.Pattern ="(TD>)":Str = re.Replace(Str,"td>")
  re.Pattern ="(<DIV)":Str = re.Replace(Str,"<div")
  re.Pattern ="(Div>)":Str = re.Replace(Str,"div>")
  re.Pattern ="(<IMG )":Str = re.Replace(Str,"<img ")
  re.Pattern ="(<BR)":Str = re.Replace(Str,"<br")
  re.Pattern ="(<A )":Str = re.Replace(Str,"<a ")
  re.Pattern ="(<\/A>)":Str = re.Replace(Str,"</a>")
  re.Pattern ="(<FONT )":Str = re.Replace(Str,"<font ")
  re.Pattern ="(<\/FONT>)":Str = re.Replace(Str,"</font>")
  re.Pattern = "(<s+cript(.+?)<\/s+cript>)":Str = re.Replace(Str, "")
  re.Pattern ="(\{)":Str = re.Replace(Str,"{")
  re.Pattern ="(\})":Str = re.Replace(Str,"}")
  re.Pattern ="(\$)":Str = re.Replace(Str,"$")
  're.Pattern = "(<div>|<div(.+?)>)":Str = re.replace(Str,"<div>")
  're.Pattern = "(<span>|<span(.+?)>)":Str = re.replace(Str,"<span>")
  Set Re=Nothing
  Html2Ubb = Str
 Else
  Html2Ubb = ""
 End If
End Function

时间: 2024-11-05 04:50:25

asp读取图片或flash高宽的相关文章

Java/JS获取flash高宽的具体方法_javascript技巧

JS: 设置 embed 高度和宽度可以改变 flash 的高度和宽度,从而获取. 复制代码 代码如下: <!DOCTYPE HTML> <html> <body> <embed src="test550X400.swf" id="flash" width="550px" height="400px"/> <script type="text/javascript

JS/php获取flash高宽实例代码

JS: 设置 embed 高度和宽度可以改变 flash 的高度和宽度,从而获取.  代码如下 复制代码 <!DOCTYPE HTML> <html> <body> <embed src="test550X400.swf" id="flash" width="550px" height="400px"/> <script type="text/javascript

php读取flash文件高宽帧数背景颜色的方法

  本文实例讲述了php读取flash文件高宽帧数背景颜色的方法.分享给大家供大家参考. 具体实现方法如下: 代码如下: /* 示例: $file = '/data/ad_files/5/5.swf'; $flash = new flash(); $flash = $flash->getswfinfo($file); echo " 文件的宽高是:".$flash["width"].":".$info["height"];

生成XML时,如何自动读取图片的宽和高 向各位大虾求救了

问题描述 写了一个劝态XMLWithResponse.ContentType="text/XML".write("<?xmlversion=""1.0""encoding=""utf-8""?>").write("<galleryframeColor=""0xFFFFFF""frameWidth=""

php读取flash文件高宽帧数背景颜色代码

php教程读取flash文件高宽帧数背景颜色代码 <?php /* 示例:   $file = '/data/ad_files/5/5.swf';   $flash = new flash();   $flash = $flash->getswfinfo($file);   echo " 文件的宽高是:".$flash["width"].":".$info["height"];   echo " 文件版本

写入和读取图片(c# asp。net sqlserver)

server|sqlserver 首先要创建一个表包含自段image 和 type 类型各自为image 和 vnanchar WebForm1.aspx <%@ Page language="c#" Codebehind="WebForm1.aspx.cs" AutoEventWireup="false" Inherits="ReadAndWritePicFromDB.WebForm1" %> <!DOCT

图片上传,包含读取图片字节大小及长宽,及Base64转换

上传|转换 <form id="PicAdd" method="post" runat="server" enctype="multipart/form-data">    <input type="file" runat="server" id="Pic" NAME="Pic"></form>'++++++++

常用的php图片处理类(水印、等比缩放、固定高宽)分享_php实例

常用的php图片处理类(水印.等比缩放.固定高宽)分享 <?php //PHP 添加水印 & 比例缩略图 & 固定高度 & 固定宽度 类. class Image_process{ public $source; //原图 public $source_width; //原图宽度 public $source_height; //原图高度 public $source_type_id; public $orign_name; public $orign_dirname; //

ie8加载图片时,如何获取图片高宽值

问题描述 加载图片时用js获取高宽值,<imgsrc="1.jpg"onload(this.width,this.height)>这种方法在firefox和chrome下可以,但是ie6-8有时获取不到,请教各位js高手,如何准确的获取非常感谢!! 解决方案 本帖最后由 yingiloveyou 于 2011-11-21 10:53:47 编辑解决方案二:刚好像问到这问题.IE兼容问题.可以在页面上加<metahttp-equiv="X-UA-Compati