Foxtable(狐表)用户栏目专家坐堂 → 帮忙处理一下HTML插入图片功能


  共有4380人关注过本帖树形打印复制链接

主题:帮忙处理一下HTML插入图片功能

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/6 9:23:00 [显示全部帖子]

kindeditor本来就是在web中使用的,对应的都会有一个自己的服务器,配置一下请求路径就能用的了。

 

如果在狐表里面使用的话,这个功能是用不了的。除非改写它的js,把上传功能改成直接引用本地的某个文件。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/6 9:38:00 [显示全部帖子]

 看了一下一楼给的kindeditor的编辑器,发觉和图片的不一样,应该是老版本了。

 

 如下图设置路径可以显示本地图片;如果想多加一个按钮选择图片,也是可以的,需要修改Image.js文件,也不复杂,有兴趣的可以试一下

 

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20140506093532.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/6 11:30:00 [显示全部帖子]

 较复杂,你弄不来。要搭建一个应用服务器,放一个网站,响应请求的。

 

 建议这样来做,你做一个按钮,实现上传图片的功能,可以参考上传ftp的教程。

 

 上传完毕,就在内容列加入一个内容: <Img src="ftp:xxx路径" width="50" height="50"/>

 

 这样就简单一些 http://www.foxtable.com/help/topics/2283.htm

 


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/6 12:04:00 [显示全部帖子]

类似插入这样的一个标签

 

<img src="ftp://gongling:1CCCEC22128b97@222.216.28.13/gongling/web/0001.png" alt="" height="800" width="480" />


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/5/6 17:39:00 [显示全部帖子]

代码比如这样,自己改一下来用

 

Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Dim ftp As new ftpclient
    ftp.host="222.216.28.13"
    ftp.Account = "gongling"
    ftp.password = "1CCCEC22128b97"
    Dim path As String = "/gongling/web/" & FileSys.GetName(dlg.FileName)
    If ftp.upload(dlg.FileName, path, True) Then
        Dim html As String = "<img src='ftp://" & ftp.Account & ":" & ftp.Password & "@" & ftp.Host & path & "' height='50' width='50' />"     
        msgbox(html)

        Tables("xxx").current("内容") &= html
    End If
End If

 

 


 回到顶部