当前位置: 代码迷 >> VFP >> [分享] 在 CSDN论坛 不用链接发本地图片方法解决方法
  详细解决方案

[分享] 在 CSDN论坛 不用链接发本地图片方法解决方法

热度:3686   发布时间:2013-02-26 00:00:00.0
[分享] 在 CSDN论坛 不用链接发本地图片方法
VB code
*!*    通过学习 伴水 此帖而得来*!*    http://topic.csdn.net/u/20100127/14/A961DF9A-34A1-44F1-9F9A-C10A4D168736*!*    运行环境:VFP8.0 OR VFP9.0*!*    apple_8180(十豆三)    2010-02-01m.lcPictureFile=Getfile("BMP;JPG;GIF;PNG") &&本地图片,如果不是本地图片可以下载到本地后再运行此段代码。If Empty(m.lcPictureFile)    ReturnEndif_Cliptext="[img=data:image/gif;base64,"+Strconv(Filetostr(m.lcPictureFile),13)+"][/img]"If Len(_Cliptext)<10000    &&转换后不能超过10000字符,因为CSDN每个回复最大为10000字符,所以图片不能太大。    Messagebox("请在 CSDN论坛 回复框中粘贴后,直接 提交回复 即可。",64,"信息提示")Else    _Cliptext=""    Messagebox("图片太大!",48,"信息提示")Endif


------解决方案--------------------------------------------------------
学习
------解决方案--------------------------------------------------------

------解决方案--------------------------------------------------------
顶顶
------解决方案--------------------------------------------------------
好,up
------解决方案--------------------------------------------------------
厉害,这都能想出来
------解决方案--------------------------------------------------------

------解决方案--------------------------------------------------------
学习一下好方法!谢谢分享!
------解决方案--------------------------------------------------------
没有VFP怎么办?不懂这个语言
------解决方案--------------------------------------------------------

------解决方案--------------------------------------------------------
5555急死我咯怎么弄得?????我不会啊???为什么我想学555
  相关解决方案