The following is a script I have written to text message me a text files contents. My problem is that my phone doesn't recognize the vbcrlf. Can anyone pleas help.
Dim Filename
Dim FSO
Dim TextStream
Dim file
dim SafeItem, oItem
Const ForReading = 1, ForWriting = 2, ForAppending = 3
Const...
I have an edit box that I am trying to put code in at runtime. I am running into the following.
edit1.middlclick event
Public EditStr
EditStr = this.value
edit1.middleClick event
strtofile(EditStr, "c:\program.prg"
this.value = EditStr
do c:\program.prg <-- this is where I get...
I have searched through the archives and FAQ's and found some help that left me more confused than anything. I have a form with a grid on it. I want to change one of the columns from a textbox to a combo box, and fill the box with a certain feild in a table. So far I have had no luck, but...
I am searching through a table looking for jobs that match my discription, and I keep getting a End of file encounter error when I use skip. How can I get around this?
workcenter = thisform.text1.Value
SELECT 1
USE c:\vista\c11a
SELECT 2
USE c:\vista\jjops
SELECT 1
DO WHILE ! EOF(1)
wrkce...
I am trying to open a file through an API callout, and i am getting errors. Can someone help? Is there an easier way?
Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String...
How do you go about refreshing the system tray? I have an icon in the system tray, and when my app closes the icon stays there until I drag my mouse over it. Any tips or hints?
I am using a picturebox to set up a grid from -50 to 50.
I use the following code to create the grid, but my vertical line 0 an the X axis is getting drawn over by the rest of my lines. can anyone please help
For I = -50 To 50 Step 2
If I = 0 Then Picture1.ForeColor = &H80000012
If I <> 0...
I am new to VB Graphics. I just bought the book VB Graphics programming. I am trying to set a picture box scale to 1 inch, I want a grid spacing of 1 inch, and have X Y zero at Picture box center. Is there a website someone can refer me to, or can anyone e lend me some of there expertise...
I have declared 2 objects globaly in my module.
Global RhinoScript As Object
Global Rhino As Object
Sub Main()
Set RhinoScript = CreateObject("Rhino3.Application")
If RhinoScript.Visible = False Then
MsgBox "Rhino must be running to run this plug-in", vbCritical...
my problem is probably a simple fix
I have 2 forms inside of FrmMain(MDI Form)
Form1 & Form2
I have a RichTextBox in each Form
I am trying to get the selected text from form1.richtextbox to form2.richtextbox
my current code is very simple
Sub form2_Initialize
richtextbox.text =...
I need help with this function. I am trying to find certain string and change the forcolor. I was given this function to try, and i need someone to explain it better.
Private Function FindIt(ByRef Box As RichTextBox, ByVal Srch As String, ByVal sColor As System.Drawing.Color, Optional ByVal...
I am creating a notepad type application, and I need to change the foreground color of certain words. for example
I would like to change all G00 to blue
and all G01 to Pink, and so on. Can some one help.
Thank you
Brent Pryer
How Can I get my Com4 ready to read. I am trying to hook a digitizer to my computer, so I need to hook it in using a com port. Can anyone help me.
Brent
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.