vb 编写 DLL，要求DLL根据数据划出柱状图，将并图插入到 Html 中，生成 Html文件。

补充上述提问：  DLL 生成的 Html 文件的 字符，如何生成 <UTF-8>字符

目前 VB 用的字符是 GB2312，在生成 Html 后，显示时是“乱码”。现在需要 DLL 生成 Html 时，直接生成 UTF-8 码。

请各位专家指条明路。谢谢！

感谢回复！

我的问题是由原来的 GB2313 码，生成 UTF-8 码文件，且在生成 Html 文件的同时生成。

1.VB6写入带BOM的utf-8文本文件

工程--引用--勾选Microsoft ActiveX Data Object 2.5 Library或更高的版本

Private Sub Form_Load()
Dim adostream As New ADODB.Stream
With adostream
.Type = adTypeText
.Mode = adModeReadWrite
.Charset = "utf-8"
.Open
.Position = 0
.WriteText "测试文字369"
.SaveToFile "D:\test.txt", adSaveCreateOverWrite
.Close
End With
Set adostream = Nothing
End Sub


2.VB6写入无BOM的utf-8文本文件

工程--引用--勾选Microsoft ActiveX Data Object 2.5 Library或更高的版本

Private Sub Form_Load()
  Dim WriteStream As Object, BinSt As Object
  Dim name As String
  Dim nameto As String
  Set WriteStream = CreateObject("ADODB.Stream")
  Set BinSt = CreateObject("ADODB.Stream")
  nameto = "D:\test.txt"
  With WriteStream
    .Open
    .Charset = "UTF-8"
    .Type = 2               'adTypeText  （文本）
    .WriteText "测试文字369"
    .Position = 3
  End With
  With BinSt
    .Open
    .Type = 1              '（字节）
  End With
  WriteStream.CopyTo BinSt '数据复制
  With BinSt
    .SaveToFile nameto, 2   '保存文件
    .Close
  End With
  WriteStream.Close
  Set WriteStream = Nothing
  Set BinSt = Nothing
End Sub

[此贴子已经被作者于2022-10-18 18:17编辑过]

你这个项目要造好几个轮子：
1.生成 柱状图或曲线图,饼形图就别想了。
2.保存图片的代码
3.VB计算图片的base64编码，用来在html中引用（html显示图片的方法有两种：1.引用网络地址中的图片2.使用base64编码显示图片）。
4.html可以执行gb2313编码可以不乱码，我在3楼讲方法了。你非要写utf8编码的，我在6楼提供代码了。
5.dll中都是函数无法包含事件，通过regsvr32注册加载进系统也没有任何动作，只能由第三方程序调用函数执行。

看你什么都不会，轮子还是需要你自己造。

[此贴子已经被作者于2022-10-19 18:08编辑过]

感谢。我也查到DLL没法用控件显示图形，但仍然不死心，想听听专家的意见。

再继续想办法吧。。画图的功能是必须要有的，方法上要想想了。。。。。

用web语言写函数调用比较方便。比如php

开发ocx控件符合你的要求。

Owc11最后更新版可以满足你的需求，只是web权限是个问题