Visual Basic :: Saving A Recorded Wav File So It Can Be Played Again

Recorded Value
I have three labels (label5, label6 and label7)
and three buttons (command1, command2 and command3)

I also have three textboxes (text1, text2 and tex3) which is bounded to the buttons...

For instance: When I click command3 then text2.text and text1 will get the value "1" while text3 will be reseted to "0"
If I continue clicking the button the numbers in text1 and text2 will increase by "1" for every click I do on this button. When I click command2 then text1 and text3 will increase while text2 this time will be reseted to "0"

Here's were my problem is taking place. I want the labels that I mentioned above to record the highest value in text each text box.
For example: The value in text1 should be dispalyed in label5, text2 into label6 and text3 into label7.

I hope you understand...

How To Modify Recorded Macro Code
After 38 years in aerospace/government contractor accounting, I retired in 2004. However when a close friend asked me to provide some part time accounting support to a local parochial high school, I find myself back at work almost full time. But it is a different environment, I am enjoying it and I feel (hope) I am making a contribution. While I have used Excel for many years (first Lotus 123), I don’t have the know-how of writing macros. In Lotus I wrote macros regularly. I have purchased a couple of VBA tutorials, downloaded several examples and am slowly getting a feel for VBA but emphasis is on ‘slowly.’ What I need in the near term to help the school is to get a handle on creating userforms and the code to make them run effectively.

I have created a form (with headings, formulas, formatted the cells) in Excel to be used to record information from a hand written cash receipt form. Another person (a clerk type-not fully understanding the ‘why’s’ behind what is being entered) will be entering data each day into the Excel form.

I have recorded one line/record of data and the code is listed below. The record consists of:
The cash receipt number in C10
The cash receipt date in D10
The name of person in E10
The amount of the receipt in either F, G, H or I depending on whether the payment was a check, money
order, credit card or currency.

I don’t know how:
1. To modify the code or better attach the code to a userform (I know how to create a userform with the text and
control boxes)
2. To modify the code so that it will (a) start at the next open cell in column C; (b) pause/wait for user to enter the receipt number and move to column D on the same line, pause/wait for the user to enter the date of the receipt and continue to columns F, G, H and I and then start back at the next open cell in column C.

I am spending a lot of my own personal time [not billing the school] trying to learn the VBA and at the same time trying to get this needed cash receipt form to work. I’m not looking for someone to do all the work on this form. I’m just running short on time, i.e., my learning curve is way behind the date I need to have the form working.

If I have written too much, please excuse the lengthy question(s) and respond as is appropriate. Thanks for understanding and any comments you may provide.

Code:
Option Explicit

Sub RecordReceipt()
'
' RecordReceipt Macro
' Macro recorded 4/29/2006 by Phil Collins
'
' Keyboard Shortcut: Ctrl+r
'
ActiveCell.FormulaR1C1 = "1234567"
Range("D10").Select
ActiveCell.FormulaR1C1 = "4/15/2006"
Range("E10").Select
ActiveCell.FormulaR1C1 = "Parent John Smith"
Range("F10").Select
ActiveCell.FormulaR1C1 = "350"
Range("C11").Select
End Sub
Edit by Moderator:
Please use the [vb][/vb] tags when posting your VB code. Edit or reply to this post to see how.

Thank you.

One Textbox Recorded Into Multiple Fields. Help!
I'm trying to record data from a form into an existing table into four different fields. My form is setup for multiple warehouses that have inventory of different products. There are several buttons in the form that are labeled, select all "warehouses", select "warehouse1", or select "Warehouse123". When one of the buttons is selected I have a text box appear for the user to place the product price into. Then I want the price entered to show up in whatever warehouses were choosen. So the data needs to be recorded in multiple fields. So basically one text box of data needs to be distributed into multiple fields. I'm not sure how to write this in VB. If you need me to clarify let me know.

Thanks
merck

Is There Any Way Of Adding A Recorded Sound To A Vb Form?
I know it sounds silly, but if anyone knows how this can be done I would be very grateful, thank you
Helen

Does Anyone Know How To Display *.wav Files Graphically As They Are Recorded?
Does anyone know how to display *.wav files graphically as they are recorded? Example I'm creating a *.wav file, but I want to be able to view the *.wav file graphically as it is recorded by the computer.

Is It Possible To Demodulate A Recorded Modem Stream Via Software?
I have a strange request. I have some .Wav/.Aiff files of a 9600baud modem audio output (what's heard through the speaker). Is it possible to demodulate these into serial data internally (via Software) without running them back through a modem?

Do you know of any libraries or code that anyone has shared that is headed in this direction?

Thanks for any advice!
fshrking

Help Cleaning Up Recorded Pivot Table Macros
Hello All...
I Don't do much with PT's but when I do... I know there is always a better, faster way to work with these... So with that in mind can we (I'm assuming...ok hoping...that I'm not the only one who would like to get some guidance with this) get some (general) posts on how to simplfy recorded Pivot Table Macros...

Below is what I been able to do so far with what MSFT gave me. But, for example, I have tried several variations to remove the second calling of the "Activesheet.PivotTables("PivotTable1") and tried to go straight into "AddDataField"...but... MSFT yelled at me.

What I'm doing here is simply using a Pivot Table to extract data from and then place this data it into another table.

Any ideas from here would be tremendously enlightening...

Thanks...

Code:
Application.ScreenUpdating = False
With ActiveSheet.PivotTables("PivotTable1").PivotFields("Blah")
.Orientation = xlRowField
End With

With ActiveSheet.PivotTables("PivotTable1")
.AddDataField ActiveSheet.PivotTables("PivotTable1"). _
PivotFields("Blah1"), _
"Sum of Blah1", xlSum
.PivotSelect ("'Blah1'[All]"), xlDataAndLabel, True
Selection.Copy Range("AK2")
.PivotFields("Sum of Blah1"). _
Orientation = xlHidden

.AddDataField ActiveSheet.PivotTables("PivotTable1"). _
PivotFields("Blah2"), _
"Sum of Blah2", xlSum
.PivotSelect ("'Sum of Blah2'"), _
xlDataOnly, True
Selection.Copy Range("AM2")
.PivotFields("Sum of Blah2"). _
Orientation = xlHidden

.AddDataField ActiveSheet.PivotTables("PivotTable1"). _
PivotFields("Blah3"), _
"Sum of Blah3", xlSum
.PivotSelect ("Sum of Blah3"), _
xlDataOnly, True
Selection.Copy Range("AN2")
.PivotFields("Sum of Blah3"). _
Orientation = xlHidden
.PivotFields("Blah"). _
Orientation = xlHidden
End With

Application.ScreenUpdating = True

Ps... Very seldom, but sometimes when I step through the code it will hit the .Orientation = xlRowField...and simply die... as if I hit an Exit Sub or something??? Any idea's on this quirk?

Thanks Again...

Playing A Recorded Wave (WAVEHDR) Using Directsound
Anybody know how can i convert a wave that was recorded with the waveInStart,waveInAddBuffer...functions (WAVHDR) to a byte array in order to play it using Directsound?

Urgent!:running A Recorded Macros From Excel
Hullo,
I've recorded a macros in excel and I copied the code from the vb editor in excel and pasted into my vb program but I can't get the thing to run.
I think there's some path problem but I can't correct it.

'After calling it

Call Macro4

Private Sub Macro4()

Xcel.Workbooks("Book1").Worksheets("Sheet1").Range("A1:B7").Select
'highlighted in yellow

Any help is appreciated. Thanx.

Syntax Error In Recorded Dbase Query Macro
Good Afternoon,

I've bumped into this problem a few times in the past and worked around it but now it's stopping me.

I'm recording a macro to get data from an ODBC data source to an SQL source. The problem is when I include more than a certain (unknown) number of columns in the table the resulting code has a syntax error, although the import I recorded works OK. I've had a look in MS knowledge base but no joy.

".CommandText = Array" onwards is shown in red by the VBA editor up until the end of the data elements list. I've X'd out some of the server details.

I'm on Win2K, Office 2003, I've had the same problem with Office2000 and XP OS.

A method for avoiding or identifying and fixing the syntax error would be much appreciated. Thanks for any help.

Code:
' GetData Macro
' Macro recorded 02/06/2005 by Alec.Macarthur
'

'
With ActiveSheet.QueryTables.Add(Connection:= _
"ODBC;DSN=WeeklyOpReports;UID=XXXXXX;;APP=Microsoft Office 2003;WSID=XXXXXX;DATABASE=XXXXXXX" _
, Destination:=Range("A1"))
.CommandText = Array( _
"SELECT tblOperationalReport.Office, tblOperationalReport.Department, tblOperationalReport.WeekEnd, tblOperationalReport.EnteredBy, tblOperationalReport.MondayTempsWorking, tblOperationalReport.FridayT" _
, _
"empsWorking, tblOperationalReport.FridayTempsRebook, tblOperationalReport.NewBookingsTaken, tblOperationalReport.NewBookingsFilled, tblOperationalReport.UnfilledBookings, tblOperationalReport.TempCand" _
, _
"sIntd, tblOperationalReport.TempCandsRegd, tblOperationalReport.NewJobsRegd, tblOperationalReport.TotalLiveJobs, tblOperationalReport.No1stInts, tblOperationalReport.No2ndAndFinalInts, tblOperationalR" _
, _
"eport.OffersMade, tblOperationalReport.OffersAccd, tblOperationalReport.PlacementsMade, tblOperationalReport.ConfGPThisMonth, tblOperationalReport.ConfGPNextMonth, tblOperationalReport.PermCandsIntd, " _
,,,,)
.Name = "Query from WeeklyOpReports"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.PreserveColumnInfo = True
.Refresh BackgroundQuery:=False
End With
End Sub

How To Check If WAV Is Being Played Or Not
hi all

i have a small function that has the following code to play a WAV File .i call the function whenever i need to play a wav file

VB Code:
Public Function PlaySound(strfile As String) On Error GoTo eh: Set ds = dx.DirectSoundCreate(vbNullString) ds.SetCooperativeLevel frmMain.hwnd, DSSCL_PRIORITY Dim desc As DSBUFFERDESC desc.lFlags = DSBCAPS_CTRLPAN Set buff = ds.CreateSoundBufferFromFile(strfile, desc) Exit Function eh: MsgBox Err.Number & " " & Err.Description Exit Function End Function

so when a form is loaded , i call the function and play the sound.

VB Code:
PlaySound ("C: est.wav") buff.Play DSBPLAY_DEFAULT

now, my prob is that how do i keep a track whether the playback is over and incase the playback is over , the form should unload .

please advice

Getting A Song Being Played
How would I get a song that's currently being played, im using Winamp, and would like to know... thank you

Anybody Played With The GDI32.DLL?
Hiya,

  I'm trying to draw filled polygons on a form and I'm trying to use the GDI32.DLL API to do it.

  My code is pretty straight forward;

CODEPrivate Declare Function PolyPolygon Lib "gdi32.dll" (ByVal hdc As Long, lpPoint As POINTAPI, lpPolyCounts As long, ByVal nCount As Long) As Long

Private Declare Function CreateSolidBrush Lib "gdi32.dll" (ByVal crColor As Long) As Long

Private Type POINTAPI
  x As Long
  y As Long
End Type

hBrush = CreateSolidBrush(RGB(127,127,255))
lngRC = PolyPolygon(frmMain.hdc, arrAPIPoints(0), arrAPINumPoints(0), 1)

How To Detect Whether A Mp3 Is Being Played Or Not?
hello friends,

my question is : can we able know to whether a mp3(or any music file, resident on a hdd) is
currently being played.

say, my friend on 10.10.13.156 is playing a mp3 file from his media player, i ve full access
to that folder(wherein the mp3 file is stored). now i want to know whether that file is currently
being played or not.

what properties of media file let us know whether it is under playing condition or not.

ur help would be fruitful....

regards,
mcdee

>>mcdeeiis
>>Success is often just an Idea away.....

Problems With Saving Files To A Sequential File And Saving To Floppy Disk
On unzip if you click on Project 1, this will open up my program.
I'm having several problems with this program. When I click on the combo box for the available vehicles it comes up with 'subscript out of range'. I've still to write the code to work out if the vehicles are available (i.e. if the customer is over 21 years of age, and if the vehicle isn't already hired out). Any suggestions on these problems or any easier way to code it would be very helpful.

How To Detect If Sound Is Being Played
Any way to detect if there is sound playing at the current momment. (If the sound card is in use or whatever??)

Thanx'

How Do I Check If Sound Is Being Played?
I want my prog to check if the speakers are busy, maybe winamp is playing, if sound is being played I want to stop the sound.Is this possible, if so, how do I do it.

Lock A Video While It Is Played
Salut,

is there a way to lock a file while it is played via mciSendString. So that no other process (than mciSendString) can access the file?

Stefan

Detect If A Sound Is Played
Hi there

I wanna detect if a sound is played or not. My program should not play the sound only detect it. Is this possible?

Anyone Played With Any Of The Outlook Bars Out There?
Hi sKorno,

I have the outlook bar from Ariad and it works great... it's free and it's TOTALY customizable....

email me if you want it....
laplanted@videotron.ca

AVI Files Played Sequentially
I am looking for sample code to play AVI files sequentially. The file names will be pulled from a recordset, and I want to loop through whatever AVI files are returned.

The AVI's may contain audio as well, or there may be separate WAV files, so, there is a database field for the length of time (seconds) that each AVI file should play/display. (So, I don't need to programmatically predetermine the length of time to before the next AVI file should play, I will know that.)

This should be simple. Play a group of AVI files, one after the other. But I'm having some trouble with it. (May be related to DivX or other encoding that mciSendString type *avivideo* cannot handle? - I have tried *mpegvideo* as well.)

I may be missing something very simple and obvious, so please don't hesitate to recommend some code - it may contain the missing piece.

TIA,

Dennis

Sounds, Played At Same Time Without Cutting Off?
Is there a way to play several sounds at the same time, without using directx and without cutting the other sounds off? for instance, with playsound, i can play a sound, then play another while the first one is playing, but the first one gets cut off. is there a way to fix this? And if you cant do this without using directx, can someone show me how to do it with directx?

Saving Word To Xml File Saving Only Data
Hi i am trying to save a word file to an .xml file programatically saving data only, but am getting an error saying that there is a named argument not found. The code i'm using is posted below, i'm new to both .xml and vb so i hope this isn't a very stupid question. Any help is appreciated! thanks!

Set objApp = CreateObject("Word.Application")
objApp.Visible = True
objApp.Documents.Open "c:Documents and Settings croweMy Documents rip_report_database empreportdone.doc"

objApp.ActiveDocument.SaveAs "Plain Memo2", XMLSaveMode:=wdXMLSaveMode = wdXMLSaveUserDataOnly

Sustaining A Music Segment Played By Performance Object
Hi,

I am trying to sustain a music segment played by a performance object for a particular period of time. Does anyone know how to do it?

Is it possible to do it with the SendCurvePMSG() of the performance object.

I am using directx 8.

Thanks in advance.

Can A Quick Time Movie Be Played In Multimedia Control?
Surely there is some way to do this. Or is there a different way, other than the Multimedia control, to play such a format?

Kinda Unrelated: The Animation That's Played When You Delete Something.. *SOLVED*
I've found the animation when you're copying something, but I couldn't find the one thats played when you delete something.

I have WinXP. I have seen that animation in this OS. Does anyone know where that file is?

How To Open The MediaPlayer-DB(*.db) Containing The Complete(!) Played Files List?
I'd like to know what's in that file:
wmplibrary_v_0_12.db

using wordpad I can see a lot of lines - but nothing that makes sense. Access can't open it. Error: cant find the file wmplibra.db
When I rename it I get: ...does not have the right format.

I'd like to know what info the MediaPlayer stored there.
I read in a magazine that ALL files you ever played will be stored there. So before I delete it I'd like to have a look...

thx,

Helger

How I Can Use Multiple Sound Cards To Direct Sounds Played By Two Instances Of WMP?
How I can use Multiple sound cards to direct sounds played by two instances of WMP?

I have developed a DJ application around WMP 7.

I have two sound card installed in my machine. I use multiple instances of WMP to play different media file but output goes to only one device(default device).

Now I want, different(or at least one)instances of WMP to use another multi media devices to send output.

Is it possible? If so, How? please help!

I need it as I want a facility to be able to hear the media before I feed in, while I'm playing another media,using a sound device.

Will any Expert help me?

Capturing Sound Played By A Performance Object (playsegmentex) To Secondary Buffer
Hi,

I am trying to capture the sounds played by the performance object playsegmentex to a buffer so that I can write to a .wav file.

Anyone has any suggestions on how to do it? Its very urgent ..

Thanks in advance.

How To Avoid Open File Failure While The File Is In Saving Process?
Hello, Everyone,
I have two application. One writes data to a file, the other need to open the file. How can I make them no confliction? It is also fine for me to open a copy of the file. I added: On error resume next in writing. So, there is no problem in writing. But when I read the file, it encouter: file not available. How can I avoid this situation? Would someone be kind to come up with a good idea?
Thank you very much!
Charlie

Saving On Newest File Of Two Files In Differing Locations With Same File Name
Hi folks,

OK, first off I'm really, really new to VB so any help would be much appreciated.

We are currently runing two servers in 2 different offices and what i'd like to do is copy the files from a specific folder (these folder have identical names on the two servers) on each server (these are called server1 & server2), to a folder in a seperate location (somewhere on my C drive for example), making sure that only the newest file (by date and time) is actually copied into this folder, thus giving me a folder which has the most current file from either server.

Hope this makes sense

Damian

Playing A Video In Visual Basic And Capturing How Much Time The Video Has Played
Hi everyone,

I am a beginner in Visual basic.I want to play a video using visual basic and I want to capture the time the user has played that video.Please help me on the same.Thanks in advance
Vinod

Reading Input File - Saving One Line From The File
I am reading an input file line by line and I need to 'extract' [i.e. save to a string] just one line, where the line begins with 'ClaimHeaders*'.

I am just struggling with how to save just that one line to the string. This is what I have so far.

Sub Main()

Dim myFile
myFile = "c:
eprice1.5clmsys01NOTHMAN.repricer.ini"

Dim fileId As Long
Dim strFile As String
Dim sText As String, i As Integer
Dim arLines() As String, arTemp() As String
Dim myCount
Dim myText
fileId = FreeFile()
Dim x As Integer
Dim aString, extractedString As String
aString = "ClaimHeaders*"

Open myFile For Input As #fileId

Do While Not EOF(1)
Line Input #fileId, myText
If myText Like aString Then
<extract that line to a string...this is where I am stuck>
Debug.Print aString
End If
Debug.Print myText
Loop
Close #fileId

End Sub

The input text file looks like this:
#Repricer Preferences
#Fri May 25 09:24:27 CDT 2007
Logging=Debug
MainSize=1024,740,224,275
ClaimHeaders=0|155,1|195,2|90,3|85,4|60,5|90,6|30,7|60,8|90,9|90,10|90,11|60,12|105,14|60,13|149
UseExternalBrowser=Yes
StopWatch=false
MaximumClaimsReturned=200
Debug=true
Browser=C:\Program Files\Plus!\Microsoft Internet\Iexplore.exe

Searching Html File And Saving Results To Another File
i need a program to search a html file for links and save all the links on the page to file.
can anyone help me with this??

thanks.

Saving A File And Opening Same File To Maintain Format
Problem I am having, finally got my little app to open my file extension but the file always defaults to standard text. IE created a text file using Arial size 14 BOLD and underline. saved file, when i open the file the text is not underlined and it is not bold and the font reverts back to arial size 10. what am I doing wrong, can someone please help me?

Saving And Opening An Image File From File Menu
Hi All,

Am working with image processing project in which i use Matrox Imaging Library(MIL).
In a form i have a display window where i want to load an image from the file open menu.
Iam finding it difficult to display an image. Instead of display window when am using rich text box then am able to see the text file in text window. Now i want to load an image in the display window.
Any suggestions and code will be help ful.

Ciao,
--Sridhar

Has Anyone Played Steel Empire Or Cyber Empire?, With My Map I Want To Have Countries
if anyone had ever played steel empire or cyber empire...it is a very old game now

well in those games (they the same game just on different computer type)

anyway in those games there is a building screen where you can view a large map with many countries on it.

my problem is i want to make countries with borders that arnt square, but zigzaggy like real life when you look at a map.

but i have no idea on how to do this, and how to detect if the mouse is inside the countries borders for when selecting it

any help?

File Transfer - Saving File To Disk
Heres the code for the recieving end of the file.

Code:
Private Sub ws4_DataArrival(ByVal bytesTotal As Long)
ws4.GetData sUploaderRec
Debug.Print sUploaderRec
If InStr(sUploaderRec, "(^file^)") Then
BytePos = BytePos + (bytesTotal - 8)
ifreefile = FreeFile
Open UploadFileName For Binary Access Write As #ifreefile
Put #ifreefile, BytePos, Replace(sUploaderRec, "(^file^)", "")
Close #ifreefile
ws4.SendData "(file)rec"
Debug.Print "(file)rec"
End If
If InStr(sUploaderRec, "(fileEOF)") Then

End If
If InStr(sUploaderRec, "(file)") Then
UploadFileName = Replace(sUploaderRec, "(file)", "")
ws4.SendData "(file)size"
End If
If InStr(sUploaderRec, "(file)size:") Then
UploadFileSize = Replace(sUploaderRec, "(file)size:", "")
Debug.Print "file size noted : " & UploadFileSize
ifreefile = FreeFile
Open UploadFileName For Binary Access Write As #ifreefile
Put #ifreefile, UploadFileSize, ""
Close #ifreefile
BytePos = 0
ws4.SendData "(file)begin"
Debug.Print "Sent: (file)begin"

End If
End Sub

It has really lost me, help would be apprieciated.

Thanks

Saving A Listbox To A Text File Or Ini File
From what I have read, loading and reading an ini file is a lot faster then loading and reading from a text file. I am gathering this information correctly or do I just need sleep?

Ado Losing Mdb File After Saving A Text File
I have found a bug in one of my projects and i'm lost trying to fix it.

My project generates reports based on an Access Database. All works fine except if I save one of my Text reports to an RTF file. After doing this i get an error saying that the ADO can no longer find the mdb file. It's looking in the folder which the RTF file was just saved too!!

This is my Save function...

Code:
Private Sub cmdSave_Click()
'//
' Common Dialog area for saving RTB
'\
On Error GoTo saverr
Dim sFileName As String

With CommonDialog1
.Filter = "RichText (*.rtf)|*.rtf"
.DefaultExt = "rtf"
.CancelError = True
.FileName = "Report " & Format(Date, "Medium Date")
.ShowSave
sFileName = .FileName
End With

If sFileName = "" Then Exit Sub

If RTB1.Visible Then
RTB1.SaveFile sFileName, rtfRTF
Else
End If
Exit Sub

saverr:
Select Case Err
Case 32755 ' Dialog Cancelled
Case Else
MsgBox "Unexpected error. Err " & Err & " : " & Error
End Select
End Sub

As I've used a few ADO's all conecting to the same file I have the mdb file location in a global strDBFile. What's really bizare about this is that the error is produced in an ADO which was already connected and being used!

What's going on here??

Saving Text File With Variable File Name???
Hi, i am using VB 6.0 and i want to save a text file using a varible as part of the file name. Here is what i currently have:

VB Code:
appPath = App.PathIf Right(appPath, 1) <> "" Then appPath = appPath & ""' Get a free file numberFileNum1 = FreeFile' Create mood.txtOpen appPath & "mood.txt" For Append As #FileNum1' Write the contents to mood.txtPrint #FileNum1, mood; ","; minuteFormat(currentTime)' Close the fileClose FileNum1

However this creates a file called mood.txt.
What i need is songTitle mood.txt where songTitle is a variable. songTitle is a String which usually looks something like this;
C:Documents and SettingsuserDesktopsong.mp3

So i want the file as "C:Documents and SettingsuserDesktopsong.mp3 mood.txt" , (actually i would REALLY like it to be "song mood.txt", so if someone coud also show me how to get the actual filename from the whole directory that would be great).
something like that. But using

VB Code:
Open appPath & songTitle & "mood.txt" For Append As #FileNum1

results in a bad filename error.
At first i though maybe it had something to do with the filename having spaces. Could this be it?
I tried

VB Code:
Open "appPath & songTitle & "mood.txt"" For Append As #FileNum1

But that just gave a syntax error

Is there a way around this?
Thanks
Gary

Saving RTF File To Standard Text File
I am trying to convert an abc song file to a standart text file. The file appears to be a richtext file because I can open it in wordpad and everything appears okay. When I open it in notepad it has extra characters. I want to convert the file but it won't save it without extra information as shown below:

{
tf1ansideff0{fonttbl{f0fnilfcharset0 MS Sans Serif;}}
viewkind4uc1pardlang1033f0fs17
par X: 732
par T: Kerry Cobbler, The
par R: jig
par N: "Collected by F. O'Neill"
par B: O'Neill's 732
par Z: Transcribed by Michael Hogan
par M: 6/8
par L: 1/8
par K: D
par A/d>ed fga / g>af ecA / d>ed fga / c>AA A2A /

How can I get rid of the first two lines and the "par" on each of the other lines?
I have opened the original file in a RichTextBox and saved it using both rtfRTF and rtfText.
The above is as close as I can get to a "normal" text file. Can anyone tell me how to convert the rtf file to standard text? I included the original abc song file so you can see the formatting.
TIA

Update: I just tried pasting a portion of the original file here and it looks fine. What am I doing wrong?

Edited by - testsubject on 9/27/2004 6:28:57 PM

Saving An HTML File Into Text File
Hi All,

I am trying to pass an html link to vb6.0 code and then save its contents to a text file, just as you manualy Save it (File -> Save As) then put in a .txt file.

So can any body help a pretty code that automaticaly converts to .txt file once the page url gets.

an example of a html page is attached.

Regards,
Abdikarim

Saving An Excel File As A Txt File Using Active X
I am writing a program that must do the following...........

1. Open an excel file (.xls)
2. Amend the file
3. Save the file as a tabbed text file

At present (using activex) steps 1 nd 2 work corectly, and i can save as a .xls document but the problem lies in the file format (it must be a tabbed text file , I have tried difrent ways of specifying this format but with little success could you please have a look at my program and sugest what code to use.

if i can do this without the save as dialogue box apearing then that will perfect.

Can anyone help?

-DAVE

Saving A Txt File And Getting File Size
I want to save a temp.txt and record the file size, then output the file size on the screen. How would I do that?

Saving File And Open File
i have al little problem with an excel file that has to be selected.
now i have it like this:

Code:
Set objWB1 = objExcel1.Workbooks.Open("c:projectTemplate.xls")

the directory project is also where the project itself is in, but i want it to be something like:

Code:
Set objWB1 = objExcel1.Workbooks.Open("Template.xls")

but this doesn't work.
the template.xls is always in the same directory as the project.
anybody know a solution?

and i want (after the modifications to template.xls are made) to save the file as template+the name of the file that has been opened to get the data out for template.xls.

does anyone know a piece of code or something for this also.