Archive for the ‘Coding’ Category
I am sure now days there are many fully internationalized plug ins for WordPress but this is the first one I have noticed. I am noting it here along with the plugin archive because I will be writing an internationalized software package soon.
WARNING: Do not download and use with your wordpress installation because I will not be keeping it up to date. It is only here for study of the internationalization process.
I want to use MySQL with Visual Basic in an effort to bypass the difficulties encountered when trying to use the Microsoft database tools. Those problems include chronic difficulties getting my distribution packages to work on customer computers.
- How to connect VB to MySQL
- Windows MySQL connector download at MySQL site
- VB / MySQL connection strings depending on what OBDC driver and location of the database server the string will vary
Allows for a wysiwyg like alteration of a page for the purpose of making page mashup more easy.
I will be summarizing for myself on this page how to write a WordPress plugin.
WordPress PlugIn Skeleton Generator
Fun with Plugins makes some assumptions about file names and paths to resources.
It is assumes that your plugin file is located at: YOURBLOG/wp-content/plugins/wp_emarket/wp_emarket.php
A Sample functioning Plugin that appears very simple
Write your own plugin for WordPress
Parallel Port Central – refers to inpout.dll which I used to drive the input output through the parallel port on the mirror machine project.
Function CRC16_BIN(ByRef ModBus_Data() As Long, NumBytes As Integer) As Long
Dim Temp As Long
Dim CRC As Long
Dim Polynomial As Long
Dim i As Integer
Dim j As Integer
‘—– following are read sequence checksum verification vectors — test where either hi or lo byte == 0
‘— Example temperature= 1 : 1 3 64 0 1 217 144
‘— temperature=255: 1 3 64 0 255 88 16
‘— temperature=256: 1 3 64 1 0 25 192
‘— temperature=257: 1 3 64 1 1 216 0
‘— =0 : 1 3 64 0 0 24 80
‘— verified write string = Chr(1) & Chr(6) & Chr(64) & Chr(3) & Chr(232) & Chr(24) & Chr(34)
CRC = 65535 ‘–bottom 16 bits are all 1’s
Polynomial = 40961 ‘–poly = A001
For i = 0 To NumBytes – 1
CRC = CRC Xor ModBus_Data(i)
For j = 0 To 7
If (CRC And 1) Then
CRC = (ShiftRight(CRC) Xor 40961)
CRC = ShiftRight(CRC)
CRC16_BIN = CRC And 65535
How to return an array from a function
|Parent Form||Function that passes back an Array / Vector|
Private Sub ReceiveArray_Click()
UserInterface.Text = ""
Private Function NumberList() As Integer() ‘ — This function returns an array
ReDim intArray(1 To 10)
NumberList = intArray
Code here: ReturnArray.zip