Try using an error handler
public sub whatever()
Dim Buffer() As Byte
Dim FileNumber As Integer
on error goto errorhandler
FileNumber = FreeFile()
Open URL(some URL) For Binary Access Read Write As #FileNumber
Buffer = Inet1.OpenURL(URL, icByteArray) 'this uses INET control to get the...
dude,
Try the split command.
If the format is first_name middle_name last_name
do this:
dim strSplit() as string
dim strStuff as string
strStuff = "John Q Public"
strsplit() = split(strstuff," ")
strsplit(0) = firstname
strsplit(1) = middlename
strsplit(2) = lastname
MJC
I'm trying to connect to SQL server:
Set mvarOCN = New ADODB.Connection
mvarOCN.Open "Driver={SQL SERVER};Server=" & mvarserver & ";database=" & mvardatabase & ";Trusted_Connection=yes;"
Set mvarRS = mvarOCN.Execute(sqlStatement)
when my sqlStatement...
I have more than one application that uses MS SQL Server. It seems that when I try to utilize more than one connections via different software apps, it often times out until one is complete.
App 1 is an inserter....inserts test records into db.
App 2..3..4 is a query tool..used to get test...
I'm trying to dynamically instantiate class modules based on file input
so in my project i have a class module called: myClass.cls
I would like to do:
dim O as object
Set O = CreateObject("myProject.myClass")
...but it errors out with "ActiveX can't create object
You may be...
Hey,
I'm looking for a way to display the column names of a table at an angle. I found the command "writing-mode: tb-rl;" for a CSS which puts text in at 90 degree angle but it's at an angle that people aren't used to viewing (opposite). Is there a way to specify the angle of the...
you got it dude...with the link
Response.Write(oADORecordset.GetString(,,",",chr(13)&chr(10),"(NULL)"))
works while
Response.Write(oADORecordset.GetStringad(ClipString, -1, ",", ",", "(NULL)"))
Thanks,
Please assume that open db works but here is opendbconnection
function openDBConnection()
'This line creates an ADO Connection object
dim oADOConnection
On Error Resume Next
Set oADOConnection = Server.CreateObject("ADODB.Connection")
'We can then open a connection Database...
Hello,
I'm having trouble getting the getstring method to work in vbscript over asp.
set oADOConnection = openDBConnection()
Set oADORecordset = oADOConnection.Execute(buildsql(report_type)) '''call function in sqlUtility.asp and get data...
Hello,
I'm having trouble getting the getstring method to work in vbscript over asp.
set oADOConnection = openDBConnection()
Set oADORecordset = oADOConnection.Execute(buildsql(report_type)) '''call function in sqlUtility.asp and get data...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.