form1中有text1-8, 和command1 text8中为程序代码(生成窗体为form2(已做好))单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应产品名 公司名 合法版权 合法商标 文件描述 注释 标题大虾们,帮帮忙

解决方案 »

  1.   

    直接命令行调用VB的编译器进行编译单独去的 Form2 是无法通过编译的,必须需要工程文件.相当于,你把工程文件/FORM2的源文件都放置在text8 和 textX 中,点一command1.就把这些文本保存到程式运行目录下,然后用命令行调用VB6.EXE去编译这个工程.工程文件中就保存了你需要设定的" 产品名 公司名 合法版权 合法商标 文件描述 注释 标题"思路就是这样,具体会用到VB6.EXE 命令行调用.
    其他的没什么难度.
      

  2.   

    不知道你是要修改一个已经生成的exe,还是自定义编译过程。vbp frm都是文本格式,可以自由读写,然后调用VB编译器编译即可。
      

  3.   

    楼主COM开发熟不,看你这情况,情况可做个IDE插件啊
      

  4.   


    如图
    单击form1中的command1后
    生成a.exe与d:\
    并且生成的exe
    产品名=text1 公司名=text2 合法版权=text3 合法商标=text4 文件描述=text5 注释=text6 标题=text7
    EXE中只有form2并且form2的源代码为text1中的也就是说
    我想做一个框架
    用户可以用我程序的框架生成程序
      

  5.   

    建议楼主写一个VB6.0的Addin要求就类似一个向导程序。用VB6.0的Addin写个插件可以实现。调用编译器对象很好实现Dim oVBProjects As VBProjects, i As Integer
        Set oVBProjects = VBInstance.VBProjects
        
        ' If there is project currently, then remove it..
        If oVBProjects.Count > 0 Then
            For i = 1 To oVBProjects.Count
                oVBProjects.Remove oVBProjects.Item(i)
            Next i
        End If
        
        'Add the new project to current IDE...
        
        Dim oNewPrj As VBNewProjects
        Set oNewPrj = oVBProjects.AddFromFile(sNewVBP)    oNewPrj.Item(1).MakeCompiledFile
      

  6.   

    UPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUPUP