working with: ASP.net using VB.net connecting to MS SQL Server
What I'm trying to do is take the result of a SQL select query and place that in a string variable so it can be used in things like a textbox or label. code so far that doesn't work...
Imports System.Data.SqlClient
Partial Class dev_Default
Inherits System.Web.UI.Page
Protected Sub form1_Load(ByVal sender As Object, ByVal e As System.EventArgs)
[Code].....
I am using OleDb, trying to do this:
Dim d as Date = DateSerial(Year(rptDate), Month(rptDate), 1 - 1)
Dim conn as OleDbConnection = new OleDbConnection(connStr)
Dim cm as OleDbCommand = new OleDbCommand()
[code]....
I know that d is the same date as the one in SQL server, specifically 3/31/2011 12:00:00 AM.
1. How to return the variable name itself? Public Class test Public Shared as String = "111" End Class I want to return AAA but no 111, test. = "111", and test. Tostring = "111"
2. I want to join the space char into the variable, for example A B but no AB, how to do?
I just wonder if it is possible to simply check if the objectdatasource.select() returns any rows?e.g.
If ObjectDataSourceM.Select().GetEnumerator Is Nothing Then
'..
End If
I understand that DataTable.Select() returns an array of rows. I just want to know whether these is a way to get the row indexes as well.
View 4 RepliesI am developing a code to open up a .dbf file and append data to a access database.Here is my code for opening the .dbf file.
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim constr As String = "Provider=VFPOLEDB.1;Data Source=F:JUNO4.dbf;Persist Security Info=False;"
Dim con = New OleDbConnection(constr)
Dim da = New OleDbDataAdapter("Select UNIQUE_ID FROM JUNO4", con)
[code]....
this code gives an empty datagrid.
I have the following code that loads an XML file into a datatable (I went this route because I do not know how to query XML directly). I want to use the Select method to return a row where "age = 72". However, I can't seem to get this to work. Also, if there is a better way to search through a datatable for specifc values that would not require iterating through the whole table to get the results
Imports System.Xml
Module Module1
Sub Main()
[Code]....
This is my simple code that calls a function from a class I created called "clsNetwork". The function simply pings a computer from a computername I pass it and returns the results.
Dim PingStatus As String
PingStatus = clsNetwork.PingComputer(ComputerName)
txtbox.text = PingStatus
I'm having the datatable with three columns, i need to return the rows in which the third column having the null values.
ie., I need to do like this below mentioned coding,
Dim rows As DataRow() = ds.Tables("Tablename").Select("col3 is null")
Is it possible? if no, anyone tell me the way to get the results.
I was wondering if there's a way I can make my objects return their own variable name as a string, something like this:
Public Class MyClass
Public ReadOnly Property VariableName() As String
Get
[Code]....
Is this possible? I'm fairly sure it should be possible through the System.Reflection namespace, but I can't figure it out.
I wrote the following two functions in a class to take a gpib reading and also take a measurement from an LCR meter.
HTML
Public Function gpibRead(ByVal Channel As Integer, ByVal buffer As Integer) As String
Dim readingBufferA1 As String
Select Case Channel
Case 1
readingBufferA1 = gpibLCRA1.ReadString(buffer)
Return readingBuff
[Code] .....
When on the main form I call the funtion takeMeasurement(1) how can I get the LCR readings back. If I try and use readingBufferA1 on the mainform it doesn't recognize that as a variable. I know that it is taking the reading and storing the correct numbers because I am monitoring on NI Spy.
Can't seem to figure out how to use a function return variable in global Dims[code]...
I have also tried adding "FixPath()" under Sub On_load() but got same result. Also the reason I have to have these global is because I have around 30 Subs that refer to "Path" Variable.
I am writing a program with multiple forms (for inputing loan/financial information - so they are set up exactly the same albeit a form number (ie: 1-6)) that feed into a summary page form to display each individuals form's information. When the user closed a financial form, it then feeds the information to a summary page using the code I have below: [Code]. I am new to working with functions, and have not been able to find anything that can show me how to fill multiple textboxes with them (I only know how to return a variable using the function to work a calculation). Any way that I can write a function (or any other call) for this would save me a tremendous amount of coding, and make debugging worlds easier.
View 3 Repliesexcuse my stupidness, i'm fairly new to VB and i've only done a little bit with it before. Basically i am making a little application that i want to run on my machine. Standalone not via a web browser.I have a web page which is generated using php, there is no html code on the page simply a number, e.g. "9995" when you view source.
All i want to do is return this value from the web page (without actually opening the page in a browser) and display it in a text box in VB or store it as a variable that i can use later. point me in the correct direction or right keywords to research, or if you have a simple example that would be even better
I don't know if this is the best way to do it or not but here goes.I have an access database and a datagridview and they link via a SELECT statement at runtime.I want to total one column named LNLMTS and display the result.I am looking at using SELECT Sum LNLMTS FROM tblProduction WHERE SO=@so AND DATE=@date
View 8 RepliesI keep getting an error saying "there is an error in your sql syntax." when i use this sql statement:SELECT * FROM gsm_oceanwide_integrationEDIT:To put this in context heres the code im using this query statement in (VB.net):
Dim con As MySqlConnection = New MySqlConnection("Data Source=" & frmLogin.txtserver.Text & ";Database=stratocast;User ID=" & frmLogin.txtusername.Text & ";Password=" & frmLogin.txtpassword.Text & ";")
[code]......
Is it possible to replace these two functions
Function f1 (s As String) As class1()
Dim a() As String = Split(s)
Dim b(UBound(a)) As class1
[code].....
Say I've got the following variables:
Public Shared x As String = "100"
Public Shared y As String = "text"
Public Shared z As String = "something"
[Code]....
But this doesn't do what I want, naturally. What I want is that my function giveVar returns the value of the variable that holds giveVar. For example I call giveVar("x") I want my function to return "100".
Of course this can be done by a Select Case but thats not what I like to do. Is it even possible to call a value based on a string?
[edit:]
Namespace i18n
public NotInheritable Class Settings
Public Shared LanguageCode As String
[Code]....
I think this works so far, BUT I get the following error on the CallByName(Me, varName, vbGet) at the Me : "me is only valid within an instance method"
I am building a GUI for a touchscreen panel using VB2008 and am trying to set up a password change screen. I have an on-screen keypad set up so the operator can use it to enter the new/old password. How do I return the value from the key pressed to where the cursor is located?
View 8 RepliesWhen trying to register a new user on the server, the server will post back messages such as "OK" and "usernameTaken". Upon comparing this returned string with another string (to perform an action based on the returned value), the compare isn't working.
Dim backupX As New CBackup
backupX.startSocket("127.0.0.1", 8888)
Dim str1 As String = backupX.registerUser("user1", "testpass")
Dim str2 As String = "usernameTaken"
[code]....
Looks to be like the socket code is working just fine.. each Function returns the corresponding Functions' Return value (registerUser -> SocketSendAndReceiveMSG -> sendAndReceiveMSG -> receiveMSG).
When i press the button3, i want the webbrowser change site after how mutch the clock is. Is the clock between 9:00 and 17:30, the webbrowser is gonna change to swedish sites. If the clock is between 17:31 and 21:30, the webbrowser is gonna changes to american sites. But the webbrowser is only choose ONE swedish site and ONE american site. The problem is that the variable b does not save the value it has before.How to i make so the variable b saves the value it has before? b = b + 1 is gonna be first 1. Then if i press the button3 agin, it gonna be 2. and if the value is 3, it gonna be 1 agin.
PHP
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim changesSE(3) As String
Dim changesUS(3) As String
[code]....
It's often the case that I can write a nice tight little VB.NET function, and when it comes time to do the Return statement, it's really natural to just return the result of a quick calculation or a method call. However, this makes it difficult if I need to step through the debugger to see what is going to be returned from that Function. For example, take this simple method to illustrate the concept[code]...
View 3 RepliesI'm wondering whether its possible to have a function's return type and input arguments as a variable.
For example this function:Private Function MyFunction(ByVal argument1 As VariableType) As VariableType
[Code]...
What's best practice (in VB.Net):
Function GetSomething() as String
GetSomething = "Here's your string"
End Function
or
Function GetSomething() as String
Dim returnString as String = "Here's your string"
Return returnString
End Function
Obviously, neither of these implementations make any sense, but they're just meant to illustrate my point. Is there anything to be gained by using GetSomething itself to store the return value instead of declaring returnString locally and then returning that (does it avoid having an extra string allocated/instantiated - and if so, are there any performance/memory benefits)?
how can i return the number of records processed from an sql procedure whether it is a select or update/insert query and how can i receive it in the calling method in vb .net.
View 4 RepliesWith an excel file opened, i'm trying to:
Select a Range of Non-Contiguous Cells within a Column, then return the address of the last active cell.
Below, is what I have so far: Note the section maked:
' I can't get the next bit to work: '
To make it work, so far :(
1. Create a new Project using VS-2010.
2. By default, the form should be displayed as "Form1.vb".
3. Add a Label (No need to name or set anything).
4. Add two buttons (Again, No need to name or set anything).
5. Double click on the Form...
6. With the form code displayed, Select all, then paste the following.
'Option Strict Off
'Option Explicit On
Imports System.IO
[Code].....
I have a case where my enumeration is like this:
Public Const PREVIEWCREATE As Integer = -3
Public Const SETUP As Integer = -2
Public Const PREVIEW As Integer = -1
I then have a form post where i recover a string like:
Dim mode_custom_mode = request.Form("custom_mode")
I can do
Select Case UCase(mode_custom_mode)
Case "PREVIEWCREATE"
[Code].....
is there a more direct way in VB to do something like:
t.StartupModeId = StartupMode.(mode_custom_mode) ?????
I am having an issue with the following code. It works when the data is all numeric such as 9200000 but not when the data is alpah numeric such as b101462 I am collecting data from a textbox into a string variable findacct and then using the variable in the sql statement. The data in the access database is char type.
The following select statement works when all the data is numeric for the find acct varialbe but if start with a alpha char like B101462 it gives me a missing parameter error."Select * From purchase where issuedate >= " & "#" & finddate & "#" & "and account like " & findacct)The following statement works when I actually put the account info in the select statement and do not use a variable."Select * From purchase where issuedate >= " & "#" & finddate & "#" & "and account like 'b101462'")
I want to select a table on my database but I have the name of the table on a variable.Because I will create tables periodically I have don't know the name of the future tables so I will stored on a variable. The problem is how I call the variable on SQL statment. I made a code using the addwithvalue to use the variable on the SQL but didn't work. Here is my code
Dim tablename As String
tablename = InputBox("Enter the table name")
Dim myconecction As String
[code].....
I have a simple vb script which extracts some data from our accounting software to a text file. It works fine when I do not use a variable in my select statment as follows:
xselect = "SELECT SourceJournal,JournalRegisterNo, PostingDate, PostingComment,UserCreatedKey
FROM GL_DetailPosting
[Code].....