I am trying to return a vb2010 dictionary to vbscript. I posted this to the vbscript forum with no luck, so I thought I would try here.The code for vb2010 is below, and works fine within VB2010:
Public Function TestDictionary() As Dictionary(Of String, String)
Dim dic As New Dictionary(Of String, String)
dic.Add("1", "Tval1")
[code].....
I want to group items from a linq query under a header, so that for each header I have a list of objects that match the header title. I assumed the solution would be to use ToDictionary to convert the objects, but this allows only one object per "group" (or dictionary key). I assumed I could create the dictionary of type (String, List Of()), but I can't figure out how to write it. As an example I have written a simplified version below.
[Code]...
I'm developping an ASP.NET application, and I need to use an old VBScript file that would be really hard to translate into pure VB in a VB function.
This VBScript is supposed to return an array that I'd like to use it in the VB function that called it.
How could I call the VBScript function in my VB application and use the value it returned?
I've search how to do so through many forum and FAQ, but it seems that these results where mainly focused on old version of the .NET framework.[code]...
Ok, here is the problem,in vbscript, i was reading parts of streams
i.e.
teststrid = left (strLine,8)
teststrnm =rtrim( mid (strLine,15,30))
teststrx = mid (strLine,57,8)
teststr = left (strLine,3)
strFormcode = left (strLine, 10)
strSymmetrycode = left (strLine,14)
strSigncode = left (strLine, 10)
Even in cases that strLine length was less than the index used to split the string, the program kept running.Now i am trying to do the same in VB.net, but since the strLine is not always bigger than the index used to break the string, it ives an error.I do not want to use try catch, because i will have very dirty and uselless code.
I was thinking something like resume next, but i guess it doesnt exist anymore.
Following code properly populates "wksSheetNames" Dictionary
Dim wksSheetNames As New Dictionary(Of String, String)
For Each Wks In xlsWB.Worksheets
Wks.Activate()
wksSheetNames.Add(xlsApp.ActiveSheet.codename, xlsApp.ActiveSheet.name)
Next
For example assume the code logic is correct (I know that the syntax is not correct)If wksSheetNames.(Key="Sheet2", Value="Inventory") then Stop What is the correct VB.Net syntax to "Stop" in the above line?
I know I can do this with a for loop cause that's how i'm doing it now. I was hoping for a more efficient way to accomplish the task.
I have a dictionary(Of Integer, Boolean) or Of String, Boolean. i want to get a list(of integer) or Of String from the dictionary where all the values are true(or false depending on what i need at the time)
and to generalize it or "black box" it, it could be any dictionary(of whatever, whatever) and return a list(of whatever) where the value = whatever i'm looking for at the time.
string, string where value = "Closed"
in short: i want all list of all the keys who's value = some criteria
my current code:
Public Function FindInDict(Of tx, ty)(thedict As Dictionary(Of tx, ty), criteria As ty) As List(Of tx)
Dim tmpList As New List(Of tx)
[Code].....
I have been struggling to get vbscript working for last three days of relentless effort. I have windows 7 ultimate and upgraded from windows vista. searched the web for solutions and tried out all the options I think I have, but yet no luck.
I tried registering vbscript.dll and I get a succeeded message back. Everything seems to be fine. but, I just cannot run vbscript on my computer. It complains that "can't find script engine vbscript for script ....". I have a hunch that it is something to do with "microsfot security essentials (my virus protection software)" or with UAC.
I have the following web method:
<WebMethod()> _
<ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=True, XmlSerializeString:=True)> _
[Code].....
I wanted to use HttpGet here so that the result can be cached.
I tried every variation of calling this, but no luck. Is this possible with GET?
I have created a class with a function in it. I have a collection of data I want to pass back. I tried an arraylist first. Now I am trying to use a dictionary. My problem is that it creates the dictionary ok, but I am only get the last row of data from my
Function GetWeldAuditInfo(ByVal ResourceId
As
String,
ByVal VendorId
[CODE].........................
I have the following object:
countDictionary As Dictionary(of Category, Dictionary(of Date, Integer))
The Class has a Enumeration Property. For the purposes of demonstration, I'll call it MasterCategory.I have been trying to get out an object that looks like the following:
groupedCountDictionary As Dictionary(of MasterCategory, Dictionary(of Date, Integer)
The best result I could get was:
Lookup(of MasterCategory, Dictionary(of Date, Integer))
From:
countDictionary.ToLookup(Function(o) o.Key.MasterCategory, Function(o) o.Value)
Which results in a IEnumerable (Of Dictionary(of Date, Integer)) for each MasterCategory value.However, I need that IEnumerable of Dictionary flattened to one dictionary with all the integers summed (total counts) for each date. I then tried to use various selects and group bys (from numerous stackoverflow posts) to "flatten" it, but my efforts have fallen short.
Current Code
[Category Class]
- MasterCategory As Enum
- Name As String etc
[code]....
I have created a Dictionary class (MyDictionary for the example). I am currently trying to pass MyDictionary into a function, filter it into a new instance of MyDictionary and pass this new instance into another method. When I am attempting to create the second instance from the filtered first instance of MyDictionary via Lambda Expressions and the ToDictionary Method, I am getting the following error:
Unable to cast object of type 'System.Collections.Generic.Dictionary`2[System.Int32,System.String]' to type 'MyDictionary'. I have simplified the example and recreated it in LINQPad and am getting the same error.
Here's the simplified version of my code:
[Code]...
I use VS2005 and I have just started working with the dictionary in particular the Dictionary.ContainsKey method. At the bottom of the page in the msdn library it says the following in the community content How to make sure that Contains functions properly.
View 3 RepliesHow to call a function in vb.net DLL from VBScript?I did the following: I create public class named Class1 in vb.net.I go to Visual Studio 2008 Command Prompt and go to my class dll - C:MyappinDebug and type following command tlbexp myDLL.dll after that i get message Assembly exported to C:MyappinDebugmyDLL.tlb After this I type following command regasm myDLL.dll and i get following message RegAsm : warning RA0000 : No types were registered
[Code]...
I use this code to return records in a DataGridView:
[Code]....
Is there any tool to convert VBscript code to VB.net Code or C#.net?this is the sample code I want to convert it
Dim googleTime, googleDt, googleScheme
googleTime = DateDiff("s", "01/01/1970 00:00:00", Now())
googleDt = (1000 * googleTime) + Round(1000 * (Timer - Int(Timer)))
googleScheme = "http://"
googleUserAgent = Server.URLEncode(Request.ServerVariables("HTTP_USER_AGENT"))
If StrComp(Request.ServerVariables("HTTPS"), "on") = 0 Then googleScheme = "https://"
for example Timer in VBscript I did not find any equivalent in VB.Net
how to convert from vbscript to vb.net im trying to convert the TestGenericHid.wsf script to vb.net (wheter partially or fully but im fur sure trying to do the initialization sequences) but usually the development team of a ms sdk posts it in managed code like c# or vb.net. If someone has already converted this please post but i have attemped myself to do this already but cant get any straight responses from vb.net interop guys or wdk guys so here is the full code sample:url..Once you eliminate the impossible, whatever remains, no matter how improbable, must be the truth. - "Sherlock holmes" "speak softly and carry a big stick" - theodore roosevelt.
View 1 RepliesI wish to convert the vbscript below to vb.net. Note: the functions from the script are also in a dll file but you can install the dsf runtime which comes with the windows ddk and just use the com component it installs from vb.net.
View 11 RepliesJust need help converting this .bat to vbscript. cd
[Code]....
Just need it to go to each user names directory when logging into a terminal server and removing all items in there respective folder. I'm assuming to user the UserString where the "user.name" is but not sure how to do this.
How come the Script below keeps displaying the Else message until it finds the string? I was expecting for it to display 1 single Box whether it was found or not? why does it keep itterating through the Else condition?
Dim myArray,myString,myString2,intCount
myString = "my;string;question;hope;you;can;answer"
myString2 = "question"
[code]....
The VB application I am creating runs a external vbscript. The vbscript is run using cscript.exe so the output text from the script is in the CLI. I need this outputted text to be in a ListBox is my application
View 2 RepliesI'm working up a system where I plan on using RealProxy objects to enable intercepting method calls against a set of objects, handling the call, and then returning appropriate results. This works just find for simple return types like strings or ints, but I can't seem to return objects from the RealProxy.Invoke method. Everything works. I get no errors, but the returned value is always NOTHING, instead of an object.
I've worked up the smallest sample code I could, and have included it below. Essentially, just call RPtest and single step through. The code creates a simple object, RPTestA, with a string field and an object valued field It then retrieves the string
[Code]...
How would I go about copying every value of one Dictionary list to another Dictionary list.
Here is what I've done:
VB.net
' Assign values to player pairs enumeration
Private Enum cmptrPairsList
empty = 0
[code]....
I have a DetailsView that I am using to insert an enrollment form into the database. Currently every functions fine, with one exception. Since there is a terms and agreement checkbox at the bottom of the form that I cannot validate using the existing validation controls, I'm trying to handle this in the VBScript.The problem is that the InsertCommand in my ASP executes before the Button_Click sub does, so the form is submitted before the checkbox validates. Can someone tell me how to move the InsertCommand from the ASP to the code file so that I can make sure it doesn't execute until AFTER my button validation? Here is my code:
[Code]...
When I try to run an embedded vbscipt i get the follwoing error:
[Code]...
I have this snippet of VB.NET code that I want to convert to VBScript. It basically starts Microsoft Word, displays the Open dialog and mail merges the selected document.
Dim oMissing As Object = System.Reflection.Missing.Value
Dim oEndOfDoc As Object = "\endofdoc"
Dim oFalse As Object = False
'Start Word and create a new document.
Dim oWord As Word._Application
Dim oDoc As Word._Document
[Code]...
I canīt create a tunnel vpn. I have searched on the web but I havenīt found nothing.
View 4 RepliesI have a process by which I push icons to distant Vista based PCs on our domain...it's all automated. One of these itemsis a shortcut (call it MYLINK.LNK) which I put in the user's Start Menu. That shortcut calls a .WSF script that, in turn, runs a JScriptfollowed by a VBScript.The JScript installs a commercial product and the VBScript is used to clean up after itself. One of those 'clean up' jobs is to delete the icon that kicked off this entire thing.
So I have :
Set objFSO = CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFile("C: empstartload.wsf")
[code]....
Len gives # of chars in a string in VBScript but I'm trying to find out how to get a # of words, instead.sub fred john_val=window.document.alice.john.value john_len=len(john_val) msgbox "john=" +cstr(john_len) end sub
View 3 RepliesI recently figured out how to successfully register a .NET dll as a COM dll, however when I call it from VBScript using CreateObject I get this error:
[Code]...
An application I maintain has been around since VB6 days - ported to .Net 1.1, and now being updated/rewritten across to .Net 3.5 The application provides a mechanism to run VBScripts - this was done in a highly integrated way - allowing the program to parse multiple .vbs files and produce a list of all of the subroutines and functions - which were then available within the application alongside core functions.
Previously this was an embedded msscript.ocx - in the first .Net conversion, this was wrapped in Interop.MSScriptControl.dll, however, on Windows 7 this just isn't working. It looks like this is really not the way to be doing this anyway - Microsoft seem to be trying to kill vbscript.
Is there a 'supported' way of using VBScript, or is it time to move on? and if so, where is there to move to that provides the same sort of functionality?