Search found 552 matches

by bcohio2001
Jan 27, 2009 21:52
Forum: General
Topic: Internet Explorer 7 - DispHelper
Replies: 52
Views: 11726

Ressurecting old posts......

In reference to the code above: Is there something that will get the source/html of the displayed page? I do not wish to call the server for the data, as it is an ASP page. All I want is what is in the browser window. Dim As Zstring Ptr URL,NOME,HTML <snip> dhGetValue("%s", @URL, ieApp...
by bcohio2001
Jan 26, 2009 22:54
Forum: Windows
Topic: "Text renderer" (or possibly worse)
Replies: 26
Views: 10288

First of all, thanks for the help that you have given me so far. But have run into a problem. It's called VISTA! {And now M$ is coming out with another OS....geeze....} Done some searching on the Microsoft site and found that people were having problems with Vista not supporting the file TLBInf32.dl...
by bcohio2001
Jan 22, 2009 0:19
Forum: Windows
Topic: "Text renderer" (or possibly worse)
Replies: 26
Views: 10288

Downloaded: AxSupport.zip AxSupport1.zip AxPackage.zip Now going to try to figure it out. My main goal is this. Use the browser to log in to a RPG game that I belong to. Do what needs to be done, and as I make changes, grab the data from off the web page and place that data into a spread sheet [exce...
by bcohio2001
Jan 20, 2009 21:19
Forum: Windows
Topic: "Text renderer" (or possibly worse)
Replies: 26
Views: 10288

What is "Bstr" in... getLocationURL As Function (Byval pThis As Any ptr,Byref LocationURL As Bstr) As hResult In TinyWeb.bi is this ... Navigate As Function(ByVal pif As Any Ptr,ByVal bstrURL As WString Ptr,ByVal Flags As Any Ptr,ByVal TargetFrameName As Any Ptr,ByVal PostData As Any Ptr...
by bcohio2001
Jan 18, 2009 17:04
Forum: Windows
Topic: "Text renderer" (or possibly worse)
Replies: 26
Views: 10288

KetilO wrote:Hi dav7

Putting a web browser on a dialog is easy using atl.

TinyWeb.bas
<snip>

TinyWeb.bi
<snip>

TinyWeb.rc
<snip>

KetilO


This is just about what I need. Is there any way to know the current URL of the page being viewed?
by bcohio2001
Dec 26, 2008 11:21
Forum: General
Topic: Using a multicolumn listbox
Replies: 0
Views: 890

Using a multicolumn listbox

Case WM_INITDIALOG hDirDisp=GetDlgItem(hWin,IDC_TRV_Dir) y = GetLogicalDrives() For x = 0 To 25 'a-z If (y And 2^x) <> 0 Then 'drive to add to list AddDrive Chr(65+x)+":" EndIf Next Drives = y ' hFileDisp=GetDlgItem(hWin,IDC_LST_Files) TStop(0&#...
by bcohio2001
Dec 22, 2008 23:50
Forum: Projects
Topic: Two new programs I made....Quadratic Calculator, and Therapy
Replies: 5
Views: 1477

Quadratic Formula [x = -b +- sqrt(b^2-4*a*c]/2] Not qute correct. Should be .... (-b +- sqr(b^2 - 4*a*c)) / (2*a) sqr1= b^2 sqr2= sqr1-4 sqr3= sqr2*a*c sqr4= Sqr(sqr3) sqr5= sqr4+b x1= sqr5 + 3 Print "Here is one of your x's:"; x1 b= b-b-b sqr1= b^2 sqr2= sqr1-4 sqr3= sqr2*a*c sqr4= Sqr(sqr3) sqr5=...
by bcohio2001
Dec 10, 2008 21:24
Forum: General
Topic: FileDateTime Problem
Replies: 4
Views: 767

Here is what I have. The program is just to test the different sub/functions. #Include "Helper.bi" Do_MyDir "D:\Keep"',"*.*",7 'HRS 'show results Dim As Short y,x 'For y = 1 To UBound(ScanFolders) ' Print BuildFullPath(y) ' Print ScanFolders(y).F...
by bcohio2001
Dec 10, 2008 0:41
Forum: General
Topic: FileDateTime Problem
Replies: 4
Views: 767

FileDateTime Problem

Trying to get the timestamp and size of pictures on computer. Sample: Dim As String T type FileData FName as string FSize as double 'not sure on type of var at this moment FDT as double 'ditto end type dim as FileData AllPics(255) dim as short Count T = dir("*.jpg") While T...
by bcohio2001
Dec 10, 2008 0:10
Forum: General
Topic: Two out of three inputs only needed to continue
Replies: 1
Views: 890

Two out of three inputs only needed to continue

In a dialog box, I have 3 input boxes. I want the user to only fill out any 2 of them, click a button then have program fill in the third. What would be the best way to check for this? A LONG if/then statment or what?
by bcohio2001
Dec 09, 2008 23:59
Forum: Beginners
Topic: how/when to use types, type, type end(solved)
Replies: 3
Views: 804

Type allows you to use other variables.

Code: Select all

type Loc
  x as short
  y as short
  z as short
end type

dim as Loc ScreenMid, PointsOfLight(1 to 100),Screen_Max


Saves on coding
by bcohio2001
Dec 07, 2008 2:20
Forum: General
Topic: ANOTHER question: Erasing a UDT
Replies: 26
Views: 4236

@Loe I understood that the "main" topic was "Erasing UDT's" quickly. But I did "kind of" stay with the topic with my question. I just didn't want to start a whole new topic just for my question. I have seen many times on here where they completely get off topic and you completely loose the flow of t...
by bcohio2001
Dec 05, 2008 15:39
Forum: General
Topic: ANOTHER question: Erasing a UDT
Replies: 26
Views: 4236

dont know is this what you mean, variant is udt right? dim as variant var0, var1 var1.vt=vt_i2 var1.ival=10 'then make var1 as variant nothing var1=var0 as long as UDT dont have any allocated pointer, I just assign it to "unused" UDT. if it has allocated pointer then I should deallocate it first. S...
by bcohio2001
Dec 05, 2008 15:05
Forum: Windows
Topic: get file size and/or general file attributes
Replies: 9
Views: 3980

I knew that it would not work. Just trying to generalize the problem. Here is what I have so far. #Include Once "windows.bi" #Include Once "vbcompat.bi" Type FDef Parent As UShort FName As String 'Ext As String Att As UByte DT As Double FSize As Double End Type ReDim Shared As FD...
by bcohio2001
Nov 30, 2008 17:04
Forum: Windows
Topic: get file size and/or general file attributes
Replies: 9
Views: 3980

Bug????

Sample: dim as string T T = dir("*.jpg") while T <> "" print T print filedatetime(T) wend Fails! When using Explorer: The date and time is 12/31/2100 at 12:00 AM I don't want to go trough all my files just to correct the time stamp. Any work arounds?????

Go to advanced search