vb6

How do I fix the error “Cannot load control SSPanel; license not found” in VB6 program

浪尽此生 提交于 2020-01-01 08:35:10
问题 I have a VB6 legacy program which I need to change. I am unable to run the program from the IDE. When I activate one of the forms in the IDE I get an error which refers me to an error log file. The log file has the following in it "Cannot load control SSPanel; license not found" The SSPanel is part the Sheridan 3D controls (THREED32.ocx) and the component is selected. How can I fix the error? 回答1: The solution that worked for me was to execute the file VBCTRLS.REG on the installation disc

How do I fix the error “Cannot load control SSPanel; license not found” in VB6 program

佐手、 提交于 2020-01-01 08:33:15
问题 I have a VB6 legacy program which I need to change. I am unable to run the program from the IDE. When I activate one of the forms in the IDE I get an error which refers me to an error log file. The log file has the following in it "Cannot load control SSPanel; license not found" The SSPanel is part the Sheridan 3D controls (THREED32.ocx) and the component is selected. How can I fix the error? 回答1: The solution that worked for me was to execute the file VBCTRLS.REG on the installation disc

Modern version of WinDiff? [closed]

眉间皱痕 提交于 2020-01-01 05:54:55
问题 Closed. This question is off-topic. It is not currently accepting answers. Want to improve this question? Update the question so it's on-topic for Stack Overflow. Closed 4 years ago . VB6 came with WinDiff . Is there a free modern version of WinDiff available that is able to ignore case? 回答1: Along with WinMerge and the WinDiff from the latest SDK, I also have SourceGear's free DiffMerge. I use WinMerge (which hasn't changed for a while either -- don't ignore blank lines; that exercises bugs)

What is the most efficient way to access the value of a field in an ADO recordset?

六眼飞鱼酱① 提交于 2020-01-01 05:53:09
问题 I have a VB6 application in front of me, which accesses Sql Databases via ADO. When retrieving recordsets, the application uses the Bang (!) operators to access the fields in the recordsets Eg RS!OrderId. Whilst I am aware of this practice, I have never actually used it(except when I have been lazy), Neither have I used RS("OrderId") as I have always (or usually) used the fully qualified method (eg RS.fields("OrderId").value. or even expanded it further using the .Item Property.) Both return

What does the Attribute keyword do in VB6?

我与影子孤独终老i 提交于 2020-01-01 05:39:20
问题 I am converting some VB6 code to VB.Net. Since my VB6 installation appears to be damaged beyond repair I am using Notepad to read the original source code and can see at near the top of the file:- Attribute VB_Name = "clsBulge" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = True Attribute VB_PredeclaredId = False Attribute VB_Exposed = False Attribute VB_Description = "Some text here" Attribute VB_Ext_KEY = "SavedWithClassBuilder" ,"Yes" Attribute VB_Ext_KEY = "Member0" ,

Unit Testing in VB 6 with SimplyVBUnit

家住魔仙堡 提交于 2020-01-01 04:57:07
问题 I've recently decided to start using some light unit testing to see if it adds any value to our project, but I'm having trouble finding documentation for SimplyVBUnit. Any suggestions? 回答1: If you downloaded the binary installer for SimplyVBUnit it comes with a couple of example projects in the installation folder. Both the source code zip file and binary installer include a Help.chm showing many of the classes and how to apply them in your tests. 回答2: There's some discussion of VB6 unit

How to write to a debug console in VB6?

馋奶兔 提交于 2020-01-01 04:26:10
问题 I am new to VB. I want to test some old VB code, but I need the ability to print to the console to be able to test certain values that are set in the code. How to print to the console from VB? 回答1: Use debug.print. But there is no console on a VB6 application, that will print to the debug window. 回答2: This isn't expected to be the accepted answer because Debug.Print is the way to go for IDE testing. However just to show how to use the standard I/O streams easily in VB6: Option Explicit '

Is this the “one in ten” time to rewrite?

冷暖自知 提交于 2019-12-31 22:26:20
问题 I'm very much against rewriting an application if it can be avoided. I understand the rule that 9 times out of 10, it's better to refactor, but I'm in a situation where it might be the one time in ten, and I'm looking to find that line. The current situation is: I took over the maintenance of a VB6/SQL application. The total lines of code is 75-100k (code-behinds, modules, and classes). The original developer left, so it's just me, and there's no opportunity to expand the team, at least for a

Displaying selected values only in VB6

左心房为你撑大大i 提交于 2019-12-31 07:31:27
问题 I am trying to display students in a datagrid that have "yes" as active. If the student has "no" as active, the form has to hide it and only show the students with "yes". The problem that I am recieving now is Syntax error in FROM clause. code: Private Sub Form_Load() Dim sql As String connSearch.Open connstr Adodc1.ConnectionString = conn.connstr sql = "select * from Table1 where Active <>" & "'No'" Adodc1.RecordSource = sql Set StudentTable.DataSource = Adodc1 Adodc1.Refresh Adodc1.Visible

Displaying selected values only in VB6

馋奶兔 提交于 2019-12-31 07:31:19
问题 I am trying to display students in a datagrid that have "yes" as active. If the student has "no" as active, the form has to hide it and only show the students with "yes". The problem that I am recieving now is Syntax error in FROM clause. code: Private Sub Form_Load() Dim sql As String connSearch.Open connstr Adodc1.ConnectionString = conn.connstr sql = "select * from Table1 where Active <>" & "'No'" Adodc1.RecordSource = sql Set StudentTable.DataSource = Adodc1 Adodc1.Refresh Adodc1.Visible