TypeCode

[DragonLord]

Ok here is the situation i am porting a project from vb.net to C# and i have the following issues and i don't know how to resolve them.

VB.NET

 
Public Class TextFieldEnumerator
Inherits Object
Implements System.Collections.IEnumerator
Private iEnBase As System.Collections.IEnumerator
Private iEnLocal As System.Collections.IEnumerable
''' <summary>
''' Enumerator constructor
''' </summary>
Public Sub New(ByVal texMappings As TextFieldCollection)
MyBase.New()
Me.iEnLocal = CType(texMappings, System.Collections.IEnumerable)
Me.iEnBase = iEnLocal.GetEnumerator
End Sub
''' <summary>
''' Gets the current element from the collection (strongly typed)
''' </summary>
Public ReadOnly Property Current() As TextField
Get
Return CType(iEnBase.Current, TextField)
End Get
End Property
''' <summary>
''' Gets the current element from the collection
''' </summary>
ReadOnly Property System_Collections_IEnumerator_Current() As Object Implements System.Collections.IEnumerator.Current
Get
Return iEnBase.Current
End Get
End Property
''' <summary>
''' Advances the enumerator to the next element of the collection
''' </summary>
Public Function MoveNext() As Boolean
Return iEnBase.MoveNext
End Function
''' <summary>
''' Advances the enumerator to the next element of the collection
''' </summary>
Function System_Collections_IEnumerator_MoveNext() As Boolean Implements System.Collections.IEnumerator.MoveNext
Return iEnBase.MoveNext
End Function
''' <summary>
''' Sets the enumerator to the first element in the collection
''' </summary>
Public Sub Reset()
iEnBase.Reset()
End Sub
''' <summary>
''' Sets the enumerator to the first element in the collection
''' </summary>
Sub System_Collections_IEnumerator_Reset() Implements System.Collections.IEnumerator.Reset
iEnBase.Reset()
End Sub
End Class
 

C# converted code :

public class TextFieldEnumerator : TypeCode, System.Collections.IEnumerator
{
private System.Collections.IEnumerator iEnBase;
private System.Collections.IEnumerable iEnLocal;
// '' <summary>
// '' Enumerator constructor
// '' </summary>
public TextFieldEnumerator(TextFieldCollection texMappings)
{
this.iEnLocal = ((System.Collections.IEnumerable)(texMappings));
this.iEnBase = iEnLocal.GetEnumerator;
}
// '' <summary>
// '' Gets the current element from the collection (strongly typed)
// '' </summary>
public TextField Current
{
get
{
return ((TextField)(iEnBase.Current));
}
}
object System_Collections_IEnumerator_Current
{
get
{
return iEnBase.Current;
}
}
public bool MoveNext()
{
return iEnBase.MoveNext;
}
// '' <summary>
// '' Advances the enumerator to the next element of the collection
// '' </summary>
bool System_Collections_IEnumerator_MoveNext()
{
return iEnBase.MoveNext;
}
// '' <summary>
// '' Sets the enumerator to the first element in the collection
// '' </summary>
public void Reset()
{
iEnBase.Reset();
}
// '' <summary>
// '' Sets the enumerator to the first element in the collection
// '' </summary>
void System_Collections_IEnumerator_Reset()
{
iEnBase.Reset();
}
}
 
 
 

AND number 2.....

.NET

Public Property DataType() As TypeCode
Get
Return _dataType
End Get
Set(ByVal Value As TypeCode)
_dataType = Value
End Set
End Property
 
C#
 
public TypeCode DataType
{
get
{
return _dataType;
}
set
{
_dataType = value;
}
}
 
 

The C# doesn't work because it doesn't recognize TypeCode for both converstions, what can i replace the Typecode with in C# to get this working ? Any help someone can offer would be appreciated for this newbie!!

[Shashi Sadasivan]

Have you set your editor setting in the control panel (of tsdn) as enhanced mode?

Need a moderator / admin to change your code...cant follow it. Once thats done decypering it will be easier :D unless u plan to manually remove all the size and color tags

[Killer42]

I would have a go at fixing it, but I have no idea what all the <summary> tags mean.

[Shashi Sadasivan]

I would have a go at fixing it, but I have no idea what all the <summary> tags mean.

Arent those xml comments?
except the '' will have to be removed and replaced by ///

[Killer42]

Arent those xml comments?
except the '' will have to be removed and replaced by ///

Since I have no idea what you mean, I'd better not touch it.

[DragonLord]

it should look fine now i did it in notepad and removed all the tags

[DragonLord]

oh those tags, forget those they are in the comments. i am just focusing on the lines that use TypeCode as a datatype it is a vb .net data type and i have no idea how to replace it in C#

[DragonLord]

C#:

public TypeCode DataType

VB .NET:

Public Property DataType() As TypeCode

The VB.Net one is fine it works but I want to use C# so i used a converter and it gave me the above... however TypeCode is not recognized by the C# compiler so what do i replace it with????

[Shashi Sadasivan]

typecode is not a datatype, its an enumerator

[Plater]

Is TypeCode used to pass in a a DateType? Like in the days of c++ myclass<T> kinda deal?
Just try using Type

[DragonLord]

Is TypeCode used to pass in a a DateType? Like in the days of c++ myclass<T> kinda deal?
Just try using Type

See told you I was a newbie and yes i believe it is used to pass in a datatype.

[Plater]

Well I'm not sure hot to fix this:

public class TextFieldEnumerator : TypeCode, System.Collections.IEnumerator
 

But this would be like:

public System.Type DataType
{
   get
   {
      return _dataType;
   }
   set
   {
      _dataType = value;
   }
}
 

[DragonLord]

OK how could we write this:

[DragonLord]

OK how could we write this:

VB .NET
Public Class TextFieldEnumerator
Inherits Object
Implements System.Collections.IEnumerator
Private iEnBase As System.Collections.IEnumerator
Private iEnLocal As System.Collections.IEnumerable

in C#??

[Plater]

this didn't work?

public class TextFieldEnumerator : object, System.Collections.IEnumerator 
{ 
    private System.Collections.IEnumerator iEnBase; 
    private System.Collections.IEnumerable iEnLocal; 
} 
 

[DragonLord]

Thanks Plater,

leaves me with this error in at runtime

Error 1 'TextFieldCollection.TextFieldEnumerator' does not implement interface member 'System.Collections.IEnumerator.Current'. 'TextFieldCollection.TextFieldEnumerator.Current' is either static, not public, or has the wrong return type. C:\Users\Dale\Downloads\Documents\Visual Studio 2005\Projects\CIMImporter\CIMImporter\TextFieldPar ser.cs 649 17 CIMImporter


But it fixed the other one's lol... getting closer.

[r035198x]

Thanks Plater,

leaves me with this error in at runtime

Error 1 'TextFieldCollection.TextFieldEnumerator' does not implement interface member 'System.Collections.IEnumerator.Current'. 'TextFieldCollection.TextFieldEnumerator.Current' is either static, not public, or has the wrong return type. C:\Users\Dale\Downloads\Documents\Visual Studio 2005\Projects\CIMImporter\CIMImporter\TextFieldPar ser.cs 649 17 CIMImporter


But it fixed the other one's lol... getting closer.

Implementing an interface is the same as signing a contract which says that "I swear to implement all the methods defined in that interface otherwise I'm going to declare that I'm abstract"

[Plater]

You are claiming to use the interface, but have not implemented all the required methods.
http://msdn2.microsoft.com/en-us/lib...r_members.aspx
Implement the one it says and try it out.

[DragonLord]

Thanks Plater you have been super helpful and using someone elses code sure makes learning a little easier... I was confused by that error because of this..


object System_Collections_IEnumerator_Current
{
get
{
return iEnBase.Current;
}
}

aparently the translator I used doesn't speak a very good c# lol it should have been


object System.Collections.IEnumerator.Current
{
get
{
return iEnBase.Current;
}
}


I looked a little harder because I knew i had the implementation there lol.

[DragonLord]

Plater I have another bump, in vb.net i have the following



Imports System.Data
Imports System.Data.SqlClient
Public Class Order
Inherits DataServiceBase
Public Sub New()
MyBase.New()
End Sub
Public Sub New(ByVal trans As IDbTransaction)
MyBase.New(trans)
End Sub

Public Function InsertOrder(ByVal xmlStr As String) As Integer
Dim OrderNo As Integer = -1
Dim param As SqlParameter = CreateParameter("@lNewOrderID", SqlDbType.Int, OrderNo, ParameterDirection.Output)
ExecuteNonQuery("sp_TracksOrders_Import", CreateParameter("@xsDetails", SqlDbType.VarChar, xmlStr, 6000), _
param)
OrderNo = param.Value
Return OrderNo
End Function
End Class

The line that is giving me trouble in the conversion is
------ Inherits DataServiceBase

The c# code comes out like this but it doesn't recognize DataServiceBAse

using System.Data;
using System.Data.SqlClient;
public class Order : DataServiceBase
{
public Order()
{
}
public Order(IDbTransaction trans)
:
base(trans)
{
}
public int InsertOrder(string xmlStr)
{
int OrderNo = -1;
SqlParameter param = CreateParameter("@lNewOrderID", SqlDbType.Int, OrderNo, ParameterDirection.Output);
ExecuteNonQuery("sp_TracksOrders_Import", CreateParameter("@xsDetails", SqlDbType.VarChar, xmlStr, 6000), param);
OrderNo = param.Value;
return OrderNo;
}
}

[DragonLord]

ignore above i was missing a class.

[Plater]

Can you help me understand what they are trying to do with the following declaration:


Private _delimiter As Char = Convert.ToChar(",")
it works fine in vb.net but when i try to convert it in C# it tells me it cannont convert to type char from type char.

I don't know why the go the long way in that statement. "." is a string containing a period '.' is character that is a period. Double-quotes are used for strings, single-quotes for characters.
The end result of that statement would be this:
private char _deliminator = '.';

[DragonLord]

I don't know why the go the long way in that statement. "." is a string containing a period '.' is character that is a period. Double-quotes are used for strings, single-quotes for characters.
The end result of that statement would be this:
private char _deliminator = '.';

Your kidding me all that nonsense to declare and set a variable?

[Plater]

oh umm that might be a comma and not a period inside there. My font is really small and I can't tell the difference.

[DragonLord]

Thanks I knew what you meant....

How about this

DataFile.TextFields.Add(new TextField(FieldName, TypeCode.Int32, Quoted));


This is what the translator shot back but it doesn't like the Typecode.Int32 and I tried to investicate the System.Type but that didn't work...

Any thoughts?

Thank God for you amazing people out here for us newbies to sap the knowledge out of!!!

[Plater]

Maybe:
DataFile.TextFields.Add(new TextField(FieldName, Typeof(Int32), Quoted));

[DragonLord]

Yes sir seemed to like that but now it is grumbling about DataFile I looked it up and the namespace is

Namespace: Microsoft.SqlServer.Management.Smo
Assembly: Microsoft.SqlServer.Smo (in microsoft.sqlserver.smo.dll)

I tried to add it:

Using Microsoft.SqlServer. (only option is Server)

[Plater]

Well I dunno what DataFile is, but SqlServer stuff is:
System.Data.SqlClient


Is this it?
http://msdn2.microsoft.com/en-us/lib....datafile.aspx

[DragonLord]

good Question this is what i found

http://technet.microsoft.com/en-us/l....datafile.aspx

[Plater]

You probably need to add a reference to the .dll -> microsoft.sqlserver.smo.dll
Go to references and Add and then look for it, it's under the .NET tab, you would search by it's namespace name. I found it in mine at least.

[DragonLord]

Ah see I learned something new today, thank-you so much for your patience. However, I must have the wrong one because it doesn't contain any of the methods the old code is using lol.

[DragonLord]

Ok another vb convertion messup....

if (!(input[x]==null)) <---------------

where input is a string array ...... ref string input[]

it keeps telling me it is a variable in the if statement used as a method, i understand what it is doing however i am not sure how to correct the implementation.

[Plater]

What is the VB code and what is the proposed C# code?

if (!(input[x]==null))
would be more likely written as:
if (input[x]!=null)

provided that input is an array:
<sometype>[] input = new <sometype>[<size>];

[DragonLord]

[font=Arial]Below is another issue, basically everything i can work with except the [/font]

The Dim statement I am not sure what it is doing with rawFields() is this not a method of runction... it is pulled from the Utilities.Text.Parsing namespace...


[font=Arial] Private Function GetFieldArray(ByVal fileRecord As String) As Array
Dim fields As Array = Nothing
Select Case Me.FileType
Case FileFormat.Delimited
' split the fields
Dim rawFields() As String = fileRecord.Split(Convert.ToChar(Me.Delimiter))
' recombine any with quotes
RecombineQuotedFields(rawFields)
' remove the extra elements
ExtractNullArrayElements(rawFields, fields)
Case FileFormat.FixedWidth
Dim rawFields As New ArrayList
Dim mark As Int32 = 0
For x As Int32 = 0 To _textFields.Count - 1
' extract the value and move the book mark
rawFields.add(fileRecord.Substring(mark, _textFields(x).Length))
mark += _textFields(x).Length
Next[/font]
[font=Arial] fields = rawfields.ToArray
Case Else
Throw New ApplicationException("The specified FileType is not valid.")
End Select
Return fields
End Function[/font]

[Plater]

I think there were some types on that (you had two objects called rawFields and no object called _textFields)

private Array GetFieldArray(string fileRecord) 
{ 
    Array fields = null; 
    switch (this.FileType) 
    { 
        case FileFormat.Delimited: 
            // split the fields 
            string[] _textFields= fileRecord.Split(Convert.ToChar(this.Delimiter)); 
            // recombine any with quotes 
            RecombineQuotedFields(rawFields); 
            // remove the extra elements 
            ExtractNullArrayElements(rawFields, fields); 
            break; 
        case FileFormat.FixedWidth: 
            ArrayList rawFields = new ArrayList(); 
            Int32 mark = 0; 
            for (Int32 x = 0; x <= _textFields.Count - 1; x++) 
            { 
                // extract the value and move the book mark 
                rawFields.add(fileRecord.Substring(mark, _textFields[x].Length)); 
                mark += _textFields[x].Length; 
            } 
 
            fields = rawfields.ToArray(); 
            break; 
        default: 
            throw new ApplicationException("The specified FileType is not valid."); 
            break; 
    } 
    return fields; 
} 
 

[DragonLord]

One more issue I borrowed some files from another application and brought them inhouse under the same namespace (Good Idea? Bad Idea? not sure )

but regardless I have everything working except ......

TextFieldParser tfp;
//string filePath = Path.Combine(Path.GetDirectoryName(Application.Exe cutablePath), "Delimited.txt");
string filepath = myFilePath;
tfp = new TextFieldParser(myFilePath);
TextFieldCollection fields = new TextFieldCollection();
fields.Add(new TextField("Station", TypeCode.String, true));
fields.Add(new TextField("Reference", TypeCode.String, true));
fields.Add(new TextField("Name", TypeCode.String, true));
fields.Add(new TextField("Address 1", TypeCode.String, true));
fields.Add(new TextField("Adress 2", TypeCode.String, true));
fields.Add(new TextField("City", TypeCode.String, true));
fields.Add(new TextField("ST", TypeCode.String, true));
fields.Add(new TextField("ZIP", TypeCode.Int32));
fields.Add(new TextField("PH", TypeCode.Int32));
fields.Add(new TextField("Alt. PH", TypeCode.Int32));
fields.Add(new TextField("Waybill", TypeCode.String, true));
fields.Add(new TextField("Notes 1", TypeCode.String, true));
fields.Add(new TextField("Notes 2", TypeCode.String, true));
fields.Add(new TextField("Date", TypeCode.String, true));
tfp.TextFields = fields;


[BOLD] tfp.RecordFailed += new RecordFailedHandler(tfp_RecordFailed); [/BOLD]

This line throws an error no matter where it is daying "does not exist in current context" should i change the namespace back to the orginal and just include it with the using clause or is there a way to fix this as is???

[Plater]

tfp.RecordFailed += new RecordFailedHandler(tfp_RecordFailed); 
 

Is how you attach event handlers. This is looking for the function called "tfp_RecordFailed" so it can use it for the RecordFailed event.
You will need to copy that function over as well.

[DragonLord]

Thanks I am learning alot with this little project of mine,


one more question in c# what is the best way to get the ascii value of a char(x)

[Plater]

Maybe I am thinking to fast but this should work:

char mychar='x';
int asciivalue=(int)mychar;
 

[DragonLord]

[font=Arial]
Orginal VB.NET

Dim OrderNo As Integer = -1
Dim param As SqlParameter = CreateParameter("@lNewOrderID", SqlDbType.Int, OrderNo, ParameterDirection.Output)
ExecuteNonQuery("sp_TracksOrders_Import", CreateParameter("@xsDetails", SqlDbType.VarChar, xmlStr, 6000), _
param)
OrderNo = param.Value
Return OrderNo

VB.NET Function

Protected Sub ExecuteNonQuery(ByVal procName As String, ByVal ParamArray paramList() As IDataParameter)
Dim cmd As SqlCommand = Nothing
ExecuteNonQuery(cmd, procName, paramList)
End Sub


problem is when i convert this to C# it is not creating a parameter list and instead goes to another fucntion that is an overload with 3 parameters.

any thoughts how to redo this in c#.. basically i just need guidence on passing it with a parameter list


i.e.

ExecuteNonQuery("sp_TracksOrders_Import", parmeterlist??)[/font]

[Plater]

Protected Sub ExecuteNonQuery(ByVal procName As String, ByVal ParamArray paramList() As IDataParameter)
 

This should be like:

protected void ExecuteNonQuery(string procName, params IDataParameter[] ParamArray)
 

[DragonLord]

Sorry I was referring to the function call.


ExecuteNonQuery("sp_TracksOrders_Import", CreateParameter("@xsDetails", SqlDbType.VarChar, xmlStr, 6000), _
param)

This comes from a different class calling the ExecuteNonQuerey as you described above but as you can see it has or at least it thinks it has 3 parameters instead of a string and a parameter list...

this ends up going straight to another overload function ExecuteNonQuery(cmd,procname,paramlist)

any thoughts?

[Plater]

This call:

ExecuteNonQuery("sp_TracksOrders_Import", CreateParameter("@xsDetails", SqlDbType.VarChar, xmlStr, 6000), _param)
 

certainly seems like it fits into the (string, params[]) format to me?

IDataParameter temp =CreateParameter("@xsDetails", SqlDbType.VarChar, xmlStr, 6000);
//somewhere else another IDataParameter is defined as "param"
ExecuteNonQuery("sp_TracksOrders_Import", temp,param);
 

That would call that ExecuteNonQuery(string, params IDataParameter[] myparams); function?

[DragonLord]

Thanks I found the problem because of that post, turns out the translator i used went and put



sqlparameter param = xxxxxx

and that was where the problem was arrising once i did it as above it corrected the problem now i have to troubleshoot the connection lol... it just never ends!!!

[DragonLord]

Ok one more question

I am new to event handling in C# and here is the situation

I believe I have all the parts, I have the deligate named recordhandler
the class with the ations to be taken

in the class that is calling it though (rasing the event so to speak) how to i tell it to call it.

if (RecordFound != null)
RecordFound(ref currentLineNumber, m_TextFieldSchema.TextFields);
m_CurrentLineNumber = currentLineNumber;



Record found in the try block is always null even though it is doing it's thing... how do i tell it before it gets to the if statement that a record was found?

Thanks
Dale.
[/size]

[Plater]

Are you wondering how to trigger your custom event?

Here's a slimmed down version of what I use for one of my things

public delegate int RequestReceivedHandler(Socket RequestingSocket, Request TheRequest);
public class HttpListener
{
   /// <summary>
   /// The even for when HttpListener has received a request and read the data
   /// </summary>
   public event RequestReceivedHandler RequestReceived;
 
   public void MockFire()
   {
      Socket mySocket;//fake
      Request myRequest;//fake
      int retval = RequestReceived(mySocket, myRequest);//fire the event
   }
}
 

[DragonLord]

[size=2]tfp.RecordFound += new RecordFoundHandler([/size][size=2]tfp_RecordFound);[/size]
[size=2][/size]
[size=2]Thanks, that sample helped I was missing this from the originating class.
[/size]