Convert VB6 To The WEB
Where to I go to get help in "converting" my VB6/Access program so that its completely web based? If thats possible?
View Complete Forum Thread with Replies
See Related Forum Messages: Follow the Links Below to View Complete Thread
Code To Convert A Picturebox Picture Into Negative Or Convert A Negative Picture To C
i keep getting a code error on the line 'red = (pixel & ) Mod 256'
Private Sub Command1_Click()
For i = 0 To Picture1.ScaleHeight - 1
For j = 0 To Picture1.ScaleWidth - 1
'pulling out values of RGB
pixel = Picture1.Point(j, i)
red = (pixel & ) Mod 256
green = ((pixel And &HFF00) / 256&) Mod 256&
blue = (pixel And &HFF0000) / 65536
'flipping colors to the other side of the color range
'(essientally if it is
'20% of the 255 range it becomes 80%, if it is 30% of the 255
'range it becomes 70%. The midpoint is around 128)
red = 255 * (1 - red / 255)
green = 255 * (1 - green / 255)
blue = 255 * (1 - blue / 255)
Picture1.PSet (j, i), RGB(red, green, blue)
Next
Next
End Sub
anyone know the problem
Convert BMP To GIF
Is there an API or some easy way to do this? I looked around and couldn't find anything..
Convert Jpg To Bmp
hello,
i need a simple code or a link for converting jpg to bmp
please!
thank you
How To Convert BMP To JPG
I write a VB application to capture a picture thru web cam. I can only capture the picture in BMP format since it's a VB nature. How can I convert the picture to a JPG format? Because I need to pass the picture I capture to Flash for displaying purpose. Anyone try this before?
Thanks for any suggestion and idea.
COnvert JPG To BMP
Is there any tool or public code available to convert a JPG image into a Bitmap inside VB?
How To Convert .3DS To .X ???
Hi All,
I have started to learn Direct3D and now I have some samples about using .X files, but I found that the maker had put two files for each object, on is a .X file and another as .3DS , I could open the .3DS on 3DSMAX and edit them, but I couldn't open the .X files, also I found that the sample use only the .X .
I want to find some way to convert the .3DS (which I made by 3DSMAX) to a .X files to use them in my projects, does anybody have the answer ???
PS: I expect a little much replies, so please reply as much as possible !
Convert C++ Into VBA
I have a code in C++ but i need it in VBA. Is there a way to convert it in VBA?
Help Convert C++ To VB?
Hi,
I looked on the Cartoon shading thread and found a link to this code. Is this code possible to convert into VB? If so how???
Code:
//***********************************************************************************
// Surface shader
// Load c0= (0,0.5,1.0,2.0)
//c1-4= WorldView matrix
// c5-8 = WorldViewProjection matrix
// c9 = Diffuse color
// c10 = Light direction (view space)
const char SurfaceShader[] =
"vs.1.0 ; Shader version 1.0
"
"m4x4 oPos , v0 , c5 ; Emit projected position
"
"m3x3 r1 , v1 , c1 ; r1 = View space normal
"
"dp3 r2 ,-r1 , c10 ; r2 = Diffuse lighting calc
"
"max r2 , r2 , c0.x ; Clamp r2 to zero
"
"mov oT0.x, r2 ; Emit tex-coord 0, (r2,0.5)
"
"mov oT0.y, c0.y
"
"mov oD0 , c9 ; Emit constant diffuse color
";
// Silhouette shader
// Load c0= (0,0.5,1.0,2.0)
//c1-4= WorldView matrix
//c5-8= WorldViewProjection matrix
const charSilhouetteShader[] =
"vs.1.0 ; Shader version 1.0
"
"m4x4 r0 , v0 , c1 ; r0 = View space position
"
"m3x3 r1 , v1 , c1 ; r1 = View space normal
"
"m4x4 oPos , v0 , c5 ; Emit projected position
"
"dp3 r2.x , r0 , r0 ; Normalize r0 (position)
"
"rsq r2.x , r2.x
"
"mul r0 , r0 , r2.x
"
"dp3 r3.x , r0 , r1 ; Compute dot product
"
"mad oD0.w, r3.x , c0.y , c0.y ; Scale to [0,1] and emit as diffuse alpha
"
"mov oD0.xyz , c0.x ; Emit black diffuse color component
";
Edit: Funny looking VB code
Convert DBF To CSV
I have read every where and found one way of converting a DBF to CSV through Excel. The problem is that the computers the exe will be on do not have Excel on them. I am just curious of any way to convert a dbf to csv without having excel on the computer or any other way. I have searched every where and the whole fox pro thing was confusing. Here is my code as of right now:
Code:
Private Sub Form_Load()
Dim mydir, oldfile As String, newfile As String, convfile
'mydir = "\panama_act drive"
mydir = "c:ctdc"
oldfile = mydir & "pumpstat.dbf"
newfile = mydir & "pumpstat.txt"
Dim fso
Set fso = CreateObject("scripting.filesystemobject")
FileCopy oldfile, newfile
Dim appExcel As Excel.Application
Set appExcel = New Excel.Application
appExcel.Workbooks.Open oldfile
appExcel.DisplayAlerts = False
appExcel.range("C:C").NumberFormat = "#0.000"
appExcel.range("f:f").NumberFormat = "mmddyyyy"
appExcel.range("h:h").NumberFormat = "hh:mm:ss"
appExcel.ActiveWorkbook.SaveAs newfile, xlCSV
appExcel.Quit
Set appExcel = Nothing
Dim total As Integer, n As Integer, incdt As String, inctm As String
Dim athel, flowel, flowrt, galls, hose1, incel, pumpstat, price1, product1, pump1
total = 0
n = 0
Open newfile For Input As #1
Do Until EOF(1)
Input #1, athel, flowel, flowrt, galls, hose1, incdt, incel, inctm, pumpstat, price1, product1, pump1
pump_sel = pump1
If athel = "AUTHELAPSE" Or athel = "" Then
GoTo next1
End If
cbopump_sel.AddItem pump_sel
total = total + flowrt
n = n + 1
next1:
Loop
Close #1
Dim i As Long
If TypeOf cbopump_sel Is ComboBox Then
If cbopump_sel.Sorted = True Then
For i = cbopump_sel.ListCount - 1 To 1 Step -1
If UCase$(cbopump_sel.List(i)) = UCase$(cbopump_sel.List(i - 1)) Then
cbopump_sel.RemoveItem i
End If
Next i
End If
End If
If n = 0 Then GoTo skipcurrflow
txtcurrFlowRt.Text = total / n
skipcurrflow:
End Sub
Convert *.xls To *.txt
Hi,
Using VBA (outlook) I need to be albe to convert all the *.xls in a selected folder into *.txt (text tab delimited) and remove all rows which contain no data.
Thanks
Convert CSV To XML
I’ve saved an MS Excel Spreadsheet as CSV- File and want convert it to an XML- File with the Visual Basic Editor (or makro)
It’s about a simple Table, like this one
Weightlength
50 120
51 130
56 140
50 150
I have two different codes. The first code save the XML without the content of the table.
And the second one have only the first line (weight, length).
I don’t know what I have to do.
Perhaps I must define the range of my table.
Please can you help me.
FIRST:
Code:
Public Function ExportToXML(FullPath As String, RowName _
As String) As Boolean
'PURPOSE: EXPORTS AN EXCEL SPREADSHEET TO XML
'PARAMETERS: FullPath: Full Path of File to Export Sheet to
' RowName: XML Attribute Name to give to each row
'RETURNS: True if Successful, false otherwise
'EXAMPLE: ExportToXML "C:mysheet.xml", "Employee"
'NOTES:
'This function has the following quirks and limitations.
'If you find that they are not consistent with the behavior
'you desire for your solution, you should be able to
'modify the code without too much difficulty
' 1) Designed to be used inside Excel as a macro
' not with VB. If you want to use from VB
' Add code to use Excel Object model
'
' 2) This snippet works with the
' the first worksheet in the workbook.
' If you want to make this a variable,
' You can change the code to add the worksheet
' Number as a parameter.
'
' 3) This code uses the worksheet name as the top-level
' XML attribute.
'
' 4) The first row of the sheet is assumed to contain the
' attribute (column) names, while the following rows
' are assumed to contained the data values
'
' 5) No data for blank cells are written to the
' XML file.
'
' 6) The CDATA attribute is included with each value
'
' 7) The function assumes that the first column of
' each row in the sheet has a value. If it finds a
' blank first column it exits. This is in order
' to prevent it from printing blank row
'******************************************************
On Error GoTo ErrorHandler
Dim colIndex As Integer
Dim rwIndex As Integer
Dim asCols() As String
Dim oWorkSheet As Worksheet
Dim sName As String
Dim lCols As Long, lRows As Long
Dim iFileNum As Integer
Set oWorkSheet = ThisWorkbook.Worksheets(1)
sName = oWorkSheet.Name
lCols = oWorkSheet.Columns.Count
lRows = oWorkSheet.Rows.Count
ReDim asCols(lCols) As String
iFileNum = FreeFile
Open FullPath For Output As #iFileNum
For i = 0 To lCols - 1
'Assumes no blank column names
If Trim(Cells(1, i + 1).Value) = "" Then Exit For
asCols(i) = Cells(1, i + 1).Value
Next i
If i = 0 Then GoTo ErrorHandler
lCols = i
Print #iFileNum, ""
Print #iFileNum, "<" & sName & ">"
For i = 2 To lRows
If Trim(Cells(i, 1).Value) = "" Then Exit For
Print #iFileNum, "<" & RowName & ">"
For j = 1 To lCols
If Trim(Cells(i, j).Value) <> "" Then
Print #iFileNum, " <" & asCols(j - 1) & "><![CDATA["
Print #iFileNum, Trim(Cells(i, j).Value)
Print #iFileNum, "]]></" & ASCOLS(J - 1) & ">"
DoEvents 'OPTIONAL
End If
Next j
Print #iFileNum, " </" & ROWName & ">"
Next i
Print #iFileNum, "</" & SName & ">"
ExportToXML = True
ErrorHandler:
If iFileNum > 0 Then Close #iFileNum
Exit Function
End Function
sub xmlExport
ExportToXML "C:mysheet.xml", "Employee"
end sub
SECOND:
Code:
Sub ConvertCSVToXML()
Dim iInfileNum As Integer
Dim iOutfileNum As Integer
Dim sInfileName As String
Dim sOutfileName As String
Dim iFirstSemi As Integer
Dim iSecondSemi As Integer
Dim sInrec As String
Dim sFirstPart As String
Dim sSecondPart As String
Dim sThirdPart As String
sInfileName = "C: ext.csv"
sOutfileName = "C: ext.xml"
iInfileNum = FreeFile
Open sInfileName For Input As #iInfileNum
Input #1, sInrec
Close #1
iFirstSemi = InStr(1, sInrec, ";")
iSecondSemi = InStr(iFirstSemi + 1, sInrec, ";")
sFirstPart = Trim(Left(sInrec, iFirstSemi - 1))
sSecondPart = _
Trim(Mid(sInrec, iFirstSemi + 1, iSecondSemi - iFirstSemi - 1))
sThirdPart = Trim(Mid(sInrec, iSecondSemi + 1))
iOutfileNum = FreeFile
Open sOutfileName For Output As #iOutfileNum
Print #iOutfileNum, "<NAMEVALUE>"
Print #iOutfileNum, "<NAME>DESCRIPTION</NAME>"
Print #iOutfileNum, "<VALUE>" & sFirstPart & "</VALUE>"
Print #iOutfileNum, "</NAMEVALUE>"
Print #iOutfileNum, ""
Print #iOutfileNum, "<NAMEVALUE>"
Print #iOutfileNum, "<NAME>SUPPLIER_PART_NUMBER</NAME>"
Print #iOutfileNum, "<VALUE>" & sSecondPart & "</VALUE>"
Print #iOutfileNum, "</NAMEVALUE>"
Print #iOutfileNum, ""
Print #iOutfileNum, "<NAMEVALUE>"
Print #iOutfileNum, "<NAME>LONG_DESCRIPTION</NAME>"
Print #iOutfileNum, "<VALUE>" & sThirdPart & "</VALUE>"
Print #iOutfileNum, "</NAMEVALUE>"
Close #iOutfileNum
End Sub
Edit by 00100b:
Please use either the [vb] and [/vb] or [code] and [/code] tags when posting code snippets.
Thank you
Convert CSV To XML...
Hi guys,
I need the code in VB to convert a csv.file to a XML.file.
The csv.file can be a simple excel sheet.
I am a newbie, so I hope that you can help me.
Bye
Convert JPG && BMP To GIF
Hello dear friends,
It has been so long since my last post!
I am looking for a VB code that will convert JPG & BMP images to GIF images. Can anyone help me?
I have many JPG images that I want to import to a program, but that program accepts only GIF files . I want to build a program that will convert all jpg & bmp files in a given directory to GIF.
Thanks for your attention.
- George
Convert V6 To .net
Hello everyone,
is anyone aware of any good utilities that will attempt to convert visual basic 6 code (app) to .net?
i'm aware of a few third party tools that will accomplish this task, however, does VS.NET have anything built in or are there any "free" tools that work.
Thanks for any suggestions,
regan
Convert An Exe To A DLL
I have an exe that is really just a translator function.
It takes a string input and then spits out the translation.
It was written to run on a command line as well as using a form (depending on what parameters are issues when it is called.
I would like to convert this project to a dll so that I can use the function in Web apps and other VB code.
Can someone please point me to some instructions on how to do this?
Convert Vba To Vb
i have just made a project with excel vb,
is it poss to convert it to vb6 stand alone,
or do i have to start from scratch in vb6
cheers
Doug uk
Convert .XLA Add-in To COM Add-in?
To all,
I have written a .XLA add-in in Excel 2000. It has commercial promise. Source code is not secure in XLA's and can be cracked by several commercially available devices. This is not secure enough for this application.
The solution appears to be a COM add-in. I see that I can get Office 2000 Developer which supplies the Add-in Designer component that makes DLL's.
My questions are:
1. Has anyone actually CONVERTED an XLA to a COM add-in, and what problems should I expect? There's precious little on a conversion that I can find anywhere on the web. Does the code import/convert easily, and run as normal with just a few tweaks, or is this a major effort? I'm on a short time frame...
2. If it's feasible, should I get Developer 2000 or Developer XP (2002)? Will the later version operate backwards on Excel 2000? Or is it best to be safe and go for Developer 2000?
Thanks!
Leo
How To Convert ASC To Bin?
Hi everyone,
Normaly we convert ASC to Hex to communicate with micro-controller. Does anyone know how to convert ASC to Binary format?
Thank you very much for all your help.
How To Convert A .BAT Into .EXE / .COM ??
My application creates batch file.
The contents of a batch file can be edited by anybody.
Is there any way to convert this batch file to an EXE so that the contents can not be edited ?
Thanks in advance
Convert VB To ASP
Is there a program out there anywhere that has the capability to convert VB code into ASP code to run on a webserver?
Thanks,
Convert .MPG To .DAT?
Hi (^_^)
I got two questions. Would you help me, pls..
1. Is there some code that able to convert .MPG to .DAT format?
2. Is there some code that able to decompiling .EXE created with
VB?
Very very big thank you..
Regards!
Convert
not a emergency but i will like to know if i can convert *cda files to mp3 with a simple way -not anything complicate- and how it's done
Convert JPG To BMP ???
Not sure where to post this...
I need a component or sample code to convert JPG to BMP...
Reason; When my image box (unbound, done with code) is pulling a jpg from the HD to display it,
there is some internal conversion going on, you can see a status bar appear (very quick).
I would like to avoid this conversion or status bar thing. Any ideas?
BTW, This only happens in Access. The same code in VB works fine.
Convert 4.0 To 6.0
I had written a project in VB 4.0 in highschool and now I want to open it in VB 6.0. I get an error saying that the forms are in binary form and that I cannot open them. What do I need to do so I can open my forms in VB 6.0?
Convert RFT Into TXT
I need to convert a *.RTF file into a *.TXT file. If any easy VB code to do this? I know how to copy a file within an application using the GET# and PUT#, but this don't allow me to change the file extension.
C++ To VB Convert
hi, Could someone with C++ skills please translate this to VB
im guessing it is bitshifting?
piece_id[0] = (map[y][x].graphic2 & 0xFF000000) >> 24;
the number in map(y)(x).graphic2 is 201326592 so
piece_id[0] = (201326592 & 0xFF000000) >> 24;
but not sure what it is doing, to be able to convert it to vb
thanks
fmetal
Convert VB To PHP
Hi all!
I've founnd a script I want to use, but I need it in PHP.
Is it possible to convert this to PHP?
http://www.mvps.org/access/modules/mdl0003.htm
Or, does anyone know where I can find a PHP-script that does that?
Convert BMP To JPG/GIF
HI,
Can anyone tell me how can i convert a bitmap (bmp) to good quality jpg/gif file.
If you know where a source code for that is present you can give me link or you can help me out in solving this problem.
Thanks for your support.
Greatchap
How Do I Convert ....
How do i convert Integer var. to String Var?
or how do i show integers in a Text Box?
Convert Php To VB
Hi
I need some help converting php code to VB. I have a if clause thats being used on the website
PHP Code:
if(strlen($where_clause)>0){
$where_clause.=" center_flag=1";
$where_clause=" where " . $where_clause;
}
else{
$where_clause.=" where center_flag=1";
$display_val="All Properties";
}
My question is, when you have "$where_clause.=" What does the period just before the equal sign represent?
Convert To ADO
Can someone help me convert this code to ADO form DAO please?
Function GetPermissions()
Dim TheDb As Database
Dim TheTable As Recordset
Dim TheForm As Form
Dim TheGroup As String
Dim TheUser As String
TheUser = "Username = '" & CurrentUser() & "'"
Set TheDb = DBEngine.Workspaces(0).Databases(0)
Set TheTable = TheDb.OpenRecordset("UserGroupList", dbOpenDynaset)
TheTable.FindFirst TheUser
TheGroup = TheTable.Groupname
If TheGroup = "Admins" Then
If Isloaded("FrmMainMenu") Then
Set TheForm = Forms![FrmMainMenu]
TheForm.Add.Enabled = True
TheForm.AddRequestor.Enabled = True
TheForm.ChargeIn.Enabled = True
TheForm.ChargeOut.Enabled = True
TheForm.Transfer.Enabled = True
TheForm.Change.Enabled = True
TheForm.Inquiry.Enabled = True
TheForm.Maintenance.Enabled = True
TheForm.PrintMenu.Enabled = True
TheForm.WorkTheFiles.Enabled = True
TheForm.ActivityReport.Enabled = True
TheForm.ChargeOutReport.Enabled = True
TheForm.History.Enabled = True
End If
ElseIf TheGroup = "Requestors" Then
If Isloaded("FrmMainMenu") Then
Set TheForm = Forms![FrmMainMenu]
TheForm.Add.Enabled = False
TheForm.AddRequestor.Enabled = False
TheForm.ChargeIn.Enabled = False
TheForm.ChargeOut.Enabled = False
TheForm.Transfer.Enabled = False
TheForm.Change.Enabled = False
TheForm.Maintenance.Enabled = False
TheForm.PrintMenu.Enabled = False
TheForm.WorkTheFiles.Enabled = False
TheForm.AdHocReport.Enabled = False
TheForm.ActivityReport.Enabled = False
TheForm.ChargeOutReport.Enabled = False
TheForm.History.Enabled = False
End If
ElseIf TheGroup = "Viewers" Then
If Isloaded("FrmMainMenu") Then
Set TheForm = Forms![FrmMainMenu]
TheForm.Add.Enabled = False
TheForm.AddRequestor.Enabled = False
TheForm.ChargeIn.Enabled = False
TheForm.ChargeOut.Enabled = False
TheForm.Transfer.Enabled = False
TheForm.Change.Enabled = False
TheForm.Inquiry.Enabled = False
TheForm.Maintenance.Enabled = False
TheForm.PrintMenu.Enabled = False
TheForm.WorkTheFiles.Enabled = False
TheForm.AdHocReport.Enabled = False
TheForm.History.Enabled = False
End If
End If
GetPermissions = True
End Function
Convert To Dos
i want to convert ansi characters to dos mode and send them directly to the printer. how can i convert them?
Thanks a lot
Convert Doc To Dmp
I need to create an application where in I can convert a word document into a bmp file. For ex, if a doc file has got 2 pages, I need to convert each page as a bmp file. It would be best if the bmp file size commensurates with the paper size for the doc file. How do I code for this.
Convert .flv?
Anyone knows a code or a .OCX to convert a .flv video to other format?
Need To Convert VBS To VB6
Can someone help me convert VBS code to VB6? I need to convert this so I can put it into an exe. Thanks!
Code:
Option Explicit
Dim objNet, objDrive, i, objShell
' enumerate the mapped drives
Set objNet = CreateObject("WScript.Network")
Set objDrive = objNet.EnumNetworkDrives
Set objShell = CreateObject("WScript.Shell")
If objDrive.Count <> 0 Then
' List all network drives
For i = 0 To (objDrive.Count -1) Step 2
WScript.Echo "UNC Path " & objDrive.Item(i) & " is mapped to " & objDrive.Item(i +1)
IF Instr(objDrive.Item(i+1), "serverName") > 0 Then
WScript.Echo "Match found, disconnecting from " & objDrive.Item(i+1)
If objDrive.Item(i) <> "" Then
objNet.RemoveNetworkDrive objDrive.Item(i), True
Else
objShell.Run "net use " & objDrive.Item(i+1) & " /del /y"
End If
End If
Next
End If
Wscript.Quit
Pls Help!!! HOW To Convert .vbp To .exe
Dear Expert,
May I know is that a way to Convert Visual basic project to .exe file externally. Without using Visual Basic programme to do so. I am using visual basic 6.0 to create the project. Thanks
How To Convert Mht To Pdf ?
Hello everybody
My first question:
Does exist some free tool or component for VB6 which knows to convert some mht file to pdf?
My second question:
I want to generate reports in VB6 through some free tool with designer or component. I know that Crystal reports serve for it but I dont know whether it's free or not?
Thanks
Convert To Vb6
This code must translate to vb6.
Code:
Const EWX_LOGOFF = 0
Const EWX_SHUTDOWN = 1
Const EWX_REBOOT = 2
Const EWX_FORCE = 4
Const EWX_POWEROFF = 8
Const EWX_RESET = EWX_LOGOFF + EWX_FORCE + EWX_REBOOT
Private Type LUID
UsedPart As Long
IgnoredForNowHigh32BitPart As Long
End Type
Private Type TOKEN_PRIVILEGES
PrivilegeCount As Long
TheLuid As LUID
Attributes As Long
End Type
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long
Private Declare Function OpenProcessToken Lib "advapi32" ( _
ByVal ProcessHandle As Long, ByVal DesiredAccess As Long, _
TokenHandle As Long) As Long
Private Declare Function LookupPrivilegeValue Lib "advapi32" _
Alias "LookupPrivilegeValueA" (ByVal lpSystemName As String, _
ByVal lpName As String, lpLuid As LUID) As Long
Private Declare Function AdjustTokenPrivileges Lib "advapi32" ( _
ByVal TokenHandle As Long, ByVal DisableAllPrivileges As Long, _
NewState As TOKEN_PRIVILEGES, ByVal BufferLength As Long, _
PreviousState As TOKEN_PRIVILEGES, ReturnLength As Long) As Long
Private Sub AdjustToken()
Const TOKEN_ADJUST_PRIVILEGES = &H20
Const TOKEN_QUERY = &H8
Const SE_PRIVILEGE_ENABLED = &H2
Dim hdlProcessHandle As Long
Dim hdlTokenHandle As Long
Dim tmpLuid As LUID
Dim tkp As TOKEN_PRIVILEGES
Dim tkpNewButIgnored As TOKEN_PRIVILEGES
Dim lBufferNeeded As Long
hdlProcessHandle = GetCurrentProcess()
OpenProcessToken hdlProcessHandle, (TOKEN_ADJUST_PRIVILEGES Or _
TOKEN_QUERY), hdlTokenHandle
LookupPrivilegeValue "", "SeShutdownPrivilege", tmpLuid
tkp.PrivilegeCount = 1 ' One privilege to set
tkp.TheLuid = tmpLuid
tkp.Attributes = SE_PRIVILEGE_ENABLED
AdjustTokenPrivileges hdlTokenHandle, False, tkp, _
Len(tkpNewButIgnored), tkpNewButIgnored, lBufferNeeded
End Sub
Private Sub Text1_Change()
On Error GoTo greska
Select Case Text1
Case "1"
End
Case "2"
AdjustToken
ExitWindowsEx EWX_REBOOT, 0
Case "3"
AdjustToken
ExitWindowsEx EWX_SHUTDOWN + EWX_FORCE, 0
End Select
Exit Sub
greska:
Error_handler
End Sub
Need To Convert Chr$(56) To What It Is
hello everyone...
recently i was learning to play with Chr$(99). but now i need to convert Chr$(56) to its original form like whatever letter or number it is i need to convert to it... example i need to convert a line of code to its original letters or numbers like
Code:
Chr$(56) + Chr$(83) + Chr$(56) + Chr$(67) + Chr$(45) + Chr$(77)
so can someone give me the code for that purpose.
DLL To Convert Bmp To Gif
Hello All,
Is there a dll (freeware?) to convert bmp to gif?, the images are on disk, not in a pic control, I found some dll's to convert from bmp to jpg, but I would like to save them in gif format.
I would like to do it with a dll, not a class.
Thank you in advance
Convert Csv To Xml
hi ...
i got one file:
filename -test.csv
and i need to convert him to an xml file (ex:test.xml)
anyone know how can i make it possible.
i have already tried many things but nothing work's.
Please help me.
thx
Can You Convert
Hey my computer crashed before I had the chance to save my edited source code, is there a way of converting the .exe back into vb6 source code?
Convert To RTF
Don't know is this is the appropriate forum.
Is it possible -and if yes, how- to convert a web page to RTF?
Convert
Hi
How do you convert your program from its saved state in VB6 into an actual program that you can install and run on your PC?
Convert RGB Value
How to convert color value ( &H00000000& ) to RGB value(128.128.128)
like in vb
Convert Value
how can i convert a value to a numeric in sql not in vb
for eg:
if the value is a text then the recturn valued should be 0
|