Visual Basic

Implementation of an FTP-like thing

14-Jun-04 2:57

You would use the Cirlce method:

    object.Circle [Step] (x, y), radius[, color]

Form1.Circle (1200, 1700), 750

PictureBox1.Circle (1200, 1700), 750

Circle ((ScaleWidth + ScaleLeft) / 2, (ScaleHeight + ScaleTop) / 2), ScaleWidth / 4

You'll probably have to set the Form (or PictureBox) AutoRedraw property to True to get this to work properly.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Member 1376406313-Jun-04 7:19

Member 13764063

13-Jun-04 7:19

I have made an implementation of an FTP which ought to work fine. But when do a run of it (by the call: http://localhost/FtpBrowser.asp) it says that there's too many users on the site (but I know that I am the only one) or it claims that there's a code error.
What do I do wrong?
I am using XP Pro if that information can help.
This is the code:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%
Sub skrivDrev()
set drv = fs.Drives
Response.Write "" & f.path & "
"
for each d in drv
Response.Write d.Sharename
Response.Write "" & d.DriveLetter & " "
next
Response.Write "ROOT "
Response.write "[..]"
End Sub
Sub skrivSubFolder()
i = 0
Response.Write ""
i = i + 1
wend
s = s & "

"
For Each f1 in fc
if i mod 10 = 0 then
s = s & "

"
end If
i = i + 1
s = s & "" & f1.name & ""
s = s & "
"
Next
i = i - 1
while not i mod 10 = 0
s = s & "

"
Response.write s
End Sub
Sub skrivfiler()
ReDim fileNames(f.files.count)
ReDim fileSize(f.files.count)
ReDim fileType(f.files.count)
ReDim fileDateLastModified(f.files.count)
i = 0
For Each fldr in f.files
fileNames(i) = fldr.name
fileSize(i) = fldr.size
fileType(i) = fldr.Type
fileDateLastModified(i) = fldr.DateLastModified
i = i + 1
Next
response.write ""
For i = f.files.count - 1 to 0 step -1
response.write ""
response.write ""
response.write ""
response.write ""
Next
response.write "

Name:	Size	LastModified	Type
" response.write fileNames(i) & "	" & fileSize(i) & "	" & fileDateLastModified(i) & "	" & fileType(i) & "

"
end sub
%>

<title>Ftp

abc
Testing!-
<%
'if Request.QueryString("sti") > "" then
' sti = Request.QueryString("sti")
'else
' sti = Server.MapPath(".")
'End IF
'Dim fs, f, fc ,sti
'set fs = CreateObject("Scripting.FileSystemObject")
'set f = fs.GetFolder(sti)
'Set fc = f.SubFolders
'skrivDrev
'skrivSubFolder
'Response.Write ""
'Response.Write "

"
'skrivfiler
'Response.Write "

"
%>

Re: Implementation of an FTP-like thing

Dave Kreskowiak14-Jun-04 2:42

Quickly display large images

14-Jun-04 2:42

You never mentioned what the code error was or what line it was on. And on top of that, this question belongs in the ASP forum.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

NaserAbiat12-Jun-04 21:29

NaserAbiat

12-Jun-04 21:29

Hi I'm writing an application to display large tiff images.
All of the images have the PixelFormat.Format1bppIndexed
so the FILE SIZE of them will not be so big however
The DIMENTIONS are very large. for example the file size
of an image with dimensions 29350 x 7172, is only 6.7 MB.
The Image.FromFile method loads the above image in the memory
quickly. Now I have the image loaded in memory, how can I
display it fast?
Binding the image object to a PictureBox causes the
"Out of memory" error. I tried drawing portions of
image using "Clone" method in a rectangular region of
the form and scroll bars, inside the OnPaint event.
but it is too slow Frown | :(

Can any one direct me to make it works fast?
Thanx

Viewing a form created in Access

ccotton33312-Jun-04 9:32

ccotton333

12-Jun-04 9:32

Hey,
I have a form I created in access, and I need some help trying to figure out a way to view it in VB .NET or else view the content of the form. On this form it has a section for order history. In this section there are four columns: OrderDate, OrderNumber, CustomerNumber, and A button, which allows you to view the Order information. Is there a way to do this? If so, please let me know.

Thanks,

Re: Viewing a form created in Access

Mekong River12-Jun-04 22:49

Mekong River

12-Jun-04 22:49

Just give you an idea about an application that convert from Access project to VB6 application. I think there is should be an update version that could convert from Access application to VB.Net too. Try to use google and search for it. The application that I used is convert the form from access to vb6, you can use the other control like you use it in access too.

Roath Kanel
APO-CEDC
Save Children Norway-Cambodia Office

.NET-BroadcastEventWindow

PaleyX12-Jun-04 6:16

12-Jun-04 6:16

Evert time I close my app down it comes up with a messagebox saying:

.NET-BroadcastEventWindow.1.0.5000.0.3: App.exe Application Error
The inistruction at "xxxx" referenced memory at "xxxx". The memory could not be "written".

Why is this happening? It doesn't happen if I run it in the IDE. All I did was add a chart compenent to the main form - it only occurs if I click on the chart - I don't actually have to do anything with the chart, I don't even populate it (it also happens if I do populate it)

Rugby League: The Greatest Game Of All.

PaleyX12-Jun-04 6:30

12-Jun-04 6:30

Just looked this up on Microsoft.com - they don't appear to have heard of it although they must have written it. There are quite a few posts about it if you do a google search, nobody knows what it is and nobody has a solution. Oh well, my users will just have to do without charting.

Rugby League: The Greatest Game Of All.

Dave Kreskowiak12-Jun-04 7:16

12-Jun-04 7:16

The problem can be cause by how you USE the chart component. This includes just instantiating it and not disposing of it properly before your app shuts down. THis is why you can't find an answer on any sites. Depending on the chart control, the answer to how to dispose of it will be different.

What is probably happening is the chart control you are using, a COM component do doubt, is firing off an event that you subscribed to, but since your app is already being GC'd, the call to your event code is going to where the event handler WAS in memory, which is no longer valid.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

PaleyX12-Jun-04 7:19

12-Jun-04 7:19

Cheers, the chart component is supposed to be 100% .NET - its Xceed Chart - I haven't subscribed to any events on it, I just dropped it onto my form and that seems enough to kill it. It's a shame because it looks a decent chart control (there's a lot of rubbish out there)

How can I dispose of it properly?

Rugby League: The Greatest Game Of All.

Dave Kreskowiak13-Jun-04 8:30

13-Jun-04 8:30

You don't need to subscribe to an event. I just read up on the control's documentation. It's almost 100% C#. The remainder is UNMANAGED OpenGL code. You'll have to dispose of the component yourself. Something like this:

ChartGridControl1.Dispose()
ChartGridControl1 = Nothing

If that doesn't work, consult with the Xceed and see if they have a fix for it.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

PaleyX13-Jun-04 13:53

13-Jun-04 13:53

Cheers Dave, I tried that in the forms close event but it still happens. I have sent off an email to Xceed, they are usually pretty good at answering queries. I wish these things didn't happen on a weekend.

Rugby League: The Greatest Game Of All.

Help: Unicode in VB

aida12_9912-Jun-04 3:36

aida12_99

12-Jun-04 3:36

Hi,
I am Using VB6. I have to display UTF-8 characters in my TextBoxes, but It seems that VB6 does not support UTF-8.
How Can I change the 'Encoding' of the TextBoxes into UTF-8?
Please, Help Me!!
Thanks.

Dave Kreskowiak12-Jun-04 7:12

12-Jun-04 7:12

The textboxes cannot be converted to UTF-8 because that refers to the encoding of the string, not the object. VB6 will only use ASCII and Unicode strings, specifically, it uses BSTR as its native format.
What are you trying to accomplish?

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

tramdtt13-Jun-04 15:41

tramdtt

13-Jun-04 15:41

VB6 does not support Unicode, but you can use the third tool which can display unicode in textbox. Its Unitoolbox tool. If you need Unitoolbox, please contact me: hapelec2003@hn.vnn.vn
Good luck

tramdtt

Dave Kreskowiak14-Jun-04 0:18

14-Jun-04 0:18

The UI controls don't support Unicode. VB6 native format strings ARE Unicode, Chapter 6: Character Strings[^]. Kind of strange that the controls never supported it...

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

tramdtt14-Jun-04 22:48

tramdtt

14-Jun-04 22:48

I said , VB6 does not support Unicode but there is the third tool which can display unicode in textbox, label, combobox, listbox.... Its Unitoolbox tool.
I have tried it and Its good!!!

tramdtt

Anonymous16-Jun-04 1:38

Anonymous

16-Jun-04 1:38

Hi
I have dowloaded the Unitoolbox tool, but it didn't help me, because I want some Grid Controls that support UTF-8 aand also right-to-left property. I want to display farsi texts which only needs right-to-left and UTF-8 support!
Microsoft Froms 2.0 Library supports UTF-8 but it does not contain what I need (The Grid!)

Thanks alot

VB.NET

Anonymous12-Jun-04 3:23

Anonymous

12-Jun-04 3:23

Has anyone used the book VB.net step-by-step?

Re: VB.NET

Dave Kreskowiak12-Jun-04 7:10