Search results

You sir, are a life saver :) Thank you so much, the only change i made is from Write #2, oLine to Print #2, oLine And that's because if I need to open an already good list the "Write" code would add extra "" in the line. Thanks once again, Margarit :)

hi again, sorry to keep bothering but I add it like this and it doesn't give me expected result: Do While Not EOF(1) Line Input #1, myLine myCounter = 1 Do While myCounter <= Len(myLine) If Mid(myLine, myCounter, 6) = "tvg-id" Then...

Hi, Yes it works for the tvg-name, sorry, I was doing something wrong there. It works just fine :) I just need probably to do the same for all the other bits in the line then? Any suggestion on that? :) Thank you

well if you save it from Notepad++ it works just fine, it becomes formatted just like the Good List, but I was wondering if we could find a way on how to parse it when it is not formatted.. It may be too much to ask, I don't know.. Regards, Margarit

But how?? :) I cannot get it to do this the the Not Good List, what did you change in the code to make it work for that? I've been trying so get it work with no luck until now. :)

I would like it to be like the one in the picture below: So they are separated like that and i can edit or delete the ones I don't need. Thanks :)

I tried your suggestion but still no luck :( does anyone have any idea on how could I split the text in the .txt file from this: #EXTINF:-1 tvg-id="" tvg-name="------|France|------" tvg-logo="" group-title="France",------|France|-----http://www.WebServer.com/UserName/Password/2866 to this...

You get it as a link from your IPTV provider. But they tend to give you the full list of channels(which I don't want). That's why I need to open it with access, so I can edit the groups or channels and keep the ones I want, and then save them in a new file and upload it on my tv.

I'll give it a try later and see. :) Thank you

check the naming probably... Course = DLookup("[Level]", "[Tbl_Level]", "[ID]=" & Me![Course]) ambiguity with the name "Course" maybe?

I'm using something like this too in my db and it works just fine strCriteria = "[DeviceID]=" & Me![DeviceID] DevInstr1Operator = DLookup("Operator", "tblDeviceDestrInsp1", strCriteria) Hope it helps

I'd try : Course = DLookup("Level", "Tbl_Level", "ID= " & Me.Course)

I have tried it in but need to have delimiters in the lines. Yes but how to replace all the text in thousands of lines? that's where I got stuck. ( sorry, newbie here :) ) Probably I'll separate the lines to add CR characters right before #EXTINF.

Yes it is the exact same one but I'm just having a hard time to parse it :( . Regards, Margarit

Hi All, I'm trying to build a text parser for editing my IPTV playlist (as it has thousands of channels that I don't want). They usually are spreaded within Lines in a good format, like this: #EXTM3U #EXTINF:-1 tvg-id="" tvg-name="------|France|------" tvg-logo=""...

I've been working recently in a project where I had to get User's info from Active directory. Had to create a class to call them easy. Though maybe someone will find it useful. Option Compare Database Option Explicit 'Get User info that is stored in the Active Directory 'First, you must set a...

Probably will need to use something like this: Option Compare Database Option Explicit 'Dim strFilter As String 'Dim strInputFileName As String ' 'strFilter = ahtAddFilterItem(strFilter, "Excel Files (*.XLS)", "*.XLS") 'strInputFileName = ahtCommonFileOpenSave( _ ' Filter:=strFilter...

I'm glad it worked.. happy to help. Cheers, Margarit

try this in a new module, I've converted it to x64 and it's working just fine for me: and call the function like: or: hope it helps, Cheers, Margarit

I use this code on a button: